Post Reply 
REVERSE DIGITS
03-25-2016, 12:24 PM
Post: #1
REVERSE DIGITS
In the same ways, because we, sometimes, need reversing order of digits in register X, I have written this little routine.
Code:

001 LBL'REV'
002 LocR 001
003 STO .00
004 STO- .00
005 FP
006 STO+ .00
007 RCL L
008 IP
009 # 010
010 STO[times] .00
011 /
012 x[!=]0?
013 BACK 008
014 RCL .00
015 RTN
016 END

Hope this little routine will agree you.

Have a nice day !

GĂ©rard.
Find all posts by this user
Quote this message in a reply
Post Reply 


Messages In This Thread
REVERSE DIGITS - ggauny@live.fr - 03-25-2016 12:24 PM
RE: REVERSE DIGITS - ggauny@live.fr - 03-25-2016, 12:25 PM



User(s) browsing this thread: 1 Guest(s)