Springer (Arcade)

Springer
Developer: Orca Publisher: Orca Platform: Arcade (Orca Marine Boy hardware) Released in US: 1982 This game has uncompiled source code.

Uncompiled Code

The last two code roms (springer.8 and springer.9) contain some uncompiled code fragments in them.

The first one is in springer.8 at 0x1A5:

	JR	Z,DIV560	; NO
	RES	0,(HL)
	CALL	DIVOR	; DIVER'S Y0
	LD	A,L
	AND	0FH	; Y0=16N
	JR	NZ,DIV560	; NO.
	INC	L
	CALL	DIVOR
	LD	HL,TCB040	; RES 16N-F
	RES	6,(HL)
;
;	LEFT LIMIT
;
DIV560	EQU	$
	LD	A,(IX+1)
	SUB	3*8+5
	JR	NC,DIV570
	LD	(IX+1),3*8+5	; LEFT LIMIT
;
;	SIFT
;
DIV570	EQU	$
	LD	A,(IX)
	SUB	5*8+4	; DOWN SIFT
	JR	NC,DIV600	; NO.
	LD	(IX),5*8+4	; SET TAGDIV
	LD	C,A
	LD	B,00H
	CALL	DIVOR	; Y0
	ADD	HL,BC	; Y0 COORDINATE
	LD	A,L
	AND	0FH	; Y0=16N ?
	JR	Z,DIV580	; YES
	ADD	A,0F2H	; 16N<Y0=<16N+2 ?
	JR	C,DIV580	; YES
	SUB	0F4H	; 16N-2<=Y0<16N+2 ?
	EX	DE,HL
	JR	NC,DIV590	; NO.
DIV580	EQU	$
	LD	HL,TCB0

The second one is in springer.8 at 500:

                (COM120)	; Y0-LIMIT
DIV620	EQU	$
	AND	A	; CLEAR CY
	LD	BC,13
	SBC	HL,BC	; UNDER LIMIT ?
	AND	A	; CLEAR CY
	SBC	HL,DE
	JR	NC,DIV630
	ADD	HL,DE
	EX	DE,HL
DIV630	EQU	$
	EX	DE,HL
	CALL	DIVY
;
;	MAGIC HAND & DISPLAY
;
DIV640	EQU	$
	LD	A,(IX+2)
	AND	0FH	; DIRECTION
	LD	B,00H
	ADD	A,A
	ADD	A,A	; A*4
	LD	C,A
	LD	HL,DIVCHA
	ADD	HL,BC
	EX	DE,HL	; SAVE HL
	LD	A,(COM150)
	AND	80H	; MAGIC HAND ?
	LD	HL,TCB010
	JR	Z,DIV680	; NO.
	BIT	1,(HL)	; MAGIC HAND DATA
	JR	NZ,DIV650
	SET	1,(HL)
	LD	HL,TCB050	; COUNTER
	LD	(HL),00H	; CLEAR
	JR	DIV660
DIV650	EQU	$
	LD	HL,TCB050
	INC	(HL)
	BIT	4,(HL)	; END OF M-HAND ?
	JR	NZ,DIV670	; YES
	LD	A,(HL)
DIV660	EQU	$
	CP	03H	; SHORT HAND
	INC	DE
	INC	DE
	JR	NC,DIV700	; NO.
	INC	DE
	JR	DIV700
DIV670	EQU	$
	DEC	(HL)
	JR	DIV690
DIV680	EQU	$
	RE

The third one is in springer.9 at 0x60E:

D-1 SRC

<LIST
	TITLE	DIVER CONTORL
;
;
;
;	TCB USAGE
;	TCB010  0 UP-SHIFT
;		1 MAGIC HAND DATA
;		2 DOWM-SHIFT
;	TCB040  0 FIRST CONTACT
;		1 STRUGGLE
;		2 MEDUSA
;		3 MO
;		4 OCTPUS
;		5 REACTION
;		6 *16 STOP
;		7 OCTPUS X-MOVING
;	TCB050	STRUGGLE COUNTER
;	TCB060	OXYGEN COUNTER
;	TCB070	VERTOR
;	TCB080	DIRECTION COUNTER
;	TCB090	DOT COUNTER
;	TCB100	PICTURE COUNTER
;	TCB110	+Y DATA
;	TCB120	+X DATA
;	TCB130	-Y DATA
;	TCB140	-X DATA
;	TCB150	REACTION COUNTER
KEHEHE	EQU	0
DIVER	EQU	$
	LD	HL,TCB040
	BI