Chase H.Q.: Routine at B7EF

B7EF: Routine at B7EF

Used by the routine at draw_object_right.
sub_b7ef	B7EF	LD ($B720),SP	self modify B71F - exit of plot_masked_sprite
	B7F3	LD IX,$B729	IX = &plot_masked_sprite_core_thingy (jump table)
	B7F7	CPL	A = 8 - A
	B7F8	ADD A,$09	A = 8 - A
	B7FA	RLCA	IX += A * 6
	B7FB	LD C,A
	B7FC	RLCA
	B7FD	ADD A,C
	B7FE	LD C,A
	B7FF	LD B,$00
	B801	ADD IX,BC
	B803	LD B,$0F	B = $0F
	B805	EXX
	B806	LD D,$00	D = 0
	B808	PUSH BC
	B809	PUSH HL
	B80A	LD H,D	H = D
	B80B	LD L,D	L = D
	B80C	LD A,B	A = B
	B80D	LD B,$05	B = 5
	B80F	DEC A	A--
	B810	RLA
	B811	RLA
j_b812	B812	RLA
	B813	JR NC,j_b816	JR NC,j_b816
	B815	ADD HL,DE	HL += DE
j_b816	B816	ADD HL,HL	HL += HL
	B817	DJNZ j_b812	DJNZ j_b812
	B819	RLA
	B81A	JR NC,sub_b7ef_0
	B81C	ADD HL,DE	HL += DE
sub_b7ef_0	B81D	POP BC
	B81E	ADD HL,BC	HL += BC
	B81F	POP BC
	B820	DEC D	D--
	B821	LD A,E	E = -E
	B822	NEG
	B824	LD E,A
	B825	JP plot_masked_sprite_entry	Exit via plot_masked_sprite_entry