From Jake-S@cup.portal.com Tue Sep 25 11:09:40 1990 From: Jake-S@cup.portal.com (Jake G Schwartz) Newsgroups: comp.sys.handhelds Subject: HP48 Pause With Stack Display Date: 18 Sep 90 02:42:19 GMT Organization: The Portal System (TM) HP48 Pause With Stack Display ----------------------------- After posing the question "How does one pause an HP48 program to show the status of the stack display and resume execution?", nobody could produce a simple answer. However after thinking about the exotic ideas which I had received via Email, a solution was found. The following routine PAUSE halts a running program for a number of seconds specified in stack level 1, shows the stack and then resumes afterwards. The procedure halts the program, sets a control alarm to execute a CONT n seconds after the alarm is set and stops. The alarm then wakes up the program and resumes from there. For instance, the program << 1 2 3 PAUSE 4 5 >> will start up, pause for 3 seconds displaying 1 and 2 on the stack, then resume and end up with 1,2,4 and 5 on the stack. The routine PAUSE is shown below. %%HP: T(3)A(D)F(.); << DATE TIME ROT 10000 / HMS+ { } + + @get date, time+#seconds in stack { \<< DELALARM CONT \>> } + @build control alarm to do a CONT STOALARM DROP HALT @set alarm, drop alarm # and halt \>> Jake Schwartz