| Routines

13958: THE 'JUMP' SUBROUTINE (offset 51)

Used by the routine at jump_true. The address of this routine is found in the table of addresses. It is called via the calculator literal 51 by the routines at e_to_fp, cos and atn. This subroutine executes an unconditional jump when called by the literal '51'.
Input
HL' | Address of the jump offset
Output
HL' | Address of the next calculator literal to execute
jump | 13958 | EXX | Go to the next alternate register set.
This entry point is used by the routine at dec_jr_nz.
JUMP_2 | 13959 | LD E,(HL) | The next literal (jump length) is put in the E' register.
| 13960 | LD A,E | The number 0 or 255 is formed in A according as E' is positive or negative, and is then copied to D'.
| 13961 | RLA
| 13962 | SBC A,A
| 13963 | LD D,A
| 13964 | ADD HL,DE | HL' now holds the next literal pointer.
| 13965 | EXX
| 13966 | RET | Finished.