4-level stack manipulation on 12c

[Dieter]

(03-04-2015 01:31 PM)Don Shepherd Wrote:  ENTER
ENTER
-
RDown
X<->Y
LastX
\(\div\)
INT
\(\times\)
-

This returns the modulus in x while the rest of the stack is filled with the initial y.
The following code takes the same 10 steps and exits with the upper stack registers filled with the initial x:

Code:

01  ENTER
02  ENTER
03  CLx
04  +
05  R↓
06  /
07  INT  (or IP)
08  R↑
09  x
10  -

So there are two options. Simply choose the one that fits your needs better.

Dieter