Battlecars (Games Workshop)

Battlecars
Developer: SLUG Publisher: Games Workshop Platform: ZX Spectrum Released in EU: 1984 This game has uncompiled source code.

Source Code Fragment

A few sections of the code are left in the game. The code seen below can be viewed with a hex editor at the addresses listed below in the .tap dump of the game.

8087:

        Z,DACO2
DALO1	ADD	HL,DE
        DJNZ	DALO1
DACO2	LD	E,C
        ADD	HL,DE
        LD	E,(HL)
        LD	A,E
        LD	(OFFSET),A
        LD	L,(IX+31)
        LD	H,(IX+32)
        ADD	HL,DE
        LD	A,(HL)
        RET
CARCOL	NOP
ZZZ	    LD	C,(IX+20)
        LD	L,(IX+27)
        LD	H,(IX+28)
        LD	DE,20
        ADD	HL,DE
        LD	A,(HL)
        LD	(RAMDIR),A
        LD	HL,RAMPO
        LD	B,A
        LD	DE,8
        CP	0
        JR	Z,RAMCO1
RAMLO1	ADD	HL,DE
        DJNZ	RAMLO1
RAMCO1	LD	E,C
        ADD	HL,DE
        LD	A,(HL)
        LD	(ARM),A
        LD	L,(IX+27)
        LD	H,(IX+28)
        PUSH	IX
        PUSH	HL
        POP	IX
        CALL	CARDAM
        POP	IX
        CALL	BUICOL
        RET
RAND	PUSH	BC
        P

83C6:

        ,HL
        RLA
        JR	NC,BB
        ADD	HL,DE
        ADC	A,0
BB	    DJNZ	RNLO1
        RET
ZEN1	LD	A,(23296)
        CALL	RAND
        LD	B,0
        LD	C,A
        RET
        LD	C,(IX+60)
        LD	B,(IX+61)
FIRE	NOP
        EXX
        PUSH	HL
        EXX
        LD	IX,64500
        LD	C,(IX+61)
        LD	B,(IX+60)
        LD	BC,(CURPL)
        LD	(CURPL),BC
        CALL	RPLOT
        LD	DE,(SGNS)
        LD	BC,(ABSS)
        CALL	DRAW
        EXX
        POP	HL
        EXX
        RET
DRAW	LD	A,C

E084:

             Z,DACO2
DALO1   ADD  HL,DE
        DJNZ DAL