CPC Rulez
https://cpcrulez.fr/forum/

JOE BLADE 2
https://cpcrulez.fr/forum/viewtopic.php?f=10&t=2880		 Page 1 sur 1
Auteur :  Princesse Mariana [ 09 Jan 2009, 14:32 ]
Sujet du message :  JOE BLADE 2
Code :
1 :'Joe Blade 2-tape
2 :'by Mike Wong
3 :'020
10 MEMORY &3FFF:MODE 1
20 GOSUB 80
30 LOAD "!"
40 POKE &417F,&8F
50 POKE &41CC,&B3
60 POKE &422C,&F9
70 CALL &4005:END
80 FOR n=&BE00 TO &BE26
90 READ a$:a=VAL("&"+a$)
100 POKE n,a:c=c+a:NEXT
110 IF c<>3168 THEN 330
120 INPUT"Inf time (y/n)";a$
130 IF a$="y" THEN 150
140 POKE &BE0F,&35
150 INPUT"Extra keys (y/n)";a$
160 IF a$="n" THEN 210
170 PRINT "Extra 10 keys when";
180 PRINT " you collect how many";
190 INPUT " dustbins (1-5)";a
200 POKE &BE14,a
210 PRINT "Don't die when fail"
220 INPUT " a sub-game (y/n)";a$
230 IF a$="y" THEN 250
240 POKE &BE19,&A8
250 RETURN
260 DATA 21,35,AE,36,C3,23
270 DATA 36,0E,23,36,BE,C3
280 DATA 00,AC,3E,00,32,6A
290 DATA 15,3E,05,32,98,1D
300 DATA 3E,70,32,28,23,32
310 DATA BC,24,32,C3,26,32
320 DATA E2,28,C9
330 PRINT "Error!"
Auteur :  Princesse Mariana [ 19 Jan 2009, 21:32 ]
Sujet du message :  Re: JOE BLADE 2
POKE(S) pour le jeu AMSTRAD CPC "JOE BLADE 2"

Unlimited keys
POKE &1F92,&94
POKE &1F94,&00
POKE &1F98,&00
POKE &2028,&2A
POKE &202A,&00
POKE &202E,&00
POKE &2070,&00
POKE &2071,&00
POKE &2075,&00

Unlimited time
POKE &156A,&00

Unlimited time:puzz.
POKE &230F,&18
POKE &24A3,&18
POKE &26AA,&18
POKE &28C9,&18

Solve puzzles
POKE &2300,&00
POKE &2538,&3A
POKE &253E,&C3
POKE &269B,&00
POKE &28BA,&00

Dustbins needed
POKE &1D98,&xx ; xx = (01-05)

Citizens needed
POKE &1E10,&xx ; xx = (00-10)

Enemies needed
POKE &1E0A,&xx ; xx = (00-64)

Minutes
POKE &F648,&xx ; xx = (30-39 * 2)
POKE &F649,&xx ; xx = (30-39 * 2)

Seconds
POKE &F64B,&xx ; xx = (30-39 * 2)
POKE &F64C,&xx ; xx = (30-39 * 2)

Time for puzzles
POKE &F653,&xx ; xx = (30-39 * 2)
POKE &F654,&xx ; xx = (30-39 * 2)

Keys
POKE &F606,&xx ; xx = (00-63)

Citizens
POKE &F607,&xx ; xx = (00-10)

Dustbins
POKE &F613,&xx ; xx = (00-05)
POKE &F63B,&xx ; xx = (30-39 * 2)
POKE &F63E,&xx ; xx = (30-39 * 2)
POKE &F638,&xx ; xx = (30-39 * 2)

Score
POKE &F62B,&xx ; xx = (30-39 * 6)
POKE &F62C,&xx ; xx = (30-39 * 6)
POKE &F62D,&xx ; xx = (30-39 * 6)
POKE &F62E,&xx ; xx = (30-39 * 6)
POKE &F62F,&xx ; xx = (30-39 * 6)
POKE &F630,&xx ; xx = (30-39 * 6)


** http://CPCrulez.fr **
Page 1 sur 1 Le fuseau horaire est UTC+1 heure
Powered by phpBB® Forum Software © phpBB Group
https://www.phpbb.com/