Prev: C8E3 Up: Map Next: CBC5
CBA4: Routine at CBA4
CBA4 LD C,A C = A
CBA5 LD A,(IY+$00) A = IY[0]
CBA8 INC IY IY++
CBAA INC IXl IX.low++
CBAC SUB (IY+$00) A -= IY[0]
CBAF CP $E0 Jump if >= 240
CBB1 JP NC,$CBB9
CBB4 CP $50 Jump if >= 80
CBB6 JP NC,$C79A
CBB9 DEC L L -= 2
CBBA DEC L
CBBB ADD A,C A += C
CBBC JR Z,$CBA4 Jump if zero or negative
CBBE JP M,$CBA4
CBC1 LD C,A C = A
CBC2 JP $C915 Exit via C915
Prev: C8E3 Up: Map Next: CBC5