| CPC Rulez https://cpcrulez.fr/forum/ |
|
| URIDIUM https://cpcrulez.fr/forum/viewtopic.php?f=10&t=2806 |
Page 1 sur 1 |
| Auteur : | Princesse Mariana [ 08 Jan 2009, 20:27 ] |
| Sujet du message : | URIDIUM |
POKE(S) pour le jeu AMSTRAD CPC "URIDIUM" INFINITE LIVES : POKE &5EC2,&00 SURPRISE! : POKE &61AF,&00 POKE(S) pour le jeu AMSTRAD CPC "URIDIUM +" INF LIVES: POKE &1FC2,00 NO HOMING MISSILES: POKE &0962,&00 POKE &0963,&00 POKE &0964,&00 |
|
| Auteur : | Princesse Mariana [ 09 Jan 2009, 14:37 ] |
| Sujet du message : | Re: URIDIUM |
Code : 1 :' Uridium Plus - tape
2 :' by Julian Page 3 :' 031 10 :'URIDIUM+ - Tape 20 :'By Julian Page 30 :'Amstrad Action Dec 88 40 MODE 1:BORDER 0 50 INK 0,0:INK 1,20 60 INK 2,26:INK 3,24 70 MEMORY &3FFF 80 LOAD"LOADER" 90 POKE &414D,&C9 100 CALL &4000 110 WINDOW 1,40,25,25 120 X=0:DEFSTR A-B 130 FOR X=0 TO 1 140 GOSUB 190 150 NEXT X 160 CALL &4000 170 DATA INFINITE LIVES,&47AF 180 DATA NO HOMING MINE,&47B2190 READ A,C:B="" 200 PRINT A;"Y/N?" 210 WHILE B="" 220 B=UPPERS(INKEY$) 230 WEND 240 IF B<>"Y" THEN RETURN 250 FOR Y=C TO C+2 260 POKE Y,0 270 NEXT Y 280 RETURN |
|
| Page 1 sur 1 | Le fuseau horaire est UTC+1 heure |
| Powered by phpBB® Forum Software © phpBB Group https://www.phpbb.com/ |
|