Sabre Wulf: Routine at A630

A630: Routine at A630

Used by the routines at 9E72 and AAED.
A630	LD A,($9703)
A633	CP (IX+$01)
A636	RET Z
A637	LD B,A
A638	RRCA
A639	RRCA
A63A	RRCA
A63B	RRCA
A63C	AND %00001111	Keep only bits 0-4.
A63E	LD C,A
A63F	LD A,(IX+$01)
A642	RRCA
A643	RRCA
A644	RRCA
A645	RRCA
A646	AND $0F
A648	SUB C
A649	JP P,$A64E
A64C	NEG
A64E	CP $02
A650	RET C
A651	LD A,($9695)
A654	AND $01
A656	JR NZ,$A678
A658	LD A,B
A659	SUB $10
This entry point is used by the routine at A678.
A65B	JR C,$A67D
This entry point is used by the routine at A67D.
A65D	AND $FC
A65F	LD C,A
A660	LD A,(IX+$01)
A663	AND $03
A665	OR C
A666	CP B
A667	RET Z
A668	LD (IX+$01),A
A66B	CALL HandlerOrchidPosition
A66E	LD A,(HL)
A66F	LD (IX+$03),A
A672	INC HL
A673	LD A,(HL)
A674	LD (IX+$04),A
A677	RET