Jason's Gem: Routine at C33E

C33E: Routine at C33E

Used by the routines at BC48, BF85, C98F and CA6F.
C33E	PUSH HL
C33F	PUSH DE
C340	PUSH BC
C341	PUSH AF
C342	LD HL,$4000
C345	LD DE,$4001
C348	LD BC,$17FF
C34B	LD (HL),$00
C34D	LDIR
C34F	LD HL,$5800
C352	LD DE,$5801
C355	LD BC,$02FF
C358	LD (HL),$47
C35A	LDIR
C35C	POP AF
C35D	POP BC
C35E	POP DE
C35F	POP HL
C360	RET
C361	LD D,$0C
C363	ADD HL,DE
C364	INC DE
C365	LD BC,$4143
C368	LD D,(HL)
C369	LD B,L
C36A	JR NZ,$C351
C36C	PUSH BC
C36D	PUSH DE
C36E	PUSH AF
C36F	CALL $C33E
C372	LD A,$02
C374	CALL $1601
C377	LD DE,$C361
C37A	LD BC,$000A
C37D	CALL $203C
C380	LD A,($5B6E)
C383	DEC A
C384	LD B,$00
C386	LD C,A
C387	CALL $2D2B
C38A	CALL $2DE3
C38D	LD B,$20
C38F	PUSH BC
C390	CALL $C2E7
C393	POP BC
C394	DJNZ $C38F
C396	POP AF
C397	POP DE
C398	POP BC
C399	POP HL
C39A	RET
This entry point is used by the routines at C3FB and CA6F.
C39B	PUSH HL
C39C	PUSH DE
C39D	PUSH BC
C39E	PUSH AF
C39F	LD HL,($5BA2)
C3A2	PUSH HL
C3A3	POP DE
C3A4	LD HL,($5B7C)
C3A7	LD A,($5B7E)
C3AA	LD C,A
C3AB	LD A,$08
C3AD	CALL $BDB7
C3B0	LD HL,($5BA2)
C3B3	LD DE,$0008
C3B6	ADD HL,DE
C3B7	PUSH HL
C3B8	POP DE
C3B9	LD HL,($5B7C)
C3BC	INC HL
C3BD	LD A,($5B7E)
C3C0	LD C,A
C3C1	LD A,$08
C3C3	CALL $BDB7
C3C6	LD HL,($5BA2)
C3C9	LD DE,$0010
C3CC	ADD HL,DE
C3CD	PUSH HL
C3CE	LD HL,($5B7C)
C3D1	LD B,$08
C3D3	CALL $BDE4
C3D6	DJNZ $C3D3
C3D8	POP DE
C3D9	PUSH HL
C3DA	PUSH DE
C3DB	LD A,($5B7E)
C3DE	LD C,A
C3DF	LD A,$08
C3E1	CALL $BDB7
C3E4	POP DE
C3E5	LD HL,$0008
C3E8	ADD HL,DE
C3E9	PUSH HL
C3EA	POP DE
C3EB	POP HL
C3EC	INC HL
C3ED	LD A,($5B7E)
C3F0	LD C,A
C3F1	LD A,$08
C3F3	CALL $BDB7
C3F6	POP AF
C3F7	POP BC
C3F8	POP DE
C3F9	POP HL
C3FA	RET