If you appreciate the work done within the wiki, please consider supporting The Cutting Room Floor on Patreon. Thanks for all your support!

Invasion (ZX Spectrum, Bulldog Software)

From The Cutting Room Floor
Jump to navigation Jump to search

Title Screen

Invasion

Developer: Icon Design
Publisher: Bulldog Software
Platform: ZX Spectrum
Released in EU: 1987


SourceIcon.png This game has uncompiled source code.


Source Code Fragment

A small snippet of code can be seen at 8135 in the .tap dump.

ADD HL,HL
ADD HL,HL
ADD HL,HL
LD DE,CHARBAS
ADD HL,DE
EX DE,HL
LD A,MESTIME
LD (TELTIME),A
LD HL,(CPRADD)
PUSH HL
LD B,8

PRMES2:
LD A,(DE)
LD (HL),A
INC H
INC DE
DJNZ PRMES2
POP HL
INC HL
LD (CPRADD),HL

; DRAW CURSOR

PRMES4:
LD DE,CURDEF
LD B,8

PRMES3:
LD A,(DE)
LD (HL),A
INC DE
INC H
DJNZ PRMES3
LD A,1
LD (CSTAT),A
INC A
LD (CTIME),A 

; CLICK
LD B,5

CLICK1:
PUSH BC
LD A,(BORDCOL)
ADD A,8
CLICKIT:XOR $10
OUT (254),A
DJNZ CLICKIT
POP BC
DJNZ CLICK1
JP INTFIN 

; UPDATE CURSOR
UPCUR:
LD A,(CSTAT)
CP 2
JP Z,INTFIN
LD HL,CTIME
DEC (HL)
JP NZ,INTFIN
LD A,(CSTAT)
AND A
JP NZ,RUBCUR
LD HL,(CPRADD)
JP PRMES4       ; PRINT IT