home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #27 / NN_1992_27.iso / spool / comp / sys / hp48 / 5876 < prev    next >
Encoding:
Text File  |  1992-11-22  |  2.1 KB  |  52 lines
  1. Newsgroups: comp.sys.hp48
  2. Path: sparky!uunet!kithrup!hoptoad!pacbell.com!iggy.GW.Vitalink.COM!cs.widener.edu!eff!sol.ctr.columbia.edu!usc!zaphod.mps.ohio-state.edu!cs.utexas.edu!mercury.unt.edu!sol!cgw
  3. From: cgw@sol.acs.unt.edu (christopher williams)
  4. Subject: Re: Emulating a keypress in sys_RPL???
  5. Message-ID: <cgw.722454400@sol>
  6. Originator: cgw@sol.acs.unt.edu
  7. Sender: usenet@mercury.unt.edu (UNT USENet Adminstrator)
  8. Organization: University of North Texas
  9. References: <1992Nov16.090229.12183@waikato.ac.nz> <2b08485b.2181.1comp.sys.hp48.1@hpcvbbs.cv.hp.com> <1ear87INN4gv@clover.csv.warwick.ac.uk> <By3z4E.66o@news.cso.uiuc.edu>
  10. Date: Sun, 22 Nov 1992 17:46:40 GMT
  11. Lines: 39
  12.  
  13. In <By3z4E.66o@news.cso.uiuc.edu> rmg53668@uxa.cso.uiuc.edu (Ryan M. Grant) writes:
  14. >After seeing JKH's key sysevals table:
  15. >So who's gonna make up the first HP macro recorder?
  16. >Is it a useful thing?
  17. >- Ryan Grant
  18.  
  19. er, that would be the _second_ macro recorder. here's one that records
  20. what you do to the stack:
  21.  
  22.  
  23. %%HP:T(3);
  24. @
  25. @ MACRO - a keystroke recorder for the HP48.
  26. @
  27. @         Author:  Mark Warburton
  28. @                  mwarburt(at)sirius.UVic.CA
  29. @
  30. @ Download this program to your HP48 and store it as MACRO.
  31. @ The program must be named MACRO so that, when you've finished
  32. @ recording your keystrokes and you hit MACRO, the command "MACRO"
  33. @ is not recorded as well.
  34. @
  35. @ The program will kick the HP48 out of User mode when it finishes,
  36. @ regardless of its previous status.  If you use User mode, you can
  37. @ just remove the -62 CF from the program.
  38. @
  39. @ Instructions:  Hit MACRO to start recording.  A "3" (sideways "M" which
  40. @                stands for Macro) will appear in the status line to indicate
  41. @                that recording is active.  Hit MACRO again to stop
  42. @                recording.  The completed program will be returned to
  43. @                the stack.
  44. @
  45. \<< IF -63 FC? THEN "\<<" 'MDAT' STO
  46. \<< \-> s \<< IF s "MACRO" \=/ THEN 'MDAT' " " s + STO+ END \>> \>>
  47. '\GbENTER' STO
  48. \<< \-> s \<< 'MDAT' " " s + STO+ s OBJ\-> \>> \>> '\GaENTER' STO
  49. -62 SF -63 SF 3 SF
  50. ELSE -62 CF -63 CF 3 CF MDAT OBJ\-> { \GaENTER \GbENTER MDAT } PURGE END
  51. \>>
  52.