Prev: 26607 Up: Map Next: 26652
26612: BEEP action
ACTION_BEEP 26612 PUSH BC
26613 CALL 11560 Get floating point form for value held in 'A'
26616 LD A,100
26618 CALL 11560 Get floating point form for value held in 'A'
26621 RST 40 ROM 'Calculate' routine
26622 DEC B
26623 JR C,26687 This makes no sense
26625 INC A
26626 CALL 11560 Get floating point form for 'A'
26629 POP BC
26630 INC BC
26631 LD A,(BC)
26632 PUSH BC
26633 CALL 11560 Get floating point form for 'A'
26636 RST 40 'Calculate' routine
26637 AND D
26638 INC B
26639 LD BC,14339
26642 PUSH IX
26644 CALL 1016 Call the BEEP routine
26647 POP IX
26649 POP BC
26650 JR ACTION_CLEAR_0
Prev: 26607 Up: Map Next: 26652