Some small utilities.

[Julian Fondren]

I've posted my 'save' and 'load' programs before. This is just a
pair of small programs that save flags and keybindings... and also
Org data (see hpcalc.org, it's "Organizer" and works with Scribe),
since that program has the temerity to save its data in the hidden
directory without telling me that I might LOSE ALL MY SCHOOL
ASSIGNMENTS AAAAHH. DAT\-> and \->DAT are the Org commands.

\<< RCLF :1:bFLAGS DUP PURGE STO
RCLKEYS :1:bKEYS DUP PURGE STO
DAT\-> :1:bOrgDAT DUP PURGE STO \>>
\<< :1:bFLAGS RCL STOF :1:bKEYS RCL STOKEYS :1:bOrgDAT RCL \->DAT \>>

There, isn't that neat and repetitive?

Also, I usually have only one line for the header, and don't like
showing the clock all the time anyway. I used to have a program
that would show a big clock, but that's expensive and usually
unnecessary, so after some thought I wrote the following, and
assigned it to 74.2 -- since I never use that FINANCE thing.

\<< -41. -40. {CF SF} -40. FS?
::1. {REVLIST 2.} IFTE \->HEADER EVAL \>>

That'll toggle between a two-header w/clock and a 1-header display.
Nice to look at the time/date without fanciness.

I had a similar program for toggling Masd mode and stack display
(with a frozen message to the header area) -- but that was before
I wrote the first program here. Oh well. It's not very much
different from this last clock toggler.

[John H Meyers]

Julian Fondren wrote:

> programs that save flags and keybindings...

> [in case the Hidden Directory hides forever :]

Want to save alarms too, to guard against sleeping through quizzes?

Recall alarm list from hidden directory to stack:
\<< RCLF -55. CF IFERR 1. MAXR FOR i i RCLALARM NEXT
THEN 1. - \->LIST SWAP STOF END \>>

Store alarm list from stack to hidden directory:
\<< IF DUP SIZE THEN REVLIST \<< STOALARM \>> DOLIST END DROP \>>

[r->] [OFF]

-----= Posted via Newsfeeds.Com, Uncensored Usenet News =-----
http://www.newsfeeds.com - The #1 Newsgroup Service in the World!
-----== Over 80,000 Newsgroups - 16 Different Servers! =-----