Petit rappel utile à propos des posts parce qu'on n'aime pas effacer des publications. (Enfin si on aime mais ne nourrissez pas notre perversion.)
1) Autorisé: listings, trainers , patchs, pokes , solutions, videos walkthrough. 2) Interdit: Tout messages sans intérêt , commentaire , demande et hors sujets ... 3) Obligatoire: Un topic par jeu. 4) Merci de respecter les rubriques et poster vos messages au bon endroit afin de permettre une bonne visibilité du forum.
1 :' MASK --TAPE-- 2 :' By Graham Smith 3 :' Method 1 4 :' Infinite time 5 :' Infinite bombs 6 :' No damage to thunderhawk 10 FOR j=0 TO 44:READ a$ 20 POKE 96+j,VAL("&"+a$) 30 NEXT j:CLS:CALL 109 40 DATA af,32,03,a9,32,29,8b,32 50 DATA a3,91,c3,7d,04,06,00,11 60 DATA 70,01,cd,77,bc,cd,ff,bb 70 DATA 3e,09,32,98,01,0e,c0,cd 80 DATA 89,01,21,0b,6b,22,fa,01 90 DATA 0e,6b,c3,a8,01
Code :
10 MODE 2:GOSUB 110 20 PRINT"Insert MASK disk..." 30 PRINT"(WRITE PROTECT OFF)" 40 CALL &BB18 50 INPUT"Normal (y/n)";a$ 60 IF a$<>"y" THEN 80 70 POKE &800C,&3D 80 CALL &8000 90 POKE &8011,&3F 100 CALL &8000:ùCPM:END 110 FOR n=&8000 TO &8013 120 READ a$:a=VAL("&"+a$) 130 c=c+a:POKE n,a 140 NEXT:IF c<>1437 THEN 200 150 RETURN 160 DATA 21,00,40,11,00,12 170 DATA 0e,11,df,11,80,3e 180 DATA a7,32,67,40,c9,3c 190 DATA c0,07 200 PRINT"Error...":END
Utilisateur(s) parcourant ce forum : Aucun utilisateur inscrit et 42 invité(s)
Vous ne pouvez pas publier de nouveaux sujets dans ce forum Vous ne pouvez pas répondre aux sujets dans ce forum Vous ne pouvez pas éditer vos messages dans ce forum Vous ne pouvez pas supprimer vos messages dans ce forum Vous ne pouvez pas insérer de pièces jointes dans ce forum