A00101
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  TYPO
 **PROGRAM TITLE: 
  TYPO Word Processing Program
  
 **REVISION?  YES 
  
 **PACKAGE:  1    **CATEGORY:  6
  
 **KEYWORDS:
    WORD PROCESS
  
  
 **LANGUAGES: 
    FTN4
  
 **COMPUTER TYPE: 
    E-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  Typo is a word processing program written primarily to help with
  document processing.  TYPO operates on a 21MX computer with an
  RTE-IVB operating system and utilizes the Diablo 1620 or NEC
  Spinwriter 5525 for printed output.  Input to TYPO is normally
  from ASCII text files generated with a separate text-editing
  program.  TYPO include the following features:
      1.  Paragraph processing to fill lines. 
      2.  Right and left margin justification.
      3.  Page titles and numbering.
      4.  Embedded tables and figures.
      5.  Full footnote support.
      6.  Nested source input files.
      7.  Printwheel intermixing. 
      8.  High degree of operator interaction possible for on-line
          adjustments.
      9.  Output file is created which allows quick retyping of the 
          finished document.
     10.  All control is from keyboard of Diablo. 
     11.  Continuous display of processing status and parameters on 
          TV monitor. 
     12.  A separate terminal may be used to provide the control
          keyboard and monitor screen if desired. 
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2:  $DEMO
  FILE#  3:  %CNTL
  FILE#  4:  %CNTLR 
  FILE#  5:  %DEFER 
  FILE#  6:  %DTOUT 
  FILE#  7:  %DUMMY 
  FILE#  8:  %DWRIT 
  FILE#  9:  %FLAG
  FILE# 10:  %FNOUT 
  FILE# 11:  %INPRT 
  FILE# 12:  %KFERR 
  FILE# 13:  %KNPRT 
  FILE# 14:  %LTYPE 
  FILE# 15:  *RETYP 
  FILE# 16:  *TVPO
  FILE# 17:  "TYPO
  FILE# 18:  %IPARS 
  FILE# 19:  %MANUL 
  FILE# 20:  %NULLS 
  FILE# 21:  %NUPAG 
  FILE# 22:  %NXTYP 
  FILE# 23:  %PITCH 
  FILE# 24:  %PROC1 
  FILE# 25:  %PROC2 
  FILE# 26:  %READL 
  FILE# 27:  %READR 
  FILE# 28:  %RETYP 
  FILE# 29:  %RTIME 
  FILE# 30:  %RTYPE 
  FILE# 31:  %SET 
  FILE# 32:  %STACK 
  FILE# 33:  %SUBF
  FILE# 34:  %TDATE 
  FILE# 35:  %TITLE 
  FILE# 36:  %TTYMN 
  FILE# 37:  %TVMN
  FILE# 38:  %TVMN1 
  FILE# 39:  %TVMON 
  FILE# 40:  %TVPO
  FILE# 41:  %TWRIT 
  FILE# 42:  %TYPBD 
  FILE# 43:  %TYPO
  FILE# 44:  %TYPO1 
  FILE# 45:  %TYPO2 
  FILE# 46:  %TYPO3 
  FILE# 47:  %UPDAT 
  FILE# 48:  %UPPAG 
  FILE# 49:  %VMOVE 
  FILE# 50:  &RETYP 
  FILE# 51:  &TVPO
  FILE# 52:  &TYPBD 
  FILE# 53:  &TYPCM 
  FILE# 54:  &TYPO
  FILE# 55:  &TYPO1 
  FILE# 56:  &TYPO3 
  FILE# 57:  'TYPO
  FILE# 58:  *TYPO
  FILE# 59:  *TYPO3 
  FILE# 60:  CTYPO
  FILE# 61:  S4 
  FILE# 62:  ^RETYP 
  FILE# 63:  ^TVPO
  FILE# 64:  ^TYPO
  FILE# 65:  ^TYPO3 
  
  
 **LOAD INSTRUCTIONS: 
  
  
  
  
 **RUN INSTRUCTIONS:
  
  
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  
  
  
 **PROGRAM DESCRIPTION: 
  
               TYPO - A WORD-PROCESSING PROGRAM 
  
                      Alan R. Whitney 
                   MIT Haystack Observatory 
                    Westford, MA. 01886 
  
  Abstract:  TYPO is a word-processing program which operates on an 
  HP1000 computer under an RTE-IVA/B operating system and utilizes the
  Diablo 1620 or NEC Spinwriter typewriter for printed output.  These 
  daisy-wheel printers produce letter-quality output at speeds to 45
  char/ssec.  TYPO was written to make full use of the many capabilities
  of these machines.  Among TYPO's capabilities are right and left
  justification, underline, boldface, subscripts, superscripts, 
  controllable horizontal and vertical pitch, page titles and numbering,
  embedded tables and figures, full footnote support, and on-line page
  format management.  Input to TYPO is from standard ASCII text files 
  generated with a separate text-editing program such as the standard 
  RTE EDITR.
  
  Introduction
        With the advent of modern high-speed daisy-wheel printers such as 
  the Diablo 1620 or NEC Spinwriter, relatively inexpensive hardware has
  become available for a powerful and highly flexible word-processing 
  system attached to a mini-computer.  TYPO was written in an attempt to
  realize some of theis potential capability.  Machines such as the 
  Diablo 1620 have a number of features which make them nearly ideal for
  word -processing output.  The most powerful of these features is full 
  dynamic control of both horizontal and vertical pitch.  Horizontal
  pitch of the printed characters may be controlled in increments of
  of 1/120" and vertical pitch is controllable in increments of 1/48".
  This provides an inherent capability to stretch and squeeze text to fit 
  within a  predefined space. 
        In this paper we shall include a brief discussion of TYPO itself
  and its main features and philosophies, but will not attempt any
  detailed descriptions of usage or inner workings.  The capabilities of
  TYPO will be demonstrated in a few examples.
  
  What will TYPO do?
        For everyday work of a secretarial office, the most important 
  feature of TYPO is that can take rough-draft text entered into an ASCII 
  text file and neatly-formatted pages with very little effort on the 
  operator's part.  Changes to the text are as simple as entering changes 
  into a computer terminal using a standard text-editing program, such as 
  the RTE EDITR, and re-running TYPO.  In many cases, no special commands 
  at all are necessary to achieve the desired result.  Cosmetic changes 
  such as margins, character and line pitch, and paragraph indentations 
  may be easily changed either by entering the appropriate TYPO commands
  into the text source file or on-line by the operator. 
        Figure 1a shows a sample of text as it might exist in a source
  text file.  Figure 1b shows the text of Fig. 1a processed through TYPO, 
  using, default values for margins and pitchs.  Note that words have 
  been moved to fill lines and produces left and right justification. 
  Figure 1C shows the same text processed through TYPO with only a change 
  in margins and pitches.  Figure 1d uses yet another set of margins and
  pitches, and has been processed with a 'ragged-right' margin to 
  disguise its origin as computer-generated text. 
  These examples indicate the high degree of 'text elasticity' when 
  operating under TYPO and are the simplest examples of TYPO's
  capabilities. 
        More sophisticated processing under TYPO is also possible.  Among 
  TYPO's capabilities:
      1. Centering, underlining, and boldface.
      2. Subscripts, superscripts, and 'ghost' hyphens. 
      3. Tab and absolute column set. 
      4. Align text to left or right margin.
      5. Repeated string within a designated field. 
      6. Page titles (top and/or bottom) and page numbering.
      7. Embedded tables and figures, deferred as necessary until space 
         is available to print them.
      8. Full footnote support, with full control of the maximum space
         used at the bottom of each page for footnotes, and continuation
         of footnotes from page-to-page as necessary. 
      9. Allows two different printwheels to be used within any given 
         text in order to change type faces or use special characters.
         A primary use of this capability is for special characters in
         scientific documents.
      10.Nested source input files. 
         All of the capabilities in the above list are controlled by the
         insertion of commands to TYPO within the source text itself and, 
         in addition, certain 'global' parameters may be controlled at
         run time.  Among these 'global' parameters are margin and pitch
         control, tab set, titles, page numbers, footnote control, and
         page control.
  
    What Do TYPO Commands Look Like 
        The best way to get an idea of how commands are inserted into 
  source text to control TYPO is to look at an actual example 
  illustrating some of its features.  Figure 2 shows source text as it
  exists in raw form, and Figure 3 shows the resulting TYPO output. 
  We will briefly go through the commands used in the example and 
  indicate how they control the action that TYPO takes.  Most TYPO
  commands are prefaced by a backslash () character;  no differentiation
  is made between upper and lower case letters in TYPO commands.
        The command \\HZ10,10,85,10 is the 'Horizontal Control' command 
  and sets the left margin to 1.0" (10 units of 1/10"), right margin to 
  1.0", page width to 8.5", and character spacing to 12 chars/".  The 
  command \\VT 20,25,110,7 is the 'Vertical Control' command specifying 
  the top margin to be 2.0", bottom margin 2.5", paper height 11", and
  line spacing of 7 lines/".
  On the following line, \\HT15,... is a 'Header Title' command which 
  causes a title to be printed 1.5" from the top of each page. The words
  'TYPO DEMONSTRATION' are left justified; the words 'PAGE #' are 
  centered (\\CE command) and '#' is replaced with the current page 
  number; the words '20 June 1980' are right justified (\\@ command). 
  Next, a line is  expanded to fill between the left and right margins
  (\\EX) and printed in boldface (||).  The Footnote Control command
  (\FC) specifies that footnote left margin is 1.2", footnote bottom
  margin is 2.5", no paragraph indentation on footnote text, and vertical 
  line spacing of 6 lines/" for footnote text.  The \FN* command indicates
  that the text for footnote '*' follows; \en ends the footnote text. 
  Note that this footnote will not actually be printed unless there is a
  reference to it somewhere on the printed page.
        Following  the footnote text is a 'Paragraph Parameter' command 
  (\\PP) setting the paragraph processing mode to left and right
  justification with a 5-character indentation. 
  TYPO recognizes this text as a paragraph by the simple algorithm of an
  indented source text line followed one or more non-indented lines.
  Within this paragraph illustrations of a number of 'micro' commands 
  which control details of the printed text.  The word 'TYPO' is
  underline, as well and the phrase 'a string of words'.  The command \\] 
  shifts printing down one-half line for the subscript '2', and \\[ 
  shifts back up again to the normal vertical position of the line. 
  The command \\( causes the the 'alternate printwheel' to be used for
  the following characters, in this case a superscript to be printed by 
  the scientific printwheel; \\) returns printing to the normal 
  printwheel. 
  At the end of the paragraph, reference is made to footnote '*'. 
  Immediately following is another paragraph illustrating the use of a
  'required backspace' (\\<) in order to overprint one character on top 
  of another. 
  Next, the horizontal pitch is changed to 11 chars/" (\\HZ,,,11) and the 
  following line is centered (\\ce) between left and right margins.  The
  horizontal pitch is then changed back to 10 chars/" before printing a 
  line illustrating a repeated string (\\"_ "\\) between 'Chapter 1' and
  a right-justified (\\@) 'page 1'. 
        The horizontal margins and character pitch are changed again
  before printing the next paragraph, in which is illustrated how 
  underlining many be toggled on and off even within a single word. 
  Following this is another centered line followed by two tables
  differing only in vertical snd horizontal spacings and tab sets 
  (\\TB,...).  Tabbing (\\>) is used within the tables themselves to
  illustrate the ease with which such tables may be 'elasticized'.
  Finally, as a short paragraph once again refers to the same footnote
  as above. 
        The result of processing the source text in Figure 2 is shown in
  Figure 3.  Clearly, there is much flexibility in presenting the final 
  printed text in many different styles simply by changing a few
  parameters in the source text file.  The example shown illustrates
  perhaps half of the commands available to the TYPO user.
  
    On-Line TYPO Operation
        During TYPO operation, either a TV monitor or a separate terminal 
  may be used to dynamically monitor TYPO status and parameters.  On-line 
  control may be done thru either the Diablo keyboard itself or through 
  the keyboard of another terminal.  The operator may intervene at any
  point within TYPO to do any of the following operations:
     1. Change margins, pitches, titles, page numbers, and several other
        'global' parameters.
     2. Force printing to stop at any point on a page and force a new 
        page be started.
     3. Force more lines onto a page than TYPO would otherwise print. 
        This is especially useful to finish the last one or two lines of
        a paragraph that would otherwise sit alone at the top of the next 
        page. 
     4. 'Roll' TYPO back up to the top of the current or last page, so
        that parameters may be readjusted and the page retyped without
        affecting any pages that have already been typed satisfactorily.
        This may be done repeatedly until the page is typed as desired. 
     5. Indicate to TYPO whether the 'normal' or 'alternate' printwheel 
        is currently mounted.  Normally, in cases were both typewheels
        are used on a single page, the entire page is first typed with
        the 'normal' printwheel; the 'alternate' printwheel is then 
        mounted and the page is retyped again.  TYPO will only print
        those characer on the page appropriate to the currently-mounted 
        typewheel.
     6. The operator may manually type onto the printed output page.
        This is useful if the same page(s) are typed over and over again
        with only minor changes, such as the name and address on a form 
        letter.  TYPO dynamically keeps track of the manually-entered 
        input in determining current page position, etc, so that bottom 
        margins are ever violated.
     7. TYPO normally pauses at the bottom of each page to await operator 
        attention, as is ordinarily desired for single-sheet-at-a-time
        typing.  However, TYPO may be put in a 'continuous-typing' mode 
        for generation of long or repetetive documents using continuous 
        form paper of automatic sheet feeders.
     8. If only a single page of a lengthy text needs to be retyped, TYPO 
        can be directed to go directly to either a label inserted in the
        source text or to a line number within the source text.  The page 
        may then be typed exactly as if all the previous source text had
        had been typed in the normal manner.
  
    Special Requirements of TYPO
        The daisy-wheel printer used by TYPO must be driven through an
  HP12966A interface using the driver DVB00, which is a contributed 
  driver from Haystack Observatory and NASA/Goddard Space Flight Center 
  (see separate paper on this driver).  Unfortunately, neither DVR00 nor
  DVR05 will properly support these printers. 
  
    Conclusion
        TYPO has been installed at both MIT Haystack Observatory and
  NASA Goddard Space Flight Center since early 1979, and has received 
  much heavy use at both installations.  It has proven to be of 
  considerable value in lubricating the flow of documents through both
  facilities, processing a combined total of over 10000 pages of printed
  output during this time.  Program, TYPO has worked quite excellently. 
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  
  
  
 **MISCELLANEOUS: 
  
  
B00101
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  HP97
 **PROGRAM TITLE: 
  An HP97 calculator simulator program
  
 **REVISION?  NO
  
 **PACKAGE:  2    **CATEGORY:  1
  
 **KEYWORDS:
    CALCULATOR      SIMULATOR       DISPLAY 
    TERMINAL
  
 **LANGUAGES: 
    FTN4X       ASMB
  
 **COMPUTER TYPE: 
    E-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  24 PAGE BACKGROUND PARTITION
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  HP97 simulates the HP97 programmable calculator allowing HP 1000
  users to use their terminals as a calculator.  The program includes 
  the ability to have 100 data registers, 999 program steps and several 
  other enhancements to the calculator. 
  
  The HP97 handbooks and program sources are compatible.
  
  The program makes use of both FMP and EXEC system routines. 
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: /TRANS - COMPILE LOADR TRANSFER FILE
  FILE#  3: #HPLOD - LOADR COMMAND FILE FOR PRELIM PROGRAM
  FILE#  4: #HP97  - LOADR COMMAND FILE FOR HP97 PROGRAM
  FILE#  5: &CMOVE - BYTE MANIPULATION ROUTINE
  FILE#  6: &IFIND - BYTE(S) SEARCH ROUTINE 
  FILE#  7: &UTFT4 - UTILITY ROUTINES IN FTN4X
  FILE#  8: &HPLOD - SOURCE FOR PRELIMINARY COMMAND TABLE PREP
  FILE#  9: &HPSUB - SOURCE CODE FOR HP97 SUBROUTINES 
  FILE# 10: &HP97A - SOURCE CODE FOR HP97 MAIN PART A 
  FILE# 11: &HP97B - SOURCE CODE FOR HP97 MERGE A AND B 
  FILE# 12: 'HP97  - HP97 USER'S GUIDE
  FILE# 13: &TRIAN - SAMPLE OF AN HP97 PROGRAM FILE 
  FILE# 14: !HP97  - HP97 COMMANDS FILE 
  
  
 **LOAD INSTRUCTIONS: 
  
  The program requires that the FTN4X compiler be sized at 20 pages 
  when compiling the main program.  Also, consideration must be given 
  to the revision date of user's RTE-IVB as to whether the FTN4X routines 
  are in the system library or come from a seperate library.
  
  
 **RUN INSTRUCTIONS:
  
  Before running the HP97 it is required that the program HPLOD has been
  run before so that the file @HP97 exists and has been properly filled 
  with the commands from the file !HP97. (Note: @HP97 is type 1 size 32)
  
  So long as @HP97 exists all that is required is RU,HP97.
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  
  
  
 **PROGRAM DESCRIPTION: 
  
  LOOK AT 'HP97 FILE
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  
  
  
 **MISCELLANEOUS: 
  
  
B00201
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  LS
 **PROGRAM TITLE: 
  FUNCTION SHIFTS BITS IN A WORD TO THE LEFT
  
 **REVISION?  NO
  
 **PACKAGE:  2    **CATEGORY:  1
  
 **KEYWORDS:
    BIT             BYTE            SHIFT 
    WORD
  
 **LANGUAGES: 
    ASMB
  
 **COMPUTER TYPE: 
    F-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-III   RTE-IVA   RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  25 WORDS (OCTAL)
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  FUNCTION SHIFTS A WORD 0 TO 16 BITS TO THE LEFT.  ZEROS FILL
  BITS AT THE RIGHT THAT ARE VACATED BY SHIFTING. 
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: ^LS -- SOURCE FILE
  
  
 **LOAD INSTRUCTIONS: 
  
  
  
  
 **RUN INSTRUCTIONS:
  
  
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  FUNCTION LS(WORD,BITS)
  WORD=Input word to be shifted 
  BITS=Number of bits to left shift (looks at the 4 low order bits only!) 
  
  
 **PROGRAM DESCRIPTION: 
  
  
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  
  
  
 **MISCELLANEOUS: 
  
  
B00301
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  RS
 **PROGRAM TITLE: 
  FUNCTION SHIFTS BITS IN A WORD TO THE RIGHT 
  
 **REVISION?  NO
  
 **PACKAGE:  2    **CATEGORY:  1
  
 **KEYWORDS:
    BIT             BYTE            SHIFT 
    WORD
  
 **LANGUAGES: 
    ASMB
  
 **COMPUTER TYPE: 
    F-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-III   RTE-IVA   RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  25 WORDS (OCTAL)
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  FUNCTION SHIFTS A WORD 0 TO 16 BITS TO THE RIGHT.  ZEROS FILL 
  BITS AT THE LEFT THAT ARE VACATED BY SHIFTING.
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: ^RS -- SOURCE FILE
  
  
 **LOAD INSTRUCTIONS: 
  
  
  
  
 **RUN INSTRUCTIONS:
  
  
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  INTEGER RS,WORD,BITS
  FUNCTION RS(WORD,BITS)
  WORD=Input word to be shifted 
  BITS=Number of bits to right shift (looks at the 4 low order bits only!)
  
  
 **PROGRAM DESCRIPTION: 
  
  
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  
  
  
 **MISCELLANEOUS: 
  
  
B00401
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  SPRAY 
 **PROGRAM TITLE: 
  SUBROUTINE FILLS ARRAY WITH ONE VALUE 
  
 **REVISION?  NO
  
 **PACKAGE:  2    **CATEGORY:  1
  
 **KEYWORDS:
    ARRAY           INITIALIZE
  
  
 **LANGUAGES: 
    ASMB
  
 **COMPUTER TYPE: 
    F-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-III   RTE-IVA   RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  46 WORDS (OCTAL)
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  SUBROUTINE FILLS INTEGER OR REAL ARRAY WITH ONE VALUE 
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: ^SPRAY -- SOURCE FILE 
  
  
 **LOAD INSTRUCTIONS: 
  
  
  
  
 **RUN INSTRUCTIONS:
  
  
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  CALL SPARY(ARRAY,VALUE,N,ITEST) 
  SUBROUTINE STORES "VALUE" IN THE FIRST "N" PLACES OF "ARRAY". 
  ITEST=1 FOR REAL --- ITEST=0 FOR INTEGER
  (FOR ITEST=1, ARRAY AND VALUE ARE REAL; FOR ITEST=0, ARRAY
  AND VALUE ARE INTEGER)
  
  
 **PROGRAM DESCRIPTION: 
  
  
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  
  
  
 **MISCELLANEOUS: 
  
  
B00501
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  MOVER 
 **PROGRAM TITLE: 
  SUBROUTINE MOVES CONTIGUOUS BLOCKS OF WORDS FROM ONE ARRAY TO ANOTHER 
  
 **REVISION?  NO
  
 **PACKAGE:  2    **CATEGORY:  1
  
 **KEYWORDS:
    ARRAY           MOVE
  
  
 **LANGUAGES: 
    FTN4
  
 **COMPUTER TYPE: 
    F-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-III   RTE-IVA   RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  120 WORDS (OCTAL) 
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  THE SUBROUTINE MOVER CAN BE USED TO MOVE CONTIGUOUS BLOCKS
  FROM ONE ARRAY TO ANOTHER.  THE ARRAYS MAY BE REAL OR INTEGER.
  MOVER CAN ALSO BE USED TO MOVE BLOCKS WITHIN THE SAME ARRAY.
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: ^MOVER -- SOURCE FILE 
  
  
 **LOAD INSTRUCTIONS: 
  
  
  
  
 **RUN INSTRUCTIONS:
  
  
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  CALL MOVER(J1,J2,N,ITEST) 
  J1=ARRAY TO BE MOVED FROM 
  J2=ARRAY TO BE MOVED TO 
  N=NUMBER OF VARIABLES TO MOVE 
    (IF J1 AND J2 ARE THE SAME ARRAY, MAKE N NEGATIVE)
  ITEST=1 IF J1 AND J2 ARE REAL 
       =0 IF J1 AND J2 ARE INTEGER
  
  
 **PROGRAM DESCRIPTION: 
  
  
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  
  
  
 **MISCELLANEOUS: 
  
  
B00601
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  IYSNO 
 **PROGRAM TITLE: 
  FUNCTION READS YES/NO INPUT FROM TERMINAL 
  
 **REVISION?  NO
  
 **PACKAGE:  2    **CATEGORY:  1
  
 **KEYWORDS:
    I/O             INTERACTIVE 
  
  
 **LANGUAGES: 
    FTN4
  
 **COMPUTER TYPE: 
    F-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-III   RTE-IVA   RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  137 WORDS (OCTAL) 
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  FUNCTION RETURNS: 
     1=YES RESONSE
     2=NO RESPONSE
     3=A RESPONSE OTHER THAN YES OR NO
       (TIME OUT IS INCLUDED HERE)
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: &IYSNO -- SOURCE FILE 
  
  
 **LOAD INSTRUCTIONS: 
  
  
  
  
 **RUN INSTRUCTIONS:
  
  
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  SAMPLE CALL SEQUENCE: 
  10     WRITE(LUTTY,20)
  20     FORMAT"DO YOU WANT ANOTHER PLOT?") 
         GO TO(30,40,10),IYSNO(LUTTY) 
  30     CONTINUE 
         .
         .
         .
  40     STOP 
  
  (YES RESPONSE GOES TO 30, NO TO 40 AND ANY OTHER RESPONSE 
  CAUSES THE QUESTION TO BE REPEATED.)
  
  
 **PROGRAM DESCRIPTION: 
  
  
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  If a non YES/NO response is entered or it it times out, "Please 
  answer YES or NO" will be displayed.
  
  
 **MISCELLANEOUS: 
  
  
B00701
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  NIBLE 
 **PROGRAM TITLE: 
  SUBROUTINE PACKS/UNPACKS WORDS
  
 **REVISION?  NO
  
 **PACKAGE:  2    **CATEGORY:  1
  
 **KEYWORDS:
    BIT             BYTE            PACK
    UNPACK          WORD
  
 **LANGUAGES: 
    FTN4
  
 **COMPUTER TYPE: 
    F-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-III   RTE-IVA   RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  200 WORDS (OCTAL) 
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  NIBLE PACKS 1 TO 8 OF THE LOW ORDER BITS FROM ASSENDING WORDS OF AN 
  ARRAY INTO ONE WORD.  NIBLE ALSO UNPACKS A WORD 1 TO 8 BITS AT A TIME 
  INTO THE LOW ORDER BITS OF ASSENDING WORDS IN AN ARRAY. 
  NIBLE REQUIRES THE SUBROUTINES LS (LEFT SHIFT) AND RS (RIGHT
  SHIFT) WHICH ARE INCLUDED WITH THIS SUBROUTINE AS WELL AS IN
  SEPARATE SUBMISSIONS. 
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: ^NIBLE -- SOURCE FILE 
  FILE#  3: ^RS -- SOURCE FILE
  FILE#  4: ^LS -- SOURCE FILE
  
  
 **LOAD INSTRUCTIONS: 
  
  
  
  
 **RUN INSTRUCTIONS:
  
  
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  CALL NIBLE(IWORD,IBITS,NBITS) 
    IWORD=the packed word 
    IBITS=the array of bits 
    NBITS= >0 Pack as many bits as will fit evenly, NBITS at
              a time, from IBITS into IWORD 
         = <0 Unpack IWORD, |NBITS| at a time, from IWORD into
              IBITS.
  
  Packing example:
      DO 1 J=1,5
  1   IBITS(J)=J
      CALL NIBLE(IWORD,IBITS,3) 
  Pack lowest 3 bits fom each word if IBITS into IWORD.  The resulting
  value of IWORD is 12345B. 
  
  Unpacking example:
      IWORD=103102B 
      CALL NIBLE(IWORD,IBITS,-4)
  Unpack IWORD 4 bits at a time into IBITS.  The  resulting values of 
  IBITS are:  IBITS(1) is 8, IBITS(2) is 6, IBITS(3) is 4, IBITS(4) is 2; 
  IBITS(5) is unaffected. 
  
  
 **PROGRAM DESCRIPTION: 
  
  
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  STOP 110 occurs if NBITS is an invalid number (i.e., NBITS>8 OR 
  NBITS<-8) 
  
  
 **MISCELLANEOUS: 
  
  
B00801
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  PICK
 **PROGRAM TITLE: 
  SUBROUTINE READS LIST OF NUMBERS FROM TERMINAL
  
 **REVISION?  NO
  
 **PACKAGE:  2    **CATEGORY:  1
  
 **KEYWORDS:
    INPUT           INTERACTIVE     SORT
  
  
 **LANGUAGES: 
    FTN4
  
 **COMPUTER TYPE: 
    F-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-III   RTE-IVA   RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  2226 WORDS (OCTAL)
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  PICK READS A LIST OF NUMBERS FROM THE TERMINAL AND RETURNS A
  SORTED ARRAY OF THE NUMBERS AND THE TOTAL NUMBER ENTERED. 
  BOTH POSITIVE AND NEGATIVE NUMBERS CAN BE INPUTTED. 
  PICK ALSO ALLOWS A RESPONSE OF NONE AND WILL REPEAT ITS 
  REQUEST FOR INPUT IF THE RESPONSE IS NOT "GRAMATICALLY" 
  CORRECT OR IF A TIME OUT OCCURS BEFORE THE RESPONSE IS ENTERED. 
  THE PROGRAM ALLOWS ABBREVIATED ENTRIES, (EG., 1-10 IS EQUIVALENT
  TO 1,2,3,4,5,6,7,8,9,10). 
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: ^PICK -- SOURCE FILE
  
  
 **LOAD INSTRUCTIONS: 
  
  
  
  
 **RUN INSTRUCTIONS:
  
  
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  LUTTY=LU of terminal
  N=number of values read in
  IPICKD=sorted array of values returned
  MAX=size of largest number if "ALL" response is used
      or
     =size of IPICKD
      or
     =size of IPICKD/2 if negative values are used
     (look carefully at the examples for the relation of MAX to the 
     results of N and IPICKD) 
  EXAMPLE 1 - POSITIVE NUMBERS ONLY:
     CALL PICK(LUTTY,N,IPICKD,25) 
     Enter numbers you want 
     1-10,15,19-22
     Returned:
        N=15
        IPICKD=1,2,3,4,5,6,7,8,9,10,15,19,20,21,22,0,0,0,0,0,0,0,0,0,0
  EXAMPLE 2 - POSITIVE AND NEVATIVE NUMBERS:
     CALL PICK(LUTTY,N,IPICKD,-8) 
     Enter numbers you want 
     =8-=5,4-7
     Returned:
        N=8 
        IPICKD=-8,-7,-6,-5,4,5,6,7,0,0,0,0,0,0,0,0
   EXAMPLE 3 - RESPONSE OF NONE 
     CALL PICK(LUTTY,N,IPICKD,300)
     Enter numbers you want 
     NONE 
     Returned:
        N=-1
        IPICKD=0,0,0,0,0,0,etc. 
   EXAMPLE 4 - RESPONSE OF ALL
     CALL PICK(LUTTY,N,IPICKD,7)
     Enter numbers you want 
     ALL
     Returned:
       N=7
       IPICKD=1,2,3,4,5,6,7 
  
  
 **PROGRAM DESCRIPTION: 
  
  ACCEPTABLE TYPES OF INPUT ARE:
    NONE (no numbers) 
    ALL (all numbers 1 to MAX [if MAX is positive], or all numbers
         -MAX to MAX if MAX is negative]) 
    2,5,8 (single numbers seperated by ",") 
    1-10,56-60 (a series of numbers low"-"high, separated by ",") 
    =103,=104,=1 (negative numbers preceded by '=') 
    =100-=1 (a series of negative numbers low"-"high, separated by ",") 
    3,4-10,=52-=45,=9 (any mix of singles and series separated by ",")
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  Unexpected comma - Enter line again 
  Syntax error in input 
  Unexpected dash - Enter line again
  Illegal character - Enter line again
  Illegal number - Enter line again 
  More than MAX inputs - Enter line again 
  Unsatisfied span - Enter line again 
  Entry ___ appears more than once - Enter line again 
  
  
 **MISCELLANEOUS: 
  
  
E00101
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  KSAVE 
 **PROGRAM TITLE: 
  KSAVE/KRSTR/KGETR FOR SAVE AND RESTORE OF DISC LU'S 
  
 **REVISION?  YES 
  
 **PACKAGE:  5    **CATEGORY:  3
  
 **KEYWORDS:
    SAVE/RESTORE    MAGNETIC TAPE   FMP BACKUPS 
  
  
 **LANGUAGES: 
    FTN4        ASMB
  
 **COMPUTER TYPE: 
    2112
  
 **OPERATING SYSTEMS: 
    RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  21 PAGES MAXIMUM REQUIRED 
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  THE THREE PROGRAMS KSAVE, KRSTR, AND KGETR STORE DISC LU'S TO TAPE, 
  RESTORES THE DISC LU FROM TAPE TO DISC, AND ALLOWS THE OPERATOR TO
  ACCESS INDIVIDUAL FILES ON THE MAGNETIC TAPE. 
  
  PROGRAMS KSAVE, KRSTR, AND KGETR ARE MODIFICATIONS OF THE PROGRAMS
  JSAVE, JRSTR, AND FGETR.  PROGRAMS GSAVE AND GRSTR WERE USED AS 
  REFERENCES IN MODIFYING THE PROGRAMS. 
  
  THE ADDITIONAL FEATURES PROVIDED BY KSAVE, KRSTR, AND KGETR ARE:
  1. PROGRAM KSAVE CAN BE SCHEDULED BY ANOTHER PROGRAM TO STORE A DISC
     LU TO TAPE PROGRAMMATICALLY. 
  2. THESE PROGRAMS ARE TO BE USED WITH ANY TRACK SIZE UP TO A MAXIMUM
     OF 8K WORDS. 
  3. KEEPS A RECORD OF WHAT MAGNETIC TAPE FILE THE PROGRAM IS CURRENTLY 
     POSITIONED ON.  THE PROGRAM IS CAPABLE OF POSITIONING TO OTHER 
     MAGNETIC TAPE FILES (FORWARD OR BACKWARD) FROM THE CURRENT 
     POSTION. 
  4. VERIFIES AUTOMATICALLY THE DISC LU STORED TO TAPE OR RESTORED FROM 
     THE TAPE.
  
  THESE PROGRAMS DO NOT WORK WITH DISC LU'S 2 AND 3.  THIS PROGRAM WILL 
  WILL ONLY WORK WITH A 7900, 7905, 7906, 7920 DISC DRIVE, (AND I THINK 
  A 7925).
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: &KSAVE -- STORES DISC LU'S TO TAPE
  FILE#  3: &KRSTR -- RESTORES DISC LU'S FROM TAPE
  FILE#  4: &KGETR -- RESTORES INDIVIDUAL FILES FROM TAPE 
  FILE#  5: &ASCII -- ASSEMBLY SUBROUTINE (USED WITH &KGETR)
  FILE#  6: &KSDOC -- EXTENDED DOCUMENTATION FILE 
  
  
 **LOAD INSTRUCTIONS: 
  
  KSAVE  --  LARGE BACKGROUND 
  KRSTR  --  LARGE BACKGROUND 
  KGETR  --  (REFERENCES ASSEMBLY SUBROUTINE ASCII) 
  (SEE EXTENDED DOCUMENTATION)
  
  
 **RUN INSTRUCTIONS:
  
  SEE EXTENDED DOCUMENTATION
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  SEE EXTENDED DOCUMENTATION
  
  
 **PROGRAM DESCRIPTION: 
  
  SEE EXTENDED DOCUMENTATION
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  
  
  
 **MISCELLANEOUS: 
  
  
E00201
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  PREF
 **PROGRAM TITLE: 
  PASCAL PROCEDURE CROSS-REFERENCER DEBUGGING UTILITY 
  
 **REVISION?  NO
  
 **PACKAGE:  5    **CATEGORY:  5
  
 **KEYWORDS:
    PASCAL          PROCEDURES      CROSSREFERENCE
  
  
 **LANGUAGES: 
    PASCAL
  
 **COMPUTER TYPE: 
    F-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  14K PROGRAM PLUS HEAP SPACE (17K RECOMMENDED) 
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  DEBUGGING AID FOR PASCAL PROGRAMS.  WAS PUBLISHED IN PASCAL NEWS #21. 
  PRINTS TABLE OF PROCEDURES AND WHERE THEY ARE DEFINED, AND TABLES OF
  REFERENCE INFORMATION FROM BOTH VIEWPOINTS (WHO CALLED ME? AND WHO DO I 
  CALL?).  PROGRAM USES EXEC AND PASCAL-LIBRARY CALLS WHICH CAN BE REMOVED
  EASILY AND WITHOUT CHANGING THE BASIC ALGORITHM AS DESCRIBED IN THE 
  EXTENDED DOCUMENTATION. 
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: DOCUMENTATION FILE - "PREF
  FILE#  3: PASCAL SOURCE FILE - &PREF
  FILE#  4: TRANSFER FILE (TO COMPILE AND LOAD) - *PREF 
  FILE#  5: LOADER COMMAND FILE - #PREF 
  
  
 **LOAD INSTRUCTIONS: 
  
  ABOVE THE 14K REQUIRED FOR CODE AND STATIC DATA, THE HEAP SPACE 
  REQUIRED IS DEPENDENT ON THE NUMBER OF PROCEDURES THE REFERENCE MUST BE 
  ABLE TO HANDLE.  THE SZ COMMAND SHOULD BE CHANGED IF ** ERROR 1** IS
  RECEIVED. 
  
  
 **RUN INSTRUCTIONS:
  
  
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  
  
  
 **PROGRAM DESCRIPTION: 
  
  SEE EXTENDED DOCUMENTATION FILE (FILE 2)
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  ERROR MESSAGES ARE OF THE FORM  ***** Error at 00000 ***** : (TEXT),
  WHERE 00000 IS THE LINE NUMBER IN THE INPUT FILE WHERE THE ERROR WAS
  DISCOVERED AND (TEXT) IS THE ERROR NAME.  AFTER THIS LINE, THE LINE 
  NUMBERS OF ANY BEGINS WHICH HAVE NOT BEEN TERMINATED BY ENDS ARE PRINTED
  
  ERRORS ARE
    FILE DOES NOT BEGIN WITH "PROGRAM"(IS THIS FILE REALLY PASCAL SOURCE?)
    PROCEDURE DEFINED TWICE AT SAME SCOPE (PROGRAMMING ERROR) 
    TOO MANY PROCEDURES (CHANGE PREF SOURCE CODE TO INCREASE MAXIMUM) 
    MISPLACED RESERVED WORD (GROSS PROGRAMMING ERROR) 
    TOO MANY NESTED BLOCKS (USUALLY PROGRAMMING ERROR, OR INCREASE MAX) 
    END OF FILE -- MISSING END'S? (SOME BEGINS HAVE NO MATCHING ENDS) 
    END-OF-FILE -- MISSING EOF PERIOD (OR ENDS WITH NO MATCHING BEGINS) 
  
  
 **MISCELLANEOUS: 
  
  
E00301
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  DBSPB 
 **PROGRAM TITLE: 
  DATA BASE UTILITIES (92069 IMAGE) 
  
 **REVISION?  NO
  
 **PACKAGE:  5    **CATEGORY:  4
  
 **KEYWORDS:
    DATA BASE       UTILITY 
  
  
 **LANGUAGES: 
    FTN4X 
  
 **COMPUTER TYPE: 
    M-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  28 PAGES
  
 **DEPENDENT ON SYSTEM SOFTWARE?  YES 
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  DBSPB---ENHANCEMENT TO THE STANDARD IMAGE UTILITY, DBSPA. 
  DBSPC---PROVIDES LESS INFORMATION THAN DBSPA, BUT RUNS TO COMPLETION
          IN ABOUT TWO SECONDS ON ANY DATA BASE.
  DBSEC---CONVERSATIONAL PROGRAM TO CHANGE THE LEVEL WORDS OF A 
          DATA BASE.
  DBMOV---THIS PROGRAM WILL MOVE ANY SET OF A DATA BASE TO A DIFFERENT
          DISC CARTRIDGE. 
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: &DBSPB     'BETTER' DBSPA 
  FILE#  3: &DBSPC     FASTER DBSPA 
  FILE#  4: &DBSEC     CHANGE LEVEL WORDS 
  FILE#  5: &DBMOV     MOVE SETS
  FILE#  6: %DBSPB
  FILE#  7: %DBSPC
  FILE#  8: %DBSEC
  FILE#  9: %DBMOV
  
  
 **LOAD INSTRUCTIONS: 
  
  ALL FOUR PROGRAMS SHOULD BE LOADED AS TYPE 4 (LB) PROGRAMS. 
  IF THERE IS A SIZE PROBLEM SOME OF THE PROGRAMS HAVE VERY LARGE 
  DCB'S.  THESE COULD BE MADE SMALLER AT THE EXPENSE OF PERFORMANCE.
  
  
 **RUN INSTRUCTIONS:
  
  RU,DBSEC[,P1]   P1 IS THE TERMINAL LU, OPTIONAL.
  RU,DBMOV[,P1]   P1 IS THE TERMINAL LU, OPTIONAL.
       THESE TWO ARE CONVERSATIONAL ONLY. 
  ----------------------------------------------------------------
  RU,DBSPB[,P1[,P2[,ROOT[:SC[:CR[,LEVEL]]]]]] 
         WHERE:  P1 IS THE CONSOLE   DEFAULT IS 1 
                 P2 IS LIST DEVICE   DEFAULT IS SAME AS P1
                 ROOT:SC:CR  IS NAMR OF ROOT FILE 
                 LEVEL  IS LEVEL 15 WORD
        IF ROOT OR SC OR LEVEL ARE NOT SUPPLIED IN RUN STRING 
           THEN THEY ARE REQUESTED INTERACTIVELY.   IF CR 
           IS NOT SUPPLIED, IT DEFAULTS TO ZERO.
     DBSPC IS THE SAME AS DBSPB EXCEPT DOES NOT NEED THE LEVEL WORD.
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  
  
  
 **PROGRAM DESCRIPTION: 
  
  DBSPB---THIS PROGRAM PRODUCES A REPORT THAT IS SIMILAR TO THE 
          OUTPUT OF DBSPA.  THE DATA IS OBTAINED BY EXAMINING EACH
          RECORD OF EACH SET IN THE DATA BASE.  THE ACTUAL NUMBER OF
          FREE RECORDS IN A SET IS COMPARED TO THE VALUE IN THE FREE
          RECORD TABLE OF THE ROOT FILE.   ON MASTER SETS THE NUMBER
          OF SYNONYMS IS ALSO REPORTED. 
  DBSPC---THE REPORT PRODUCED BY THIS PROGRAM CONTAINS ONLY THE 
          INFORMATION THAT CAN BE OBTAINED FROM THE ROOT FILE.
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  
  
  
 **MISCELLANEOUS: 
  
  DBSPB, DBSEC, & DBMOV ALL REQUIRE EXCLUSIVE USE OF THE DATA BASE. 
  NONE OF THESE PROGRAMS USE ANY IMAGE SUBROUTINES. 
E00401
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  IOQUE 
 **PROGRAM TITLE: 
  LIST I/O REQUESTS QUEUED ON AN EQT. 
  
 **REVISION?  NO
  
 **PACKAGE:  5    **CATEGORY:  4
  
 **KEYWORDS:
    I/O             SYSTEM TABLES   UTILITY 
  
  
 **LANGUAGES: 
    FTN4
  
 **COMPUTER TYPE: 
    M-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  5 PAGES 
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  THE PROGRAM 'IOQUE' LISTS THE TYPE & LENGTH OF THE I/O
  REQUESTS QUEUED ON AN EQT.   THE INFORMATION DISPLAYED FOR EACH 
  REQUEST INCLUDES: TYPE OF REQUEST (READ, WRITE, OR CONTROL),
  SOURCE OF REQUEST (PROGRAM OR SYSTEM), AND THE LENGTH OF THE
  BUFFER.   THE PROGRAM WAS TESTED ON AN RTE-IVB SYSTEM BUT SHOULD
  WORK ON RTE-II,RTE-III, AND RTE-IVA AS WELL.
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: &IOQUE     SOURCE FILE
  
  
 **LOAD INSTRUCTIONS: 
  
  SHOULD BE LOADED AS A NORMAL BG PROGRAM.   TYPE 3 
  
  
 **RUN INSTRUCTIONS:
  
  RU,IOQUE[,P1[,P2[,P3]]]      WHERE
     P1 = TERMINAL LU    DEFAULT IS 1 
     P2 = LIST DEVICE   DEFAULT IS P1 
     P3 = EQT TO LIST 
           IF P3 IS NOT SUPPLIED, REQUEST EQT # INTERATIVELY. 
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  
  
  
 **PROGRAM DESCRIPTION: 
  
  
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  
  
  
 **MISCELLANEOUS: 
  
  
E00501
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  $MLIB 
 **PROGRAM TITLE: 
  $MLIB (HP REV 2040 $MLIB1 & $MLIB2) 
  
 **REVISION?  NO
  
 **PACKAGE:  5    **CATEGORY:  4
  
 **KEYWORDS:
    LIBRARY         SYSTEM
  
  
 **LANGUAGES: 
    UNKNOWN 
  
 **COMPUTER TYPE: 
    E-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  THIS VERSION OF THE FORTRAN FORMATTER WILL HELP SOME OF THE ONES THAT 
  ARE HAVING TROUBLE WITH THE FORMATTER CHANGES FOR FORTRAN IVX.  SOME
  OF THE PROGRAMS IN THE USER GROUP LIBRARY HAVE EXPERIENCED DIFFICULTY 
  WITH THIS SUBJECT, THEREFORE THE INCLUSION OF $MLIB1 & $MLIB2. THESE
  TWO MODULES WILL BE PLACED ON EACH CONTRIBUTED TAPE FOR AN UNDETERMINED 
  PERIOD OF TIME TO HELP THOSE IN NEED. 
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: $MLIB1
  FILE#  3: $MLIB2
  
  
 **LOAD INSTRUCTIONS: 
  
  
  
  
 **RUN INSTRUCTIONS:
  
  
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  
  
  
 **PROGRAM DESCRIPTION: 
  
  REFER TO REV 2040 "SUN" FOR DESCRIPTIONS OF THESE MODULES AND ALSO
  REFER TO THE RTE LIBRARY. 
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  
  
  
 **MISCELLANEOUS: 
  
  
E00601
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  CN6 
 **PROGRAM TITLE: 
  SKIP PERFORATIONS ON THE LINE PRINTER 
  
 **REVISION?  NO
  
 **PACKAGE:  5    **CATEGORY:  4
  
 **KEYWORDS:
    PRINTER         SYSTEM
  
  
 **LANGUAGES: 
    FTN4
  
 **COMPUTER TYPE: 
    E-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  THIS IS A VERY SIMPLE PROGRAM TO ALLOW USERS TO SKIP THE LINE 
  PRINTER PERFORATIONS FROM THE USERS CONSOLE. THE FIRST RUN COMMAND
  TURNS THE SKIP OFF AND THE SECOND RUN COMMAND TURNS THE SKIP ON.
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: &CN6
  
  
 **LOAD INSTRUCTIONS: 
  
  
  
  
 **RUN INSTRUCTIONS:
  
  
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  
  
  
 **PROGRAM DESCRIPTION: 
  
  
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  
  
  
 **MISCELLANEOUS: 
  
  
E00701
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  LDISK 
 **PROGRAM TITLE: 
  AVOID BOOTING !DISK FROM MINI-CARTRIDGE 
  
 **REVISION?  NO
  
 **PACKAGE:  5    **CATEGORY:  4
  
 **KEYWORDS:
    SYSTEM          BOOTING 
  
  
 **LANGUAGES: 
    FTN4        ASMB
  
 **COMPUTER TYPE: 
    E-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  READS ABSOLUTE FILE INTO ARRAY 'MBUF'.  THEN COPIES IT TO LOW 
  PHYSICAL MEMORY.  USEFUL TO AVOID BOOTING !DISK FROM MINI-CARTRIDGE.
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: &LDISK
  FILE#  3: &CDISK
  
  
 **LOAD INSTRUCTIONS: 
  
  
  
  
 **RUN INSTRUCTIONS:
  
  
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  
  
  
 **PROGRAM DESCRIPTION: 
  
  
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  
  
  
 **MISCELLANEOUS: 
  
  
E00801
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  DVB00 
 **PROGRAM TITLE: 
  General Purpose Driver for the HP12966A ASCII Interaface Card 
  
 **REVISION?  NO
  
 **PACKAGE:  5    **CATEGORY:  2
  
 **KEYWORDS:
    DRIVER          TERMINAL
  
  
 **LANGUAGES: 
    ASMB
  
 **COMPUTER TYPE: 
    E-Series
  
 **OPERATING SYSTEMS: 
    RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  General-purpose drivers for the HP12966A ASCII interface card:
  
    DVB00 - In order to fill a number of req. for communications with a 
            variety of ASCII-type devices, DVB00 has been written for the 
            12966A inter. card.  In many ways it emulates DVR00 and DVR05,
            although it has a number of extended capabilities available in
            neither.  Particularly useful for driving most any of the non-
            HP terminals on the market today, at baud rates up to 9600. 
            For other applications, full control of the interface is given
            to the user to provide a powerful tool for controlling comm.
            between almost any ASCII dev. and the host comp.  A paper on
            this driver was presented at the 1980 HP1000 Intnt'l User's 
            Group conference and DVB00 has rec. wide circulation. See file
            &DVB00 for full details on instl. and usage. (The paper deliv.
            at the 1980 User's Conference is in TYPO format - file 'DVB00)
  
    DVF00 - An enhanced version of DVB00.  DVF00 is very similar to 
            DVB00 in nearly all respects, except that DVF00 provides the
            user with several different options for device handshaking -- 
            including no handshaking, which is the only DVB00 option. 
            In gen., DVF00 is to be pref. over DVB00. See &DVF00 for full 
            details on installation and usage.
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: &DVB00
  FILE#  3: &ESCAP
  FILE#  4: &RIDX 
  FILE#  5: &REDX 
  FILE#  6: &BR 
  FILE#  7: &LISN 
  FILE#  8: &HELLO
  FILE#  9: &ACCES
  FILE# 10: &OFFEM
  
  
 **LOAD INSTRUCTIONS: 
  
  
  
  
 **RUN INSTRUCTIONS:
  
  
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  
  
  
 **PROGRAM DESCRIPTION: 
  
  Auxillary programs to support various features in DVB00 and DVF00:
  
    ESCAP - A program to support the sched. of a program on an <ESC><char>
            sequence in DVF00.  When enabled by the proper control seqs.
            and no request is currently pending on DVF00, program ESCAP is
            sched. on the receipt of <ESC><char>, where <char> may be any 
            ASCII char. other than ESCAPE.  Program ESCAP examines <char> 
            to det. the action it is to take, such as sched. a particular 
            program or making a particular req. to the system.  The action
            to be taken by ESCAP on receipt of a part. <char> is specified
            in file #ESCAP, which is easily moded (using EDITR) to tailor 
            it to any spec. needs.  Can effect. be used to run any term.
            as a non-session terminal in a session environment or provide 
            controlled-access to machine facil. in a non-sess. environment
            Does not interfere with a term. running with DVF00 in a either
            a normal session or MTM environment.  We have found it to be a
            very convenient augmentation of norm. sys. capabilities in any
            system.  See file &ESCAP for details. 
  
    RIDX  - This program, by John Ball of Harvard College Obser., allows
            a 264x terminal with data cartridges operating under DVB00 or 
            DVF00 to transfer ASCII data from tape cart. to disc file.
  
    REDX  - This pgm, also by John Ball, does the inv. of RIDX.  That is, 
            REDX allows a 264x term. with data cart. operating under DVB00
            or DVF00 to xfer ASCII data from a disc file to tape cart.
  
    BR    - Program to issue a 'break' request to the last son prog. that 
            was initiated by a specified term. lu.  Primarily intended for
            use with the DVB00/DVF00 capability of sched. a program when
            the BREAK key is hit.  In that capac., BR is sched. on receipt
            of a BREAK entry from the kybd.  Operates only under RTE-IVB. 
  
    LISN  - Program to rec. all incoming ASCII comm. to a 12966A I/O card 
            using DVB00 or DVF00.  The comm. are displayed on a sel. LU 
            and also recorded to a disc file for permanent record.
            LISN simply absorbs all data coming its way.  No handshaking
            is initiated or expected with the data source.  Data may come 
            at a fixed data rate. 
               LISN is useful as a one-way machine-to-machine comm. link
            or as one-half (i.e. rec. half) of a 2-way mach-to-mach link. 
            Can be used in a simple way to xfer ASCII files from a remote 
            mach. (even non-HP) to your local HP mach. by 'eavesdropping' 
            on a dump of the des. file to a loc. term. which is operating 
            as a remote term. to the rem mach. (usually through a modem). 
            A simple special cable must be made up for this application.
  
  Prog. to support auto. modem connect and disconnect under DVB00/DVF00:
  
    HELLO - Program to be automat. scheduled when modem operating under 
            DVB00 or DVF00 connects or discon. from the telephone line. 
            Prints a message on the sys. console logging date and time of 
            conn/disconn.  Schedules FMGR (queue scheduled with no wait)
            to execute xfer file 'HIeq' on connect, and 'BYeq' on discon, 
            where 'eq' is the (2-digit octal) EQT# of the scheduling dev. 
            These files can be used to do the nec. set of the modem link, 
            including setting the baud rate, if nec. (particularly useful 
            for multi-rate modems), asking for a pswrd (see prog. ACCES), 
            and enabling the terminal.  On discon. (either intentional or 
            inadvertant), transfer file 'BYeq' can be used to do clean-up 
            (see program OFFEM) and disable the lu to a subseq. caller. 
            Can be used equally well under either session or non-session. 
  
    ACCES - Program normally scheduled from the 'HIeq' file to req. pswrd 
            before enabling a terminal connected remotely over a modem. 
            See file &ACCES for details.
  
    OFFEM - Program to clean up after a modem discon. OFFEM is normally 
            sched. from the 'BYeq' file to kill any progs that may have 
            been left hanging.  See file &OFFEM for details.
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  
  
  
 **MISCELLANEOUS: 
  
  
E00901
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  SDLUP 
 **PROGRAM TITLE: 
  GENERATES FILE FOR USE WITH SDLS4 IN UPDATE MODE
  
 **REVISION?  NO
  
 **PACKAGE:  5    **CATEGORY:  7
  
 **KEYWORDS:
    UPDATE          FILES           UTILITY 
    MAGNETIC TAPE   MANAGEMENT
  
 **LANGUAGES: 
    FTN4
  
 **COMPUTER TYPE: 
    M-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  14 PAGES REGUIRED 
  
 **DEPENDENT ON SYSTEM SOFTWARE?  YES 
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  THIS PROGRAM WIL GENERATE THE FILE THAT THE STANDARD SDLS4 PROGRAM
  WHEN RUN IN THE UPDATE MODE, UPDATES FMGR FILES ON THE SELECTED 
  DISC L.U. 
  
  USING A CONTROL FILE CALLED ^DATE, SDLUP GENERATES A WORK FILE CALLED 
  UPDATE. 
  
  THE OPERATER CAN THEN CALL THE PROGRAM SDLS4 AND RUN UPDATE MODE ON 
  THE LATEST D.S.D. DELTA TAPE. ANY FILES FOUND ON THE DELTA TAPE 
  WITH A NEWER REV CODE BE WRITTEN TO THE SELECTED DISC.
  
  WHEN THE UPDATE MODE IS COMPLETED, THE UPDATED REV CODES ARE WRITTEN
  BACK TO THE CONTROL FILE ^DATE. 
  
  THE OPERATOR CAN ALSO:
  1. PRINT THE ^DATE FILE IN A FORMATTED OUTPUT TO ANY LIST DEVICE THATS
     BEEN SELECTED. 
  2. CHANGE THE LIST DEVICE WHEN DESIRED. 
  3. RUN SDLS4 IN THE STANDARD MODE.
  4. RUN ANY SELECTED PROGRAM 
  5. PRINT ONLY CHANGES TO THE FILE ^DATE BASED ON REV CODES. 
  6. SET/CHANGE DISC L.U. WHERE FILES ARE LOCATED.
  7. DUMP COPIES OF THE FILES TO MAG. TAPES, PAPER TAPE, CART'S.
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: &SDLUP    PROGRAM SOURCE FILE 
  FILE#  3: #SDLUP    INFOR. FILE FOR SDLU4 UPDATE OPERATION
  FILE#  4: "SDLUP    DIRECTIONS FOR USING SDLUP
  
  
 **LOAD INSTRUCTIONS: 
  
  NO SPECIAL LOADING REQUIRED 
  
  
 **RUN INSTRUCTIONS:
  
  RU,SDLUP,P1,P2,P3 
  
  P1 = SYSTEM CONSOLE   << DEFAULT = 1 OR MTM TERMINAL >> 
  
  P2 = LIST DEVICE      << DEFAULT = 6  MAY BE CHANGED BY OPERATOR >> 
  
  P3 = DISC LU WHERE ^DATE FILE/DATA FILES EXIST
                        << IF P3 = 0, OPERATOR WILL BE ASKED FOR >> 
                        << THE DISC L.U. # BEFORE IT WILL DO     >> 
                        << ANYTHING.                             >> 
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  
  
  
 **PROGRAM DESCRIPTION: 
  
  SEE DIRECTION FILE. USE FMGR TO DUMP IT TO A LIST DEVICE. 
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  IF YOU GET AN ERROR MESSAGE WITH A NEGATIVE NUMBER, 
  THAT'S THE FMGR ERROR CODE. 
  
  IF THE PROGRAM ABORTS WITH AN SC05 ERROR, YOU TRIED TO RUN
  A PROGRAM WITH SELECTION # 5 THAT WASN'T AVAILABLE. 
  
  
 **MISCELLANEOUS: 
  
  WHEN ADDING NEW PROGRAMS TO THE FILE  ^DATE  BE SURE TO USE A 
  REV CODE LESS THEN THE ONE ON THE DELTA TAPE.  IE:  1000
  REMEMBER: PUT PART NUMBER IN PROPER NUMERICAL ORDER.
  
  THE FILE NAME  UPDATE  IS RESERVED FOR USE BY THE PROGRAM SDLUP 
  
  WHEN PROGRAM CODE # 1 IS SELECTED, IF A FILE NAMED  UPDATE
  EXISTS ON THE SELECTED DISC L.U., IT IS PURGED. 
  
  BE SURE TO ENTER THE BATCH FILE NAME AS   UPDATE::DISC LU ##
  
  EXAMPLE:
   /SDLS4: ENTER BATCH-FILE NAME: UPDATE::10
                                     ----->  BATCH FILE NAME MUST 
                                             = UPDATE.
                                             DON'T FORGET THE LU ## 
  
  THE FILE #SDLUP IS AN INFORMATION FILE CONTAINING INSTRUCTIONS
  ON RUNNING THE PROGRAM SDLS4 IN THE UPDATE MODE. IF IT ISN'T
  THERE I JUST SKIP AROUND IT.
  
  
  IF REFERENCES TO THE RTE-IVB MODULE  FTIME  WAS REMOVED, SDLUP
  COULD BE RUN ON SYSTEM AS OLD AS RTE-II.
E01001
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  P8080 
 **PROGRAM TITLE: 
  XASMB for 8080/8081 type micro-computers. 
  
 **REVISION?  NO
  
 **PACKAGE:  5    **CATEGORY:  1
  
 **KEYWORDS:
    ASSEMBLER 
  
  
 **LANGUAGES: 
    ASMB
  
 **COMPUTER TYPE: 
    2100
  
 **OPERATING SYSTEMS: 
    RTE-II    RTE-III   RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  A minimum of 20Kwords are required. 
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: /8080  -- manual 8080 XASMB (WOLF FORMAT) 
  FILE#  3: 'T8080 -- test syntax errors
  FILE#  4: "T8080 -- test XASMB
  FILE#  5: &8080  -- source 8080/8081 XASMB
  
  
 **LOAD INSTRUCTIONS: 
  
  see manual
  
  
 **RUN INSTRUCTIONS:
  
  see manual
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  see manual
  
  
 **PROGRAM DESCRIPTION: 
  
  see manual
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  see manual
  / 
  
  
 **MISCELLANEOUS: 
  
  
E01101
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  PM6800
 **PROGRAM TITLE: 
  XASMB & XREF for 6800/6801 type micro-computers 
  
 **REVISION?  NO
  
 **PACKAGE:  5    **CATEGORY:  1
  
 **KEYWORDS:
    ASSEMBLER 
  
  
 **LANGUAGES: 
    ASMB
  
 **COMPUTER TYPE: 
    2100
  
 **OPERATING SYSTEMS: 
    RTE-II    RTE-III   RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  A minimum partition of 20Kwords is required.
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: &6800 -- SOURCE XASMB 
  FILE#  3: &X6800 -- SOURCE XREF 
  FILE#  4: 'T6800 -- SYNTAX TEST FILE
  FILE#  5: /6800  -- MANUAL XASMB (WOLF FORMAT)
  FILE#  6: '6800  -- MANUAL XASMB (DUmp FORMAT)
  FILE#  7: /X6800 -- MANUAL XREF  (WOLF FORMAT)
  FILE#  8: 'X6800 -- MANUAL XREF  (DUmp FORMAT)
  
  
 **LOAD INSTRUCTIONS: 
  
  See manuals 
  
  
 **RUN INSTRUCTIONS:
  
  See manuals 
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  See manuals 
  
  
 **PROGRAM DESCRIPTION: 
  
  See manuals 
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  See manuals.
  
  
 **MISCELLANEOUS: 
  
  See manuals 
E01201
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:
 **PROGRAM TITLE: 
  XASMB & XREF for TMS9900 serie min/micro computer 
  
 **REVISION?  NO
  
 **PACKAGE:  5    **CATEGORY:  1
  
 **KEYWORDS:
    ASSEMBLER 
  
  
 **LANGUAGES: 
    ASMB
  
 **COMPUTER TYPE: 
    2100
  
 **OPERATING SYSTEMS: 
    RTE-II    RTE-III   RTE-IV
  
 **MEMORY REQUIREMENTS: 
  A minimum partition of 20 Kwords is required. 
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: &TMS99  -- SOURCE XASMB TMS9900 
  FILE#  3: &TREF99 -- SOURCE XREF TMS9900
  FILE#  4: /TMST1  -- TEST FILE 1, NO ERRORS 
  FILE#  5: /TMST2  -- TEST FILE 2, TEST SYNTAX ERRORS
  
  
 **LOAD INSTRUCTIONS: 
  
  The following commands are useful to load both the cross assembler and
  cross reference generator correctly:
  (LOADR commands RTE-IV loader)
       SZ,23
       REL,%TMS99    OR %TREF99 
       END
  
  
 **RUN INSTRUCTIONS:
  
    RU,TMS99[,A[,B[,C[,D[,E]]]]]
  
    A= OPERATOR TERMINAL LU NUMBER. (DEFUALTED TO 1)
    B= INPUT DEVICE LU NUMBER.( DEFAULTED TO 2) 
     = 5 = HIGH SPEED PAPERTAPE READER. 
     = T = DISC LU NUMBER (DISC FILE INPUT.)
     = N = TERMINAL LU NUMBER.
    C= OUTPUT DEVICE LU NUMBER. ( DEFAULTED TO 2) 
     = 4 = HIGH SPEED PUNCHER.
     = T = DISC LU NUMER (DISC FILE OUTPUT.)
    D= LIST DEVICE LU NUMBER. ( DEFAULTED TO 6) 
     = U = HIGH SPEED LINE PRINTER LU NUMBER
     = N = TERMINAL LU NUMBER.
     = 64 = DUMMY LU NUMBER ERRORS ARE REPORTED ON OPERATOR TERMINAL
     = -N = DUMMY LU NUMBER ERRORS ARE REPORTED ON OPERATOR TERMINAL
    E= NUMBER OF LINES A PAGE. ( DEFAULTED TO 56 )
  
  For XREF generator applies thes following : 
    ON,PTREF[,A[,B[,C[,D[,E]]]]]
  
    A= OPERATOR LU NUMBER. ( DEFAULT TO 1 ) 
    B-C-D= FILE NAME  OR B= READER LU NUMBER  OR B= TERMINAL LU 
    E= LIST DEVICE LU NUMBER. ( DEFAULT TO 1 )
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  RU,TMS99
  INPUT FILE? 
  $ <source file> 
  OUTPUT FILE?
  $ <binary output file>
  
  
 **PROGRAM DESCRIPTION: 
  
  See manual, which can be obtained via the Institute under number: 
  no number ask a copy from author
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  Error codes generated by the cross-assembler are* 
  
     ERROR 201 =      MORE THEN ONE NAM DIRECTIVE 
     ERROR 202 =      LABEL SYNTAX ERROR
     ERROR 203 =      NOT ALLOWED FORWARD REFERENCE 
     ERROR 204 =      STATEMENT SYNTAX ERROR
     ERROR 205 =      OPERATOR SYNTAX ERROR 
     ERROR 206 =      EXPRESSION SYNTAX WARNING 
     ERROR 207 =      UNDEFINED OPERATOR
     ERROR 208 =      BRANCH OFSET ERROR OR OPERAND OUT OF RANGE
     ERROR 209 =      ILLEGAL ADDRESSMODE 
     ERROR 210 =      BYTE OVERFLOW 
     ERROR 211 =      UNDEFINED SYMBOL
     ERROR 212 =      --------- 
     ERROR 213 =      EQU DIRECTIVE OPERAND SYNTAX ERROR
     ERROR 214 =      --------- 
     ERROR 215 =      --------- 
     ERROR 216 =      --------- 
     ERROR 217 =      OPTION DIRECTIVE ERROR
     ERROR 218 =      ILLEGAL REGISTER REFERENCE
     ERROR 219 =      ADDRESS ERROR 
     ERROR 220 =      PHASING ERROR 
     ERROR 221 =      SYMBOL TABLE OVERFLOW 
     ERROR 222 =      SYMBOL SYNTAX ERROR 
     ERROR 223 =      NOT ALLOWED NEGATIVE OPERAND
     ERROR 224 =      NO RELOCATION ALLOWED. ( NO BOUNDERY ADDRESS )
     ERROR 225 =      DUPLICATE LABEL 
     ERROR 226 =      OPERAND MISSING OR TO MANY OPERANDS 
     ERROR 227 =      CONDITIONAL ASSEMBLY STACK OVERFLOW 
     ERROR 228 =      NUMBER STRING TRUNCATE ERROR. 
     ERROR 229 =      NOT A CORRECT DIGIT TO NUMBER MODE
     ERROR 230 =      NON PRINTABLE CHARACTER DETECTED
     ERROR 231 =      CONDITIONAL ERROR 
     ERROR 232 =      PLC GOES TRUE ZERO
     ERROR 233 =      OPERAND STRING TRUNCATE ERROR 
     ERROR 250 =      NO END IN FILE, END IS SIMULATED
  
  
 **MISCELLANEOUS: 
  
  
E01301
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  PCROS 
 **PROGRAM TITLE: 
  XASMB & XREF for LSI-11/PDP11-03 mini/micro computers.
  
 **REVISION?  NO
  
 **PACKAGE:  5    **CATEGORY:  1
  
 **KEYWORDS:
    ASSEMBLER 
  
  
 **LANGUAGES: 
    ASMB
  
 **COMPUTER TYPE: 
    2100
  
 **OPERATING SYSTEMS: 
    RTE-II    RTE-III   RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  A minimum partion of 20Kwords is required.
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: &CROS  -- SOURCE XASMB FOR LSI-11 
  FILE#  3: &1XREF -- SOURCE XXREFFOR LSI-11
  FILE#  4: &2XREF -- SOURCE NEW XXREFFOR LSI-11
  FILE#  5: /1TEST -- TEST FILE FOR XASMB / XREF(S) 
  
  
 **LOAD INSTRUCTIONS: 
  
  The followinf two commands in the RTE-IVB LOADR will load PCROS 
         SZ,23
         REL,%PCROS 
         END
  
  The following two commands in the RTE-IVB LOADR will load the XREF
         SZ,23
         REL,%XREF
         END
  
   /E 
  
  
 **RUN INSTRUCTIONS:
  
  RU,PCROS,P1,P2,P3,P4,P5 
     P1 = Operator terminal, default to the session terminal
     P2 = Source input device, default to disc
        = 5 = High speed reader input 
        = T = Disc lu number ( file input ) 
              File name will be asked for 
        = N = Terminal lu number, source should be entered via terminal 
              It will be stored in a file. Enter "CTL-D" to stop input. 
     P3 = Binary output device, default to disc 
        = 4 = High speed puncher
        = T = Disc lu number ( file output )
              File name will be asked for 
        = X = HP-LSI communication link LU nmb. 
     P4 = List device lu number 
        = U = High speed printer lu number
        = N = Terminal lu number
        = -n = bit bugget, errors are reported on the operator terminal 
        = 64 = -n, bit bugget 
     P5 = Number of lines per page for listing, default to 56 
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  RU,PCROS
  INPUT FILE? 
  $"FILE NAMR"
  OUTPUT FILE?
  $"FILE NAMR"
  RELOC. ADDR.
  $           , ENTER RELOCATION BASE ADDRESS 
  
  
 **PROGRAM DESCRIPTION: 
  
  See manual, which can be obtained via the Institute under number: 
     Memo FL/1978/8/3 
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  See manual
  
  
 **MISCELLANEOUS: 
  
  
E01401
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  PKCRS 
 **PROGRAM TITLE: 
  XASMB & XREF FOR 6502 TYPE MICRO-PROCESSORS 
  
 **REVISION?  NO
  
 **PACKAGE:  5    **CATEGORY:  1
  
 **KEYWORDS:
    ASSEMBLER 
  
  
 **LANGUAGES: 
    ASMB
  
 **COMPUTER TYPE: 
    2100
  
 **OPERATING SYSTEMS: 
    RTE-II    RTE-III 
  
 **MEMORY REQUIREMENTS: 
  A MINIMUM PARTITION OF 20 KWORDS IS REQUIRED
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: &KXREF -- XREF GENERATOR
  FILE#  3: /TKIM  -- TEST FILE FOR SYNTAX
  FILE#  4: &6502  -- XASMB 
  
  
 **LOAD INSTRUCTIONS: 
  
  
  
  
 **RUN INSTRUCTIONS:
  
  SEE SOURCE
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  SEE SOURCE CODE 
  
  
 **PROGRAM DESCRIPTION: 
  
  SEE SOURCE CODE 
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  SEE SOURCE CODE 
  
  
 **MISCELLANEOUS: 
  
  
E01501
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  CALC
 **PROGRAM TITLE: 
  Program for Calculator Functions with an HP-1000 Keyboard Terminal
  
 **REVISION?  NO
  
 **PACKAGE:  5    **CATEGORY:  5
  
 **KEYWORDS:
  
  
  
 **LANGUAGES: 
    FTN4
  
 **COMPUTER TYPE: 
    M-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  20K PARTITION 
  
 **DEPENDENT ON SYSTEM SOFTWARE?  YES 
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
       The computer program (called CALC) supports use of an HP-1000
  terminal in a 'desk calculator' mode.  It was originally developed in 
  1975 and new commands were added from time to time. 
  
       Some of the more interesting features are: 
  
       A 500 element operational stack of double precision floating point 
  operands (four word double precision is recommended).  Stack elements 
  may double as 'memory storage registers'. 
  
       Base n I/O mode allows user to input base n (2 <= n <= 35) values
  and enables the display of stack elements in both base n and base 10. 
  
       It is programmable. A user may write his own program or programs to
  interface with CALC and then issue commands which cause CALC to schedule
  with wait any of several programs the user may designate.  The
  operational STACK and other values are passed on a system disk track
  between CALC and user written programs. 
  
       There are commands for stack storage and retrieval to and from disk
  files and to and from LU's 4 and 5. 
  
       An optional list device (LU only) may be enabled to record all 
  input values, commands, and functions and all terminal displays.
  
       Over 50 commands, functions and operators are implemented.  RTE
  system interfaces are implemented in the manner of FMGR; i.e., the
  SYstrng, the RU,pnam, and the WH command are implemented. The program 
  may be easily extended to include new commands, operators, and/or 
  functions.
  
       The program uses RTE EXEC and FMP subroutine calls.
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: "MANUL --- USER'S REFERENCE MANUAL
  FILE#  3: &CALC ---- RTE-FTN4 SOURCE CODE 
  FILE#  4: %LIBER --- ROUTINE TO BE LOADED WITH %CALC
  FILE#  5: %CALC ---- RELOCATABLE CODE CORRESP. TO FILE &CALC
  
  
 **LOAD INSTRUCTIONS: 
  
  LARGE BACKGROUND IS RECCOMMENDED (20K REQUIRED) 
  LOADING INSTRUCTIONS: 
  
      :RU,LOADR 
          RE,%CALC
          RE,%LIBER 
          END 
  
  
 **RUN INSTRUCTIONS:
  
  :RU,CALC
  CALC PROGRAMS RESOPNDS WITH # AS A PROMPT.  ENTER ?? TO DISPLAY A BRIEF 
  SUMMARY OF ACCEPTABLE PROGRAM COMMANDS.  SEE USER'S MANUAL FOR MORE 
  DETAILS.
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  
  
  
 **PROGRAM DESCRIPTION: 
  
  
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  
  
  
 **MISCELLANEOUS: 
  
  
F00101
 PLUS/1000 LIBRARY CONTRIBUTION 
 ---------------------------------------------------------------------
  
 **DATE CODE: 2001
  
 **PROGRAM NAME:  MMM 
 **PROGRAM TITLE: 
  MYSTERY MANSION 
  
 **REVISION?  NO
  
 **PACKAGE:  6    **CATEGORY: 
  
 **KEYWORDS:
    GAMES 
  
  
 **LANGUAGES: 
    FTN4
  
 **COMPUTER TYPE: 
    E-SERIES
  
 **OPERATING SYSTEMS: 
    RTE-IVB 
  
 **MEMORY REQUIREMENTS: 
  
  
 **DEPENDENT ON SYSTEM SOFTWARE?  NO
 **DEPENDENT ON SYSTEM HARDWARE?  NO
  
  
 **ABSTRACT:
  
  THIS IS A VERSION OF MYSTERY MANSION DEVELOPED BY B. WOLPERT.  FOR
  THOSE THAT LIKE THE 'ADVENTURE' TYPE OF GAME THIS IS AN EXCELLANT 
  GAME.  SOME OF THE ELEMENTS OF THE GAME ARE SET RANDOMLY WHICH
  PROVIDES A DIFFERENT GAME EACH TIME IT IS PLAYED.  MANY PEOPLE HAVE 
  THE RELOCATABLE ONLY UNTIL THE AUTHOR WAS LOCATED.
  
  THANK YOU BILL WOLPERT! 
  
  
 **FILES IDENTIFICATION:
   (NOTE: FILES IN THIS CONTRIBUTION HAVE THE SAME NAME AS THE
     DOCUMENTATION FILE WITH THE LAST 2 DIGITS INCREMENTED. 
     E.G.: A00101, A00102, A00103, ETC.)
  
  FILE#  1: DOCUMENTATION FILE
  FILE#  2: &MMM
  FILE#  3: %MMM
  
  
 **LOAD INSTRUCTIONS: 
  
  
  
  
 **RUN INSTRUCTIONS:
  
  
  
  
 **INPUT/OUTPUT EXAMPLES: 
  
  
  
  
 **PROGRAM DESCRIPTION: 
  
  
  
  
 **ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES: 
  
  
  
  
 **MISCELLANEOUS: