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 :'Ranarama - tape 2 :'by Phil Howard 10 DATA 21,00,9a,e5,01,00 20 DATA 02,c5,3e,ee,aa,77 30 DATA 23,c1,0b,78,b1,20 40 DATA f4,21,37,9a,36,c3 50 DATA 23,36,28,23,346,3e 60 DATA 21,,1e,9a,,e3,e9,50 70 DATA 2e,46,2e,48,21,8c 80 DATA 79,36,00,c3,b5,,5a 90 MEMORY &3000:Y=0 100 FOR x= &BE00 TO &BE2F 110 READ A$:AA=VAL("&"+A$) 120 POKE x,a:y=y+:NEXT 130 IF y<>&1275 THEN 160 140 LOAD"rana";LOAD"!" 150 CALL&BE00 160 PRINT"Data error"
Code :
1 :' Ranarama - disk 2 :' By Niall Brady 3 :' 229 10 DATA 01,1D,01,21,040 20 DATA 0F,50,11,00,070 30 DATA 50,06,FF,1A,16F 40 DATA AE,77,23,13,15B 50 DATA 10,F9,3A,07,14A 60 DATA 40,3D,32,07,0B6 70 DATA 40,32,07,50,0C9 80 DATA 06,50,ED,43,186 90 DATA 01,40,06,00,047 100 DATA ED,43,01,50,181 110 DATA A7,20,D8,3E,1DD 120 DATA BF,21,2C,50,15C 130 DATA 77,2B,AF,77,1C8 140 DATA 21,1F,50,11,0A1 150 DATA 5E,40,01,00,09F 160 DATA 02,ED,B0,3E,1DD 170 DATA 01,01,7E,FA,17A 180 DATA ED,79,3E,01,1A5 190 DATA CD,0E,BC,06,19D 200 DATA FF,76,10,FD,282 210 DATA F3,21,5C,40,1B0 220 DATA 11,1D,00,01,02F 230 DATA 00,01,ED,B0,19E 240 DATA C3,1D,00,3E,11E 250 DATA 79,20,4E,42,129 260 DATA 20,28,43,29,0B4 270 MEMORY &2000 280 a=&3FFD:l=10 290 WHILE l<270:GOSUB 550:WEND 300 LOAD"DISC",&4FB8 310 a=&BF00:l=330 320 WHILE l<370: GOSUB 550:WEND 330 DATA 21,52,99,3E,14A 340 DATA C0,77,3E,63,1D8 350 DATA 23,77,C3,00,15D 360 DATA 99,00,00,00,099 370 a=&BE80:l=390 380 WHILE l<540:GOSUB 550:WEND 390 DATA 21,8E,BE,11,17E 400 DATA 00,BF,01,40,100 410 DATA 00,ED,B0,C3,260 420 DATA 00,BF,01,7E,13E 430 DATA FA,AF,ED,79,30F 440 DATA 01,89,7F,ED,1F6 450 DATA 49,21,00,00,06A 460 DATA 11,00,00,01,012 470 DATA 00,02,ED,B0,19F 480 DATA 01,8D,7F,ED,1FA 490 DATA 49,21,91,79,174 500 DATA AF,77,23,77,1C0 510 DATA 23,77,21,65,120 520 DATA 65,77,C3,B5,254 530 DATA 5A,00,00,00,05A 540 CALL &3FFD 550 cs=0:FOR x=1 TO 4 560 READ v$ 570 v=VAL("&"+v$):POKE a,v 580 cs=cs+v:a=a+1:NEXT 590 READ c$:c=VAL("&"+c$) 600 IF c<>cs THEN PRINT"Data error in line ",l:END 620 l=l+10:RETURN
Utilisateur(s) parcourant ce forum : Aucun utilisateur inscrit et 60 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