RPNL
merthsoft has just edited this program. The source code now reads:
BASIC Code wrote:
:If Str2="R
:Str3→Str2
:Str2→Str3
:0→P
:If Str2="P
:Then
:sum(15
:Else
:If Str2="T
:Then
:sum(15
:‾1→P
:Else
:If Str2="C
:Then
:sum(15
:sum(14
:Else
:If Str2="++
:Then
:1+sum(15
:Else
:If Str2="--
:Then
:sum(15)-1
:Else
:If Str2="+
:Then
:sum(15)+sum(15
:Else
:If Str2="-
:Then
:sum(15→A
:sum(15)-A
:Else
:If Str2="*
:Then
:sum(15)*sum(15
:Else
:If Str2="/
:Then
:sum(15→A
:sum(15)/A
:Else
:If Str2="!
:Then
:sum(15)!
:Else
:If Str2="^
:Then
:sum(15→A
:sum(15)^A
:Else
:expr(Str2
:End
Generated by SourceCoder, © 2005-2010 Cemetech
This is an automatic post from SourceCoder 2. Report abuse to admin@cemetech.net . You can disable these posts by unchecking the "Post on Update" box in the file's permissions.
Merth, very impressive work! As soon as I track down the expr() bug, I hope you'll at least submit that to the Cemetech archives, if not the ticalc.org archives as well. I like how in RPNL it looks like you only needed to use A, P, Str2, and Str3.
KermMartian wrote:
Merth, very impressive work! As soon as I track down the expr() bug, I hope you'll at least submit that to the Cemetech archives, if not the ticalc.org archives as well. I like how in RPNL it looks like you only needed to use A, P, Str2, and Str3.
Thanks! I plan on submitting it. It's been a while since I've put a program on ticalc. As for what RPNL needs, P and Str3 are just for some of the fancier things for manipulating the stack. Str2 and A are the only ones needed for the actual calculating. Hell, I could make it all stack and Ans based...
Maybe I will.
Now that is something that I would be very interested in seeing brought to fruition! No luck on tracing this bug out yet, although the symptoms are extremely weird.
  
Register to Join the Conversation
Have your own thoughts to add to this or any other topic? Want to ask a question, offer a suggestion, share your own programs and projects, upload a file to the file archives, get help with calculator and computer programming, or simply chat with like-minded coders and tech and calculator enthusiasts via the site-wide AJAX SAX widget? Registration for a free Cemetech account only takes a minute.

» Go to Registration page
Page 2 of 2
» All times are UTC - 5 Hours
 
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum

 

Advertisement