Prev: B46F Up: Map Next: B548
B517: Routine at B517
Used by the routine at AA0A.
B517 LD E,$06 E=06.
B519 CALL $A875 Call A875.
B51C LD HL,$B484 HL=Table_Opponent_BeerBellyBill.
B51F LD DE,$0015 DE=0015.
B522 LD C,A C=A.
B523 AND A Set flags.
B524 LD B,A B=A.
B525 JR Z,$B52A Jump to B52A if A is zero.
B527 ADD HL,DE HL+=DE.
B528 DJNZ $B527 Decrease counter by one and loop back to B527 until counter is zero.
B52A LD ($9B21),HL Write HL to *9B21.
B52D PUSH BC Stash BC on the stack.
B52E LD E,$06 E=06.
B530 CALL $A875 Call A875.
B533 POP BC Restore BC from the stack.
B534 CP C Jump to B52D if A is equal to C.
B535 JR Z,$B52D
B537 LD HL,$B484 HL=Table_Opponent_BeerBellyBill.
B53A LD DE,$0015 DE=0015.
B53D AND A Set flags.
B53E LD B,A B=A.
B53F JR Z,$B544 Jump to B544 if A is zero.
B541 ADD HL,DE HL+=DE.
B542 DJNZ $B541 Decrease counter by one and loop back to B541 until counter is zero.
B544 LD ($9B23),HL Write HL to *9B23.
B547 RET Return.
Prev: B46F Up: Map Next: B548