HP50g: local LBL and GOTO in user or sysRPL

[cyrille de brébisson]

Hello,

As stated above, ASM goto are not a problem.
(SYS)RPL goto do exist natively, but require fix address which does not work here...
Relative GOTO can be implemented in ASM in a (SYS)RPL program using arithmetics on the D0 pointer.

CODE
AD0EX LC(5) dest-endcode A+C.A AD0EX
RPL
*endcode
ENDCODE


(sys)rpn here!!!

LABEL dest


Note that if you know that the distance between the 2 items is not long, you can use directly D0+(dest-endcode) (if my memory serves me well) but since arithmetic on pointers is limited to +/- 16, if the distance is large, it can be problematic.



Note that this type of GOTO can NOT exit (sys)RPL loops and program structures!!!! so be careful!!!


Cyrille