Prev: BA8F Up: Map Next: BAAE
BAA3: Money borrow: digit 4
Used by the routine at deduct_money.
money_borrow_lo BAA3 LD A,H A = H
BAA4 DEC A DEC A
BAA5 CP $2F CP $2F
BAA7 CALL Z,money_borrow_mid CALL Z,$BAAE ; Borrow from digits 1–2
BAAA LD H,A LD H,A
BAAB LD A,$39 LD A,$39 ; Reset digit 3 to '9'
BAAD RET
Prev: BA8F Up: Map Next: BAAE