83B5: Unused
83B5 |
LD A,($848F) |
83B8 |
LD HL,($8492) |
83BB |
CP $02 |
83BD |
JR NZ,$8413 |
83BF |
LD A,($8490) |
83C2 |
DEC A |
83C3 |
CP $3F |
83C5 |
JR NZ,$83C8 |
83C7 |
INC A |
83C8 |
LD ($8490),A |
83CB |
LD A,($8491) |
83CE |
ADD A,(HL) |
83CF |
LD ($8491),A |
83D2 |
LD DE,($8494) |
83D6 |
BIT 7,(HL) |
83D8 |
JR NZ,$83E1 |
83DA |
INC D |
83DB |
LD ($8494),DE |
83DF |
JR $83E6 |
83E1 |
DEC D |
83E2 |
LD ($8494),DE |
83E6 |
INC HL |
83E7 |
LD ($8492),HL |
83EA |
CALL $841C |
83ED |
LD A,($8498) |
83F0 |
INC A |
83F1 |
AND $1F |
83F3 |
LD ($8498),A |
83F6 |
OR A |
83F7 |
RET NZ |
83F8 |
LD ($848F),A |
83FB |
LD HL,$869C |
83FE |
LD ($8492),HL |
8401 |
LD HL,($8496) |
8404 |
LD ($8494),HL |
8407 |
RET |
8408 |
LD A,($8490) |
840B |
INC A |
840C |
CP $D8 |
840E |
JR NZ,$83C8 |
8410 |
DEC A |
8411 |
JR $83C8 |
8413 |
CP $03 |
8415 |
JR Z,$8408 |
8417 |
LD A,($8490) |
841A |
JR $83C8 |
841C |
LD A,($848E) |
841F |
INC A |
8420 |
AND $07 |
8422 |
LD ($848E),A |
8425 |
SRL A |
8427 |
LD DE,$849C |
842A |
PUSH AF |
842B |
LD A,($848F) |
842E |
LD ($832E),A |
8431 |
POP AF |
8432 |
CALL $8395 |
8435 |
LD ($848C),HL |
8438 |
LD A,($8491) |
843B |
ADD A,$02 |
843D |
CALL $8452 |
8440 |
LD A,($8491) |
8443 |
SUB $10 |
8445 |
CALL $8452 |
8448 |
LD HL,($8494) |
844B |
LD DE,$0000 |
844E |
CALL $03B5 |
8451 |
RET |