The first call to copyto_h() has only one argument (1.224), so that argument is placed in both the entry
and answer columns of the history area. The next two calls have two arguments, so the first argument
(the strings) is placed in the entry column, and the second argument is placed in the answer column.
The last call shows that expressions are pretty-printed, as expected. Note that multiple calls to
copyto_h() push each result up in the history display.
copyto_h() seems to run reliably on both HW1 and HW2 calculators, running AMS 2.05. I have had no
problem with this routine, but there is always the risk that this type of program could cause unreliable
calculator operation or a crash. I know of no problems that have been reported, and this program is so
useful that I accept the small amount of risk that is involved. Mr. Stearly is to be congratulated for this
accomplishment.
Mr. Stearly has also written:
sendstr() which works only with keyboard programs (kbdprgmx()) to send a string to the entry line:
http://www.ticalc.org/archives/files/fileinfo/166/16623.html
copytobc() which works with keyboard programs to copy an expression to the calculator clipboard:
http://www.ticalc.org/archives/files/fileinfo/146/14628.html
Method 2: expr(result & ":stop")
If the last line of your program is
expr(result & ":stop")
where result is a string, then result will be returned to the history area. For example,
expr("10"&":stop")
will return
10 : Stop
Now, this isn't exactly what we want, since the ":Stop" is tagged onto the result, but at least it works.
The ":Stop" can be edited out.
Timité Hassan provides this routine tohome() to return results to the history area:
tohome(lres)
Prgm
Local zkk,execstr
""→execstr
If dim(lres)=0:return
For zkk,1,dim(lres)
lres→wstr
If instring(lres[zkk],"@")=1 then
execstr&string(mid(lres[zkk],2))&":"→execstr
Else
execstr&lres[zkk]&":"→execstr
endif
Endfor
expr(execstr&":stop")
EndPrgm
7 - 9
To Next Page
Loading...
Need help?
General
