newRPL: Alpha demo 0.9 released [UPDATED 2017-10-25]

[Claudio L.]

(10-26-2017 09:05 PM)Gilles59 Wrote:  An other way en NewRPL :

Code:

<< 0 999 FOR 'n' n DUP ->STR UTF8-> #30h - 3 ^ ΣLIST == n IFT NEXT >>

TEVAL : 1,56"

Better version for newRPL:

Code:


<< 0 999 FOR 'n' 
 n 0 0  DIGITS 3 ^
 n 1 1  DIGITS 3 ^ +
 n 2 2  DIGITS 3 ^ +
 n ==
 n IFT
 NEXT
 >>

TEVAL = 0.57 sec.