Micros ID n°1 décembre 1986
Micros ID n°1 décembre 1986
  • Prix facial : 22 F

  • Parution : n°1 de décembre 1986

  • Périodicité : trimestriel

  • Editeur : Mieva Presse

  • Format : (201 x 296) mm

  • Nombre de pages : 84

  • Taille du fichier PDF : 72,6 Mo

  • Dans ce numéro : Sony contre Amstrad : le combat

  • Prix de vente (PDF) : gratuit

Dans ce numéro...
< Pages précédentes
Pages : 44 - 45  |  Aller à la page   OK
Pages suivantes >
44 45
ite de la page 41) 1 AWELE LANGAGE : BASIC MSX TAILLE MEMOIRE : 3,9K 11 COLOR10:DRAW"BM141,1131R4F284G2L4H2 U4E2":PRINT#1,"c"DRAW"BD1":PRINT#1, " octobre 1986":GOSUB72 12 KEYOFF:COLOR3,12,12:BASE(7)=BASE(9) : SCREEN1:WIDTH32 13 A=BASE(6):VPOKEA+1,124:VPOKEA+2,17 2:VPOKEA+3,172:VPOKEA+5,172 14 FORI=OT011:J(I,0)=4:NEXT:LOCATE4,5 : PRINT"1) Joueur/Joueur":LOCATE4,8:PR INT"2) Joueur/Ordinateur":LOCATE4,11 : PRINT"3) Ordinateur/Ordinateur 15 GOSUB72:IFS$=""THENS$="3 16 X=VAL(S$):IFX<10R3
TAQNGLE : BASIC MSX TAILLE MEMOIRE : 4,5K 45 GOSUB75:GOT037 46 affichage 47 GOSUB61:IFX=2THEN50 48 LOCATE,5:PRINTCHR$(27)"J":LOCATE,8 : PRINTA$A$A$B$:LOCATE,15:PRINTA$A$A$B $:LOCATE3,22:PRINT"Awélé 49 FORI=OT011:A=J(I,0):GOSUB84:LOCATE P,C:PRINTLEFTS(C$,2*A+5*((A-1)\4)):NE XT 50 IFG(0,0)>24THEN57 51 IFG(1,0)>24THEN56 52 B=0:FORI=OT011:B=B+J(I,0):NEXT 53 IFB>5THENRETURNELSELOCATE12,13:PRI NT"Match nul":GOT059 56 IFX-1THENLOCATE18,1:PRINT" j'ai p erdu ":GOT059ELSE59 57 IFX-1THENLOCATE18,1:PRINT" J'ai ga gné ! " 59 G(0,0)=0:6(1,0)=0 60 GOSUB72:IFS$=""THENRUNELSE12 61 PUTSPRITE2,(28,21),3,48+G(0,0)\10 62 PUTSPRITE3,(42,21),3,48+G(0,0)MOD1 0:PUTSPRITE4,(212,173),3,48+G(1,0)\10 : PUTSPRITE5,(226,173),3,48+G(1,0)MOD1 0:RETURN 63'* Coup 64 S=J(A,P):J(A,P)=0:I=A 65 I=(I+1)MOD12:IFI-ATHENS=S-1:J(I,P) =J(I,P)+1 66 IFSTHEN65 67 FORI=ITO-(I>5)*6STEP-1:IF(J(I,P)AN D-2)=2AND(A<6X0RI<6)THENG(-(A>5),P)=G (-(A>5),P)+J(I,P):J(I,P)=0ELSEI=0 68 NEXTI:RETURN 69'* Affichage clignotant 70 LOCATE18,1:IFGTHENPRINTSPC(14)ELSE PRINT"JE VAIS GAGNER 71 G=GXORI:RETURN 72 RESTORE88:I=USR(0):FORI=200T04750 : IFIMOD400=0THENREADSS:PLAYS$ 73 SS=INKEYS:IFSS<>""THENBEEP:I=4750 74 NEXT:RETURN 75 FORI=0T05:SWAPJ(I,0),J(I+6,0):NEXT : SWAPG(1,0),G(0,0):G0T047 76'* Animation 77 I=A:GOSUB84:S=J(A,0) 78 LOCATEP,C:PRINTLEFTS(D$,S+5*((S-1)\4)):FORS=STO1STEP-1 79 I=(1+1)MOD12:GOSUB84:IFI-ATHENGOSU 887:LOCATEP+J(1,0)MOD4,C-J(I,0)\4:PRI NT"0":J(I,0)=J(I,0)+1:NEXTELSE79 80 FORI=ITO(I\6)*6STEP-1:IF(J(I,0)AND -2)-20R(AC6EgVl<6)THENI=0:60T083 de Bernard GENRE et Alain CORDIER 81 GOSUB87:GOSUB84:G(A\6,0)=G(A\6,0)+ 3(I,0):J(I,0)=0 82 LOCATEP,C:PRINTSPC(3) 83 NEXT:J(A,0)=0:GOSUB61:GOSUB87:RETU RN 84 C=10+(I\6)*7 85 IFIes6THENP=27-I*5ELSEP=I*5-28 86 RETURN 87 FORR=1T0170:NEXTR:RETURN 88 DATAM11000S9L8T16005A9A1A4G4DEECCD EIL16,04805CD8C04805C804805CD8CDE8DEA1 06E4,114C8DED8C8058806CDL8C05BAB06CDE2 A4G4,CD16E16DC05806C16D16C05BAO6CEAGD 05BGAO6C 89 DATAEAGD05BGA06CE4C405A406D05864L6 CDE,C04BABO5CDEFGABO6CDEFE,GFEGFT80A1, L8044805C04805C04A4.A8,05CDE4C4D4048 4,05C04BA4, Ce programme a été conçu par deux « mordus » (selon leur expression) du MSX : Bernard GENRE travaillant aux PTT et Alain CORDIER, étudiant. Inspiré du fameux TAQUIN, ce jeu vous propose de reconstituer un dessin préalablement divisé en 10 cases qui seront mélangées de manière aléatoire par votre MSX. Vous devrez pour cela déplacer successivement chaque morceau vers l'emplacement laissé vide par l'ordinateur. Soyez méthodique et:.. patient. 1 CLEAR500:A$="r2005BABF#DF#048.":Ml$ =A$+A$+"r2005806C#DC#D05806C#05806C#0 5ABAF#AB...":A1$="r2006F#EF#D05A06D05, F#.":M2$=A1S+A1$+"r2006F#G#AG#AF#G#F#



Autres parutions de ce magazine  voir tous les numéros


Liens vers cette page
Couverture seule :


Couverture avec texte parution au-dessus :


Couverture avec texte parution en dessous :


Micros ID numéro 1 décembre 1986 Page 1Micros ID numéro 1 décembre 1986 Page 2-3Micros ID numéro 1 décembre 1986 Page 4-5Micros ID numéro 1 décembre 1986 Page 6-7Micros ID numéro 1 décembre 1986 Page 8-9Micros ID numéro 1 décembre 1986 Page 10-11Micros ID numéro 1 décembre 1986 Page 12-13Micros ID numéro 1 décembre 1986 Page 14-15Micros ID numéro 1 décembre 1986 Page 16-17Micros ID numéro 1 décembre 1986 Page 18-19Micros ID numéro 1 décembre 1986 Page 20-21Micros ID numéro 1 décembre 1986 Page 22-23Micros ID numéro 1 décembre 1986 Page 24-25Micros ID numéro 1 décembre 1986 Page 26-27Micros ID numéro 1 décembre 1986 Page 28-29Micros ID numéro 1 décembre 1986 Page 30-31Micros ID numéro 1 décembre 1986 Page 32-33Micros ID numéro 1 décembre 1986 Page 34-35Micros ID numéro 1 décembre 1986 Page 36-37Micros ID numéro 1 décembre 1986 Page 38-39Micros ID numéro 1 décembre 1986 Page 40-41Micros ID numéro 1 décembre 1986 Page 42-43Micros ID numéro 1 décembre 1986 Page 44-45Micros ID numéro 1 décembre 1986 Page 46-47Micros ID numéro 1 décembre 1986 Page 48-49Micros ID numéro 1 décembre 1986 Page 50-51Micros ID numéro 1 décembre 1986 Page 52-53Micros ID numéro 1 décembre 1986 Page 54-55Micros ID numéro 1 décembre 1986 Page 56-57Micros ID numéro 1 décembre 1986 Page 58-59Micros ID numéro 1 décembre 1986 Page 60-61Micros ID numéro 1 décembre 1986 Page 62-63Micros ID numéro 1 décembre 1986 Page 64-65Micros ID numéro 1 décembre 1986 Page 66-67Micros ID numéro 1 décembre 1986 Page 68-69Micros ID numéro 1 décembre 1986 Page 70-71Micros ID numéro 1 décembre 1986 Page 72-73Micros ID numéro 1 décembre 1986 Page 74-75Micros ID numéro 1 décembre 1986 Page 76-77Micros ID numéro 1 décembre 1986 Page 78-79Micros ID numéro 1 décembre 1986 Page 80-81Micros ID numéro 1 décembre 1986 Page 82-83Micros ID numéro 1 décembre 1986 Page 84