|
|
This page contains no introduction. |
Source Code Fragment#
Some sections of the code are left in the game. The code seen below can be seen with a hex editor at the addresses in the .dsk dump of the game.
28C5:
DEFB 31,1,22
DEFM "HIGH SCORE..."
DEFB 31,1,23
DEFM "SCORE........0"
DEFB 31,1,24
DEFM "LIVES LEFT...5"
DEFB 31,1,25
DEFM "CODES FOUND..0"
DEFB 31,14,21,255
YOUDIE: LD A,(LIVES)
DEC A
LD (LIVES),A
CALL EXPLSH
LD A,(LIVES)
LD L,A
LD H,0
LD D,14
LD E,24
PUSH AF
CALL NUMBER
POP AF
CP 0
JP Z,START
JP ERASE
DRPERM: DEFB 16,100,-1,64,146,1
DEFB 28,M ". .…. . .…. . .….…. "
DEFB 15,8
DEFM ". ……. . ……. . …………. "
DEFB 15,9
DEFM ". ……. . ……. . …………. "
DEFB 15,10
DEFM ". ……. . ……. . …………. "
DEFB 15,11
DEFM ". .…. . .…. . .….…. "
DEFB 31,1,20,15,12
DEFM "PHOTOGRAPH THIS PAGE"
DEFB 31,1,23,15,13
DEFM "THEN HIT -SPACE- BAR"
DEFB 255
2C00:
100,1,80,146,1
DEFB 40,100,-1,64,146,1
DEFB 52,100,1,80,146,1
DEFB 64,100,-1,64,146,1
POWGRA:DEFS 2
EXPLSH:LD A,0
LD C,70
CALL 48436
LD A,1
LD C,3
CALL 48436
LD A,6
LD C,8
CALL 48436
LD A,7
LD C,0
CALL 48436
LD A,8
LD C,16
CALL 48436
LD A,12
LD C,20
CALL 48436
LD A,13
LD C,9
CALL 48436
LD A,11
LD C,0
CALL 48436
LD B,0
HALT
DJNZ $-1
CALL #BB03
CALL #BB18
RET
CHARGE: LD A,0
LD C,50
CALL 48436
LD A,1
LD C,32
CALL 48436
LD A,6
LD C,40
CALL 48436
LD A,7
LD C,8
CALL 48436
LD A,8
LD C,16
CALL 48436
LD A,11
LD C,0
CALL 48436
LD A,12
LD C,1
CALL 48436
LD A,13
LD C,9
CALL 48436
RET
ENERGY: LD A,0
LD C,50
CALL 48436
LD A,1
LD C,81
CALL 48436
LD A,6
LD C,2
CALL 48436
LD A,7
LD C,8
CALL 48436
LD A,8
LD C,16
CALL 48436
LD A,11
LD C,0
CALL 48436
LD A,12
LD C,2
CALL 48436
LD A,13
LD C,10
CALL 48436
RET
ZAP: LD A,0
LD C,70
CALL 48436
LD A,1
LD C,2
CALL 48436
LD A,6
LD C,3
CALL 48436
LD A,7
LD C,0
CALL 48436
A,8
C,16
CALL 48436
A,11
C,0
CALL 48436
LD A,12
LD C,10
CALL 48436
LD A,13
LD C,9
CALL 48436
RET
ZAP2: LD A,2
LD C,70
CALL 48436
LD A,3
LD C,2
CALL 48436
LD A,6
LD C,3
CALL 48436
LD A,7
LD C,0
CALL 48436
LD A,9
LD C,16
CALL 48436
LD A,11
LD C,0
CALL 48436
LD A,12
LD C,10
CALL 48436
LD A,13
LD C,9
CALL 48436
RET
MUTEXP: LD A,2
LD C,70
CALL 48436
LD A,3
LD C,3
CALL 48436
LD A,6
LD C,8
CALL 48436
LD A,7
LD C,0
CALL 48436
LD A,9
LD C,16
CALL 48436
LD A,12
LD C,20
CALL 48436
LD A,13
LD C,9
CALL 48436
LD A,11
LD C,0
CALL 48436
RET
MESSAG: DEFB 4,0,15,1
DEFM " .. ..…… ╩ .…╩.…╩ ╩ "
DEFB 15,2
DEFM " … … … . ╩╩ ╩╩ ╩╩ ╩ "
DEFB 15,3
DEFM " .. … ……╩╩..╩.… …… "
DEFB 15,4
DEFM " … … … …╩╩╩ ╩╩ ╩ ╩ "
DEFB 15,5
DEFM " … … … … .╩ ╩╩ ╩ ╩ "
DEFB 15,6
DEFM " .. ..…… ╩╩ ╩╩ ╩ ╩ "
DEFB 31,1,10,15,7