home *** CD-ROM | disk | FTP | other *** search
- ; Q - R e g i s t e r L i s t
-
- ; (c) 1988 Ralph Roberts
-
- ; Q-registers in Sprint are special variables containing information used by
- ; various macros, both those that come with Sprint and the ones you write for
- ; your own convenience in utilizing Sprint's fantastic power. This macro is a
- ; utility for us glorious macro-programmer-hackers (which is what most Sprint
- ; users will probably become just because Sprint makes it so wondrously EASY).
- ; QR.SPM shows you the contents of the first 24 Q-registers at a glance. If
- ; there is more than one line in the register, only the top one is shown. The
- ; last two registers, QO and QP are not shown since they are used as scratch
- ; registers by this macro. Here's what the registers do (from Borland SP.SPM):
-
- ; Q register usage:
- ; Q0 Anything that requires a filename, and result of some macros
- ; Q1 Anything that requires a filename
- ; Q2 Search string, string to replace
- ; Q3 String to replace with
- ; Q4 Not Used
- ; Q5 DOS command
- ; Q6 Formatter calls
- ; Q7 Environment names and style dimensions
- ; Q8 Used for getting text for footnotes and formatter commands
- ; Q9 unused
- ; QA Used by glossary; holds current glossary Name
- ; QB Used by glossary; holds glossary
- ; QC Used by glossary; scratch
- ; QD Scratch
- ; QE Used by spelling checker; holds bad word stack
- ; QF Used to collect keystrokes for replay
- ; QG Not used
- ; QH Used by column
- ; QI Used for macro entry
- ; QJ Holds current Speller engine params
- ; QK Holds a record containing infomerge info.
- ; QL reserved
- ; QM reserved
- ; QN Scratch
- ; QO Not Used
- ; QP Scratch
-
- ; TO INSTALL: To put this macro into Sprint, simply load this file, exactly
- ; as it is. If there is a ruler at the top, remove it. Then type the ALT-U-M-R
- ; key combination and this macro will be compiled. Next, use the ALT-U-M-E key
- ; combination. When it reads, "Enter Macro:" on the status line at the bottom
- ; of your screen, type in the name "QR" and hit the <ENTER> key. You may then
- ; either execute your new macro, or assign it to a key or key combination for
- ; ease-of-use in the future. Enjoy!
-
- ; A word about macro space. Sprint 1.0 has a limited amount of space available
- ; for macros. Putting in long ones like BigClock can eventually fill up it up.
- ; You can always reset by choosing Reset Shortcuts on the User Interface sub-
- ; menu of the Customize menu (ALT-C-U-R in the Borland Advance UI). Doing this,
- ; however, takes out ALL your macros. To make keeping permanent ones easy, you
- ; need an "executive" macro like my KEYS.SPM described in COMPUTE!'S USING BOR-
- ; LAND'S SPRINT.
-
- ; QR.SPM and the other unique Sprint macros in this series are all the copy-
- ; righted property of Ralph Roberts. You may distribute and use them freely
- ; if the macros are properly attributed & my copyright notice remains intact.
- ; They are, frankly, advertisements for my book on Sprint, and the other help-
- ; ful computer-oriented books that I write. Helping fellow computer users is
- ; how I make my living, so please look for my books and articles. Thanks.
-
- ; Ralph Roberts, the author of this macro, also wrote the comprehensive book,
- ; COMPUTE!'S USING BORLAND'S SPRINT. Autographed copies of this 100,000-word+
- ; book are now available for the retail price of $16.95 (ppd) from the author
- ; at: P.O. Box 8549, Asheville, North Carolina 28814, or you may buy it through
- ; your local Waldenbooks, B. Dalton's, or other quality bookstore.
-
- qr:
- set qp ""
- mark { to qp
-
- "Q0 --> " mark (to q0 toeol copy tosol qo ) insert qo "^J"
- "Q1 --> " mark (to q1 toeol copy tosol qo ) insert qo "^J"
- "Q2 --> " mark (to q2 toeol copy tosol qo ) insert qo "^J"
- "Q3 --> " mark (to q3 toeol copy tosol qo ) insert qo "^J"
- "Q4 --> " mark (to q4 toeol copy tosol qo ) insert qo "^J"
- "Q5 --> " mark (to q5 toeol copy tosol qo ) insert qo "^J"
- "Q6 --> " mark (to q6 toeol copy tosol qo ) insert qo "^J"
- "Q7 --> " mark (to q7 toeol copy tosol qo ) insert qo "^J"
- "Q8 --> " mark (to q8 toeol copy tosol qo ) insert qo "^J"
- "Q9 --> " mark (to q9 toeol copy tosol qo ) insert qo "^J"
- "QA --> " mark (to qa toeol copy tosol qo ) insert qo "^J"
- "QB --> " mark (to qb toeol copy tosol qo ) insert qo "^J"
- "QC --> " mark (to qc toeol copy tosol qo ) insert qo "^J"
- "QD --> " mark (to qd toeol copy tosol qo ) insert qo "^J"
- "QE --> " mark (to qe toeol copy tosol qo ) insert qo "^J"
- "QF --> " mark (to qf toeol copy tosol qo ) insert qo "^J"
- "QG --> " mark (to qg toeol copy tosol qo ) insert qo "^J"
- "QH --> " mark (to qh toeol copy tosol qo ) insert qo "^J"
- "QI --> " mark (to qi toeol copy tosol qo ) insert qo "^J"
- "QJ --> " mark (to qj toeol copy tosol qo ) insert qo "^J"
- "QK --> " mark (to qk toeol copy tosol qo ) insert qo "^J"
- "QL --> " mark (to ql toeol copy tosol qo ) insert qo "^J"
- "QM --> " mark (to qm toeol copy tosol qo ) insert qo "^J"
- "QN --> " mark (to qn toeol copy tosol qo ) insert qo "^J"
-
- r toend
- 1 -> zoom draw
-
- message "\n (Press any key to restore screen).... Read COMPUTE!'S "
- message "USING BORLAND'S SPRINT"
- key}
- 0-> statline
- 1-> statline
- 0 -> zoom
- draw
-