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: