JOE BLADE 2

Princesse Mariana · **Publié :** 09 Jan 2009, 14:32

Code :

:'Joe Blade 2-tape
:'by Mike Wong
:'020
MEMORY &3FFF:MODE 1
GOSUB 80
LOAD "!"
POKE &417F,&8F
POKE &41CC,&B3
POKE &422C,&F9
CALL &4005:END
FOR n=&BE00 TO &BE26
READ a$:a=VAL("&"+a$)
POKE n,a:c=c+a:NEXT
IF c<>3168 THEN 330
INPUT"Inf time (y/n)";a$
IF a$="y" THEN 150
POKE &BE0F,&35
INPUT"Extra keys (y/n)";a$
IF a$="n" THEN 210
PRINT "Extra 10 keys when";
PRINT " you collect how many";
INPUT " dustbins (1-5)";a
POKE &BE14,a
PRINT "Don't die when fail"
INPUT " a sub-game (y/n)";a$
IF a$="y" THEN 250
POKE &BE19,&A8
RETURN
DATA 21,35,AE,36,C3,23
DATA 36,0E,23,36,BE,C3
DATA 00,AC,3E,00,32,6A
DATA 15,3E,05,32,98,1D
DATA 3E,70,32,28,23,32
DATA BC,24,32,C3,26,32
DATA E2,28,C9
PRINT "Error!"

Princesse Mariana · **Publié :** 19 Jan 2009, 21:32

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 **

Règles du forum

JOE BLADE 2

Qui est en ligne ?