Prev: 83AD Up: Map Next: 8452
83B5: Unused
Used by the routine at 832F.
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
Prev: 83AD Up: Map Next: 8452