(33s) OEIS A4444: Nimsum N+3

[Didier Lachieze]

Another way to do it:

Code:

1.    LBL B
2.    STO N
3.    CLx
4.    4xIDIV(N:4)+RMDR(3-N:4)
5.    RTN

Note: I don’t have a 33s, just a 35s, so I’m not providing CK or LN.

EDIT: adding a shorter solution.

Code:

1.    LBL B
2.    STO N
3.    CLx
4.    N-3+2*RMDR(3-N:4)
5.    RTN