Ghouls'n Ghosts (ZX Spectrum)

Ghouls'n'Ghosts
Developer: Software Creations Publisher: U.S. Gold Platform: ZX Spectrum Released in EU: 1989 This game has uncompiled source code.

Source Code Fragment

A section of the code is left in the game. The code seen below can be seen with a hex editor at address AAC0 in the .tap dump of the game.

LOSEarmor
LD HL,SPRITES+FLAGS
RES FLASHING?,(HL)
JP HITarthur

FRAMES:DB 0
;                SECONDS
TIME:DBH 000000
;          TENTHS  MINUTES

;_____________________________________
TEXT:
LD A,(IN_INFO?
OR A
RET NZ

LD A,(TEXT_TYPE)
DEC A
RET M

CALL JUMPTABLE
DW READYTEXT,KEYTEXT
DW TIMETEXT
DW CLEARTEXT,FLYTEXT

READYTEXT:;=1
LD A,0
INC A
AND 31
LD (READYTEXT+1),A
JR NZ,REDT
LD (TEXT_TYPE),A
CALL DO_MESAGE
DB ATR
OLDTEXCOL:DB 1,FIN
JR BLUET

REDT:
CALL DO_MESAGE
DB ATR,2,FIN

BLUET:
LD A,(DEMO?)
OR A
JR NZ,DEMO_MES
CALL DO_MESAGE
DB DOUBLE,0,AT,11,9
DB "READY@@GO",FIN
RET

DEMO_MES:
CALL DO_MESAGE
DB D