A01701
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &ROI
**PROGRAM TITLE:
CALCULATE INTERNAL RATE OF RETURN
**REVISION? NO
**PACKAGE: 1 **CATEGORY: 5
**KEYWORDS:
ACCOUNTING STATISTICS
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM WILL CALCULATE THE INTERNAL RATE OF RETURN AND THE
PROFITABILITY INDEX.
THE INTERNAL RATE OF RETURN IS THE INTEREST RATE THAT MAKES THE NET
PRESENT VALUE OF THE INVESTMENT ZERO.
THE PROFITABILITY INDEX IS THE RATIO OF THE NET PRESENT VALUE (AT A
GIVEN COST OF CAPITAL) OF THE OPERATING ADVANTAGES TO THE INITIAL
INVESTMENT.
**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: &ROI
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,ROI
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
A01801
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: DBCHK
**PROGRAM TITLE:
DATA BASE ROOT FILE INFORMATION RETRIEVAL
**REVISION? NO
**PACKAGE: 1 **CATEGORY: 2
**KEYWORDS:
DATA BASE DATA MGMT FILES
**LANGUAGES:
FTN4
**COMPUTER TYPE:
M-SERIES
**OPERATING SYSTEMS:
RTE-IVA RTE-IVB
**MEMORY REQUIREMENTS:
8K WITH SYSTEM EXTERNALS TOTALLING ANOTHER 8K
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM READS FROM THE ROOT FILE OF ANY GIVEN DATA BASE INFOR-
MATION RELEVANT TO DETERMINING SPACE LIMITATIONS OF THE PARTICULAR
DATA BASE. THE INFORMATION IS BROKEN DOWN BY INDIVIDUAL DATA SETS
AND DETERMINES CAPACITIES, RECORDS USED, AND RECORDS FREE. THE
SOFTWARE IS BASED UPON THE IMAGE 1000 FORMAT IN TERMS OF HOW THE
ROOT FILE IS CONSTRUCTED AND WHAT PARTICULAR INFORMATION IS
AVAILABLE.
**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: DBCHK
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,DBCHK,P1,P2,P3,P4,P5
WHERE P1-P5 ARE:
P1-P3: THE NAME OF THE ROOT FILE BROKEN UP
INTO TWO-CHARACTER PARAMETERS WITH
A MAXIMUM OF SIX CHARACTERS
P4: TYPE OF INFORMATION REQUESTED, EITHER
0 OR 1 WHERE 0 IS DEFAULT AND GIVES
ALL INFORMATION AND 1 ONLY GIVES SUMMARY
INFORMATION (OPTIONAL PARAMETER)
P5: LIST OUTPUT LU, DEFAULT IS SESSION LU
NOTE--P5 CANNOT BE LINE PRINTER IF
P4=1
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
ADDITIONAL ERRORS CHECKED FOR DUE TO FMP PROGRAM CALLS:
ERRORS IN OPENING FILES, CLOSING FILES, LOCKING OR
UNLOCKING FILES, READING AND WRITING TO FILES.
CONSULT BATCH-SPOOL MONITOR REFERENCE MANUAL (92060-90013)
**MISCELLANEOUS:
A01901
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: MSORT
**PROGRAM TITLE:
QUICK MEMORY SORT
**REVISION? YES
**PACKAGE: 1 **CATEGORY: 2
**KEYWORDS:
SORT
**LANGUAGES:
ASMB
**COMPUTER TYPE:
M-SERIES
**OPERATING SYSTEMS:
RTE-II RTE-IVB
**MEMORY REQUIREMENTS:
448 (10) INCLUDES SUBS.
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
'MSORT' IS AN EXTERNAL SUBROUTINE WHICH SORTS AN ARRAY OF RECORDS
IN MEMORY. THE SUBROUTINE USES A PARTITION-EXCHANGE SORT TECHNIQUE
(QUICKSORT) WHICH IS A VERY FAST METHOD OF SORTING UNORDERED ITEMS.
THE ARRAY IS SORTED IN PLACE INTO ASCENDING ORDER.
THIS SUBROUTINE OPERATES IN ANY RTE SYSTEM AND IS CALLABLE FROM
ASSEMBLY LANGUAGE, FORTRAN, OR PASCAL.
THIS ROUTINE WAS DERIVED FROM 'QSORT' (SEE A00501).
**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: SOURCE OF MSORT
FILE# 3: SOURCE OF .XWRD (EXCHANGE WORD ARRAYS)
**LOAD INSTRUCTIONS:
STANDARD ASSEMBLE/COMPILE PROCEDURES.
**RUN INSTRUCTIONS:
CALLING SEQUENCE - ASSEMBLY
JSB MSORT
DEF *+6
DEF RUNAD ADDRESS OF ARRAY IN MEM.
DEF LRECL RECORD LENGTH IN WORDS
DEF RECNO NUMBER OF RECORDS IN ARRAY
DEF SRTOF OFFSET SORT FIELD WITHIN RECORD (FIRST WORD = 0)
DEF SRTLN LENGTH OF SORT FIELD IN WORDS
<RETURN>
CALL MSORT(RUNAD,LRECL,RECNO,SRTOF,SRTLN)
**INPUT/OUTPUT EXAMPLES:
COMPILE TEST ROUTINE, ASSEMBLE MSORT, .XWRD
LOAD PROGRAM EXECUTE
**PROGRAM DESCRIPTION:
'MSORT' WILL SORT A MAXIMUM OF 8191 RECORDS. THE MAXIMUM RECORD
LENGTH IS 128 WORDS. THE SORT KEY CAN BE ANY LENGTH CONTIGUOUS
FIELD WITHIN THIS LIMIT. IF THE KEYS ARE IDENTICAL THE FINAL
ORDER IS INDETERMINENT.
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
NONE
IF MSORT IS CALLED WITH RECORD LENGTH GREATER THAN 128 WORDS
THE ROUTINE 'TRYS' TO HALT.
**MISCELLANEOUS:
THIS ROUTINE SHOULD WORK ON ANY 21XX CPU UNDER ANY OPERATING SYSTEM.
IF THIS IS ATTEMPTED ON CPU'S BEFORE THE 21MX SERIES THE 'MX'
INSTUCTION SET SIMULATOR WILL BE REQUIRED. THIS IS IN THE PLUS 1000
LIBRARY.
A02001
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: TYPO
**PROGRAM TITLE:
TYPO WORD PROCESSING PROGRAM
**REVISION? NO
**PACKAGE: 1 **CATEGORY: 6
**KEYWORDS:
MANAGEMENT WORD
**LANGUAGES:
FORTRAN
**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 HP21MX 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 includes 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: &TYPO
FILE# 3: &TYPO3
FILE# 4: &TVPO
FILE# 5: &RETYP
FILE# 6: &ESCAP
FILE# 7: &IDADD
FILE# 8: &BR
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
TYPO commands are organized into 5 types. Command types 1,2,3,4 are
included in the source text, while type 5 commands are entered from
the keyboard on-line. Commands have the following characteristics:
Type 1 - "Column 1 stand-alone commands"
These commands primarily set and control the global
parameters which TYPO uses in processing text. This
includes such things as margins, tabs, titles, and page
numbering. Also included is control of figures, tables,
footnotes, and a few other miscellaneous operations.
Type 1 commands must start in column 1. No text is allowed
on the line. Some type 1 commands may also be entered
on-line during TYPO processing.
Type 2 - "Column 1 commands with text following"
This is a special class of commands that control operations
such as line centering and margin-to-margin expansion of
ordinary text; they can also force text to be processed as
paragraph text even though it has not been entered in such
a way that TYPO would normally recognize it as paragraph
text.
Type 3 - "Unrestricted in-line commands"
These commands exercise local control over printed text,
such as underlining, boldface, backspacing, subscript,
superscript, and footnote references. Type 3 commands
are allowed in both ordinary and paragraph text except
for a few exceptions.
Type 4 - "Restricted in-line commands"
These commands are used in ordinary text only and include
such operations as tab, right justify, repeat string, and
absolute column set.
Type 5 - "Real-time keyboard commands"
Type 5 commands are entered on-line from the typewriter
or command console keyboard and are not included in the
source text file. They specify the operator interaction
with TYPO to control such things as loading paper, page
eject, printwheel specification, page reprocessing, etc.
In addition to type 5 commands, many type 1 commands may
be entered on-line during TYPO processing to modify or
optimize the final printed result.
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
B02201
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: UDCLR
**PROGRAM TITLE:
ALLOWS PROGRAM (THRU SUBROUTIE) TO ACCESS UNDECLARED MEMROY IN PARTITION
**REVISION? NO
**PACKAGE: 2 **CATEGORY: 1
**KEYWORDS:
STORAGE PERFORMANCE MEMORY
**LANGUAGES:
ASMB
**COMPUTER TYPE:
M-SERIES
**OPERATING SYSTEMS:
RTE-IVA RTE-IVB
**MEMORY REQUIREMENTS:
SUBROUTINE LENGTH IS 75B WORDS IN LENGTH
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
ROUTINE ALLOWS A PROGRAM TO CALL A SUBROUTINE WHICH IN CAN DEFINE A
ARRAY OF DYNAMIC SIZE (IN GROUPS OF 64 WORDS). THE USE IS IN SOFTWARE
WHERE THE USER NEEDS AS LARGE AN ARRAY AS POSSIBLE BUT DUE TO MOVEMENT
OF SOFTWARE FROM SYSTEM TO SYSTEM IS UNSURE OF WHAT SIZE ARRAY TO USE.
THIS ROUTINE WILL ALLOW THE USER TO ADDRESS WHAT EVER ARRAY CAN BE
ALOCATED DURING THE LOAD PROCESS. IF THE PROGRAM NEEDS N PAGES TO LOAD
THE USER CAN SPECIFY 'SZ,M' AND THIS ROUTINE WILL ALLOW A FORTRAN
ROUTINE TO ADDRESS DATA INTO AND OUT OF THE MEMORY AREA BETWEEN THE
END OF THE PROGRAM AND THE END OF ALLOWED MEMORY (M) THUS HAVEING AN
ARRAY OF SIZE M-N PAGES IN LENGTH. THE PROCESS IS THRU MODIFICATION
OF THE FORTRAN ARRAY ADDRESS.
**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: &UDCLR - ROUTINE TO BE ADDED TO USER PROGRAM
**LOAD INSTRUCTIONS:
ROUTINE MUST BE CALLED FROM A SUBROUTINE WITH THE FOLLOWING STRUCTURE
PROGRAM TEST
CALL DUMMY
END
SUBROUTINE DUMMY(MEMORY)
DIMENSION MEMORY(64)
CALL UDCLR(MEMORY,ISIZE)
LENGTH=SIZE*64
:
END
THE SUBROUTINE 'UDCLR' MODIFIES THE ADDRESS OF THE ARRAY MEMORY
SUCH THAT AFTER THE CALL, MEMORY POINTS THE AREA FOLLOWING THE PROGRAM.
THE ARRAY MEMORY MAY BE USED AS ANY OTHER FORTRAN ARRAY, AND MAY BE
DESIGNATED AS 2 DIMENSIONAL AND PASSED TO SUBROUTINES.
**RUN INSTRUCTIONS:
CALL UDCLR (IARAY,ISIZE)
IARAY = ARRAY TO BE PASSED AND ITS STARTING ADDRESS WILL
BE CHANGED.
ISIZE = VALUE RETURNED TELLING YOU HOW MUCH AREA IS AVALIBLE
IN BLOCKS OF 64 INTEGER WORDS (LENGTH=64*ISIZE)
IF LESS THAN 64 WORDS IS AVALIBLE, ISIZE = 0
OR ISIZE IS LESS THAN 0.
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
ROUTINE WORKS BY CHECKING PROGRAM DCB TO DETERMINE START ADDRESS AND
END ADDRESS OF PROGRAM. FROM THIS VALUE AND BY GETING THE MAX SIZE
DESIGNATED FOR THE PARTITION IN WHICH THE PROGRAM IS RUNNING AND
SUBTRACTING THE TWO VALUES. THE PARAMETER ADDRESS WHICH IS PASSED
AS A DUMMY ARRAY VALUE WILL HAVE A STORAGE LOCATION IN THE SETUP
SUBROUTINE WHICH IS USED TO DEFINE THE ADDRESS OF THE ARRAY. THIS
ROUTINE WILL CHANGE THAT ADDRESS TO POINT TO THE AREA IMMEDIATELY
FOLLOWING THE PROGRAM SO THAT THE USER CAN ACCESS IT. THE USER
DEFINES THE AREA AVALIBLE BY SETTING THE SIZE COMMAND IN THE LOADER
TO THE MAX VALUE AVALIBLE ON THE SYSTEM. THE RESULT OF THE SUBROUTINE
IS TO ALLOW FORTRAN PROGRAMS ACCESS TO THE SAME AREA THAT THE SYSTEM
EDITR, FTN4, LOADR, AND MANY OTHER SYSTEM PROGRAMS HAVE ACCESS TO
FOR DYNAMIC ARRAY DEFINIATION.
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
B02301
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: MPTLB
**PROGRAM TITLE:
CALCOMP STYLE (PLOT, SYMB, NUMB) FOR CALCOMP/TEK/HP/PRINTRONIX DEVICES
**REVISION? NO
**PACKAGE: 2 **CATEGORY: 2
**KEYWORDS:
PLOTTER GRAPHIC DISPLAY
CALCOMP TEKTRONIX
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
2100
**OPERATING SYSTEMS:
RTE-IVA RTE-IVB RTE-II
**MEMORY REQUIREMENTS:
VARIBLE SIZE DEPENDING UPON PLOTTERS USED. TEST PROGRAM LOADS 11 PAGES
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
PLOTTING PACKAGE CONTAINS ALL ROUTINES NEEDED FOR MAKING CALLS THRU
STANDARD RTE DRIVERS TO DEVICES SUCH AS CALCOMP 565, TEKTRONIX 4010
HP2648, PRINTRONIX 300 PRINTER/PLOTTER, HP2608 PRINTER/PLOTTER
HP9872S PLOTTER, HP VIDEO MONITOR, MAG TAPE STORAGE OF COMMANDS. FOR
DOT MATRIX PLOTTERS, CALLS LINK TO A PROGRAM DOTBF FOR FORMATED OUTPUT
CALCOMP AND DOT MATRIX PLOTTERS MAY BE ADDRESSED FOR PLOTTING IN A
WATERFALL FORMAT WHERE THE DATA IS ROTATED 90DEG FOR CONTINUES PLOTTING
IN A VERTICAL FORMAT. REVIDED VERSIONS OF PLOT, SYMB, NUMB, AXIS, LINE
SCALE, EVNSC, PEN, ARE PROVIDED WITH A MODIFIED VERSION OF AXIS
PROVIDING AXIS LAGELING IN TERMS OF A 24 HOUR CLOCK. USER MAY
ELEMINATE UNWANTED PLOTTER CONTROL ROUTINES THRU INSERTION OF SPECIFIED
DUMMY ROUTINES TO REGAIN PROGRAMING AREA. TWO VERSIONS OF DOTBF ARE
PROVIDED, DOTBP FOR PRINTRONIX PRINTER/PLOTTERS AND DOTBH FOR
HP2608 PRINTER/PLOTTERS. DOTBF REQUIRES THE USE OF 16BIT RIGHT/LEFT
WORD ROTATION WHICH IS PROVIDED ALONG WITH UNDECLARED MEMORY ACCESS
ROUTINE FOR DYNAMIC ARRAY DEFINATION. THE LARGER THE AMOUNT OF
UNDECLARED MEMORY PROVIDED TO THE DOTBF PROGRAM, THE FASTER THE
PROGRAM OPERATES IN PLOT GENERATION (WILL ALWAYS REQUIRE 9 SCRATCH
TRACKS FOR PLOT GENERATION). ALL SUGESTIONS ARE WELCOMED ON IMPROVEING
THIS PACKAGE.
**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: &SCALE - AUTO AXIS SCALE VALUE COMPUTATION
FILE# 3: &LINE - PLOT SYMBOL AND LINE FOR DATA ARRAYS
FILE# 4: &EVNSE - SPECIAL VERSION OF SCALE ROUTINE
FILE# 5: &AXIS - GENERATE AXIS ON PLOT
FILE# 6: &NUMB - PUT NUMBER ON PLOT
FILE# 7: &SYMB - PUT CHARACTER STRING ON PLOT
FILE# 8: &NPLTB - PLOT DISTRIBUTION ROUTINE
FILE# 9: &MMAGA - OUTPUT PLOT COMMANDS TO TAPE FOR STORAGE
FILE# 10: &LLINA - INTERFACE TO DOTBF PROGRAM FOR LINEP
FILE# 11: &HHFLA - HPIB CONTROLER FOR HP9872S PLOTER
FILE# 12: &TT48A - HP2647,8 TERMINAL GRAPIC CONTROLER
FILE# 13: &VVMTR - HP VIDEO MONITOR PLOT CONTROLER
FILE# 14: &CCMPA - CALCOMP 565 PLOT CONTROLER
FILE# 15: &TTEKA - TEKTRONIX 4010 PLOT CONTROLER
FILE# 16: &NPLTA - PEN, PAGE, SPAGE, ......
FILE# 17: &UDCLR - ALLOW PROGRAM ACCESS TO UDECLARED MEMORY
FILE# 18: &IROTW - 16BIT FORTRAN RIGHT/LEFT WORD ROTATION
FILE# 19: &DOTBP - PRINTRONIX VERSION OF PROGRAM DOTBF
FILE# 20: &DOTBH - HP2608 VERSION OF PROGRAM DOTBF
FILE# 21: "MPIFP - DOCUMENTATION FILE FOR PLOT SOFTWARE
FILE# 22: *CPLOT - COMPILE FILE FOR SOURCE CODE
FILE# 23: *NPLOT - MERGE/CONTROL FILE FOR SETING UP SOFTWARE
FILE# 24: &PLTST - SAMPLE PLOT GENERATION TEST PROGRAM
FILE# 25: &WFTST - SAMPLE WATERFALL PLOT TEST PROGRAM
FILE# 26: #PLTST - LOAD FILE FOR PROGRAM PLTST
FILE# 27: #WFTST - LOAD FILE FOR PROGRAM WFTST
FILE# 28: #DOTBP - LOAD FILE FOR DOTBF PROGRAM P VERSION
FILE# 29: #DOTBH - LOAD FILE FOR DOTBF PROGRAM H VERSION
**LOAD INSTRUCTIONS:
PROGRAM DOTBF (&DOTBP OR &DOTBH) SHOULD BE LOADED WITH SIZE OPTION
SET TO LARGEST AVALIBLE WITHOUT CAUSING INTERFERENCE WITH NORMAL
SYSTEM SOFTWARE FLOW. DOTBF SHOULD BE MADE SYSTEM RESIDENT TO ALLOW
AUTOMATIC ACCESS BY PROGRAMERS (SHARING OF PRINTERS IS CONTROLLED TO
AVOID INTERLEAVING OF INFORMATION).
ALL LIBRARY ROUTINES SHOULD BE MERGED INTO A SINGLE FILE FOR SEARCH
AS LIBRARY BY THE PROGRAMS OR AS INCLUSION INTO SYSTEM LIBRARY DURING
GENERATION. BEFORE THE MERGE TAKES PLACE, USER SHOULD NOTE THE ROUTINES
FOR CONTROL OF PLOTTERS NOT ON SYSTEM AND REPLACE WITH THE CORRED
DUMMY SUBROUTINE (SEE FILE "MPIFP). THIS WILL RESULT IN SMALLER
PROGRAMS AND FASTER LOADING.
**RUN INSTRUCTIONS:
AFTER SOFTWARE IS MOVED TO DISC, SEE TRANSFER FILE FOR RENAMING AND
MERGE/LOAD OPERATION.
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
B02401
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: FLOCH
**PROGRAM TITLE:
GRAPHICS ORIENTED FLOWCHARTING FOR DOCUMENTATION
**REVISION? NO
**PACKAGE: 2 **CATEGORY: 2
**KEYWORDS:
GRAPHICS FLOWCHART DOCUMENTATION
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
2100
**OPERATING SYSTEMS:
RTE-IVB RTE-IVA RTE-M
**MEMORY REQUIREMENTS:
12 PAGES OF MEMORY, NO PAGES EMA, NO PAGES SSGA
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
THIS PROGRAM WILL PROVIDE A HANDY TOOL FOR DOCUMENTATION
THE PROGRAM CREATES FLOWCHARTS THAT CAN BE DESIGNED BY THE
USER AT HIS/HER TERMINAL. THE PROGRAM USES THE HP GRAPHICS
LIBRARY AND AN HP 7210 PLOTTER TO CREATE FLOWCHARTS OF A
SIZE THAT MAY BE REDUCED TO FIT IN WITH OTHER DOCUMENTATION.
THE PROGRAM UTILIZES A SET-UP SECTION AND A RUN SECTION THAT
FACILITATE THE USAGE OF THIS FLOWCHARTING PACKAGE. THE SET-
UP SECTION ALLOWS THE USER TO CREATE THEIR FLOWCHART, REVIEW
THEIR ENTRIES, AND THEN PLOT THEM USING THE RUN SECTION, IF
THEY ARE SATISFACTORY. IF NOT, THE USER MAY RETURN TO THE
SET-UP SECTION TO RE-DEFINE THE FLOWCHART PARAMETERS. AT THE
COMPLETION OF EACH SYMBOL, THE USER IS GIVEN THE OPPORTUNITY
TO ENTER UP TO EIGHT LINES OF TEN CHARACTER COMMENTS FOR THE
SYMBOL. AFTER THE FLOWCHART IS DONE THE USER MAY STOP THE
PROGRAM OR MAKE ANOTHER FLOWCHART BY SIMPLY GOING BACK TO
THE SET-UP SECTION AND INSERTING A NEW PIECE OF PAPER.
**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: /FLOCH : TRANSFER FILE (MAG TAPE TO DISC)
FILE# 3: &FLOCH : SOURCE CODE FOR FLOCH PROGRAM
FILE# 4: &STUF : SOURCE CODE FOR BUFFER STUFFER
FILE# 5: &.STUF : ADDITIONAL SUBROUTINE SOURCE
FILE# 6: ?FLOCH : EXTENDED DOCUMENTATION FILE FOR FLOCH
FILE# 7: *FLOCH : LOADR ANSWER FILE FOR FLOCH PROGRAM
**LOAD INSTRUCTIONS:
USE THE *FLOCH LOADR ANSWER FILE, IT DOES THE WORK!
**RUN INSTRUCTIONS:
LOGICAL UNIT 8 IS THE ASSUMED DEFAULT PLOTTING DEVICE LU #
THIS MAY BE CHANGED BY THE "LU" COMMAND IN THE PROGRAM. SEE
THE DOCUMENTATION FILE, ?FLOCH. ALSO, SET THE LIMITS ON THE
PLOTTER TO THE MAXIMUM, OTHERWISE A COMPRESSION OF THE FIGURES
ALONG ON OF THE AXES.
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
B02501
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: JSTAT
**PROGRAM TITLE:
A DATA ANALYSIS PROGRAM
**REVISION? NO
**PACKAGE: 2 **CATEGORY: 1
**KEYWORDS:
STATISTICS
**LANGUAGES:
FTN4X
**COMPUTER TYPE:
F-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
1 74 PAGE MOTHER PARTITION
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
JSTAT CONSISTS OF A PRIMARY PROGRAM WHICH ACCEPTS
1) THE NAME OF A TYPE 6 FILE
2) THE NAME OF A LOADED PROGRAM
3) OTHER COMMANDS
THE SUBORDINATE PROGRAMS EACH PERFORM A SPECIFIC FUNCTION, AND CAN
BE SCHEDULED INDEPENDENTLY FROM FMGR.
THE SYSTEM USES EMA,VIS,THE GRAPHICS FEATURES OF THE 2648A & 2631G
AS WELL AS ITS OWN PARAMETER RETRIEVAL ROUTINES. THE 2631G PRINTS
GRAPHICS WHEN USED FROM ANY TERMINAL (I.E.) NO HP-IB LINK IS NEEDED.
FEATURES CURRENTLY INCLUDE:
. SUMMARISING DATA (PROGRAM STATS)
. DRAWING BOXPLOTS USING GRAPHICS CALLS (PROGRAM BOXPLOT)
. DATA MANAGEMENT (PROGRAM ALTER)
. PLOTTING (PROGRAMS PLOT & SCATTER)
. CORRELATION ANALYSIS (PROGRAM CORREL)
. MULTIPLE REGRESSION ANALYSIS (PROGRAM REGRESS)
. PROBABILITY CALCULATION (PROGRAM PROB)
. DISCRIMINANT ANALYSIS WITH 2 GROUPS (PROGRAM DISCRIM)
. CROSS-TABULATION (PROGRAM XTAB)
. ACCESS TO RTE-IVB (PROGRAMS JSTAT & ALTER)
. A "HELP" FACILITY (PROGRAMS JSTAT & ALTER)
**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: "INFO LOAD INSTRUCTIONS
FILE# 3: JSOUT DOCUMENT FILE
FILE# 4: %JLIB SEARCHABLE LIBRARY
FILE# 5: %PLIB RELOCATABLE PLOTTING SOFTWARE
FILE# 6: &JSTAT JSTAT MAIN
FILE# 7: &ALTER ALTER PROGRAM
FILE# 8: &ALT SUBROUTINE
FILE# 9: &JSERR ERROR PRINTER
FILE# 10: &JDEF DEFINITION SEGMENT
FILE# 11: &JEDIT EDITING SEGMENT
FILE# 12: &PLOT PLOT PROGRAM
FILE# 13: &SCATT SCATTER PROGRAM
FILE# 14: &STATS STATS PROGRAM
FILE# 15: &BOXPL BOXPLOT PROGRAM
FILE# 16: &CORRE CORREL PROGRAM
FILE# 17: ®RE REGRESS PROGRAM
FILE# 18: &PROB PROB PROGRAM
FILE# 19: &DISCR DISCRIM PROGRAM
FILE# 20: &XTAB CROSS-TAB PROGRAM
FILE# 21: &GDUMP GRAPHICS DUMP PROGRAM
FILE# 22: =LALT ALTER LOADR COMMAND FILE
FILE# 23: =JSTAT JSTAT " " "
FILE# 24: /JSTAT RP'S TO PUT IN THE WELCOM FILE
FILE# 25: ?JSTAT HELP FOR ALTER
FILE# 26: ?ALTER HELP
FILE# 27: ?PLOT HELP
FILE# 28: ?SCATT HELP
FILE# 29: ?STATS HELP
FILE# 30: ?BOXPL HELP
FILE# 31: ?CORRE HELP
FILE# 32: ?REGRE HELP
FILE# 33: ?PROB HELP
FILE# 34: ?DISCR HELP
FILE# 35: ?XTAB HELP
FILE# 36: ?WHZAT HELP
**LOAD INSTRUCTIONS:
SEE FILE "INFO
**RUN INSTRUCTIONS:
RU,JSTAT[,P1,P2,P3,P4,P5]
P1=NRMAX DEFAULT=350 ROWS
P2=NCMAX DEFAULT=60 COLUMNS
P3=LUOUT,OUTPUT DEVICE DEFAULT=1
P4=LU2648A DEFAULT=1
P5=LUWIDE,SYSTEM LU OF WIDE CARRIAGE(132 COL) TERMINAL DEFAULT=11=QUME
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
DIAGNOSTICS ARE USUALLY SELF-EXPLANATORY, HOWEVER SOME PROGRAMS
ACTUALLY STOP WHEN NO OPERAND FILE IS SPECIFIED.
E.G. REGRESS
/REG01: STOP 077
SHOULD HAVE BEEN TYPED AS
REGRESS NAMR Y=response X=independent(s) ... ETC
PROGRAM ALTER ACTUALLY TELLS YOU WHAT IT'S LOOKING FOR IF YOU
OMIT AN ESSENTIAL PARAMETER.
**MISCELLANEOUS:
THE ENTIRE SYSTEM IS WRITTEN IN FORTRAN 4X
THE DISCRIM PROGRAM NEEDS PATCHING TO HANDLE MISSING VALUES CORRECTLY
C01301
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &TRANS
**PROGRAM TITLE:
PRODUCE A TRANSITION PROBABILITY MATRIX
**REVISION? NO
**PACKAGE: 3 **CATEGORY: 1
**KEYWORDS:
GRAPHIC HPIB STATISTICS
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM PRODUCES A TRANSITION PROBABILITY MATRIX. THE USER
ENTERS UP TO SEVEN ENTRY POINTS TO TASKS THAT ARE TO BE OBSERVED.
A 1610 IS CONFIGURED TO TRACE ONLY THESE ENTRY POINTS, AND THE
TRANSFERS ARE COUNTED. THIS INFORMATION IS USED TO PRODUCE UP TO
A SEVEN*SEVEN MATRIX OF THE PROBABILITIES OF TRANSFERS BEING MADE.
STATISTICAL CHECKING IS DONE FOR UP TO THIRTY DATA POINTS. THE
PERCENT ERROR AND THE NUMBER OF TRACES TO BE USED PER DATA POINT
ARE USER DEFIND. THE CHECKING IS DONE WITH A 0.90 CONFIDENCE
UNTIL CONVERGENCE IS REACHED FOR ALL THE PROBABILITIES, OR THIRTY
DATA POINTS HAVE BEEN GATHERED. NON-CONVERGENCE IS INDICATED BY
A FLASHING, INVERSE VIDEO QUESTION MARK BY THE PROBABILITY IN
QUESTION.
**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
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,TRANS
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
C01401
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &HARM
**PROGRAM TITLE:
TO DETERMINE THE COMPONENTS OF A COMPLEX PERIODIC WAVE
**REVISION? NO
**PACKAGE: 3 **CATEGORY: 1
**KEYWORDS:
ANALYZER CALCULATOR FOURIER
MEASUREMENT
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
6 PAGES
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM IS A MODIFICATION OF A CALCULATOR PROGRAM TO DETERMINE
THE FOURIER COMPONENTS OF A PERIODIC WAVE. THE SAMPLE IS ASSUMED TO
BE TAKEN AT EQUAL INTERVALS OVER ONE PERIOD OF THE WAVE. THE NORMAL
CONSTRAINTS OF THE MORE POINTS TAKEN, THE MORE COMPONENTS THAT WILL
BE AVAILABLE. THE PROGRAM PERMITS SPECIFICATION OF THE NUMBER OF
HARMONICS TO BE ANALYZED. THE USER MAY OBTAIN ALL COMPONENTS WITH
THE LIMITS OF THE DATA. THE AMPLITUDE AND ANGLE OF EACH COMPONENT
IS GIVEN. THE PROGRAM IS MEMORY BASED AND DOES NOT STORE OR REUSE
THE DATA.
**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: &HARM
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
C01501
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: AIR
**PROGRAM TITLE:
PROPERTIES OF DRY AIR AT ATMOSPHERIC PRESSURE
**REVISION? NO
**PACKAGE: 3 **CATEGORY: 1
**KEYWORDS:
METEROLOGY
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS SUBROUTINE RETURNS TO THE CALLING PROGRAM OR SUBROUTINE THE
DENSITY, VISCOSITY, THERMAL CONDUCTIVITY, HEAT CAPACITY, KINEMATIC
VISCOSITY, THERMAL DIFFUSIVITY, AND PRANDTL NUMBER WHEN GIVEN THE
TEMPERATURE IN DEGREES F.
**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: &AIR
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
C01601
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: BIT
**PROGRAM TITLE:
BIT, PROGRAM FOR SUMMAGRAPHICS BIT PAD
**REVISION? NO
**PACKAGE: 3 **CATEGORY: 1
**KEYWORDS:
DIGITIZER DRIVER ASYNCHRONOUS
I/O MEASUREMENT
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
17K
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
THE BIT PROGRAM CAN BE USED TO INTERFACE A SUMMAGRAPHICS BIT PAD
DIGITIZER TO THE HP/1000 COMPUTER USING THE 12966A BUFFERED
ASYNCHRONOUS DATA COMMUNICATIONS INTERFACE. INCLUDED IN THE
PACKAGE ARE THE MAIN PROGRAM, A SUBROUTINE TO EXTRACT DATA OFF
THE 12966A INTERFACE AND A DRIVER (DVR70) FOR THE INTERFACE.
DATA FROM THE BIT PAD CAN BE WRITTEN TO A FMGR FILE. THE
PROGRAM USES THE X AND Y AXES LIMITS TO CONVERT THE ABSOLUTE
DIGITIZED VALUES TO PLOTTER UNITS AND COMPENSATES FOR THE
SKEW OF THE GRAPH ON THE BIT PAD.
**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: &BIT - SOURCE FOR MAIN PROGRAM (FTN4)
FILE# 3: &GET - SOURCE FOR SUBROUTINE TO GET DATA (ASMB)
FILE# 4: &DVR70 - SOURCE FOR DRIVER (ASMB)
**LOAD INSTRUCTIONS:
CONFIGURE THE DRIVER INTO THE SYSTEM. UNBUFFER THE TERMINAL
USED TO RUN THE PROGRAM, IF YOU WANT TO HEAR THE BELL AFTER
EACH POINT IS ENTERED. OTHERWISE THE BELLS GET STORED UP IN
THE BUFFER AND THEY ALL COME OUT AT ONCE. IF YOU COMPILE THE
MAIN PROGRAM WITH THE DEBUG FLAG OPTION (FTN4,D), THE
COORDINATES WILL BE WRITTEN TO THE SCREEN OF THE CRT USED TO
RUN BIT FROM. THE BIT PAD IS ASSUMMED TO BE LU 17, WHICH
WILL HAVE TO BE CHANGED TO CORRESPOND TO YOUR CONFIGURATION.
**RUN INSTRUCTIONS:
RU,BIT
**INPUT/OUTPUT EXAMPLES:
DATA CAN BE WRITTEN TO A FMGR FILE, IF THE FILE EXISTS
BEFORE BIT IS RUN. BIT WILL NOT CREATE THE FILE.
**PROGRAM DESCRIPTION:
NORMALLY THE BIT PAD IS RUN IN THE POINT MODE.
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
D00801
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &FXFER
**PROGRAM TITLE:
PERFORMS FAST DISC FILE TRANSFER
**REVISION? NO
**PACKAGE: 4 **CATEGORY: 3
**KEYWORDS:
DATA COMM FILES MOVE
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM PERFORMS A FAST TRANSFER BETWEEN COMPUTERS, USING THE
DISTRIBUTED SYSTEMS 1000-IV SOFTWARE. IT IS FASTER THAN REMAT/FCOPY
BECAUSE SEVERAL FILE RECORDS ARE SENT IN EACH DATA BLOCK OVER THE
LINK, TAKING ADVANTAGE OF THE HIGHER THRUPUT POSSIBLE IN 'DS' FOR
LARGE BLOCK SIZES.
**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: &FXFER
FILE# 3: &FSTRT
FILE# 4: &FCGET
FILE# 5: &FCPUT
FILE# 6: &SLXFR
FILE# 7: &PARTY
FILE# 8: &PERMU
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
D00901
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &RLOG
**PROGRAM TITLE:
REMOTE INTERACTIVE SESSION ACCESS
**REVISION? YES
**PACKAGE: 4 **CATEGORY: 3
**KEYWORDS:
DATA COMM
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM IS THE "MASTER" TO PROGRAM "RLOGX". TOGETHER THEY ALLOW
A USER TO LOG ONTO A REMOTE NODE & "TALK" TO THE FILE MANAGER
INTERACTIVELY.
OF COURSE THERE ARE MANY WAYS OF DOING THIS, BUT THE METHOD SELECTED
HERE UTILIZES A SLAVE PTOP PROGRAM (RLOGX) WHICH RESIDES AT THE SESSION
NODE(S). USERS WISHING TO LOG ONTO SESSIONS RUN RLOG (WHICH RESIDES
AT THEIR NODE), WHICH ASKS THEM THE NUMBER OF THE REMOTE NODES THEY'RE
INTERESTED IN, THEN SENDS A REQUEST TO RLOGX TO SCAN ALL MAPPED EQTS
TO FIND THE ONE SET UP FOR THIS USER (I.E., AN LU AT THE REMOTE WHICH
IS MAPPED TO THIS USER'S TERMINAL AND NODE NUMBER).
**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: &RLOG
FILE# 3: &RLOGX
FILE# 4: 'RLOG
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
SEE DOCUMENTAION
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
D01001
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &DSUTL
**PROGRAM TITLE:
REMOTE DISC TAPE-SAVE/RESTORE/VERIFY UTILITIES
**REVISION? NO
**PACKAGE: 4 **CATEGORY: 3
**KEYWORDS:
DATA COMM DISC MAGNTEIC TAPE
SAVE/RESTORE
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THESE UTILITIES ALLOW DISCS TO BE BACKED UP TO MAGNETIC TAPE, OR
RESTORED FROM MAGNETIC TAPE, WHEN THERE IS NO LOCAL MAG TAPE DRIVE,
SHARING THOSE EXPENSIVE TAPE DRIVES AMONG ALL NODES IN A DS/1000
NETWORK. DSSAV IS USED TO COPY A DISC'S FILES TO MAGNETIC TAPE,
DSRST IS USED TO RESTORE A DISC FROM MAGNETIC TAPE. DSVFY MAY
OPTIONALLY BE USED BY BOTH TO VERIFY THE MAGNETIC TAPE AND DISC.
OPERATION IS VERY SIMILAR TO JSAVE/JRSTR.
**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: &DSSAV
FILE# 3: &DSRST
FILE# 4: &DSVFY
FILE# 5: &SDIO
FILE# 6: &CMPWD
FILE# 7: 'DSUTL
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
SEE PROGRAM LISTINGS AND DOCUMENTATION FOR INSTRUCTIONS
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
D01101
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: TRC65
**PROGRAM TITLE:
COMMUNICATIONS LINK TRACE PROGRAM
**REVISION? NO
**PACKAGE: 4 **CATEGORY: 3
**KEYWORDS:
DATA COMM
**LANGUAGES:
ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
8 PAGES
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
PROVIDES ALL FEATURES OF DVA65, PLUS 'TRACE' INFORMATION FOR USE BY
'TRC65'. TWO VERSIONS OF THE DRIVER ARE MAINTAINED IN ONE SOURCE
BECAUSE CODE SUPPORTING THE 'TRACE' FEATURE IS CONTAINED UNDER "IFZ"
OPTION IN THE SOURCE. ALSO PROVIDES ADDITIONAL INFORMATION ABOUT
COMMUNICATION ACTIVITY AT THE LINK LEVEL. THE DOCUMENTAION FILE
('TRC65) CONTAINS EXCELLANT DESCRIPTIONS OF THE FUNCTIONS AND
CAPABILITIES OF THIS PROGRAM.
**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: &TRC65
FILE# 3: 'TRC65
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
SEE PROGRAM DOCUMENTATION
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
D01201
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &CKNRV
**PROGRAM TITLE:
CHECK NODES OF A DS-1000 SYSTEM
**REVISION? NO
**PACKAGE: 4 **CATEGORY: 3
**KEYWORDS:
DATA COMM
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM IS DESIGNED TO ANSWER THE FOLLOWING QUESTIONS:
1) WHAT ROUTINGS ARE CURRENTLY BEING USED IN MY NETWORK?
2) ARE THE NRV ENTRIES IN MY NETWORK CORRECT?
IT MAY ALSO BE USED TO VERIFY THAT THE RE-ROUTING SOFTWARE HAS CHOSEN
THE OPTIMUM ROUTES.
**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: &CKNRV
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
D01301
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &PSMON
**PROGRAM TITLE:
PASSIVE MONITOR FOR DS-1000
**REVISION? NO
**PACKAGE: 4 **CATEGORY: 3
**KEYWORDS:
DATA COMM
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM PROVIDES "PASSIVE MONITOR" CAPABILITY FOR DS/1000 12665
HARDWIRE LINKS. USEFUL IN THOSE CASES WHERE 'TRC65' DOES NOT SHOW
ENOUGH (THIS PROGRAM DISPLAYS ALL DATA ON THE COMMUNICATION LINK,
NOT JUST CERTAIN PROTOCOL WORDS).
**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: &PSMON
FILE# 3: 'PSMON
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
D01401
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: DTPAK
**PROGRAM TITLE:
PACK AND UNPACK INTEGER DATA.
**REVISION? NO
**PACKAGE: 4 **CATEGORY: 3
**KEYWORDS:
ASSEMBLER DATA BASE DATA MGNT
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
4K
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THESE ROUTINES PACK AND UNPACK INTEGER DATA TO AND FROM A DATA BASE.
USING MASKS, UP TO 16(ONE BIT) VARIABLES CAN BE STORED IN ONE 16-BIT
WORD.
**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: &DTPAK-MAIN CALLING PROG. TEST FOR SUBROUTINES.
FILE# 3: &NBIT-SUBROUTINE THAT PACKS DATA.
FILE# 4: &OBIT-UNPACKING RETRIEVAL SUBROUTINE.
FILE# 5: PACKR-LOADER COMMAND FILE
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,DTPAK
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
THESE ROUTINES PACK AND UNPACK INTEGER DATA TO AND FROM A DATA BASE.
USING MASKS, UP TO 16(ONE BIT) VARIABLES CAN BE STORED IN A 16-BIT
WORD. NBIT PACKS DATA ON THE BIT LEVEL INTO A 16-BIT WORD WITHOUT
ALTERING THE CONTENTS OF THE UNUSED PORTION OF THE WORD.
OBIT EXTRACTS DATA STORED BY NBIT. CONTENTS OF THE WORD ARE NOT ALTERED.
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
ERROR RETURNS ARE PROVIDED AND EXPLAINED IN THE MAIN PROGRAM.
D01501
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: BUSUP
**PROGRAM TITLE:
Program up-loading from an HP9825 to an HP1000 via HP-IB.
**REVISION? NO
**PACKAGE: 4 **CATEGORY: 2
**KEYWORDS:
HP-IB 9825 HPL
Up-loading AN 201-6 R
**LANGUAGES:
FORTRAN HPL
**COMPUTER TYPE:
E-Series
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
7 pages
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
BUSUP is actually two programs. One is written in FORTRAN and runs
on an HP1000. The other is written in HPL for an HP9825 Desktop
Computer. This pair of programs was written to provide the capability
to send HPL programs from the minicassette storage unit on the 9825 to
a disk file on the HP1000. The communications scheme used is HP-IB.
The two programs provide cooperation between the computers and must be
run concurrently.
Hardware requirements are as follows :
HP9825 Desktop Computer with these ROM capabilities :
Strings, Advanced Programming, General I/O, Extended I/O, Systems
98034A HP-IB interface for the 9825, set to "NOT system controller"
HP1000 M, E, F with a 59310B HP-IB interface and a 59310-60002 cable
Software requirements are as follows :
HP9825 - HPL program called BUSUP ( stored on tape as the file *BUSUP )
HP1000 - RTE-IVB, DVR37, IB4A HP-IB library, FORTRAN program BUSUP
( source program in FORTRAN is called &BUSUP )
Transfer file called *BUS will set up the HP-IB on the 1000.
These programs are included in the HP-IB section of Application Note
201-6 Revised, "Computer Communications- The HP9825 and the HP1000."
An HP1000 disk file called D9825 is required to store the up-loaded
program... To create it, execute from FMGR :CR,D9825::AA:4:50
Use a different CRN than AA if you want, but make sure that the
FORTRAN program references the correct disk ( see the variable DISK ).
Additional documentation is provided with the source listing.
**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: &BUSUP
FILE# 3: *BUSUP
FILE# 4: *BUS
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
Start the FORTRAN program first by :RU,BUSUP
Then, load the HPL program BUSUP into the 9825 memory and press RUN.
The 9825 program will prompt the user for a file number and a track
number which point to the file on the 9825 minicassette to be
up-loaded to the HP1000. The destination file on the HP1000 is always
D9825. Once the HPL program is up-loaded, this disk file can be
modified or renamed with the HP1000 editor if required.
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
D01601
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: BUSDN
**PROGRAM TITLE:
Program down-loading from an HP1000 to an HP9825 Desktop Computer.
**REVISION? NO
**PACKAGE: 4 **CATEGORY: 2
**KEYWORDS:
HP-IB HPL 9825
AN 201-6 R Down-loading
**LANGUAGES:
FORTRAN HPL
**COMPUTER TYPE:
E-Series
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
7 Pages
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
BUSDN is actually two programs. The first is written in FORTRAN to run
on an HP1000. The second is written in HPL to run on an HP9825 Desktop
Computer. This pair of programs provides the capability to send HPL
programs from an HP1000 disk file to an HP9825 for storage on the
minicassette unit. The communications scheme used is HP-IB. The two
programs provide cooperation between the two computers and must be
run concurrently.
Hardware requirements are as follows :
HP9825 Desktop Computer with these ROM capabilities :
Strings, Advanced Programming, General I/O,Extended I/O,Systems
98034A HP-IB interface for the 9825, set to "NOT system controller"
HP1000 M, E, F with a 59310B HP-IB interface and a 59310-60002 cable.
Software requirements are as follows :
HP9825: HPL program called BUSDN ( stored on tape as the file *BUSDN)
HP1000: RTE-IVB, DVR37, IB4A HP-IB library,FORTRAN program BUSDN
( source program in FORTRAN is called &BUSDN )
Transfer file called *BUS will set up the HP-IB on the 1000.
These programs are included in the HP-IB section of Application Note
201-6 Revised,"Computer Communications- The HP9825 and the HP1000".
The HPL program to be down-loaded must reside in the disk file called
D9825::AA. Use a different CRN than AA if you want, but be sure to
change the variable DISK in the FORTRAN program. The same caution
applies to the LU designation of the 9825- the FORTRAN program
references the desktop via LU 11, using the variable LU.
Additional documentation is provided with the FORTRAN source listing.
**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: &BUSDN
FILE# 3: *BUSDN
FILE# 4: *BUS
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
First, execute the transfer file *BUS on the HP1000. This will set
up the necessary LUs, EQTs, time-outs, etc. Then, load and schedule
the FORTRAN progran BUSDN on the 1000. Next, load the HPL program
BUSDN into the 9825 memory and press RUN. The disk file D9825 will
then be sent to the 9825 and stored on the minicassette in file 1
on track 1.
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
D01701
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: HARPO
**PROGRAM TITLE:
Distributed-Intelligence System with an HP9825 and an HP1000 using HP-IB
**REVISION? NO
**PACKAGE: 4 **CATEGORY: 2
**KEYWORDS:
HP-IB AN 201-6 R HPL
Sample Example
**LANGUAGES:
FORTRAN HPL
**COMPUTER TYPE:
E-Series
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
7 Pages
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
HARPO is two programs, actually. One of them is written in FORTRAN for
the HP1000, and the other is written in HPL to run on an HP9825 Desktop
Computer. This pair of programs provides cooperation between the two
computers and they must be run concurrently.
The basic idea is to demonstrate a "distributed-intelligence" approach
to building a computer system. The 9825 is connected to the HP1000 via
HP-IB. The HP1000 down-loads an HPL program to the 9825 upon request
from the desktop operator. This HPL routine is loaded into memory and
it programs an HP3455A Digital Voltmeter to take voltage readings.
These readings are processed and the minimums, maximums, and averages
of the sets of readings are sent back to the HP1000 for storage in a
disk file.
These programs are included in the HP-IB section of Application Note
201-6 Revised,"Computer Communications- The HP9825 and the HP1000".
Additional documentation is provided with the FORTRAN source listing.
Hardware requirements are as follows :
HP9825 Desktop Computer with these ROM capabilities :
Strings, Advanced Programming, General I/O, Extended I/O, Systems
98034A HP-IB interface for the 9825, set to "NOT system controller"
to be connected to the HP1000.
98034A HP-IB interface for the 9825, set to "system controller"
to be connected to the HP3455A Digital Voltmeter
98035A Real Time Clock for the 9825.
HP3455A Digital Voltmeter, device address 03
HP1000 M, E, F with a 59310B HP-IB interface and a 59310-60002 cable.
Software requirements are as follows :
HP9825 : HPL program called HARPO ( stored on tape as the file *HARPO)
HP1000 : RTE-IVB, DVR37, IB4A HP-IB library, FORTRAN program HARPO
(source program in FORTRAN is called &HARPO )
Transfer file called *BUS will set up the HP-IB on the 1000.
**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: &HARPO
FILE# 3: *HARPO
FILE# 4: *BUS
FILE# 5: VOLTS
FILE# 6: BOGUS
**LOAD INSTRUCTIONS:
First, execute the transfer file *BUS on the HP1000. This will set
up the HP-IB for communications with the desktop. Then, compile and
load the FORTRAN program HARPO. Next, load the HPL program HARPO
into the desktop memory.
**RUN INSTRUCTIONS:
First, schedule the FORTRAN program HARPO. Then,
press RUN on the 9825 keyboard, and the display will ask the
operator to choose ' task 1 or 2 '. These tasks are HPL routines that
have been previously stored on the HP1000 disk, and will be down-loaded
to the desktop. The names of these two HPL routines are VOLTS and BOGUS
and they both program the 9825 to take measurements from the HP3455A.
Each routine will send back reduced data to the HP1000, where it will
be stored in one of two disk files ( DATA1 or DATA2 ), depending upon
which task was selected.
After sending back the reduced data to the HP1000, the 9825 returns to
the starting point and asks the operator for another choice. The
FORTRAN program also returns to wait in I/O suspend for the 9825 to
send its request. Simple, eh ?
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
D01801
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: RSUP
**PROGRAM TITLE:
Program up-loading from an HP9825 to an HP1000 via RS-232C.
**REVISION? NO
**PACKAGE: 4 **CATEGORY: 2
**KEYWORDS:
RS-232C 9825 HPL
Up-loading AN 201-6 R
**LANGUAGES:
FORTRAN HPL
**COMPUTER TYPE:
E-Series
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
7 pages
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
RSUP is actually two programs. One is written in FORTRAN and runs
on an HP1000. The other is written in HPL for an HP9825 Desktop
Computer. This pair of programs was written to provide the capability
to send HPL programs from the minicassette storage unit on the 9825 to
a disk file on the HP1000. The communications scheme used is RS-232C.
The two programs provide cooperation between the computers and must be
run concurrently.
Hardware requirements are as follows :
HP9825 Desktop Computer with these ROM capabilities :
Strings, Advanced Programming, General I/O, Extended I/O, Systems
98036A RS-232C interface for the 9825
HP1000 M, E, F with a 12966A interface, a 12966-60006 and a 13232U cable
Software requirements are as follows :
HP9825 - HPL program called RSUP ( stored on tape as the file *RSUP )
HP1000 - RTE-IVB, DVA05, FORTRAN program RSUP
( source program in FORTRAN is called &RSUP )
Transfer file called *RS will set up the communications.
These programs are included in the RS-232C section of Application Note
201-6 Revised, "Computer Communications- The HP9825 and the HP1000."
An HP1000 disk file called D9825 is required to store the up-loaded
program... To create it, execute from FMGR :CR,D9825::AA:4:50
Use a different CRN than AA if you want, but make sure that the
FORTRAN program references the correct disk ( see the variable DISK ).
Additional documentation is provided with the source listing.
**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: &RSUP
FILE# 3: *RSUP
FILE# 4: *RS
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
Start the FORTRAN program first by :RU,RSUP
Then, load the HPL program RSUP into the 9825 memory and press RUN.
The 9825 program will prompt the user for a file number and a track
number which point to the file on the 9825 minicassette to be
up-loaded to the HP1000. The destination file on the HP1000 is always
D9825. Once the HPL program is up-loaded, this disk file can be
modified or renamed with the HP1000 editor if required.
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
D01901
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: RSDN
**PROGRAM TITLE:
Program down-loading from an HP1000 to an HP9825 Desktop Computer.
**REVISION? NO
**PACKAGE: 4 **CATEGORY: 2
**KEYWORDS:
RS-232C HPL 9825
AN 201-6 R Down-loading
**LANGUAGES:
FORTRAN HPL
**COMPUTER TYPE:
E-Series
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
7 Pages
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
RSDN is actually two programs. The first is written in FORTRAN to run
on an HP1000. The second is written in HPL to run on an HP9825 Desktop
Computer. This pair of programs provides the capability to send HPL
programs from an HP1000 disk file to an HP9825 for storage on the
minicassette unit. The communications scheme used is RS-232C. The two
programs provide cooperation between the two computers and must be
run concurrently.
Hardware requirements are as follows :
HP9825 Desktop Computer with these ROM capabilities :
Strings, Advanced Programming, General I/O,Extended I/O,Systems
98036A RS-232C interface for the 9825.
HP1000 M, E, F with a 12966A interface,a 12966-60006 and a 13232U cable
Software requirements are as follows :
HP9825: HPL program called RSDN ( stored on tape as the file *RSDN)
HP1000: RTE-IVB, DVA05, FORTRAN program RSDN
( source program in FORTRAN is called &RSDN )
Xfer file called *RS will set up the communications on the 1000.
These programs are included in the RS-232C section of Application Note
201-6 Revised,"Computer Communications- The HP9825 and the HP1000".
The HPL program to be down-loaded must reside in the disk file called
D9825::AA. Use a different CRN than AA if you want, but be sure to
change the variable DISK in the FORTRAN program. The same caution
applies to the LU designation of the 9825- the FORTRAN program
references the desktop via LU 13, using the variable LU.
Additional documentation is provided with the FORTRAN source listing.
**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: &RSDN
FILE# 3: *RSDN
FILE# 4: *RS
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
First, execute the transfer file *RS on the HP1000. This will set
up the necessary LUs, EQTs, time-outs, etc. Then, load and schedule
the FORTRAN progran RSDN on the 1000. Next, load the HPL program
RSDN into the 9825 memory and press RUN. The disk file D9825 will
then be sent to the 9825 and stored on the minicassette in a user-
specified file.
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
D02001
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: CHICO
**PROGRAM TITLE:
Distributed-Intelligence Sys. with an HP9825 and an HP1000 using RS-232c
**REVISION? NO
**PACKAGE: 4 **CATEGORY: 2
**KEYWORDS:
RS-232C AN 201-6 R HPL
Sample Example
**LANGUAGES:
FORTRAN HPL
**COMPUTER TYPE:
E-Series
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
7 Pages
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
CHICO is two programs, actually. One of them is written in FORTRAN for
the HP1000, and the other is written in HPL to run on an HP9825 Desktop
Computer. This pair of programs provides cooperation between the two
computers and they must be run concurrently.
The basic idea is to demonstrate a "distributed-intelligence" approach
to building a computer system. The 9825 is connected to the HP1000 via
RS-232C. The HP1000 down-loads an HPL program to the 9825 upon request
from the desktop operator. This HPL routine is loaded into memory and
it programs an HP3455A Digital Voltmeter to take voltage readings.
These readings are processed and the minimums, maximums, and averages
of the sets of readings are sent back to the HP1000 for storage in a
disk file.
These programs are included in the RS-232C section of Application Note
201-6 Revised,"Computer Communications- The HP9825 and the HP1000".
Additional documentation is provided with the FORTRAN source listing.
Hardware requirements are as follows :
HP9825 Desktop Computer with these ROM capabilities :
Strings, Advanced Programming, General I/O, Extended I/O, Systems
98036A RS-232C interface for the 9825, to be connected to the 1000.
98034A HP-IB interface, set to "system controller", to be
connected to the HP3455A Digital Voltmeter.
connected to the HP3455A Digital Voltmeter.
98035A Real Time Clock for the 9825.
HP3455A Digital Voltmeter, device address 03
HP1000 M, E, F with a 12966A interface,a 12966-60006 and a 13232U cable
Software requirements are as follows :
HP9825 : HPL program called CHICO ( stored on tape as the file *CHICO)
HP1000 : RTE-IVB, DVA05, FORTRAN program CHICO
(source program in FORTRAN is called &CHICO )
Transfer file called *RS will set up the communcations link.
**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: &CHICO
FILE# 3: *CHICO
FILE# 4: *RS
FILE# 5: VOLTS
FILE# 6: BOGUS
**LOAD INSTRUCTIONS:
First, execute the transfer file *RS on the HP1000. This will set
up the RS-232C for communications with the desktop. Then, compile and
load the FORTRAN program CHICO. Next, load the HPL program CHICO
into the desktop memory.
**RUN INSTRUCTIONS:
First, schedule the FORTRAN program CHICO. Then,
press RUN on the 9825 keyboard, and the display will ask the
operator to choose ' task 1 or 2 '. These tasks are HPL routines that
have been previously stored on the HP1000 disk, and will be down-loaded
to the desktop. The names of these two HPL routines are VOLTS and BOGUS
and they both program the 9825 to take measurements from the HP3455A.
Each routine will send back reduced data to the HP1000, where it will
be stored in one of two disk files ( DATA1 or DATA2 ), depending upon
which task was selected.
After sending back the reduced data to the HP1000, the 9825 returns to
the starting point and asks the operator for another choice. The
FORTRAN program also returns to wait in I/O suspend for the 9825 to
send its request. Simple, eh ?
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
D02101
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: C3BKY
**PROGRAM TITLE:
PLOT CALCOMP FILES ON AN HP 7210A DIGITAL PLOTTER
**REVISION? NO
**PACKAGE: 4 **CATEGORY: 2
**KEYWORDS:
CALCOMP PLOTTER GRAPHIC
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
10K
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
THE PROGRAM C3BKY ENABLES USERS AT INTERMOUNTAIN TECHNOLOGIES INC TO
LOCALLY PLOT CALCOMP FILES GENERATED AT LAWRENCE BERKLEY LABS(LBL).
C3BKY INTERPRETS THE CALCOMP DIRECTIVES FROM LBL AND THEN GENERATES THE
EQUIVALENT HP 7210A DIGITAL PLOTTER DIRECTIVES.
PLOTTING MAY BE DONE FROM A FILE MANAGER (FMGR) FILE OR FROM THE "LS"
TRACKS. C3BKY ALLOWS THE USER TO SPECIFY THE PAPER SIZE IN BOTH THE
X AND Y DIRECTIONS AND TO SET THE PLOT ORIGIN.
TRANSLATION OF THE CALCOMP PLOT DIRECTIVES IS ACCOMPLISHED THROUGH A
TABLE LOOK-UP PROCEDURE. EXEC CALLS ARE USED TO ACQUIRE, READ, AND
RELEASE THE INPUT FILE OR "LS" TRACKS.
**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: &C3BKY --SOURCE FILE
**LOAD INSTRUCTIONS:
NONE
**RUN INSTRUCTIONS:
RU,C3BKY
**INPUT/OUTPUT EXAMPLES:
NONE
**PROGRAM DESCRIPTION:
NONE
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
NONE
**MISCELLANEOUS:
NONE
D02201
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: C3UCC
**PROGRAM TITLE:
PLOT CALCOMP FILES ON AN HP 7210A DIGITAL PLOTTER
**REVISION? NO
**PACKAGE: 4 **CATEGORY: 2
**KEYWORDS:
CALCOMP PLOTTER GRAPHIC
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
10K
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
THE PROGRAM C3UCC ENABLES USERS AT INTERMOUNTAIN TECHNOLOGIES INC
TO LOCALLY PLOT CALCOMP FILES GENERATED AT UNIVERSITY COMPUTING CO(UCC)
C3UCC INTERPRETS THE CALCOMP DIRECTIVES FROM UCC AND THEN GENERATES THE
EQUIVALENT HP 7210A DIGITAL PLOTTER DIRECTIVES.
PLOTTING MAY BE DONE FROM A FILE MANAGER (FMGR) FILE OR FROM THE "LS"
TRACKS. C3UCC ALLOWS THE USER TO SPECIFY THE PAPER SIZE IN BOTH THE
X AND Y DIRECTIONS AND TO SET THE PLOT ORIGIN.
TRANSLATION OF THE CALCOMP PLOT DIRECTIVES IS ACCOMPLISHED THROUGH A
TABLE LOOK-UP PROCEDURE. EXEC CALLS ARE USED TO ACQUIRE, READ, AND
RELEASE THE INPUT FILE OR "LS" TRACKS.
**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: &C3UCC -- SOURCE FILE
**LOAD INSTRUCTIONS:
NONE
**RUN INSTRUCTIONS:
RU,C3UCC
**INPUT/OUTPUT EXAMPLES:
NONE
**PROGRAM DESCRIPTION:
NONE
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
NONE
**MISCELLANEOUS:
NONE
E14401
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &WILDC
**PROGRAM TITLE:
WILDC (EXTENDED WILDCARD FILE MANAGEMENT CAPABILITY)
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
FILES
**LANGUAGES:
FTN4
**COMPUTER TYPE:
M-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
13K PARTITION
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM WILL ALLOW THE WILD CARD '-' FEATURE, AS
DISCRIBED IN THE FILE MANAGER'S 'DL' COMMAND, TO BE UTILIZED
IN THE FOLLOWING COMMANDS, WHEN ENTERING 'NAMR1'.
1. LIST
2. DUMP
3. PURGE
4. STORE
5. MERGE
THIS FEATURE AFFORDS AN EXPEDIANT WAY TO ACCESS 'GROUP
FILES'.
** 'GROUP FILES' AS USED HERE APPLIES TO FILES WHICH
** WERE NAMED USING SOME COMMON NAMING CONVENTION.
NOTES:
1. THIS PROGRAM SCHEDULES THE USER'S FILE MANAGER CLONE
TO PERFORM THE COMMANDS. IF THIS PROGRAM WAS NOT
SCHEDULED FROM A FILE MANAGER, THIS PROGRAM USES 'FMGR'.
RESTRICTIONS:
1. GLOBAL '0G' MUST NOT BE USED BECAUSE 'FMGR' IS
SCHEDULED PASSING A SCRATCH SPOOL FILE LU # AS THE
INPUT DEVICE (INP)!! ** USE 8P AS AN ALTERNATIVE.
2. PROGRAM(S) RUN WITHIN PROCEEDURE FILES SHOULD NOT HAVE
A NULL 1ST PARAMETER,IE.; :RU,GASP S/B :RU,GASP,8P OR 0
** :RU,GASP,DS OK!!!.
3. SINCE ALL FILE NAMRS USED IN WILD CARD COMMANDS ARE
MAINTAINED IN MEMORY, ONLY ENOUGH ROOM TO PROCESS UP
TO 1000 NAMRS HAVE BEEN ALLOCATED. REALLY NOW!!
**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: *WILDC -- LOADR ANSWER FILE
FILE# 3: &WILDC -- ENTIRE SOURCE FILE
**LOAD INSTRUCTIONS:
NO SPECIAL LOADING REQUIREMENTS.
**RUN INSTRUCTIONS:
RU,WILDC
**INPUT/OUTPUT EXAMPLES:
NONE.
**PROGRAM DESCRIPTION:
NONE PRESENT.
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
SAME AS IN "FMGR".
**MISCELLANEOUS:
SINCE ALL ENTRIES TO THIS PROGRAM ARE PROCESSED BY THE "FMGR" CLONE,
ANY LEGAL "FMGR" COMMAND MAY BE ENTERED. AN ADDITIONAL COMPOSITE
COMMAND HAS BEEN INCORPORATED WHICH WILL AFFORD GROUP FILE MERGEING.
ITS ACRONYM IS "MF" AND HAS THE SAME SYNTAX REQUIREMENTS AS IN THE
DUMP "DU" COMMAND. TO GET A BETTER UNDERSTANDING OF HOW THE PROGRAM
OPERATES, SET THE SEVERITY CODE TO ZERO (0) PRIOR TO ISSUING A COMMAND,
IE. $SV,0.
E14501
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: REBOT
**PROGRAM TITLE:
REBOOT A SYSTEM FROM A TERMINAL
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
BOOT-UP
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
THIS PROGRAM AND SUBROUTINES WILL RE-BOOT A SYSTEM FROM A TERMINAL.
THE PROGRAM IS CONVERSIVE WITH GOOD DIALOG. THE MAIN ROUTINE AND
ONE SUBROUTINE ARE WRITTEN IN FTN4, AND THE OTHER TWO SUBROUTINES
ARE WRITTEN IN HP ASSEMBLER.
**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: &REBOT
FILE# 3: &DOBOO
FILE# 4: &BOOT
FILE# 5: &DOSET
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,REBOT,P1
P1 = INPUT DEVICE (DEFAULT = 1)
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E14601
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: DSRCH
**PROGRAM TITLE:
SEARCHES FMGR DIRECTORY FOR MATCH WITH SPECIFIED STRING
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
DISC DIRECTORY SEARCH
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM SEARCHES FMGR DIRECTORY FOR A MATCH WITH A USER SPECIFIED
STRING, WILL RESET FILE SECUTRITY CODES, PURGE FILES FROM THE DISC
DIRECTORY, AND WILL FIND PURGED FILES IN THE DIRECTORY (PRIOR TO
PACKING).
**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: &DSRCH
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,DSRCH,P1,P2,P3
P1 = INPUT LU
P2 = CARTRIDGE LABEL
P3 = LIST LU
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E14701
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: DISC
**PROGRAM TITLE:
DISC TRACK CONFIGURATION PRINTOUT
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
DISC LIST PRINTER
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM LOCATES AN ENTRY POINT OF '$TB32' FROM THE DISC-RESIDENT
ENTRY POINT TABLE AND PROCEEDS TO PRINT A COMPACT TABLE OF ALL DEFINED
DISC SUBCHANNELS AND ASSOCIATED LU'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: &DISC
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,DISC,P1,P2
P1 = CONSOLE TERMINAL LU FOR ERROR MESSAGES
P2 = LIST DEVICE LU FOR PRINTOUT (DEFAULT = CONSOLE)
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E14801
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &WHIST
**PROGRAM TITLE:
SEARCH FOR AN ASCII STRING ON DISC
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
DISC LIST SEARCH
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM SEARCHES FOR A USER SPECIFIED STRING ON A DSIC LU.
NON-LOOP ASSURANCE MAY BE SPECIFIED IF THE USER REPLIES 'YES' TO
THE PROMPT. SINCE 'WHIST' IS VERY THOROUGH, IT SOMETIMES TAKES
A WHILE, SO THE LOOP ASSURANCE LOGIC INFORMS THE USER OF THE
CURRENT TRACK BEING SEARCHED.
THE USER MAY SUPPLY A STRING OF 1 TO 80 CHARACTERS OF PRINTABLE
ASCII CHARACTERS. WHIST SEARCHES THE SPECIFIED PORTION OF THE
THE DISC FOR EXISTENCE OF THE STRING. THE STRING MAY CROSS WORD,
SECTOR, OR TRACK BOUNDARIES.
**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: &WHIST
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,WHIST,P1,P2,P3,P4,P5
P1 = INPUT LU (DEFAULT = 1)
P2 = LIST LU (DEFAULT = P1)
P3 = DISC LU FOR THE SEARCH
P4 = STARTING DISC TRACK
P5 = ENDING DISC TRACK
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E14901
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &COMPA
**PROGRAM TITLE:
COMPARE TWO ASCII FILES
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
COMPARE DISC FILES
LIST
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM COMPARES TWO ASCII DISC FILES LINE BE LINE. THERE ARE
SEVERAL COMMANDS AVAILABLE TO THE USER OF THIS PROGRAM:
CP - COMPARE FILES LINE BY LINE
LO - LIST OLD DISC FILE
LN - LIST NEW DISC FILE
SO - SKIP LINES IN OLD DISC FILE
SN - SKIP LINES IN NEW DISC FILE
ON - PRINT OLD DISC FILE NAME
NN - PRINT NEW DISC FILE NAME
EX - TERMINATE
**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: &COMPA
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,COMPA,P1
P1 = CONSOLE LU
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E15001
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &LISTA
**PROGRAM TITLE:
LIST SPECIFIED PORTIONS OF A DISC
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
DISC DUMP LIST
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM LISTS ON THE LIST DEVICE STARTING AT A TRACK, BLOCK
AND NUMBER OF BLOCKS AS SPECIFIED BY THE USER.
**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: &LISTA
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,LISTA,P1,P2,P3,P4,P5
P1 = LIST LU
P2 = DISC LU
P3 = TRACK
P4 = BLOCK
P5 = NUMBER OF BLOCKS
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E15101
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &LI
**PROGRAM TITLE:
LIST CONTENTS OF MAG TAPE
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
DUMP LIST MAGNETIC TAPE
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM WILL LIST THE CONTENTS OF A MAG TAPE UP TO 6150 WORDS
PER RECORD. THE USER MAY SPECIFY EITHER LIST OR DUMP FORMAT.
**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: &LI
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,LI,P1,P2P,P3,P4,P5
P1 = LIST LU (DEFAULT = 1)
P2 = TAPE DRIVE LU (DEFAULT = 7)
P3 = LIST FORMAT
P4 = NUMBER OF WORDS PER RECORD
P5 = NUMBER OF RECORDS
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E15201
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &CMML
**PROGRAM TITLE:
RTE-L ANALYSIS
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
DUMP STATUS SYSTEM LABELS
SYSTEM TABLES
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
L-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
CMML IS A PROGRAM WHICH FACILITATES THE ANALYSIS OF PROBLEMS IN AN
RTE-L. CMML OPERATES JUST ABOUT THE SAME AS CMM4, BUT IS FOR USE
WITH RTE-L. SOME CHANGES HAVE BEEN MADE, DUE TO CHANGES IN THE RTE-L
OPERATING SYSTEM, BUT THE MOST IMPORTANT CHANGE IS THAT CMML IS
DESIGNED TO RUN IN A DIFFERENT COMPUTER, I.E., YOU EXAMINE THE
REMOTE RTE-L NODE FROM ANOTHER NODE, TYPICALLY AN RTE-IVB. THIS
CHANGE WAS MANDATED BY THE SEVERE MEMORY LIMITATIONS IN RTE-L: ONE
COULD NOT RESONABLY EXPECT A CUSTOMER TO LEAVE 8 TO 10K OF MEMORY
AVAILABLE JUST TO RUN AN ANALYSIS PROGRAM, NOR COULD ONE ASSUME A
DISC WILL ALWAYS BE AVAILABLE FOR SWAPPING.
**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: &CMML
FILE# 3: &INVRS
FILE# 4: &DOIO
FILE# 5: &IGETL
FILE# 6: &FINDE
FILE# 7: &CSCUP
FILE# 8: 'CMML
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
SEE DOCUMENTATION
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E15301
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &GANTT
**PROGRAM TITLE:
PRODUCE A GANTT CHART OF SYSTEM UTILIZATION
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
GRAPHIC HPIB STATISTICS
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM PRODUCES A GANTT CHART OF SYSTEM UTILIZATION. A
PROPERLY CONFIGURED 1610 WILL GENERATE A TRACE WITH THREE BITS OF POD
FOUR CORRESPONDING TO THREE SYSTEM ACTIONS BEING OBSERVED. THE THREE
BITS WILL BE ASSIGNED LABELS (A, B, AND C) BY THE USER, WHICH WILL
APPEAR ON THE VERTICAL AXIS OF THE GANTT CHART. THE HORIZONTAL AXIS
WILL DENOTE TIME. SYSTEM ACTIVITY (BIT N=1) WILL SHOW UP AS A SOLID
BAR, WHILE INACTIVITY (BIT=0) WILL BE BLANK. THE PROGRAM WILL TAKE
ONE TRACE AT A TIME IN RESPONSE TO THE USER'S REQUEST.
**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: &GANTT
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,GANTT
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E15401
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: LSORT
**PROGRAM TITLE:
GENERAL PURPOSE SORT ROUTINE
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
SORT
**LANGUAGES:
ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
881 WORDS
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM SORTS ONE FIELD STARTING IN AN ODD NUMBERED COLUMN. THE
SORT FIELD MUST CONTAIN AN EVEN NUMBER OF COLUMNS. THE SORT IS IN
ASCENDING ORDER ONLY, WILL BE BY EACH CHARACTER'S ASCII CODE, AND
THE MAXIMUM RECORD SIZE IS 80 CHARACTERS.
**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: &LSORT
FILE# 3: 'SORT
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,LSORT,P1,P2,P3,P4,P5
P1 = TERMINAL LU
P2 = INOUT = INLU*100 + OUTLU
INLU : 7 FOR CARD READER
: 5 FOR PUNCHED TAPE READER
: 8 FOR MAGNETIC TAPE READER
OUTLU: 6 FOR LINE PRINTER
: 4 FOR TAPE PUNCH
: 8 FOR MAGNETIC TAPE
: 1 FOR TERMINAL
P3 = STCOL = STARTING COLUMN (MUST BE ODD)
P4 = NOCOL = NUMBER OF COLUMNS (MUST BE EVEN)
P5 = MAXRC = MAXIMUM NUMBER OF RECORDS TO SORT
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E15501
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &PRINT
**PROGRAM TITLE:
PRINT ASCII FILES WITH TITLE & NO LINE NUMBERS
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
ASCII DISC FILES
LIST PRINTER
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
10 PAGES
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
PROGRAM PRINT IS INTENDED TO LIST ASCII FILES ON AN OUTPUT DEVICE.
THE NAME OF THE FILE, THE TIME, AND THE DATE ARE PRINTED AT THE HEAD
OF THE FILE. THE LINE LENGTH CAN BE SET. THE DEFAULT IS 80 COLUMNS,
BUT ANY EVEN NUMBER OF COLUMNS UP TO 132 CAN BE SPECIFIED. ANY LINE
EXCEEDING THE SPECIFIED LINE HAS THE REMAINDER OF THE LINE OUTPUT ON
THE FOLLOWING LINE. NORMAL OUTPUT IS SINGLE SPACING, BUT DOUBLE
SPACING CAN BE SELECTED. DUE TO A SPECIAL REQUIREMENT, AN OPTION
PERMITS A SELECTED USER TO INDICATE IF THE OUTPUT IS TO BE IN BLOCKS
OF 5 LINES EACH. THIS PROGRAM USES AN ERROR REPORTING METHOD WHICH
IS CONTAINED IN SUBROUTINE IEROR, WHICH APPEARS ELSEWHERE IN THIS
LIBRARY.
**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: &PRINT
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E15601
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &IEROR
**PROGRAM TITLE:
SUBROUTINE TO DISPLAY ERROR AND POST TO SCB
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
REPORTS SCB
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS SUBROUTINE IS USED TO POST AN ERROR TO THE SCB AND TO DISPLAY ON
THE USERS TERMINAL AND ON THE SYSTEM CONSOLE THE VALUE OF AN ERROR AND
THE ASSOCIATED CALL THAT CAUSED THE ERROR. A PARAMETER CALL 'LABEL'
IS PASSED. THE VALUE OF THE ERROR IS ASSUMED TO BE UNIQUE FOR THE
PLACE FROM WHICH IT IS LOCATED. THE SUBROUTINE SHOULD BE PLACED IN
LINE WITH THE NORMAL ERROR TERMINATION CODE, AND IS ASSUMED TO BE
JUMPED TO FROM WHATEVER LOCATION IN THE PROGRAM THE ERROR OCCURRED.
**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: &IEROR
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E15701
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &APPND
**PROGRAM TITLE:
TO APPEND AN EXISTING FILE TO A LARGE FILE
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
DISC FILES
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
9 PAGES
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM IS SIMILIAR TO THE MERGE FUNCTION OF THE EDITOR, BUT DOES
NOT REQUIRE THE DATA TO BE MOVED TO THE SCRATCH TRACKS. IF THE FILE TO
WHICH THE DATA IS BEING ADDED IS ALREADY VERY LARGE IN TERMS OF THE
NUMBER OF SCRATCH TRACKS AVAILABLE, IT MAY BE IMPRACTICAL TO USE THE
EDITOR TO APPEND AN ADDITIONAL SET OF DATA TO THE END OF THE LARGE FILE.
THIS PROGRAM ASKS FOR THE FILE NAMES IN NAMR FORMAT. THE PROGRAM THEN
SEARCHES FOR THE END OF THE MASTER FILE AND WHEN LOCATED, COPIES THE
FILE TO BE ATTACHED TO THE END.
**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: &APPND
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E15801
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &RP.OF
**PROGRAM TITLE:
BUILDING ID SEGMENTS FROM YOUR PROGRAM
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
SEGMENTS
**LANGUAGES:
ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
538 WORDS
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
IN ORDER TO SCHEDULE A PROGRAM FROM ANOTHER PROGRAM, YOU MUST HAVE AN
ID SEGMENT FOR EVERY PROGRAM THAT YOUR PROGRAM MIGHT SCHEDULE OR YOU
ARE GOING TO GET FLUSHED DOWN THE TUBE WHEN YOU TRY TO SCHEDULE THAT
PROGRAM. IF YOU HAVE AN ID SEGMENT FOR EACH PROGRAM AND HAVE SEVERAL
PROGRAMS, AND THE PROGRAMS ARE NOT RUN OFTEN, THEN YOU ARE NOT
EFFICIENTLY USING A VALUABLE SYSTEM RESOURCE, ID SEGMENTS.
**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: &RP.OF
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E15901
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &FULTR
**PROGRAM TITLE:
DRAW A HISTOGRAM OF SYSTEM ACTIVITY
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
ANALYZER HP-IB GRAPHIC
STATISTICS
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
11 PAGES
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM DRAWS A HISTOGRAM OF SYSTEM ACTIVITY. THE X AXIS IS
DIVIDED IN UP TO EIGHT ADDRESS RANGES BY THE USER. THE Y AXIS
REPRESENTS PERCENT OF TOTAL. FOR EACH ADDRESS RANGE TWO THINGS ARE
PLOTTED: OCCURRENCE AND TIME. ABOVE EACH ADDRESS RANGE THE TOTAL TIME
AND OCCURRENCES ARE GIVEN, AND THE GRAND TOTALS APPEAR IN THE LOWER
LEFT OF THE DISPLAY.
**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: &FILTR
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E16001
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &CLOCK
**PROGRAM TITLE:
MULTIPLE ENTRY LIBRARY-MODULE FOR IMAGE DATA BASE
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
DATA BASE TIME
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
320 WORDS
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
%CLOCK IS A MULTIPLE ENTRY LIBRARY-MODULE FOR CODING & DECODING DATES
AND HOURS FOR EFFICIENT STORAGE IN AN IMAGE DATA BASE.
1) TRACKS REAL-TIME LOCATION OF TRANSIT VEHICLES
2) TRACKS DEFECT WORK-ORDERS PER VEHICLE
3) SCHEDULES REGULAR PREVENTIVE MAINTENANCE PER VEHICLE
4) MAINTAINS A SHORT-TERM HISTORY PER VEHICLE
**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: %CLOCK
FILE# 3: &DATES
FILE# 4: &TIMES
FILE# 5: &UPDAT
FILE# 6: &ELAPS
FILE# 7: &XEC11
FILE# 8: &LEAP
FILE# 9: &I2CVT
FILE# 10: >CLOCK
FILE# 11: 'CLOCK
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E16101
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: CL
**PROGRAM TITLE:
CARTRIDGE LIST
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
DISC LIST SYSTEM TABLES
CARTRIDGE
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
6 PAGES
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM LISTS THE ACTIVE CARTRIDGES WITH TRACK USAGE INFORMATION.
LIKE THE CL COMMAND THIS PROGRAM USES THE USERS CARTRIDGE LIST.
**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: &CL
FILE# 3: 'CLDOC
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E16201
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: SAM
**PROGRAM TITLE:
EQUIPMENT LIST QUEUE LISTER
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
LIST SYSTEM TABLES
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
6 PAGES
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM IS USED TO LOCATE POTENTIAL PROBLEMS IN THE USE OF SYSTEM
AVAILABLE MEMORY (SAM). ALL NUMBERS EXCEPT LOCATION ARE DECIMAL.
**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: &SAM
FILE# 3: &ADD
FILE# 4: 'SAMDC
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E16301
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: ARRAY
**PROGRAM TITLE:
PERMITS USE OF A SCRATCH DISC AREA FOR A PROGRAM
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
ARRAY DISC SCRATCH
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS COMPREHENSIVE MODULE PERMITS THE USE OF A "SCRATCH" AREA ON DISC
AS ARRAY SPACE FOR A PROGRAM.
**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: &ARRAY
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E16501
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: APGI
**PROGRAM TITLE:
ACTIVITY PROGRAM GENERATOR
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
ANALYZAR
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS IS A SPECIFIC APPLICATION OF THE PROGRAM APG (IN THE LIBRARY).
THE APG PROGRAM ACCUMULATES A SPECTRUM FROM THE P-REGISTER TO PROVIDE
AN ACTIVITY PROFILE FOR PROGRAM TIMING ANALYSIS.
**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: &APG
FILE# 3: &APGI
FILE# 4: &APGL
FILE# 5: &APGSR
FILE# 6: &DSORT
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E16601
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: LMOD
**PROGRAM TITLE:
INTERACTIVE DEBUG UTILITY FOR RTE-L SYSTEMS
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
DEBUG
INTERACTIVE
SYSTEM
RTE-L
PATCH
**LANGUAGES:
FTN4
**COMPUTER TYPE:
M-SERIES
**OPERATING SYSTEMS:
RTE-L
RTE-IVB
**MEMORY REQUIREMENTS:
APPROXIMATELY 10 PAGES OF MAIN MEMORY
**DEPENDENT ON SYSTEM SOFTWARE? YE
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
LMOD IS AN INTERACTIVE DEBUG UTILITY WHICH PERMITS EXAMINATION
AND PATCHING OF MEMORY AND FILES. THE PROGRAM HAS A SWITCH
COMMAND WHICH INDICATES WHETHER THE MEMORY ADDRESS IS TO BE MAIN
MEMORY OR THE MEMORY IMAGE IN A TYPE 1 OR TYPE 6 FILE.
BECAUSE OF THIS CAPABILITY, LMOD ALSO SERVES AS A CRASH DUMP
ANALYZER: SIMPLY COPY THE CRASHED SYSTEM TO A TYPE 1 FILE AND
PROVIDE THIS AS INPUT TO LMOD.
**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: &LMOD - COMPOSITE SOURCE FOR ALL FTN4 ROUTINES
FILE# 3: $LMOD - COMPOSITE SOURCE FOR ALL ASMB ROUTINES
FILE# 4: 'LMOD - USER GUIDE
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E16701
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &PRETY
**PROGRAM TITLE:
PRETTYPRINT OF A FORTRAN IV SOURCE PROGRAM
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
CONVERSION FORMATTING FORTRAN
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
9 PAGE PARTITION
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM WILL FORMAT A 'FORTRAN' SOURCE PROGRAM INTO THE
PRETTYPRINT FORMAT, AS EXPLAINED IN 'PROGRAMMING PROVERBS FOR
FORTRAN PROGRAMMERS' BY HENRY F. LEDGARD AND PUBLISHED BY HAYDEN.
THE PROGRAM INDENTS ALL LINES OF A DO LOOP 2 COLUMNS. ALSO, ALL
IF STATEMENTS ARE INDENTED 2 COLUMNS.
IF A STATEMENT EXCEEDS 72 COLUMNS, !!!!! WILL BE INSERTED
BEGINNING IN COLUMN 72 AND THE STATEMENT WILL BE CONTINUED WITH
! IN COLUMN 6 OF THE CONTINUATION LINE.
THIS PROGRAM USES RTE-IVB FMP 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: &PRETY
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,PRETY,P1,P2,P3,P4,P5
P1 = INPUT DEVICE (DEFAULT = 1)
P2 = LINE PRINTER (DEFAULT = 6)
P3 = UNUSED
P4 = UNUSED
P5 = TRACE VARIABLE - ANY NON-ZERO VALUE TO TRACE (DEFAULT = 0)
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E16801
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &FLIST
**PROGRAM TITLE:
LIST ANY RECORD <= 1024 BYTES
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
FILES LIST PRINTER
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
9 PAGE PARTITION
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM WILL LIST THE RECORDS OF ANY FILE (TYPE 3 OR 4) THAT
DO NOT EXCEED 1024 CHARACTERS IN LENGTH. EACH PAGE HAS A HEADING
THAT INCLUDES THE FILE NAME AND A PAGE NUMBER. ALSO INCLUDED IS
A COLUMN POSITION NUMBER LINE TO AID IN READING THE FILE RECORDS.
PROMPTS AT THE TERMINAL DIRECT THE USE OF THE PROGRAM. EACH RECORD
INCLUDES A CALCULATED RECORD NUMBER. ALSO INCLUDED IS THE
RECORD LENGTH (SHOWN AT THE END OF THE FIRST LINE).
PROGRAM USES FMP 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: &FLIST
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,FLIST,P1,P2,P3
P1 = INPUT TERMINAL LU (DEFAULT = USERS TERMINAL)
P2 = LIST LU (DEFAULT = 6)
P3 = OPTIONS PARAMETER (DEFAULT = NONE)
SET TO ANY NON-ZERO PRINTS LINE NUMBERS AND BYTE COUNT
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E16901
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &MAGCV
**PROGRAM TITLE:
CONVERT AND UNBLOCK MAG TAPE RECORDS
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
CONVERSION FORMATTING MAGNETIC TAPE
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
8 PAGE PARTITION
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM WILL UNBLOCK MAGNETIC TAPES INTO FMP SOURCE FILE FORMAT.
ALSO, AN EBCDIC TABLE IS INCLUDED FOR CONVERSION OF EBCDIC TO ASCII.
RTE-IVB FMP CALLS ARE USED.
**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: &MAGCV
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,MAGCV,P1,P2,P3,P4
P1 = INPUT LU (DEFAULT = 1)
P2 = LINE PRINTER (DEFAULT = 6)
P3 = MAG TAPE (DEFALUT = 8)
P4 = CONVERSION FLAG (NO DEFAULT) SET TO NON-ZERO TO CONVERT
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E17001
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &BLOKS
**PROGRAM TITLE:
BURST PAGE (BLOCK) PRINTER
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
FORMATTING LIST PRINTER
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
7 PAGE PARTITION
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM CREATES A BURST PAGE OF LARGE BLOCK LETTERS.
THE BURST PAGE IS COMPOSED OF 8 CHARACTERS MAXIMUM PER LINE AND 3
LINES PER PAGE. THE USER ENTERS THE PRINT INFORMATION IN THE RUN
STRING. EACH PRINT LINE ENTERED BY THE USER IS CLOSED BY ENTERING
THE CARAT (^).
DECAR ROUTINES ARE USED BY THIS PROGRAM.
**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: &BLOKS
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,BLOKS,,--PRINT DATA--
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E17101
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &WKMON
**PROGRAM TITLE:
PRINT WORK MONTH CALENDAR
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
CALENDAR PRINTER
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
5 PAGE PARTITION
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM PRINTS A WORK MONTH CALENDAR MADE UP OF BLOCKS FOR EACH
DAY OF THE MONTH SUITABLE FOR ENTERING DAILY APPOINTMENTS AND ACTIVITY.
**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: &WKMON
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,WKMON
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E17201
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &BTLST
**PROGRAM TITLE:
BINARY TAPE DUMP
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
DUMP LIST MAGNETIC TAPE
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
9 PAGE PARTITION
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM WILL PROVIDE THE USER WITH A DUMP OF ANY MAG TAPE IN
A SUITABLE FORMAT FOR DETERMINING CONTENTS OF A MAG TAPE.
FMP AND EXEC CALLS ARE USED.
**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: &BTLST
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,BTLST,P1,P2,P3,P4,P5
P1 = MAG TAPE LU (DEFAULT = 9)
P2 = LINE PRINTER LU (DEFAULT = 6)
P3 = FIRST RECORD TO BE LISTED (DEFAULT = 1)
P4 = LAST RECORD TO BE LISTED (DEFAULT = 32767)
P5 = NUMBER OF WORDS TO BE LISTED (DEFAULT = 6146)
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E17301
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &RUNL
**PROGRAM TITLE:
INTERACTIVE OR FILE DRIVEN DEBUG PROGRAM
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
DEBUG INTERACTIVE DRIVER SUBROUTINE FILES
**LANGUAGES:
ASMB
**COMPUTER TYPE:
M-SERIES
**OPERATING SYSTEMS:
RTE-IVA RTE-IVB RTE-L
**MEMORY REQUIREMENTS:
14 PAGE PARTITION
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THE PRIMARY PURPOSE OF RUNL (AND ITS SMALLER BROTHER RUNT) IS TO
PERMIT TESTING OF EXEC CALLS (PERHAPS TO A DRIVER) OR TESTING OF
USER-WRITTEN SUBROUTINES. RUNL MAY BE INTERACTIVE OR FILE-DRIVEN
WHILE RUNT IS INTERACTIVE ONLY.
**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: LOAD FILE FOR RUNL
FILE# 3: RUNL MANUAL
FILE# 4: LIST OF RUNL COMMANDS
FILE# 5: SOURCE OF RUNL
FILE# 6: HELP FILE FOR RUNL
FILE# 7: !RNAM FOR RUNL
FILE# 8: R4DUM FOR RUNL
FILE# 9: RUNT
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,BTLST,P1,P2,P3,P4,P5
P1 = MAG TAPE LU (DEFAULT = 9)
P2 = LINE PRINTER LU (DEFAULT = 6)
P3 = FIRST RECORD TO BE LISTED (DEFAULT = 1)
P4 = LAST RECORD TO BE LISTED (DEFAULT = 32767)
P5 = NUMBER OF WORDS TO BE LISTED (DEFAULT = 6146)
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
The primary purpose of RUNL (and its smaller brother RUNT) is to permit
testing of EXEC calls (perhaps to a driver) or testing of user-written
subroutines. RUNL may be interactive or file-driven while RUNT is
interactive only.
Commands are provided to perform integer (optionally real) arithmetic
and to save and display results of calculations. If file-driven, RUNL
permits conditional, unconditional and subroutine branches. The
combination of these capabilities allows the user to write actual
programs in the command language.
The program uses a self-contained data area of 1000 locations which are
addressed as single cells and may be strung together to form vectors
of arbitrary size. These cells may be passed as parameters to EXEC
calls or user subroutines and manipulated with the various math and
display operators.
The User Guide for RUNL gives a more complete description.
**ANSWER 24
FILE# 1: SUBMISSION FILE
FILE# 2: *RUNL = LOADR Command file for RUNL
FILE# 3: 'RUNL = User Guide for RUNL
FILE# 4: .RUNL. = HELP file to be available to RUNL
FILE# 5: %RUNL = relocatable for RUNL assembled for RTE-IV
FILE# 6: %HELP = relocatable for HELP subroutine
FILE# 7: %RNAMS = relocatable for subroutine table (sample)
FILE# 8: %R4DUM = relocatable dummy module for RTE-IV systems
FILE# 9: &RUNL = source
FILE# 10: &HELP = source
FILE# 11: &RNAMS = source (external subroutines table)
FILE# 12: &R4DUM = source for dummy RTE-IV module
FILE# 13: &RUNT = source for RUNL without file I/O
FILE# 14: %RUNT = relocatable for RUNT assembled for RTE-IV
**ANSWER 25
RUNL was originally written for RTE-L and contains external references
satisfied only in an RTE-L system. However, by conditional assembly
and the use of a dummy module, RUNL may be used in an RTE-IV system
(or any other RTE system). RUNT also has a conditional assembly
option to permit use in either RTE-L or RTE-IV but does not require
a dummy module to be loaded in RTE-IV.
RUNL makes use of a an external table which appears in the source file
&RNAMS. This table defines the ASCII names and the corresponding entry
points for any user-written subroutines to be tested. The relocatable
of the table and of the user subroutines are loaded with the relocatable
for RUNL itself. If any subroutine is changed or a subroutine is to
be added or deleted, then RUNL must be re-loaded.
A special subroutine called 'HELP' is provided assist the user in
learning the RUNL commands. HELP must be defined in the table in
&RNAMS along with any other subroutine calls (including an entry for
EXEC if making EXEC calls). When RUNL is scheduled it scans the
table to find HELP. If HELP is present a message is printed indicating
that HELP is available. HELP uses a file called '.RUNL.', which is
easily readable and may be editted to suit the individual.
**ANSWER 26
RU,RUNL,<file name>[,sec code][,disc][,<parameter list>]
-or-
RU,RUNL,<lu>[,<parameter list>]
where:
file name = Name of file containing commands
sec code = Security code of file
disc = Positive cartridge number or negative disc lu
parmeter list = Any list of values passed in the run string - up to
20 are allowed. Parameters are parsed according to
rules of the system PARSE and saved in locations V1-V20
lu = Input lu - defaults to 1. If a non-interactive device,
then responses go to lu #1.
**ANSWER 27
The following example, taken from the RUNL User Guide shows a command
file which may be passed to RUNL to list a file:
LOGLU,V999 \ Get terminal lu
/M,V999,V1 \ Save A register in cell V999
V300,"RUNL \ Assign string starting at cell V300
OPEN,V100,V700,V300 \ Open file using DCB at V100, V700 = error
READF,V100,V700,V400,40,V500 \ User buffer at V400, V500 = length
IF,V500,EQ,-1,3 \ If EOF, go to close file
EXEC,2,V999,V400,V500 \ Use EXEC write to display ASCII record
/J,-3 \ Loop back to READF
CLOSE,V100 \ Close file
V400,EOF \ Assign string 'EOF' starting at V400
/D,A,V400,2 \ Use RUNL display command for variety
/E \ End of file
**ANSWER 28
See RUNL User Guide for detailed description of program.
**ANSWER 29
Diagnostic messages are given in the User Guide.
**ANSWER 30
E17401
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: PTEST
**PROGRAM TITLE:
Printer Test
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
PRINTER TERMINAL DIAGNOSTIC
TEST
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVA RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
This program prints a rotating test pattern to either a printer or a
terminal. The user can select both the line length and the character
set at run time. The program will run continuously until a system
break (BR command) is given.
The program detects the driver type for the target logical unit. If
the target is a printer (driver type 12B), the program inserts a single
space carriage control at the beginning of each line.
**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: &PTEST
FILE# 3: &IDVR
FILE# 4: &RHB02
**LOAD INSTRUCTIONS:
Use normal load procedures.
**RUN INSTRUCTIONS:
:RU,PTEST[,lu[,character set[,line length]]]
lu is the logical unit number to be tested. (Default is user's
terminal.)
character set is:
1 for the complete 128 character ASCII set.
2 for the 95 character subset (without control characters
and the delete character).
3 for the 48 character subset (without lower case characters,
control characters, and the delete character).
(Default is 3, the 48 character subset.)
line length is the number of characters to be printed per line,
exclusive of carriage control. (Default is 72.)
**INPUT/OUTPUT EXAMPLES:
None required.
**PROGRAM DESCRIPTION:
See above.
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
If the driver type is not 0 (teletype) or 5 (264x) or 12B (printer)
the program stops with a STOP 2 message to the system console.
Alter line 40 of file &PTEST to change this.
**MISCELLANEOUS:
The maximum line length allowed is 132 characters.
E17501
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: USAVE
**PROGRAM TITLE:
FAST DISC-TO-DISC BACKUP AND RESTORE PROGRAM FOR 7925 DISC.
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 3
**KEYWORDS:
DISC DUMP SAVE/RESTORE
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
2100
**OPERATING SYSTEMS:
RTE-II
**MEMORY REQUIREMENTS:
N/A
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
PROGRAM USAVE IS A DISC BACKUP PROGRAM WHICH MAKES AN ABSOLUTE COPY
OF A GROUP OF TRACKS LOCATED ON A 7925 DISC FMGR TYPE 1 FILE.
PROGRAM UREST RESTORES THE COPY MADE BY PROGRAM USAVE BACK ON THE
HP-7925 DISC. USAVE WILL MAKE A 100 TRACK BACKUP IN 11 SECONDS.
NOTE: THESE PROGRAMS COULD ALSO HANDLE OTHER DISC SYSTEMS CONNECTED
TO THE HP-13175 CONTROLLER(IE,7920,7906,7905 BUT ARE AS YET UNTESTED)
SUBROUTINES DLEES AND DCHRF CONTRIBUTED SEPARATELY ARE ALSO REQUIRED.
THESE SUBROUTINES MAY ALSO BE USED INDEPENDENTLY WITHIN USER WRITTEN
PROGRAMS.
DLEES(IBUF,LEN,ITRK,ISEC,IHD,ISC) IS A FTN4 CALLABLE SUBROUTINE,
WHICH READS A BUFFER IBUF OF LENGTH LEN FROM A 7925 DISC.
DCHRF(IBUF,LEN,ITRK,ISEC,IHD,ISC) IS A FTN4 CALLABLE SUBROUTINE,
WHICH WRITES A BUFFER OF LENGTH LEN ON A 7925 DISC.
TEST CASE: 1. SAVE AN RTE OPERATING SYSTEM LOCATED ON A 7925 DISC.
2. CREATE AN AUXILLIARY FILE OF THE SAME TYPE AND SIZE.
3. DESTROY THE OPERATING SYSTEM ON THE HP7925 DISC BY
RESTORING THE AUXILLIARY FILE USING PROGRAM UREST.(MAKE
SURE YOU HAVE A BACKUP COPY OF YOUR SYSTEM ON TAPE!)
4. TEST THE OPERATING SYSTEM; IT WON'T WORK.
5. RETORE THE ORIGINAL FILE.
6. TEST THE OPERATING SYSTEM AGAIN; IT WILL WORK.
ADDITIONAL DOCUMENTATION IS CONTAINED IN THE PROGRAM SOURCE CODE.
**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: &USAVE--USAVE PROGRAM SOURCE
FILE# 3: &UREST--UREST PROGRAM SOURCE
FILE# 4: &DLEES--SUBROUTINE DLEES SOURCE
FILE# 5: &DCHRF--SUBROUTINE DCHRF SOURCE
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
SEE PROGRAM SOURCE CODE FOR USAVE AND UREST.
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
PAUSE 2222; FMGR ERROR; ABORT PROGRAM AND DEBUG.
HLT 60B(102060); CHECK STATUS OF HP-7925; RESTART RTE SYSTEM
**MISCELLANEOUS:
E17601
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: CLEXT
**PROGRAM TITLE:
CLEARS EXTENTS FOR FILES ON A 'FMGR' CARTRIDGE
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 6
**KEYWORDS:
FILES EXTENTS
**LANGUAGES:
FTN4
**COMPUTER TYPE:
2100
**OPERATING SYSTEMS:
RTE-II RTE-IVB
**MEMORY REQUIREMENTS:
10K
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM CALLED 'CLEXT' MAY BE USED TO CLEAR EXTENTS FOR ALL
FILES ON AN OPERATOR SPECIFIED MOUNTED DISK CARTRIDGE. A PROGRAM
INTENDED FOR THE SAME PURPOSE WAS DESCRIBED IN 'COMMUNICATOR-1000'
VOL-III, NO-1. HOWEVER, THAT PROGRAM REQUIRED A COPY OF 'FMGR' (WHICH
IT SCHEDULED PROGRAMATICALLY) AND A SPECIAL INTERFACE FILE TO TERMINATE
THE 'FMGR' COPY. ALSO IT WOULD NOT CLEAR EXTENTS FROM LU 2 OR 3
AND IT WOULD NOT WORK WITH RTE-IVB. THIS PROGRAM REQUIRES NO ADDITIONAL
SOFTWARE EXCEPT THE STANDARD 'RTE' AND 'FMP' SUBROUTINES. IT HAS BEEN
IN USE HERE FOR THE PAST 6 MONTHS ON RTE-II AND RTE-IVB SYSTEMS.
**
** IF A FILE HAS ONE OR MORE RECORDS IN EXCESS OF 512 WORDS (1024
** BYTES) ITS EXTENTS ARE NOT CLEARED. I DOUBT THIS LIMITATION
** WILL INCONVENIENCE ANYONE.
**
**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: FORTRAN SOURCE &CLEXT
**LOAD INSTRUCTIONS:
COMPILE FORTRAN SOURCE &CLEXT AND LOAD AS PER USUAL FOR YOUR SYSTEM.
** NOTE THAT THE DIRECTORY ENTRY RETRIEVAL SUBROUTINE 'IRDIR' WHICH
** IS INCLUDED IN THE FORTRAN SOURCE FILE MAY HAVE SOME GENERAL
** APPLICABILITY. TAKE A LOOK AT IT.
**RUN INSTRUCTIONS:
RU,CLEXT [,,A]
WHERE A = DISK LU OR CRN.
IF ,,A IS OMITTED THE PROGRAM WILL ASK YOU TO ENTER LU OR CRN.
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E17701
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: ENTDB
**PROGRAM TITLE:
ENTRY-POINTS DATA-BASE PROGRAM + FMGR,LOADR & IMAGE/1000 SUPPORT FILES
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
DATA BASE ENTRY POINTS LIBRARY
RELOCATABLE REPORTS
**LANGUAGES:
FTN4
**COMPUTER TYPE:
M-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
21 PAGES IN F-SERIES, PLUS IMAGE/1000 RUN TABLES
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS CONTRIBUTION CONSISTS OF THREE PARTS:
1. DBDS SCHEMA & FMGR FILE FOR CREATING 92069A IMAGE/1000 DATA-BASE TO
CONTAIN: PRODUCT NUMBER, FILE, CR, HEADER NAM & COMMENT, NAM &
COMMENT, MODULE TYPE, ENT, RELOCATION INDICATOR, ETC.
2. FTN4 PROGRAM (DBENT) WHICH WILL OPEN EACH OF A LIST OF RELOCATBLE
FILES, SCAN EACH RECORD, AND UPDATE THE ABOVE DATA-BASE.
THERE ARE FMGR/LOADR SUPPORT AND DEMO FILES FOR DBENT.
3. QUERY PROCEDURE & FMGR FILE FOR CREATING A FORMATTED SORTED REPORT
FROM THE DATA-BASE.
PREREQUISITES: 92069A IMAGE/1000 REV 2013 OR EARLIER. HAS NOT BEEN
TESTED WITH 2026 IMAGE. EXTENSIVE RE-CODING WOULD BE
REQUIRED TO USE 92063A IMAGE AND/OR AN EARLIER RTE.
**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 FILEISSION FILE
FILE# 2: 'ENTDB:RJ:RJ INTRODUCTORY DOCUMENTATION
FILE# 3: *ENTDB:RJ:RJ FMGR COMMANDS TO CREATE DATA-BASE
FILE# 4: &ENTDB:RJ:RJ DBDS SCHEMA FOR ENTDB:EN:EN
FILE# 5: &DBENT:RJ:RJ FTN4 PROGRAM TO UPDATE ENTDB:EN:EN
FILE# 6: *DBENT:RJ:RJ FMGR COMMANDS TO RE-LOADR DBENT
FILE# 7: #DBENT:RJ:RJ LOADR COMMANDS FOR DBENT
FILE# 8: 'DBENT:RJ:RJ LOADR LIST FILE OF DBENT LOAD MAP
FILE# 9: $LIBRJ:RJ:RJ AUTHOR'S RELOCATABLE LIBRARY
FILE# 10: $M1810:RJ:RJ HP1000 BASE-SET RPL RECORDS
FILE# 11: $.DMI.:RJ:RJ HP1000 DYNAMIC MAPPING RPL RECORDS
FILE# 12: %DBENT:RJ:RJ RELOCATABLE OF DBENT
FILE# 13: *DEMO :RJ:RJ TEST DBENT ON %DBENT,$LIBRJ, ETC.
FILE# 14: &DEMO :RJ:RJ DBENT ANSWER FILE FOR *DEMO
FILE# 15: *ENTRP:RJ:RJ FMGR COMMANDS FOR QUERY PROCEDURE
FILE# 16: &ENTRP:RJ:RJ QUERY FIND/SORT/REPORT ON ENTDB
**LOAD INSTRUCTIONS:
REFER TO FILE *DBENT:RJ:RJ AND #DBENT:RJ:RJ
**RUN INSTRUCTIONS:
:RU,DBENT,<NAMRS FILE NAMR>,<LEVEL WORD>,<LIST>,<SV>,<"COMMENT">
REFER TO DOCUMENTATION SECTION IN &DBENT:RJ:RJ SOURCE FILE.
ALL PARAMETERS ARE EITHER DEFAULTABLE OR REQUESTED IN ANY EVENT.
**INPUT/OUTPUT EXAMPLES:
FILE *DEMO:RJ:RJ CAN BE USED IN CONJUNCTION WITH *ENTDB:RJ:RJ AND
*ENTRP:RJ:RJ TO DEMONSTRATE THE SYSTEM.
**PROGRAM DESCRIPTION:
REFER TO SOURCE FILE &DBENT:RJ:RJ FOR COMPLETE INFORMATION (INCLUDING A
STRUCTURED ENGLISH SUMMARY OF THE PROGRAM FLOW).
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
INTERACTIVE OPERATION ALLOWS /A ABORT ON EACH PROMPT.
PROGRAM WILL TERMINATE CLEANLY ON *BR.
PROGRAM WILL REPORT MOST EXEC/FMP/DBMS ERRORS, AND WILL CLOSE AND IGNORE
FILES HAVING BAD RELOCATABLE RECORDS (ACCEPTS GEN/LOD RECORDS).
PROGRAM FLOW ON ERROR SUBJECT TO RUN-TIME SEVERITY CODE.
SEE SOURCE FILE &DBENT:RJ:RJ FOR MORE INFO.
**MISCELLANEOUS:
THE DATA-BASE SCHEMA IS SETUP TO HANDLE EXT AND EMA RECORDS AS WELL AS
ENT RECORDS. HOWEVER, THE SUPPORTING CODE IN DBENT IS PRESENTLY
COMMENTED OUT, ALTHOUGH IT APPEARS TO WORK PROPERLY). IF AN EMA DATA-
BASE OR EXT (WHERE-USED) DATA-BASE IS DESIRED, IT WOULD BE BEST TO
HAVE SEPARATE DETAIL DATA SETS FOR THESE RECORD TYPES, AS THE ENT DETAIL
SET (DETAIL:EN:EN) IS NOT OPTIMIZED FOR THIS USE.
E17801
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: QEDIT
**PROGRAM TITLE:
A QUICK EDIT PROGRAM FOR IMAGE DATA BASES USING FORMATTED SCREEN.
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
FILES DATA BASE DATA MGMT
EDITOR IMAGE
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-III
**MEMORY REQUIREMENTS:
16K PARTITION
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
IMAGE/1000 PART NUMBER 92069A AND A 264X TERMINAL WITH DISPLAY
ENHANCEMENTS MUST BE USED WITH THE PROGRAM FOR CORRECT EXECUTION.
THE PROGRAM FORMATS THE 264X SCREEN TO MATCH THE DATA BASE SCHEMA
OF THE DATA BASE BEING UPDATED. KEY ELEMENTS ARE HIGHLIGHTED FOR
CONVENIENCE. THE PROGRAM IS INTENDED TO MAKE IMAGE DATA BASE UPDATES
EASIER. THE PROGRAM REPLACES THE UPDATE FUNCTIONS OF QUERY. THE OPERATOR
NEED HAVE NO KNOWLEDGE OF QUERY.
**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: &QEDIT MAINLINE SOURCE
FILE# 3: &QEDT SEGMENT 1 SOURCE
FILE# 4: &QEDT0 SEGMENT 2 SOURCE
FILE# 5: &QEDT1 SEGMENT 3 SOURCE
FILE# 6: &QEDT2 SEGMENT 4 SOURCE
FILE# 7: &QEDT3 SEGMENT 5 SOURCE
FILE# 8: &QEDT4 SEGMENT 6 SOURCE
FILE# 9: &QEDT5 SEGMENT 7 SOURCE
FILE# 10: &FORMS SUBROUTINES SOURCE
FILE# 11: &TABS SUBROUTINES SOURCE
FILE# 12: %ELIB1 RELOCATABLE LIBRARY
FILE# 13: "QEDIT DOCUMENTATION FILE
FILE# 14: #QEDIT LOADR TRANSFER FILE
**LOAD INSTRUCTIONS:
BE SURE THE TRANSFER FILE #QEDIT HAS BEEN LOADED FROM TAPE.
THEN EXECUTE THE FOLLOWING INSTRUCTION:
RU,LOADR,#QEDIT
**RUN INSTRUCTIONS:
NO PARAMETERS ARE REQUIRED ON THE RUN STATEMENT.
FOLLOWING THE RU,QEDIT COMMAND, FOLLOW THE INSTRUCTIONS IN
FILE "QEDIT FOR THE COMMAND OPTIONS.
**INPUT/OUTPUT EXAMPLES:
NONE
**PROGRAM DESCRIPTION:
PROGRAM QEDIT IS NOW DESIGNED TO WORK WITH SINGLE INTEGERS OR ASCII
DATA. CODE IS INCLUDED BUT NOT TESTED FOR FLOATING POINT. THIS WILL
BE ADDED AT A LATER DATE.
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E17901
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: GTREE
**PROGRAM TITLE:
PROGRAM TO SHOW CALL STRUCTURE AND INTER MODULE LINKAGE
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
ANALYZER RELOCATABLE
**LANGUAGES:
FTN4
**COMPUTER TYPE:
2100
**OPERATING SYSTEMS:
RTE-IVA RTE-IVB
**MEMORY REQUIREMENTS:
MAIN AND SUBROUTINES TAKE 33200B, PROGRAM LOADED ON E SERIES RTE-IVB 21P
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
PROGRAM IS DESIGNED TO SHOW WHAT THE CALL STRUCTURE IS FOR A GIVEN
SET OF ROUTINES. A PRINTOUT IS PRODUCED WHICH SHOWS WHAT ROUTINE IS
CALLED BY WHAT ROUTINE(S) AND THE ORDER (DEPTH) OF THE CALL STRUCTURE.
THE PROGRAM WILL NOT CURRENTLY HANDLE ROUTINES WHICH CAN CALL ROUTINES
WHICH HAVE CALLED IT (IE., ROUTINE A CALLES ROUTINE B WHICH CAN CALL
ROUTINE A PRODUCES A KILLING LOOP ON OUTPUT). THIS PROGRAM IS USEFULL
IN ANALYZING LARGE SOFTWARE PACKAGES IN WHICH THE USER IS NOT FAMILIAR
WITH THE STRUCTURE OR ORGANIZATION.
**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: >REE::2040
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
IF A DEPTH OF CALL STRUCTURE REACHES 19 CALLS DEEP, PROGRAM PRINTS
MESSAGE ON TERMINAL AND TERMINATES. THIS CAN BE EXTENDED, BUT REQUIRES
MOD OF PRINTER OUTPUT (CURRENTLY BUILT FOR 128 CHAR PRINTER OUTPUT).
AND STORAGE ARRAYS INTERNAL TO PROGRAM.
**MISCELLANEOUS:
ALL BASIC DISCUSSIONS OF PROGRAM CAN BE FOUND WITHIN PROGRAM CODE.
E18001
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: ACNT
**PROGRAM TITLE:
SMALL SYSTEM ACOUNTING USING RTE-IVB SESSION TRACKING OF CPU/CONNECT TIM
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 7
**KEYWORDS:
ACCOUNTING
**LANGUAGES:
FTN4
**COMPUTER TYPE:
M-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
PROGRAM LOADS IN 15 PAGES
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
PROGRAM ALLOWS SYSTEM MANAGER TO ADDRESS THE SESSION ACOUNTS FILE
AND COMPUTE COST FOR PROJECT USAGE AS A FUNCTION OF CPU USAGE AND
TERMINAL CONNECT USAGE. A TEST RUN IS ALLOWED OR A REAL UPDATE RUN
IS ALLOWED. HISTORICAL DATA OF PAST MONEY SPENT AGAINST A PROJECT
IS LOGGED IN FILE $###DB AND COST STRUCTURE IS LOGGED IN FILE $***DB.
PROGRAM GENERATES MEMO'S LISTING MONEY SPENT AGAINST A PROJECTS USAGE
AND CURRENT TOTAL OWED ALONG WITH TIME SPENT ON SYSTEM. NOTE THAT
PROGRAM DOES NOT RESET THE SESSION FILE ENTRIES. AT END OF MEMO DUMP
PROGRAM UPDATES CHARGE FILE ($***DB). USER MAY ALSO SPECIFY OTHER
COSTS (CURRENTLY DESIGNATED AS A/D WORK). THIS PROGRAM IS USED BY
A SMALL RTE-IVB SYSTEM NOT HAVEING LARGE PERSONAL AVALIBLE FOR
BOOKKEEPING AND CANNOT DIRECTLY CHARGE PEOPLE.
**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: &ACNT
FILE# 3: &MDATE - RETURNS MONTH AND DAY GIVEN DAY AND YEAR
FILE# 4: $***DB - DATA FILE SHOWING CHARGES AND $ OWED
FILE# 5: $###DB - DATA FILE WITH MONEY SPENT AGAINST USER
**LOAD INSTRUCTIONS:
USER SHOULD COMPILE FILES &ACNT AND &MDATE AND USE LOADER. NO SPECIAL
REQUIREMENTS.
**RUN INSTRUCTIONS:
RU,ACNT,TERMINAL,PRINTER
PROGRAM WILL REQUEST IF THIS IS A TEST RUN OR A REAL RUN FOR UPDATE.
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
PROGRAM GENERATES MEMO'S FOR EACH PROJECT DESIGNATED IN FILE
$***DB AND $###DB AND UPDATES CHARGES AGAINST THE PROJECT. SYSTEM
MANAGER MUST MAKE THE PROJECT NAMES IN THE DATA FILES THE SAME AS
THE PROJECT NAME IN THE SESSION SIGNON REQUEST. MANAGER UPDATES THE
FILE $###DB EACH TIME MONEY IS SPENT AGAINST A GIVEN PROJECT AND AT
THE END OF THE MONTH (OR WHENEVER) RUNS THE PROGRAM ACNT WHICH WILL
TOTAL CHARGES AND EXPENSES SHOWING BALANCE OF PAYMENT REQUIRED. ON
FULL RUN, PROGRAM GENERATES 2 COPIES OF THE MEMO. THE MANAGER MAY
ALSO ALTER THE A/D USAGE TO FIT ANY OTHER PURPOSE SUCH AS OUTSIDE
LABOR AND/OR MAG TAPE COSTS.
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
ERROR MESSAGES OCCURE IF FILES ARE NOT AVALIBLE.
A NON FATAL (PROBABLY NOT IMPORTANT) ERROR MESSAGE OCCURES WHEN PROGRAM
IS RETREVING DATA FROM THE SESSION FILE.
**MISCELLANEOUS:
E18101
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: EDREC
**PROGRAM TITLE:
DISPLAY/SEARCH/MODIFY FILE RECORDS, DISC BLOCKS, OR MEMORY
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
EDITOR FILES LIST
DISC
**LANGUAGES:
FTN4
**COMPUTER TYPE:
2100
**OPERATING SYSTEMS:
RTE-II RTE-III RTE-IVAB
**MEMORY REQUIREMENTS:
10K PARTITION
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM PROVIDES INTERACTIVE DISPLAY AND MODIFICATION OF NAMED
FMP FILES, PHYSICAL DISC BLOCKS, AND MEMORY.
DISPLAYS AND DATA ENTRY FORMATS INCLUDE DECIMAL, OCTAL, HEXADECIMAL,
AND SINGLE AND EXTENDED PRECISION FLOATING POINT.
A SEARCH FUNCTION TO FIND SPECIFIED INTEGER VALUES IS ALSO PROVIDED.
PRIVILEGED PROCESSING IS USED TO ALTER ANY AREA OF DISC OR MEMORY.
THE PROGRAM USES EXEC AND FMP 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: &EDREC - SOURCE OF MAIN AND SUBROUTINES
FILE# 3: 'EDREC - EXTENDED DOCUMENTATION
**LOAD INSTRUCTIONS:
COMPILE AND LOAD THE SOURCE FILE PER STANDARD PROCEDURES.
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E18201
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: INSTR
**PROGRAM TITLE:
STRING COMPARE AND SEARCH WITH WILD CARDS
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
STRING COMPARE SEARCH
**LANGUAGES:
ASMB
**COMPUTER TYPE:
21MX-M
**OPERATING SYSTEMS:
RTE-II RTE-IVA RTE-IVB
**MEMORY REQUIREMENTS:
FORTRAN CALLABLE FUNCTION
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS FORTRAN CALLABLE FUNCTION DOES A POSITIONAL CHARACTER COMPARE
OF TWO STRINGS. WILD CARDS MAY EITHER BE (?, @, #) OR USER DEFINED.
THE FUNCTION MAY EITHER BE USED TO COMPARE 2 STRINGS, OR TO FIND AN
OCCURANCE OF A SUB-STRING IN A MAIN-STRING.
**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: SOURCE OF INSTR (ASMB)
FILE# 3: SOURCE OF TINS (FTN4)
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
NONE
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E18301
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: DATE
**PROGRAM TITLE:
CURRENT SYSTEM DATE AND TIME IN ASCII
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
DATE SYSTEM
**LANGUAGES:
ASMB
**COMPUTER TYPE:
2116A
**OPERATING SYSTEMS:
RTE-II RTEIVA RTE-IVB
**MEMORY REQUIREMENTS:
FORTRAN CALLABLE SUBROUTINE
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS FORTRAN CALLABLE SUBROUTINE RETURNS A 14 WORD ASCII STRING
THAT CONTAINS THE SYSTEM TIME AND DATE.
THE FORMAT OF THE STRING IS: WWW MMM DD,YYYY HH:MM:SS.TT
**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: SOURCE OF DATE (ASMB)
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
CALL DATE(IBUF) WHERE IBUF IS A 14 WORD INTEGER ARRAY.
**INPUT/OUTPUT EXAMPLES:
NONE
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E18401
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: NSCOM
**PROGRAM TITLE:
STRING COMPARE WITH WILD CARDS
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
STRING COMPARE SEARCH
**LANGUAGES:
ASMB
**COMPUTER TYPE:
21MX-M
**OPERATING SYSTEMS:
RTE-II RTEIVA RTE-IVB
**MEMORY REQUIREMENTS:
FORTRAN CALLABLE FUNCTION
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS FORTRAN CALLABLE FUNCTION DOES A POSITIONAL CHARACTER COMPARE
OF TWO STRINGS. A DASH IN EITHER STRING MATCHES THE CORRESPONDING
CHARACTER (ANY CHAR.) IN THE OTHER STRING. THE RETURN INDICATES
ONLY THAT THE STRINGS MATCH OR DO NOT MATCH.
**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: SOURCE OF NSCOM (ASMB)
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
NONE
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E18501
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: OPENF
**PROGRAM TITLE:
OPEN FLAG LIST
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 7
**KEYWORDS:
SYSTEM FLAGS
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
2116A
**OPERATING SYSTEMS:
RTE-II RTEIVA RTE-IVB
**MEMORY REQUIREMENTS:
BG. DISC RESIDENT (TYPE 3) NO EXTRA SPACE NEEDED.
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM SCANS ALL MOUNTED FILE MANAGER DISCS FOR OPEN FLAGS.
EACH OPEN FLAG IS REPORTED WITH THESE ITEMS DISPLAYED:
CARTRIDGE REFERENCE, LOGICAL UNIT, TRACK, SECTOR, FILE NAME,
PROGRAM NAME. THE LU, TRK, AND SEC. ARE THE LOCATION OF THE
DIRECTORY ENTRY.
**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: SOURCE OF OPENF (FTN4)
FILE# 3: SOURCE OF MOPSY (ASMB)
**LOAD INSTRUCTIONS:
NORMAL COMPILE AND LOAD. TYPE 3---NEEDS TABLE AREA II.
**RUN INSTRUCTIONS:
RU,OPENF,P1 WHERE
P1 = LIST DEVICE DEFAULT TO SCHEDULING TERMINAL.
**INPUT/OUTPUT EXAMPLES:
NONE
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E18601
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: MOPSY
**PROGRAM TITLE:
FORTRAN CALLABLE .OPSY
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 7
**KEYWORDS:
SYSTEM
**LANGUAGES:
ASMB
**COMPUTER TYPE:
2116A
**OPERATING SYSTEMS:
RTE-II RTEIVA RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS FORTRAN CALLABLE FUNCTION RETURNS THE VALUE OF $OPSY, A
SYSTEM CONSTANT IDENTIFING THE OPERATING SYSTEM IN USE. BY USING
THE VALUE OF $CL1 IT IS ALSO POSSIBLE TO DIFFERENTIATE BETWEEN
RTE-IVA AND RTE-IVB.
**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: SOURCE OF MOPSY (ASMB)
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
USE AS FUNCTION ONLY. RETURNS A VALUE OF 17(10) FOR RTE-IVB.
**INPUT/OUTPUT EXAMPLES:
NONE
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E18701
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: CLIST
**PROGRAM TITLE:
DISC USAGE DISPLAY
**REVISION? YES
**PACKAGE: 5 **CATEGORY: 7
**KEYWORDS:
DISC DISPLAY
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
2116A
**OPERATING SYSTEMS:
RTE-II RTEIVA RTE-IVB
**MEMORY REQUIREMENTS:
BG. DISC RESIDENT (TYPE 3) NO EXTRA SPACE NEEDED.
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS REVISION OF 'CLIST' WILL NOW WORK PROPERLY ON RTE-IVB.
THIS WAS ACCOMPLISHED WITH THE USE OF A SUBROUTINE (MOPSY) THAT CAN
DISTINGUISH BETWEEN RTE-IVA AND RTE-IVB.
**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: SOURCE OF CLIST (FTN4)
FILE# 3: SOURCE OF MOPSY (ASMB)
**LOAD INSTRUCTIONS:
NORMAL COMPILE AND LOAD. TYPE 3---NEEDS TABLE AREA II.
**RUN INSTRUCTIONS:
RU,CLIST,P1 WHERE
P1 = LIST DEVICE DEFAULT TO SCHEDULING TERMINAL.
**INPUT/OUTPUT EXAMPLES:
NONE
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E18801
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: DSCAN
**PROGRAM TITLE:
COMPACT ALPHABETIZED DIRECTORY LIST
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
DISC DIRECTORY LIST
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
21MX-M
**OPERATING SYSTEMS:
RTE-II RTEIVA RTE-IVB
**MEMORY REQUIREMENTS:
BG. DISC RESIDENT (TYPE 3) NO EXTRA SPACE NEEDED.
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM DOES ALPHABETIZED DIRECTORY LISTS. THE LISTS ARE
FOUR COLUMNS WIDE AND ARE IN ORDER FROM TOP TO BOTTOM OF EACH
COLUMN. THE INFORMATION PROVIDED IS FILE NAME, LOGICAL UNIT,
FILE TYPE, NUMBER OF EXTENTS, AND SIZE OF EXTENT. THE FILES
TO BE LISTED CAN BE SELECTED BY ANY COMBINATION OF:
CARTRIDGE REFERENCE OR LOGICAL UNIT, FILE TYPE,SECURITY CODE,
COMPLETE OR PARTIAL FILE NAME(WILD CARDS). ANY OR ALL OF
THE SELECTION CRITERIA CAN BE ALL.
THERE IS ALSO A 'BATCH' MODE THAT WILL LIST ALL FILES ON
ONE LOGICAL UNIT. THIS WOULD FIT VERY WELL WITH AN LU SAVE.
**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: SOURCE OF DSCAN (FTN4)
FILE# 3: SOURCE OF MSORT (ASMB)
FILE# 4: SOURCE OF .XWRD (ASMB)
FILE# 5: SOURCE OF MOPSY (ASMB)
FILE# 6: SOURCE OF NSCOM (ASMB)
FILE# 7: SOURCE OF MOVEW (ASMB)
FILE# 8: SOURCE OF LSHFT (ASMB)
FILE# 9: SOURCE OF DATE (ASMB)
**LOAD INSTRUCTIONS:
NORMAL COMPILE AND LOAD
**RUN INSTRUCTIONS:
RU,DSCAN,P1,P2,P3 WHERE
P1 = SELECTION INPUT DEVICE (TERMINAL) DEFAULT = 1
P2 = LIST DEVICE DEFAULT = SAME AS P1
P3 = BATCH MODE DISC LU IF NON-ZERO, ALL FILES HERE.
**INPUT/OUTPUT EXAMPLES:
NONE
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E18901
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: GRAND
**PROGRAM TITLE:
GRANDFATHER COPY PROGRAM IN 'DSKUP' FORMAT
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
CONVERSION DUMP FILES
MAGNETIC TAPE SAVE/RESTORE
**LANGUAGES:
FTN4
**COMPUTER TYPE:
2100
**OPERATING SYSTEMS:
RTE-II RTE-III RTE-IVA
**MEMORY REQUIREMENTS:
12K PARTITION WITH NO OTHER REQUIREMENTS.
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
This program allows any RTE Grandfather magnetic tape that was saved
with the off-line back-up utility 'DSKUP' to be copied directly onto
disc as is and then back out to magnetic tape. the maximum number of
tracks allowed is 1024. The program checks for the 'BR' operator
command and prints each record number as it is being copied.
**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: &GRAND - SOURCE.
**LOAD INSTRUCTIONS:
Run the LOADR as normal with no special requirements.
**RUN INSTRUCTIONS:
RU,GRAND WHERE
There are no parameters.
**INPUT/OUTPUT EXAMPLES:
:RU,GRAND
/GRAND: RTE GRANDFATHER COPY PROGRAM.
/GRAND: ENTER DESTINATION DISC LU
/GRAND: MOUNT GRANDFATHER MAG TAPE AND ENTER 'CR' WHEN READY.
/GRAND: BEGIN COPY MAG-TAPE TO PERIPHERAL DISC LU
/GRAND: COPY MAG-TAPE TO DISC COMPLETE. INPUT TAPE BEING REWOUND.
/GRAND: MOUNT OUTPUT MAG-TAPE & TYPE 'GO,GRAND' WHEN READY.
/GRAND: BEGIN COPY PERIPHERAL DISC LU TO MAG-TAPE.
/GRAND: COPY COMPLETE: END-OF-FILE WRITTEN.
/GRAND: DONE.
**PROGRAM DESCRIPTION:
See abstract for a complete description of the program.
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
/GRAND: OPERATOR BREAK AT RECORD#
**MISCELLANEOUS:
E19001
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: ENTRY
**PROGRAM TITLE:
SYSTEM ENTRY POINT LISTOR
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
CONVERSION DEBUG
**LANGUAGES:
FTN4 /.E
**COMPUTER TYPE:
2100
**OPERATING SYSTEMS:
RTE-IVB RTE-IVA RTE-II
**MEMORY REQUIREMENTS:
5K WORD PARTITION WITH NO SPECIAL CONSIDERATIONS.
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM SCANS THE SYSTEM DISC ENTRY POINT TABLE FOR A NAME AS
ENTERED BY THE USER AND THEN PROCEEDS TO LIST ALL ITS CHARACTERISTICS.
THE PRINTOUT INCLUDES THE ENTRY'S TYPE, DISC LOCATION IF A RELOCATABLE
MODULE, AND THE ACTUAL DISC LOCATION (TRACK,SECTOR,WORD) OF THE
FOUR-WORD ENTRY IN THE TABLE.
**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: &ENTRY - SOURCE.
**LOAD INSTRUCTIONS:
Run the LOADR as normal with no special considerations.
**RUN INSTRUCTIONS:
RU,ENTRY
**INPUT/OUTPUT EXAMPLES:
None. The output is self-explanatory.
**PROGRAM DESCRIPTION:
See the Abstract for a complete description of the program.
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
None.
**MISCELLANEOUS:
None.
E19101
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: KPARS
**PROGRAM TITLE:
PARSING SUBROUTINE FOR ASCII AND POSITIVE INTEGER INPUT STRINGS.
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
PARSE INTEGER ASCII
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-III RTE-IVA RTE-IVB
**MEMORY REQUIREMENTS:
273 WORDS MEMORY
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
KPARS IS A FUNCTION ROUTINE TO PARSE AN ASCII STRING AND INTO A BUFFER.
IT WORKS A LITTLE LIKE THE RTE PARSE ROUTINE EXCEPT IT IS NOT LIMITED
TO A NUMBER OF PARAMETERS AND THE BUFFER IS ONE WORD PER ENTRY INSTEAD
OF FOUR.
CONSIDER THE FOLLOWING INPUT STRING:
ADD,100,ABCDE,A,10
THE RESULTING PARSED BUFFER WOULD BE:
WORD CONTENTS
---- --------
1 AD
2 177634B
3 AB
4 40400B (A/NULL)
5 177766B (-10)
6... 0
INPUT STRINGS OF ANY LENGTH AND ANY NUMBER OF PARAMETERS CAN BE HANDLED
**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: &KPARS -- SOURCE FOR FUNCTION KPARS
**LOAD INSTRUCTIONS:
MAY BE MERGED IN USERS FORTRAN SOURCE CODE.
**RUN INSTRUCTIONS:
CALL THE FUNCTION WITH THE FOLLOWING FORM:
IF (KPARS(IBUF,ITLOG,IPBUF,IPLEN).LT.0) GO TO <ERROR LABEL>
WHERE IBUF IS ASCII INPUT BUFFER.
ITLOG IS LENGTH OF INPUT BUFFER IN CHARACTERS.
IPBUF IS OUTPUT BUFFER FOR PARSE ROUTINE.
IPLEN IS DIMENSION OF IPBUF (DEPENDING ON NUMBER OF PARAMETERS
IN APPLICATION)
**INPUT/OUTPUT EXAMPLES:
INPUT STRING: ADD,100,ABCDE,A
YIELDS: WORD CONTENT
---- -------
1 40504B (AD)
2 177643B (-100)
3 41102B (AB)
4 40400B (A/NULL)
5... 0
**PROGRAM DESCRIPTION:
PARSING IS DONE FOR INTEGERS AND ASCII IN THE INPUT STRING. ASCII
VALUES ARE RETURNED AS THE FIRST TWO ASCII CHARACTERS (BLANKS ARE
IGNORED IN THE INPUT STRING). IF ONE CHARACTER IS INPUT, IT IS OUTPUT
LEFT JUSTIFIED AND FOLLOWED BY A NULL. NULL ENTRIES ARE RETURNED AS
ZEROS. PARSING CONTINUES UNTIL THE INPUT STRING IS EXHAUSTED OR THE
BUFFER IS FILLED. NUMERIC CHARACTERS FOLLOWED BY ALPHABETICS ARE
ILLEGAL. ALPHABETICS FOLLOWED BY NUMERICS ARE PARSED AS ASCII.
ONLY POSITIVE INTEGERS ARE ALLOWED.
NUMERICS CAN BE RECOGNIZED AS NEGATIVE QUANTITIES AFTER PARSING.
COMMAS SERVE AS DELIMITERS.
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
A FUNCTION RETURN OF -1 RESULTS FROM ATTEMPT TO PARSE A NUMERIC
CHARACTER FOLLOWED BY AN ALPHABETIC.
**MISCELLANEOUS:
E19201
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: RDFIL
**PROGRAM TITLE:
INTERACTIVE FILE DISPLAY-INITIALIZE-MODIFY UTILITY
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 6
**KEYWORDS:
FILES DUMP LIST
MODIFY COPY
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
11K PARTITION
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
RDFIL IS AN INTERACTIVE FILE UTILITY WHICH IS USED TO 'LOOK' AT FILE
MANAGER FILES HAVING RECORD SIZES UP TO 1024 WORDS. FILES MAY BE LIST-
ED, DUMPED, COPIED IN PART, MODIFIED, OR INITIALIZED TO ZEROS.
THE COMMANDS ARE SIMULAR TO FILE MANAGER AND EDITR COMMANDS TO BE AS
'FRIENDLY' AS POSSIBLE.
ALL ACCESS IS DONE THROUGH FILE MANAGER 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: &RDFIL -- RDFIL SOURCE
**LOAD INSTRUCTIONS:
JUST LOAD IT (*RU,LOADR,,%RDFIL) UNLESS YOU ARE USING THE DS 1000
CAPABILITY.
IN THAT EVENT, USE A LOADER FILE:
FM,SS
RE,%RMTIO
RE,%RDFIL
SE
END
**RUN INSTRUCTIONS:
RU,RDFIL
-OR-
RW,RDFIL,P1,,P3
WHERE: P1 = INPUT LU
P3 = LOCAL DS/1000 NODE NUMBER IT RDFIL IS BEING RUN AT A
REMOTE NODE. (THE DS/1000 STUFF IS COMMENTED OUT IN
THE SOURCE AND MUST BE RESTORED BEFORE THIS OPTION CAN
BE USED).
**INPUT/OUTPUT EXAMPLES:
THE FOLLOWING IS AN EXAMPLE OF THE INTERACTIVE DIALOG:
:RU,RDFIL
FILE NAMR (,OPEN OPTION)? &RDFIL::14
YES? L5
0001 FTN4,L
0002 PROGRAM RDFIL (3,1000), 8-06-80
0003 C
0004 C THIS PROGRAM ALLOWS AN INTERACTIVE "LOOK" AT FMGR FILES.
0005 C IT IS INTENDED TO BE A 'SIMPLE' UTILITY TO EXAMINE FILES, PATC
YES? 1
RECORD 1
043124 047064 026114 * FTN4,L
YES? ??
(AND SEE WHAT YOU GET!!)
YES? /E
:
**PROGRAM DESCRIPTION:
THE NAMR OF THE FILE TO BE OPENED IS REQUESTED. AN OPEN OPTION MAY
BE SPECIFIED IF THE FILE IS TO BE OPENED OTHER THAN NON-UPDATE SHARED.
(FOR DETAILS ON THE OPEN OPTION PARAMETER, SEE DISCUSSION OF OPEN CALL
IN CHAPTER III OF RTE-IVB PROGRAMMERS REFERENCE MANUAL PART. 92068-
90004).
THE COMMANDS ARE AS FOLLOW IN RESPONSE TO THE PROMPT 'YES?':
RW REWIND THE FILE
PO,# OR # POSITION ABSOLUTE TO RECORD '#'. 11 GOES TO RECORD 11.
LL,# CHANGE LIST DEVICE.
DU,# DUMP '#' RECORDS FROM PRESENT POINTER IN BINARY FORMAT.
/E OR EX END.
OP OPEN ANOTHER FILE.
LI,# OR L# LIST '#' RECORDS FROM PRESENT POINTER IN SOURCE FORMAT.
CL,# SET '#' RECORDS FROM PRESENT POINTER TO ALL ZEROS.
IDCB DUMP CURRENT PROGRAM DCB TO LIST DEVICE.
MO BEGIN INTERACTIVE DIALOG TO MODIFY WORDS IN A FILE.
NR COUNT AND DISPLAY THE TOTAL NUMBER OF RECORDS IN A FILE.
MR BEGIN DIALOG TO MOVE SELECTED RECORDS TO A NEW FILE.
?? LIST COMMANDS.
NOTE: COMMAS ARE OPTIONAL: DU,10 IS SAME AS DU10.
THERE IS A PROVISION TO SCHEDULE RDFIL FROM A REMOTE TERMINAL IN THE
DS/1000 NETWORK. THE ADVANTAGES ARE THAT ONE MAY GET BINARY DUMPS
OF FILES FROM A REMOTE NODE (NOT YET AVAILABLE IN REMAT). THIS CODE
HAS BEEN COMMENTED OUT SO THAT IT WILL LOAD ONTO NON-DS SYSTEMS.
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
FILE MANAGER ERRORS ARE REPORTED BY NUMBER.
HUH?? IS THE RESPONSE TO AN UNRECOGNIZED COMMAND.
**MISCELLANEOUS:
THE MAXIMUM RECORD LENGTH OF 1024 WORDS CAN EASILY BE MODIFIED BY
CHANGING ALL OCCURRENCES OF '1024' TO WHAT EVER YOU WANT.
CORRUPT FILES CAN BE CORRECTED OR FILES TRUNCATED BY USING AN OPEN
PARAMETER WITH BIT 2 SET (THE FORCE TYPE 1 OPEN BIT).
IF THE DS/1000 CAPABILITY IS USED (AND THE COMMENTED OUT PART OF THE
SOURCE IS RESTORED) THE USER MUST WORK WITHIN THE TIMEOUT LIMITATIONS
OF THE DS/1000 NETWORK.
E19301
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: SPOOL
**PROGRAM TITLE:
NON-HEWLETT PACKARD SPOOLING REFORMATTING AND OUTPUT PACKAGE.
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 3
**KEYWORDS:
SPOOLING FORMATTING REPORTS
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
10K PARTITION.
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM WAS DEVELOPED TO OUTSPOOL FILES CONTAINING STANDARD ASCII
LINEPRINTER FORMATTED OUTPUT. THESE FILES MAY HAVE ORIGINATED FROM
SPECIAL PROGRAMS WHICH WRITE ASCII TO DISC OR MAY BE 'HP SPOOLING OUTPUT
FILES'. THE PROGRAM FEATURES MULTIPLE COPY OUTPUT OF DESIGNATED PARTS
OF THE OUTPUT FILE OR FILES, SEQUENTIAL OUTPUT OF FILES, AND REFORMAT-
ING OF FILES FOR OUTPUT TO PRINTERS RECOGNIZING 'FORM FEED' RATHER THAN
TOP-OF-FORM.
**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: &SPOOL -- SOURCE FILE
**LOAD INSTRUCTIONS:
:RU,LOADR,,%SPOOL
**RUN INSTRUCTIONS:
RU,SPOOL,P1,P2,P3,P4
WHERE P1 = INPUT LU
P2 = OUTPUT LU (DEFAULT = 6)
P3 = HOLD/PURGE FILE AFTER SPOOL (DEFAULT = PURGE, IF =1 HOLD)
P4 = NAME OF FIRST FILE (INTERACTIVE IF NOT SUPPLIED)
**INPUT/OUTPUT EXAMPLES:
RU,SPOOL
SPOOL FILE NAME? (BEGINS WITH ") "A0001
(SPOOL OF "A0001, "A0002, ... IS SENT TO PRINTER AND
EACH IS PURGED AS PRINTED)
/END SPOOL OF "A0001 THRU "A0005
**PROGRAM DESCRIPTION:
SPOOL OUTSPOOLS LINEPRINTER FORMATTED DISC FILES TO SPECIFIED OUTPUT
DEVICES. THE FEATURES ARE:
1) SPOOLING NEED NOT BE GEN'ED IN TO THE SYSTEM.
2) SEQUENTIAL FILES ARE DUMPED AUTOMATICALLY ("AAAAA, "AAAAB, ETC)
3) FILES MAY BE AUTOMATICALLY PURGED.
4) IF THE OUTPUT DEVICE IS NOT LU 6, THE OUTPUT IS REFORMATTED
FOR FORM FEEDS, ETC FOR 2635S, DECWRITERS, ETC.
5) MULTI-COPIES ARE OUTPUT BETWEEN THE RECORDS--
! !## (WHERE ## IS THE NUMBER OF COPIES)
-AND-
! ! (STOP MULTI-COPY) NOTE: THIS HOLDS TRUE ACROSS ANY
NUMBER OF FILES.
6) THE PROGRAM MAY BE SCHEDULED BY THE REPORT GENERATION PROGRAM
AND OPTIONS PASSED BY RUN STRING.
NOTE: THE FILES MUST FOLLOW A NAMING CONVENTION:
THEY MUST HAVE 5 CHARACTER NAMES STARTING WITH ".
HP SPOOL OUTPUT FORMAT FILES ARE IDENTIFIED TO THE PROGRAM AS
A 5 CHARACTER NAME STARTING WITH "" (E.G., ""AAA).
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
ERRORS ARE RATHER EXPLICIT.
**MISCELLANEOUS:
A FILE NAMED '"X"X"X' IS CREATED IF REFORMATTING IS NECESSARY AND
PURGED AT THE END OF THE PROGRAM.
PRINTER CONTROL CHARACTERS HANDLED ARE:
1H1 TOP OF FORM
1H* OVERWRITE
1H0 DOUBLE SPACE
OTHERS RESULT IN THE MESSAGE--SPOOL: BAD FIRST CHRAC. IN REFRM BUFFER
E19401
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: PAGE
**PROGRAM TITLE:
PAGING THROUGH THE DISC FILE
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
SEARCH FILES SPOOLING
TEXT
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
8K
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THE PROGRAM PAGE WAS WRITTEN TO PAGE THROUGH THE DISC FILE JUST LIKE
PAGING THROUGH THE PRINTER OUTPUT.
USER CAN SET THE NUMBER OF LINES PER PAGE AS WELL AS PAUSE TIME BETWEEN
TWO PAGES IN CENTISECONDS. USER CAN LIST THE PORTION OF FILE ON PRINTER
AS WELL AS DISPLAYING ON CRT. THIS ALLOWS USER TO PRINT ONLY WHAT IS
NEEDED. USER ALSO HAS A CHOICE TO SPOOL ENTIRE FILE. THE LISTING DOES
NOT CONTAIN THE LINE NUMBERS IN THE FRONT OF LINE. PAGE ALSO ALLOWS USER
TO SEARCH ASCII STRING FORWARD OR BACKWARD. IT ALSO ALLOWS USER TO SKIP
LINE(S) FORWARD OR BACKWARD.
**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: &PAGE,SOURCE FILE
**LOAD INSTRUCTIONS:
NONE
**RUN INSTRUCTIONS:
RU,PAGE,NAMR WHERE
NAMR = FILE NAME TO PAGE THROUGH
**INPUT/OUTPUT EXAMPLES:
SPECIAL CALLS MADE IN THE PAGE PROGRAM ARE:
CALL EXEC 1,2,3,12,14,23
CALL ABREG
CALL SPOPN
CALL RMPAR
CALL LURQ
CALL CODE
NAMR FUNCTION
JSCOM FUNCTION
IFBRK FUNCTION
**PROGRAM DESCRIPTION:
DESCRIPTION OF THE PAGE PROGRAM
Soli Khericha and Glen Mortensen
April 18, 1980
The PAGE program will page through a file on the disc in much the
same way that a user might go through a listing. To run the program
PAGE enter the command RU,PAGE,NAMR where NAMR is file name,
security code and logical unit number (It is not neccessary to enter
security code and logical unit number). The first input request
that PAGE will make of the user is for the file name to be paged, if
the file name was not given. Enter the file name with or without
the colons and numbers to delimit the security code and logical unit
number, ie, FILENM:SC:88 or just FILENM if there is only one file
having the name FILENM. Normally just the name will have to be
entered. If PAGE cannot find the file or if the file is still open
to another program, eg, the spooling program, SMP, then PAGE will
inform the user of that fact and will abort. Once the file is open,
the prompt "@" will appear on the CRT. After the return key is hit,
the program will be "paged" on the CRT screen one page at a time
with a pause in between each page to allow the user to interrupt the
"paging". If the user enters, BR after interrupting the CRT, the
user can then enter other commands to tell the program what to do
next.
A "page" is essentially a section out of the file delimited by the
starting and ending line numbers and the starting and ending column
numbers for each line. The defaults for the number of lines on a
page and the starting and ending column numbers are given below in
the commands for the P, W and C commands. In addition, the pause
time between "pages" can be changed by using the T command.
PAGE will also allow the user to search for a character string in
the file by use of the F and B commands. The F command searches
forward and the B command searches backward in the file. The search
strings for the backward and forward searches are remembered from
one command to the next command, so if the first string that is
found is not the one desired, the user can enter another B or F
command and the program will search for the next occurrence of the
search string. This memory applies to the forward and backward skip
commands also, in that if a command is given to skip forward 20
lines by entering the command /20, and the user wants to skip
another 20 lines forward, all that need be entered is the / command
again. If the user wanted instead to skip backward to the original
line, all that would need to be entered would be the \ command, and
the file would go back 20 lines and display the orginal line.
When the list command, L, is entered, the listing is given both on
the CRT and the line printer. The listing on the CRT is between the
column numbers given by the W and C commands, whereas the listing on
the printer is the full record length. This allows the user to see
what is printed and interrupt it when sufficient lines have been
printed. The K command, "Karriage" control, is useful for listing
local files on the line printer, since these files normally do not
have a carriage control character in the first column of each line.
Files brought back using UTERM from remote sites and directed to
"LP", line printer, will have a carriage control character in the
first column. Files brought back using UTERM and directed to "T1",
tape drive, will not have a carriage control character in the first
column. The spool command, S, will set up a spool file from the
beginning of the file and will exit from the PAGE program, so the
user will get the entire file printed on the line printer. The file
will not be "paged" on the CRT.
The prompt for the program PAGE is "@". The commands consist of
one ASCII character or an integer. Some of the the ASCII commands
can be followed by a number and some of the commands can be followed
by an ASCII character string. After a command is entered and the
command executed, the program PAGE will either return the prompt
with one line of the file displayed or it will return the prompt by
itself and ask for more input. If a blank and carriage return or
just a carriage return is entered after the prompt, the program will
start "paging" through the file.
The commands are as follows:
A = Abort, close the file
Ba = Backward search for string "a"
default for "a" = "blank"
Cn = Column n is last column displayed on CRT
default for n = 80
E = Exit, close file
Fa = Forward search for string "a"
Kn = "Karriage" control
n=1 single spacing on line printer
n=2 uses column 1 character for carriage control
default is n=2
default for "a" = "blank"
Ln = List on printer n (n=logical unit #)
also lists file on CRT
default for n = 19
N = Number of current line in file
Pn = Page size is set to n lines
default for n = 20
Sn = Spool to printer n (n=logical unit #)
default for n = 19
Tn = Time of end of page pause = n cs
default for n = 200 cs
Wn = Window starting column for CRT display
default for n = 1
bl = blank (CR) continue paging the file
also just (CR) will work
/n = Skip forward n lines
default for n = 1
+n = same as /n
\n = Skip backward n lines
default for n = 1
^n = same as \n
n = go to line n
? = list all commands and their default values
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E19501
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: TAPE
**PROGRAM TITLE:
PAGING THROUGH THE FILE ON MAGNETIC TAPE
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
SEARCH MAGNETIC TAPE SPOOLING
TEXT
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
8K
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
THE PROGRAM TAPE WAS WRITTEN TO PAGE THROUGH RECORDS ON TAPE (RECORD
LENGTH LESS THAN OR EQUAL TO 128 WORDS) FILE JUST LIKE
PAGING THROUGH THE PRINTER OUTPUT.
USER CAN SET THE NUMBER OF LINES PER PAGE AS WELL AS PAUSE TIME BETWEEN
TWO PAGES CENTISECONDS. USER CAN LIST THE PORTION OF FILE ON PRINTER
AS WELL AS DIPLAYING ON CRT. THIS ALLOWS USER TO PRINT ONLY WHAT IS
NEEDED. USER ALSO HAS A CHOICE TO SPOOL ENTIRE FILE. THE LISTING DOES
NOT CONTAIN THE LINE NUMBERS IN THE FRONT OF LINE. IT ALSO ALLOWS USER
TO SEARCH ASCII STRING FORWARD OR BACKWARD. IT ALSO ALLOWS USER TO SKIP
LINE(S) AS WELL AS FILE(S) FORWARD OR BACKWARD.
**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: &TAPE,SOURCE FILE
**LOAD INSTRUCTIONS:
NONE
**RUN INSTRUCTIONS:
RU,TAPE
**INPUT/OUTPUT EXAMPLES:
SYSTEM CALLS IN TAPE PROGRAM ARE:
CALL EXEC 1,2,3,12,23
CALL LURQ
CALL CODE
JSCOM FUNCTION
IFBRK FUNCTION
**PROGRAM DESCRIPTION:
DESCRIPTION OF THE TAPE PROGRAM
Soli Khericha and Glen Mortensen
April 18, 1980
The TAPE program will page through a file on the tape(1600 BPI,
maximum record length 128 words) in much the same way that a user
might go through a listing. To run the program TAPE enter the
command RU,TAPE The prompt "@" will appear on the CRT. After the
return key is hit, the program will be "paged" on the CRT screen one
page at a time with a pause in between each page to allow the user
to interrupt the "paging". If the user enters, BR after
interrupting the CRT, the user can then enter other commands to tell
the program what to do next.
A "page" is essentially a section out of the file delimited by the
starting and ending line numbers and the starting and ending column
numbers for each line. The defaults for the number of lines on a
page and the starting and ending column numbers are given below in
the commands for the P, W and C commands. In addition, the pause
time between "pages" can be changed by using the T command.
TAPE will also allow the user to search for a character string in
the file by use of the F and B commands. The F command searches
forward and the B command searches backward in the file. The search
strings for the backward and forward searches are remembered from
one command to the next command, so if the first string that is
found is not the one desired, the user can enter another B or F
command and the program will search for the next occurrence of the
search string. This memory applies to the forward and backward skip
commands also, in that if a command is given to skip forward 20
lines by entering the command /20, and the user wants to skip
another 20 lines forward, all that need be entered is the / command
again. If the user wanted instead to skip backward to the original
line, all that would need to be entered would be the \ command, and
the file would go back 20 lines and display the orginal line. TAPE
will also allow the user to skip the files forward and backward in
the same manner by using the command Y and Z respectively.
When the list command, L, is entered, the listing is given both on
the CRT and the line printer. The listing on the CRT is between the
column numbers given by the W and C commands, whereas the listing on
the printer is the full record length. This allows the user to see
what is printed and interrupt it when sufficient lines have been
printed. The K command, "Karriage" control, is useful for listing
local files on the line printer, since these files normally do not
have a carriage control character in the first column of each line.
he spool command, S, will set up a spool file from the beginning of
the file and will exit from the TAPE program, so the user will get
the entire file printed on the line printer. The file will not
be "paged" on the CRT.
The prompt for the program TAPE is "@". The commands consist of
one ASCII character or an integer. Some of the the ASCII commands
can be followed by a number and some of the commands can be followed
by an ASCII character string. After a command is entered and the
command executed, the program TAPE will either return the prompt
with one line of the file displayed or it will return the prompt by
itself and ask for more input. If a blank and carriage return or
just a carriage return is entered after the prompt, the program will
start "paging" through the file.
The commands are as follows:
A = Abort, close the file
Ba = Backward search for string "a"
default for "a" = "blank"
Cn = Column n is last column displayed on CRT
default for n = 80
E = Exit, close file
Fa = Forward search for string "a"
Kn = "Karriage" control
n=1 single spacing on line printer
n=2 uses column 1 character for carriage control
default is n=2
default for "a" = "blank"
Ln = List on printer n (n=logical unit #)
also lists file on CRT
default for n = 19
N = Number of current line in file
Pn = Page size is set to n lines
default for n = 20
Sn = Spool to printer n (n=logical unit #)
default for n = 19
Tn = Time of end of page pause = n cs
default for n = 50 cs
Wn = Window starting column for CRT display
default for n = 1
bl = blank (CR) continue paging the file
also just (CR) will work
/n = Skip forward n lines
default for n = 1
+n = same as /n
\n = Skip backward n lines
default for n = 1
^n = same as \n
n = go to line n
Yn = Skip forward n files
Zn = Skip backward n files
? = list all commands and their default values
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E19601
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: CLEXT
**PROGRAM TITLE:
CLEAR A DISC LU OF EXTENTS
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 4
**KEYWORDS:
DIRECTORY DISC FILES
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
12K
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THE PROGRAM CLEXT IS USED TO REMOVE THE EXTENTS FROM ALL FILES ON A
GIVEN DISC LU. THE PROGRAM CLEXT WAS WRITTEN BY ALAN K. HOUSLEY
OF THE HP DATA SYSTEMS DIVISION AND WAS PUBLISHED IN VOLUME III
NUMBER 1 OF THE HP "COMMUNICATOR". MODIFICATIONS HAVE BEEN MADE
TO THE CLEXT PROGRAM PRESENTED IN THE "COMMUNICATOR" SO THAT THE
THE PROGRAM WILL RUN ON AN HP-1000 COMPUTER OPERATING UNDER RTE-IVB.
**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: &CLEXT -- SOURCE FILE
**LOAD INSTRUCTIONS:
NONE
**RUN INSTRUCTIONS:
RU,CLEXT
DISC LU?
**INPUT/OUTPUT EXAMPLES:
NONE
**PROGRAM DESCRIPTION:
NONE
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
NONE
**MISCELLANEOUS:
CLEXT MAY HAVE TO BE RUN MORE THAN ONCE TO CLEAR ALL EXTENTS.
E19701
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: DALIB
**PROGRAM TITLE:
DATA MANIPULATION LIBRARY
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
LIBRARY STRINGS MOVE
SEARCH COMPARE
**LANGUAGES:
ASMB FTN4 RAT4
**COMPUTER TYPE:
M-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
TEST PROGRAM (ALL ROUTINES AND FORMATTER) REQUIRES 8K WORDS.
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
DALIB IS A LIBRARY OF DATA MANIPULATION ROUTINES. IT INCLUDES
SUBPROGRAMS FOR MOVING, SEARCHING, AND COMPARING BYTES, WORDS,
AND DOUBLE WORDS IN A NUMBER OF DIFFERENT WAYS. MANY OF THE
ROUTINES HAVE BEEN OPTIMIZED USING THE 21MX EXTENDED INSTRUCTIONS.
SEVERAL ARE MORE CONCERNED WITH PROVIDING NEATLY PACKAGED UTILITIES
THAN WITH EFFICIENCY. THE INDEX REGISTERS, BYTE, BIT, AND WORD
PROCESSING INSTRUCTIONS ARE USED FREELY, AS IS THE EAU INSTRUCTION
SET. SOME ROUTINES USE RTE RELOCATABLE LIBRARY AND DECIMAL STRING
ARITHMETIC LIBRARY ROUTINES; OTHERS CALL OTHER DALIB ROUTINES. SOME
EARLY SYSTEMS MAY NOT HAVE THESE FACILITIES.
EXTENDED DOCUMENTATION FOR EACH OF THE SUBPROGRAMS IS CONTAINED IN
THE "DALIB FILE. THIS FILE MAY BE DUMPED (:DU,"DALIB,LU) TO EITHER
A LINE PRINTER OR A PRINTING TERMINAL. SIMILAR DOCUMENTATION IS
INCLUDED AS A HEADER TO EACH SOURCE FILE.
SEVERAL OF THE SUBPROGRAMS IN THIS LIBRARY WERE DESIGNED TO BE
FUNCTIONAL SUBSTITUTES FOR SOME OF THE RHB ROUTINES, WRITTEN BY
THE COMPUTER CENTER BRANCH, DIVISION OF COMPUTER RESEARCH AND
TECHNOLOGY, NATIONAL INSTITUTES OF HEALTH, BETHESDA, MARYLAND,
FOR THE IBM SYSTEM/370. THESE ROUTINES CAN BE RECOGNIZED BY
THE NAMES STARTING WITH RHB, IRB, OR JRB. A FEW OF THE ROUTINES
THAT WERE WRITTEN AT THE UTAH BIOMEDICAL TEST LABORATORY (UNIVERSITY
OF UTAH RESEARCH INSTITUTE) WERE ASSOCIATED WITH PROJECTS SPONSORED
BY THE UNITED STATES DEPARTMENT OF HEALTH, EDUCATION, AND WELFARE.
**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: "DALIB - DOCUMENTATION
FILE# 3: &DALIB - DUMMY HEADER SOURCE (ASMB)
FILE# 4: &RHB01 - BYTE MOVE SUBROUTINE SOURCE (ASMB)
FILE# 5: &RHB02 - WORD MOVE SUBROUTINE SOURCE (ASMB)
FILE# 6: &RHB03 - WORD MOVE TO DELIMITER SOURCE (ASMB)
FILE# 7: &IRB04 - CHARACTER SELECT FUNCTION SOURCE (ASMB)
FILE# 8: &JRB04 - CHARACTER SELECT FUNCTION SOURCE (ASMB)
FILE# 9: &RHB05 - MOVE REAL ARRAY TO LIST SOURCE (ASMB)
FILE# 10: &IRB05 - MOVE WORDS FROM ARRAY TO LIST SOURCE (AS)
FILE# 11: &RHB06 - MOVE REAL LIST TO ARRAY SOURCE (ASMB)
FILE# 12: &IRB06 - MOVE WORD LIST TO ARRAY SOURCE (ASMB)
FILE# 13: &RHB07 - MOVE REAL CONSTANT TO LIST SOURCE (ASMB)
FILE# 14: &IRB07 - MOVE WORD CONSTANT TO LIST SOURCE (ASMB)
FILE# 15: &IRB08 - CHARACTER TO INTEGER FUNCTION SOURCE (AS)
FILE# 16: &RHB09 - PUT CHARACTER INTO ARRAY SOURCE (ASMB)
FILE# 17: &IRB10 - WORD COMPARE FUNCTION SOURCE (ASMB)
FILE# 18: &RHB12 - REAL CONSTANT TO ARRAY SOURCE (ASMB)
FILE# 19: &IRB12 - WORD CONSTANT TO ARRAY SOURCE (ASMB)
FILE# 20: &IRB16 - ROTATE AND MASK FUNCTION SOURCE (ASMB)
FILE# 21: &RHB20 - ALPHA PACK (A1-A2) SOURCE (ASMB)
FILE# 22: &JRB20 - ALPHA PACK (R1-A2) SOURCE (ASMB)
FILE# 23: &RHB21 - ALPHA UNPACK (A2-A1) SOURCE (ASMB)
FILE# 24: &JRB21 - ALPHA UNPACK (A2-R1) SOURCE (ASMB)
FILE# 25: &RHB26 - BYTE MOVE TO DELIMITER SOURCE (FTN4)
FILE# 26: &CTYPE - CHARACTER TYPE FUNCTION SOURCE (RAT4)
FILE# 27: &GETOK - GET LEXICAL TOKEN SOURCE (RAT4)
FILE# 28: &ISRCH - STRING SEARCH SOURCE (ASMB)
FILE# 29: &ITOD - INTEGER TO DECIMAL SOURCE (FTN4)
FILE# 30: &JDTOI - DECIMAL TO INTEGER FUNCTION SOURCE (FTN4)
FILE# 31: &KSCOM - BYTE COMPARE FUNCTION SOURCE (ASMB)
FILE# 32: &SCAN - STRING PARSE SOURCE (FTN4)
FILE# 33: &SKPBL - SKIP BLANKS SOURCE (RAT4)
FILE# 34: &STFIL - STRING FILL SOURCE (ASMB)
FILE# 35: &STREQ - BYTE COMPARE FUNCTION SOURCE (ASMB)
FILE# 36: &STRLC - FIND END OF STRING SOURCE (FTN4)
FILE# 37: &TTT - TEST PROGRAM SOURCE (FTN4)
FILE# 38: %DALIB - MERGED RELOCATABLES
FILE# 39: #DALIB - MERGE COMMAND FILE
**LOAD INSTRUCTIONS:
THE RELOCATABLE FILE %DALIB MAY BE SEARCHED AS A LIBRARY.
**RUN INSTRUCTIONS:
THE TEST PROGRAM, TTT, SHOULD BE COMPILED, LOADED, AND RUN TO CHECK
THE LIBRARY. USE STANDARD TECHNIQUES. THE PROGRAM REQUIRES ABOUT
8K, AND IT USES THE FORTRAN FORMATTER. TO RUN:
:RU,TTT,LIST
WHERE LIST IS THE LIST LU TO BE USED (DEFAULTS TO 1 FOR INTERACTIVE,
6 FOR BATCH).
THE TEST PROGRAM DOES A SUPERFICIAL TEST OF EACH PROGRAM IN THE LIBRARY.
PRINTOUT FROM IT RUNS ABOUT 4 PAGES. IT WILL NOT DETECT ALL POSSIBLE
ERRORS, BUT IT WILL INDICATE GROSS MALFUNCTIONS.
**INPUT/OUTPUT EXAMPLES:
NO SPECIAL CONSIDERATIONS. SOME COMMENTS AND TESTS USE LOWER CASE.
**PROGRAM DESCRIPTION:
SEE DOCUMENTATION IN FILE "DALIB (SECOND ENTRY IN CONTRIBUTION).
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
NONE.
**MISCELLANEOUS:
ROUTINES WRITTEN IN RAT4 ARE TRANSLATED USING THE RATFOR
PRECOMPILER IN THE PLUS/1000 LIBRARY (FILE E13601). THEY
DO NOT USE THE RF77 MACROS.
THE PROGRAMS WRITTEN IN FTN4 AND RAT4 WERE COMPILED WITH
THE FTN4 COMPILER (HP92060-16092). THEY HAVE NOT BEEN
TESTED WITH FTN4X, FORTRAN 77, OR OTHER COMPILERS.
E19801
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: DVC00
**PROGRAM TITLE:
DVC00 - AN RTE DRIVER FOR THE 12966 CARD WRITTEN IN C.
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 2
**KEYWORDS:
DRIVER C HIGH LEVEL
SYSTEMS
**LANGUAGES:
C
**COMPUTER TYPE:
F-SERIES
**OPERATING SYSTEMS:
RTE-IVB RTE-IVA
**MEMORY REQUIREMENTS:
984 BYTES
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
DVC00 is a standard RTE driver for the 12966A BACI interface card.
This driver communicates with terminal type devices. The interesting
feature about this driver is that it is written in C. The purpose of
this driver is to demonstrate the feasibility of writing systems
level programs in a high level language such as C. This is a driver
which should be easily modifiable and easy to understand unlike
most drivers written in assembler.
**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: &DVC00 -- source listing for the driver
FILE# 3: !DVC00 -- include file used by the driver
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E19901
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: 26XX
**PROGRAM TITLE:
HP 26XX TERMINAL UTILITY LIBRARY
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
TERMINAL UTILITIES LIBRARY
DISPLAY GRAPHIC
**LANGUAGES:
FTN4
**COMPUTER TYPE:
M-SERIES
**OPERATING SYSTEMS:
RTE-III RTE-IVA RTE-IVB
**MEMORY REQUIREMENTS:
DEPENDS ON SUBROUTINES REFERENCED.
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
26XX IS A LIBRARY OF FORTRAN CALLABLE SUBROUTINES WHICH PROVIDE A
SOFTWARE INTERFACE TO THE SPECIAL FEATURES OF THE HP 26XX FAMILY OF
TERMINALS. DOCUMENTATION IS PROVIDED WITHIN THE INDIVIDUAL SUBROUTINES.
A TABLE OF CONTENTS LISTING ALL THE SUBROUTINES IS INCLUDED AT THE
BEGINNING OF THE 26XX LIBRARY. LIBRARY USERS MUST CHECK THEIR HP 26XX
TERMINAL REFERENCE MANUAL FOR APPLICABLE SUBROUTINES.
**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: &26XX -- HP 26XX TERMINAL UTILITY LIBRARY (SOURCE)
**LOAD INSTRUCTIONS:
N/A (LIBRARY)
**RUN INSTRUCTIONS:
N/A (LIBRARY)
**INPUT/OUTPUT EXAMPLES:
SEE LIBRARY SUBROUTINE 'DEMO1'.
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
N/A
**MISCELLANEOUS:
A) STORE THE LIBRARY SOURCE UNDER THE FOLLOWING 'NAMR':
&26XX::CR
B) COMPILE THE LIBRARY SOURCE IN THE FOLLOWING MANNER:
RU,FTN4,&26XX::CR,6,-,49
C) TO LOAD ANY LIBRARY SUBROUTINE UNDER RTE-IV:
:SEA,%26XX::CR
E20101
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: TPLST
**PROGRAM TITLE:
FMP FILE TO PRINT IMAGE TAPE CONVERSION UTILITY
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 3
**KEYWORDS:
MAGNETIC TAPE CONVERSION FILES
**LANGUAGES:
ASMB
**COMPUTER TYPE:
F-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
6K PARTITION
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM CREATES FIXED BLOCK ASA FORMAT PRINTER TAPES FROM TYPE
3 OR 4 FMP FILES. THE MAIN USE OF THIS PROGRAM IS IN BUILDING PRINTER
TAPES FROM COMPILER LIST FILES FOR USE WITH COMPUTER OUTPUT MICROFILMERS
(C.O.M.), NON-IMPACT PRINTERS (N.I.P.) AND OTHER OFF-LINE DEVICES.
TPLST ACCEPTS AS INPUT, TYPE 4 COMPILER LIST FILES OR TYPE 3 PRINT
FILES CONTAINING ASA PRINTER CONTROL CODE PREFACED ASCII RECORDS.
MAGNETIC TAPES ARE CREATED WITH TEN ASA CONTROL CODE PREFACED, 133 BYTE
ASCII RECORDS PER TAPE BLOCK. THE EOF MARKER FROM THE FMP FILE MAY BE
OPTIONALLY TRANSFERED TO TAPE. END OF DATA IS MARKED BY TWO CONSECUTIVE
TAPE MARKS.
**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: &TPLST -- SOURCE FILE
FILE# 3: %TPLST -- RELOCATABLE BINARY FILE
FILE# 4: *TPLST -- LOADER FILE
**LOAD INSTRUCTIONS:
PROGRAM COMPLETES SAVING RESOURCE - USE DON'T COPY FORMAT: FM,DC
**RUN INSTRUCTIONS:
RU,TPLST,//S(,LU) TO START TAPE - //S = START CONTROL, LU = MAG TAPE LU
RU,TPLST,NAMR(,M) TO WRITE FILE - NAMR= FILE NAMR, M = MARK TAPE AT EOF
RU,TPLST,//E TO END TAPE - //E = END CONTROL
**INPUT/OUTPUT EXAMPLES:
RU,TPLST,//S <-START TAPE ON LU 8. (LU 8 = DEFAULT TAPE LU)
RU,TPLST,//S,9 <-START TAPE ON LU 9.
RU,TPLST,'TPLST:-20:35 <-WRITE FILE 'TPLST TO TAPE.
RU,TPLST,"TPLST,M <-WRITE FILE "TPLST TO TAPE AND MARK TAPE AT EOF.
RU,TPLST,//E <-END TAPE.
**PROGRAM DESCRIPTION:
TPLST CREATES TAPES FOR USE WITH SUCH OFF-LINE ALPHA NUMERIC PRINTING
DEVICES AS COMPUTER OUTPUT MICROFILMERS (C.O.M.) AND NON-IMPACT PRINTERS
(N.I.P.). TAPES CREATED BY THIS UTILITY HAVE BEEN USED WITH THE KODAK
KOM-80/90 MTRS MICROFILMER SYSTEMS, THE HONEYWELL PAGE PRINTING SYSTEM
AND THE XEROX 9700 NON-IMPACT (LASER) PRINTING SYSTEM. ALTHOUGH NOT
TRIED, THE TAPE FORMAT GENERATED BY TPLST SHOULD BE COMPATIBLE WITH THE
KODAK KOMSTAR 300, 3M BETA, BELL & HOWELL, QUANTOR, CAL-COMP AND
DATA GRAPHICS C.O.M. SYSTEMS.
TPLST ACCEPTS INPUT FROM EITHER TYPE 3 OR TYPE 4 FMP FILES.
TYPE 3 FILES CONTAIN ASCII RECORDS UP TO 132 CHARACTERS IN LENGTH EACH
PREFACED WITH A ONE CHARACTER ASA PRINTER CONTROL CODE.
ASCII - ASA PRINTER CONTROL CODE SET
CHAR OCTAL PRINTER ACTION
+ 53 SPACE NO LINES AND PRINT (OVERPRINT)
(SPACE) 40 SPACE ONE LINE AND PRINT
0 60 SPACE TWO LINES AND PRINT
- 55 SPACE THREE LINES AND PRINT
1 61 SKIP TO HEAD OF FORM (PAGE EJECT) AND PRINT
2-9 62-71 SKIP TO CHANNELS TWO THRU NINE AND PRINT
TPLST FIXES THE LENGTH OF TYPE 3 FILE RECORDS AT 133 CHARACTERS AND
WRITES THE RECORDS TO TAPE IN GROUPS OF 10 RECORDS PER TAPE BLOCK,
PADDING THE LAST BLOCK WITH BLANK RECORDS AS REQUIRED TO MAINTAIN A
1330 BYTE TAPE BLOCK SIZE.
TYPE 4 FILES CONTAIN COMPILER LIST FILE FORMAT RECORDS WHICH, UNLIKE THE
TYPE 3 FILE RECORDS, CONTAIN NO PRINTER CONTROL CODES. A TWO CHARACTER
RECORD CONTAINING A ONE/SPACE MARKS PAGE BOUNDRIES ON COMPILER LIST
FILES. TPLST PREFACES THE RECORDS FROM TYPE 4 FILES WITH EITHER AN
ASCII SPACE OR AN ASCII ONE, FIXES THE LENGTH OF THE RECORDS AT 133
CHARACTERS AND WRITES THE RECORDS TO TAPE IN GROUPS OF 10 RECORDS PER
TAPE BLOCK.
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
1P GLOBAL RETURNS OPERATION COMPLETION CODE, 1=OK, -1=ERROR.
**MISCELLANEOUS:
PROGRAM PROVIDES SUMMARY OF FILE CONVERSIONS AT END OF TAPE.
E20201
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: STCAS
**PROGRAM TITLE:
UPDATING PROGRAMS FROM HP-DISTRIBUTED CASSETTES
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 3
**KEYWORDS:
CASSETTE STORAGE UPDATING
**LANGUAGES:
FTN4
**COMPUTER TYPE:
2100
**OPERATING SYSTEMS:
RTE-II RTE-III RTE-IV
**MEMORY REQUIREMENTS:
6 PAGES WHEN LOADED
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
'STCAS' READS THE FIRST FILE OF AN HP-DISTRIBUTED CASSETTE. THIS FILE
CONTAINS THE NAMES OF ALL OF THE BINARY RELOCATABLE ROUTINES CONTAINED
ON THAT CASSETTE. IT THEN CREATES A TRANSFER FILE, WHICH WILL PURGE THE
OLD VERSION AND STORE THE NEW VERSION OF THE FILE. IT WILL DO THIS
PROCESS FOR ALL OF THE FILES ON THE CASSETTE, FOR ONE OR TWO CASSETTES
AT A TIME, FOR AS MANY TIMES AS THE USER NEEDS.
THE SPECIAL SYSTEM SOFTWARE IS THE EXEC AND FMP CALLS.
THE SPECIAL SYSTEM HARDWARE IS THAT THE TERMINAL MUST BE AN HP 264X
TERMINAL.
**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: SOURCE OF STCAS
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
THE PROGRAM MUST BE RUN IN RTE AND NOT IN FMGR. THE TRANSFER FILE THAT
'STCAS' GENERATES IS SCHEDULED TO BE RUN IN FMGR. THEREFORE, FMGR
CANNOT ALREADY BE RUNNING. TO RUN THE PROGRAM, THE USER ENTERS
RU,STCAS
WHEN PROMPTED BY THE RTE PROMPT SYMBOL.
**INPUT/OUTPUT EXAMPLES:
THE PROGRAM FIRST INSTRUCTS THE USER ON THE PROCEDURE TO BE FOLLOWED
FOR PLACING THE CASSETTES IN THE APPROPRIATE DRIVES. AFTER THIS HAS
BEEN DONE, THE USER THEN ANSWERS THE FOLLOWING QUESTION REGARDING THE
NUMBER OF CASSETTES HE HAS PLACED IN THE DRIVES:
HOW MANY CASSETTES TO BE READ IN -- 1 OR 2?
THEN, A LISTING OF THE FILES BEING PROCESSED IS GIVEN:
NAME OF FILE BEING PROCESSED IS: PRGRM1
:
:
:
NAME OF FILE BEING PROCESSED IS: PRGRMN
NEXT, THE PROGRAM EXECUTES THE TRANSFER FILE, WITH THE FOLLOWING BEING
DISPLAYED:
:SV,4
:EX
$END FMGR
THE USER IS THEN ASKED WHETHER OR NOT THERE ARE MORE CASSETTES TO BE
READ IN:
ANOTHER CASSETTE(S) TO BE READ IN --
ENTER Y OR N
IF THE USER ANSWERS "Y", THE PROCESS DESCRIBED ABOVE IS REPEATED. IF
THE RESPONSE IS "N", THE PROCESS IS TERMINATED.
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E20301
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: DVC12
**PROGRAM TITLE:
CENTRONICS / TermiNET / HP printer driver with extended features
**REVISION? YES
**PACKAGE: 5 **CATEGORY: 2
**KEYWORDS:
CENTRONICS TERMINET PRINTER DRIVER
**LANGUAGES:
ASMB
**COMPUTER TYPE:
M-SERIES
**OPERATING SYSTEMS:
ALL FROM RTE-M to RTE-IVB
**MEMORY REQUIREMENTS:
607 (octal) - 391 (decimal)
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
DVC12 is a line printer driver designed to replace
DVR12/DVA12, and to give the user the option of using non-HP
printers like CENTRONICS, TermiNET, FACIT, MANNESMANN etc.
Basicly, all these printers are identical, in that the may
use the 12566B micro- circuit interface.
For HP printers, the standard 12845B interface is used. The
driver description is the same as standard HP drivers, except
for a few deviations, and quite a lot of extensions (though
the size of the driver is not large, and a lot of attention
has been given to readability and documentation).
With this driver, several parameters can be modified on line:
1. Number of lines/page (64 or 48)
2. Number of char.s/line (80 or 132)
3. Simulate display functions (On or off)
4. Print 1.st column of output (On or off)
**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: &DVC12 - DRIVER SOURCE
**LOAD INSTRUCTIONS:
Assemble driver, generate into system (see DVA12 mnl)
**RUN INSTRUCTIONS:
See driver source listing. Refer also to DVA12 Driver Mnl.
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
Standard. See HP-1000 Driver Writing Mnl.
**MISCELLANEOUS:
Uses 21MX microcode. Must be modified to run in a 2100 CPU.
E20401
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: FORTE
**PROGRAM TITLE:
FORTH Compiler
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 1
**KEYWORDS:
COMPILER LANGUAGE
**LANGUAGES:
ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
FORTE is a version of FORTH based on the FIG-FORTH model. For a
complete description and user instructions see the file 'FORTE
included with this submission. The August 1980 issue of BYTE
magazine has several excellant articles on FORTH.
**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: &FORTE
FILE# 3: &CALER
FILE# 4: &T.4TH
FILE# 5: &SUB
FILE# 6: &FORTG
FILE# 7: &FORTH
FILE# 8: %EINST
FILE# 9: /D4TH
FILE# 10: 'FORTE
FILE# 11: /AS4TH
FILE# 12: LFORT
FILE# 13: ^4TH
FILE# 14: /T4TH
FILE# 15: SCREEN
FILE# 16: &TOWER
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E20501
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: LIBHS
**PROGRAM TITLE:
Haystack Composite Library
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
LIBRARY UTILITY
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
Summary of modules and entry points within Haystack Library
Module Entry Points
BKRED BKRED General-purpose disc block-read routine
BKWRT BKWRT General-purpose disc block-write routine
CLGET CLGET Get track and sector of system cartridge list
CLNDR CLNDR Converts yr/mo/dy into printable month and day-of-week
CMOVE CMOVE Block character move
CN21 CN21 Forcefully issues a :CN,lu,21B req. to disable a term.
CNVRT Conversion pkg between 2,3,4-word FP & double integer
DI2DF Double-integer to double (4-word) floating
DI2SF Double-integer to single (2-word) floating
DI2XF Double-integer to extended (3-word) floating
DF2DI Double-floating to double-integer
DF2XF Double-floating to extended-floating
SF2DI Single-floating to double-integer
XF2DI Extended-floating to double-integer
XF2DF Extended-floating to double-floating
CRLOK CRLOK Lock/unlock FMP cartridges
CSPCE CSPCE Determine amount of remaining space on an FMP cartridge
DATER DATER Prints Date/Time header on specified LU
DCOPY DCOPY General-purpose disc copy routine
DL DL Powerful FMP Directory search routine
EQLUF EQLUF Get LU from EQT word 4 address
HEX HEX Convert from binary to printable hex format
HEXI HEXI Convert from ASCII hex to binary
IDATE IDATE Return current YMDHMS either integer or ASCII format
IDAY0 IDAY0 Retruns # of elapsed days in year to end of spec. month
IDGT IDGT Get ID segment of specified program
IDTKX IDTKX Get cart. label, sectors/track, directory track, etc.
IDTYP IDTYP Get driver type for specified LU
IFERR IFERR FMP error reporter
IFNAM IFNAM Get namr from LU and parse it
IGETC IGETC Get a specified character from a buffer
IGETS IGETS Get a word from the System Map
IN2A2 IN2A2 Convert 2-digit integer to A2 format with leading zero
IOF IOF Delete specified ID segment (equiv to :RP,,PROG)
IOPSY IOPSY Get host system type
IPRTY IPRTY Get/change priority of program
**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: &BKRED General-purpose disc block-read routine
FILE# 3: &BKWRT General-purpose disc block-write routine
FILE# 4: &CLGET Get track and sector of system cart. list
FILE# 5: &CLNDR Converts yr/mo/dy into mon. & day-of-week
FILE# 6: &CMOVE Block character move
FILE# 7: &CN21 Forcefully issues a :CN,lu,21B request
FILE# 8: &CNVRT Conversion pkg. between FP & dble integer
FILE# 9: &CRLOK Lock/unlock FMP cartridges
FILE# 10: &CSPCE Determine amt. of remaining space on cart
FILE# 11: &DATER Prints Date/Time header on specified LU
FILE# 12: &DCOPY General-purpose disc copy routine
FILE# 13: &DL Powerful FMP Directory search routine
FILE# 14: &EQLUF Get LU from EQT word 4 address
FILE# 15: &HEX Convert from binary to hex format
FILE# 16: &HEXI Convert from ASCII hex to binary
FILE# 17: &IDATE Return current YMDHMS integer or ASCII
FILE# 18: &IDAY0 Returns # days in yr-to-end of month
FILE# 19: &IDGT Get ID segment of specified program
FILE# 20: &IDTKX Get cart. label, sec/trk, dir. trk., etc.
FILE# 21: &IDTYP Get driver type for specified LU
FILE# 22: &IFERR FMP error reporter
FILE# 23: &IFNAM Get namr from LU and parse it
FILE# 24: &IGETC Get a specified character from a buffer
FILE# 25: &IGETS Get a word from the System Map
FILE# 26: &IN2A2 Convert 2-digit integer to A2 format
FILE# 27: &IOF Delete spec. ID segment (equiv to :RP,,PR
FILE# 28: &IOPSY Get host system type
FILE# 29: &IPRTY Get/change priority of program
FILE# 30: &IPST Get status of specified program
FILE# 31: &IROT Rotate bits left/right within word
FILE# 32: &IRP Restore ID seg of SP'ed pgm (equiv to :rp
FILE# 33: &ITO Get/change time-out val. of spec. device
FILE# 34: &IUNLK Close a spuriously open FMP file
FILE# 35: &JSHFT Left/right bit shifter within word
FILE# 36: &LIBER Set LU for FORTRAN STOP, PAUSE, & errors
FILE# 37: &LINC General segment controller package
FILE# 38: &LINK Link from main program to segment
FILE# 39: &LOC Get absolute address of spec. parameter
FILE# 40: &LUOPR Return LU from which prog. was initiated.
FILE# 41: &NARG Get # of args with which sub was called
FILE# 42: &PUTC Put a char into specified loc in buffer
FILE# 43: &PUTS Put word into spec. loc. in System Map
FILE# 44: &QSUBS Comp. pkg. of ASCII string-handling rout.
FILE# 45: &QSUB1 Software repl. for .MBT & .CBT (Assembler
FILE# 46: &REPLA Replaces .MBT & .CBT with firmware RP's
FILE# 47: &RMAN Inverse NAMR.
FILE# 48: &SORT General-purpose direct-replacement sort
FILE# 49: &SORTS General-purpose Shell sort routine
FILE# 50: &SSWCH Display-register handler routine
FILE# 51: &STRAK General-purpose expan.fixed-len scr-file
FILE# 52: &SUSP Suspend self for specified period of time
FILE# 53: &TIMER General-purpose timing routine
FILE# 54: &WCSF Load 12789/13197 WCS without DVR36
FILE# 55: &WMOVE Hi-speed word mover.
FILE# 56: &XTNTS Package of FMP file-extent handling rout.
FILE# 57: &YMDAY Converts day-of-year into month and day
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
IPST IPST Get status of specified program
IROT IROT Rotate bits left/right within word
IRP IRP Restore ID segment of SP'ed program (equiv to :RP,PROG)
ITO ITO Get/change time-out value of specified device
IUNLK IUNLK Close a spuriously open FMP file
JSHFT JSHFT Left/right bit shifter within word
LIBER LIBER Set LU for Fortran STOP, PAUSE, and error messages
LINC General segment controller package
LINCA
LINCB
LINK LINK Link from main program to segment
RETRN Return from segment to main program
LOC LOC Get absolute address of specified parameter
LUOPR LUOPR Return LU from which program was initiated
NARG NARG Get number of args with which subroutine was called
PUTC PUTC Put character into specified location in buffer
PUTS PUTS Put word into specified location in System Map
QSUBS Comprehensive package of ASCII string-handling routines
See "QSUBS for details.
QSUB1 .MBT Software replacements for .MBT & .CBT
.CBT insts MBT & CBT on 21MX CPU's) for older 2100 CPU's
NOT incl. in $libhs, but provided as separate relocs.
REPLA .MBT Replaces .MBT & .CBT with firmware RP's
.CBT and 105766B, respectively.
RMAN RMAN Inverse NAMR
SORT SORT General-purpose direct-replacement sort routine
SORTS SORTS General-purpose Shell sort routine
SSWCH SSWCH Display-register handler routine
STRAK Gen-purpose expan. fixed-length scratch-file handling
STOPN Open/close scratch file
STWRT Write specified record# into file
STRED Read specified record# from file
ISTLC Get current position in file
SUSP SUSP Suspend self for specified period of time
TIMER TIMER General-purpose timing routine
WCSF WCSF Load 12789/13197 WCS without DVR36
WMOVE WMOVE Hi-speed word mover. Uses block word move instruction.
XTNTS Package of FMP file-extent handling routines
CRETX Create extent of specified number, type, and size
OPENX Open specified extent
PURGX Purge specified extent
LISTX Get list of extents for existing file
YMDAY YMDAY Converts day-of-year into month and day
Note: A cross-reference listing of all the modules and entry points in
$LIBHS is contained in file 'LIBHS (created by program RXREF).
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E20601
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: LIBHX
**PROGRAM TITLE:
Haystack Extended Library Routine
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
SYSTEM UTILITIES
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-Series
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
The routines in $libhx are a set of more esoteric utilities than are
found, for the most part, in the standard library $LIBHS. Fewer
programs in the Haystack package use these routines. Normally, $LIBHX
should be searched only if a search of $LIBHS provides incomplete
results. Details on calling these routines may be found in the source
code for the routines themselves.
Summary of modules and entry points within Haystack Extended Library:
Module Entry Points
CONTR CONTR Routine to generate plottable contours of 3-D data
CRCC CRCC Software simul. of Fairchild CRC generator
FOR2D FOR2D Disc-based complex FFT for large data arrays
FOUR1 FOUR1 Complex FFT for N=power of 2
FOURT FOURT Complex FFT for arbitrary array size
G2648 many Graphics package for HP2648. See "G2648 for details.
PDUMP PDUMP Memory dump from with program
POLFT POLFT Least-squares fit to a polynomial of artibrary order.
RULED RULED Generates ruled-surface map of 3-D surface
SMINV SMINV Symmetric-matrix inversion routine
VGRAY VGRAY Gray-scale simul. on Versatec 200 points/inch plotter
**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: &CONTR Generate plottable contours of 3-D data
FILE# 3: &CRCC Software simul. of Fairchild CRC gener.
FILE# 4: &FOR2D Disc-based complex FFT for large arrays
FILE# 5: &FOUR1 Complex FFT for N=power of 2
FILE# 6: &FOURT Complex FFT for arbitrary array size
FILE# 7: &G2648 Graphics package for HP2648.
FILE# 8: &PDUMP Memory dump from with program
FILE# 9: &POLFT Least-squares fit to a poly of arbit. ord
FILE# 10: &RULED Generates ruled-surface map of 3-D surf.
FILE# 11: &SMINV Symmetric-matrix inversion routine
FILE# 12: &VGRAY Gray-scale simul. on Versatec 200 pts/in
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E20701
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: DOC
**PROGRAM TITLE:
Word Processor for a Line Printer
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
FILES PRINTER
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
This program is a word processing program for line printers. It is
designed to enhance the apperance of text and to reformat text in the
form of paragraphs, indented blocks, etc. DOC can be used with any
ordinary line printer and is very useful for general-purpose textual
material.
**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: &DOC
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E20801
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: SDC
**PROGRAM TITLE:
ENHANCED STORE, DUMP, AND COPY UTILITY
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 3
**KEYWORDS:
SAVE/RESTORE FILES COPY
DUMP
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
2100
**OPERATING SYSTEMS:
RTE-II RTE-IVA RTE-IVB
**MEMORY REQUIREMENTS:
APPROX. 12K PARTITION IN RTE-II, 15K PARTITION IN RTE-IV
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
SDC IS AN INTERACTIVE UTILITY PROGRAM WHICH PROVIDES EXTENSIONS OF SOME
OF THE FUNCTIONS OF THE FMGR AND ADDITIONAL COMMANDS FOR BACKUP AND
RESTORATION OF FILES ON A FILE BY FILE BASIS. THE TWO OUTSTANDING
FEATURES OF SDC ARE THAT 1) IT PROVIDES FILE STORE, DUMP, AND COPY
FUNCTIONS WHICH ELIMINATE THE RECORD LENGTH LIMITATIONS IMPOSED BY
FMGR AND 2) IT PROVIDES AN EFFICIENT DISK BACKUP CAPABILITY WHICH
ENABLES FILES TO BE RESTORED ON AN INDIVIDUAL AS WELL AS COMPLETE
CARTRIDGE BASIS.
TYPICAL USES OF THE PROGRAM INCLUDE STORE, DUMP, AND COPY FUNCTIONS
FOR FILES WITH LARGE RECORD SIZES SUCH AS FILES WITH LOGICALLY
BLOCKED RECORDS, BASIC CSAVE FILES, OR IMAGE FILES. WHEN USED FOR
DISK BACKUP, TAPES CAN BE CREATED WHICH HAVE A FORMAT SIMILAR TO THE
PLUS 1000 LIBRARY TAPE. THIS FORMAT IS NEARLY AS EFFICIENT IN TAPE
UTILIZATION AS THE TRACK BY TRACK DISK BACKUPS BUT HAS THE ADVANTAGE
OF INDIVIDUAL FILE RECOVERY. THE FILE RECOVERY CAPABILITY ALLOWS
THE USER TO RECOVER UP TO 50 FILES WITH A SINGLE COMMAND, OR AN ENTIRE
DISK WITH TWO COMMANDS.
SDC USES THE FMP AND DECIMAL ARITHMETIC SUBROUTINES. A COMPLETE USER'S
GUIDE IS PROVIDED.
**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: &SDC - FORTRAN PROGRAM & SUBROUTINES
FILE# 3: ASSEMBLY LANGUAGE SUBROUTINES
**LOAD INSTRUCTIONS:
COMPILE FILE# 2 WITH THE FTN4 COMPILER. SEPARATE THE 11 ROUTINES IN
FILE# 3 AND ASSEMBLE THEM INDIVIDUALLY. THE FIRST EIGHT ROUTINES IN
FILE# 3 REQUIRE EITHER THE 'Z' OR 'N' OPTION OF THE ASSEMBLER DEPENDING
ON THE OPERATING SYSTEM USED. REFER TO THE CHART BELOW.
RTE-II RTE-III RTE-IVA RTE-IVB
IAMEM Z Z N N
IEQTC Z Z Z N
MSC Z Z Z N
LCKD Z Z Z N
TRNC1 Z Z Z N
BCRES Z Z Z N
BDTTS Z Z Z N
BTTDS Z Z Z N
LOAD INTO A PARTITION WHICH CAN PROVIDE AT LEAST 1K MORE MEMORY THAN
REQUIRED BY THE PROGRAM AND SUBROUTINES. ANY EXTRA MEMORY PROVIDED IN
THE PARTITION WILL BE USED AS RECORD BUFFER SPACE, THUS MORE MEMORY
IMPLIES LARGER RECORDS CAN BE HANDLED.
**RUN INSTRUCTIONS:
REFER TO USER'S GUIDE
**INPUT/OUTPUT EXAMPLES:
REFER TO USER'S GUIDE
**PROGRAM DESCRIPTION:
REFER TO USER'S GUIDE
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
REFER TO USER'S GUIDE
**MISCELLANEOUS:
FILE# 4 IS A COMPLETE USER'S GUIDE. PROPERLY FORMATTED PAGES CAN
BE OBTAINED BY DUMPING THE FILE WITH THE FMGR TO A PRINTER WHICH
HAS 66 LINES PER PAGE, SUPPORTS CARRIAGE CONTROL FUNCTIONS, I.E.
A '1' IN COLUMN #1 -> PAGE EJECT, AND HAS A 96 CHARACTER SET.
E20901
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**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:
E21001
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: DVF00
**PROGRAM TITLE:
Enhanced 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 requirements for comm. 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 most any ASCII device and the host comp. A paper on
this driver was presented at the 1980 HP1000 Int'l User's
Group conf. and DVB00 has received 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: &DVF00
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>
seq. in DVF00. When enabled by the proper control sequences
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
prog. or making a particular req. to the system. The action
to be taken by ESCAP on recpt of a particular <char> is spec.
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 mach. facil. in a non-sess. environment
Does not interfere with a term. running with DVF00 in either
a normal sess. 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 pgm, by John Ball of Harvard College Observatory, allows
a 264x terminal with data cartridges operating under DVB00 or
DVF00 to transfer ASCII data from TAPE CARTRIDGE 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 disc file to tape cartridge.
BR - Program to issue a 'break' request to the last son prog. that
was initiated by a spec. terminal lu. Primarily intended for
use with the DVB00/DVF00 capability of sched. a program when
the BREAK key is hit. In that cap., BR is sched. on receipt
of a BREAK entry from the kybd. Operates only under RTE-IVB.
LISN - Prog. to record 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 mach.-to-mach. communications 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 loc. HP machine 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.
Programs to support auto modem connect and disconnect under DVB00/DVF00:
HELLO - Program to be auto scheduled when modem operating under
DVB00 or DVF00 conn. or disconnects from the telephone line.
Prints a message on the sys. console logging date and time of
conn/discon. 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 pswd (see program ACCES),
and enabling the term. On disconnect (either intentional or
inadvertant), transfer file 'BYeq' can be used to do clean-up
(see program OFFEM) and disable the lu to a subsequent caller.
Can be used equally well under either session or non-session.
ACCES - Program normally sched. from the 'HIeq' file to request pswd
before enabling a terminal connected remotely over a modem.
See file &ACCES for details.
OFFEM - Prog. to clean up after a modem disconnect. OFFEM is normally
sched. from the 'BYeq' file to kill any programs that may have
been left hanging. See file &OFFEM for details.
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E21101
1940
**ANSWER 1
Alan Whitney
**ANSWER 2
MIT Haystack Labs
**ANSWER 3
**ANSWER 4
**ANSWER 5
**ANSWER 6
**ANSWER 7
**ANSWER 8
**ANSWER 9
NO
**ANSWER 10
COMPC
**ANSWER 11
Compiler and Relocatable Management Utility
**ANSWER 12
NO
**ANSWER 13
5
**ANSWER 14
5
**ANSWER 15
**ANSWER 16
Compiler
Preprossor
Language
**ANSWER 17
FTN4
**ANSWER 18
E-Series
**ANSWER 19
RTE-IVB
**ANSWER 20
**ANSWER 21
NO
**ANSWER 22
NO
**ANSWER 23
COMPC - Did you ever find yourself in the situation where you wanted
to compile only a single module within a source file of many
modules or compile and replace only a single module within a
larger composite relocatable file? Or mix FTN4 and ASMB
modules with a source code file? Or compile each individual
module within a source file to individual relocatable files?
Well, now you can easily do all these things and more with
COMPC, the compiler management program. COMPC scans your source
code to dispense your source code modules to the proper
compiler, even allows a mix of RTE FTN4 and the new FTN4X.
A complete source code file or any subset of the modules
within it may be compiled. The relocatable output may be
placed in a composite relocatable file, or in individual
relocatable files. Furthermore, relocatables may be added to
existing relocatable composites, or replace an existing module
within a composite. The details are all contained in file
"COMPC. Also see programs COMPX and COMPQ, which comprise a
management system for multiple-copies of COMPC.
COMPC also acts as a powerful preprocessor for converting
structured code into Fortran.
COMPC requires approximately 24 pages and may be loaded as LB.
**ANSWER 24
FILE# 1: SUBMISSION FILE
FILE# 2: &COMPC
FILE# 3: %COMPC
FILE# 4: *COMPC
FILE# 5: ^COMPC
FILE# 6: %LIBHS
FILE# 7: "COMPC
**ANSWER 25
**ANSWER 26
**ANSWER 27
**ANSWER 28
**ANSWER 29
**ANSWER 30
E21201
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: EDCN
**PROGRAM TITLE:
Text Editor and Word Processor for a Line Printer
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
EDITOR
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
A powerful text editor and a word processor for a line printer:
EDCN - Chopo Ma of Goddard Space Flight Center has written a text
editor based on a combination of the best features of the
HP EDITOR the Univac 1108 editor, and the DEC SOS editor.
Among other things, EDCN allows easy cut and paste and
user-construction of complex editing procedures which can be
set up in an EDCN command file and invoked with a single
command. See file "EDCN for details. See particularly Note 1
"EDCN before compiling and loading EDCN. A number of standard
EDCN command files are included (they are named ;------).
DOC - This program, also by Chopo Ma, is a word processing program
for line printers. It is designed to enhance the appearance
of text and to reformat text in the form of paragraphs,
indented blocks, etc..
DOC can be used with any ordinary line printer and is a very
useful for general-purpose textual material.
Highly recommended. See file 'DOC for details.
**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: &EDCN
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E21301
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: G2648
**PROGRAM TITLE:
Graphics Package for the HP2648
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
Terminal Utilities
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-Series
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
INSTRUCTIONS FOR GRAPHICS PACKAGE G2648
BGL 2-14-78
THIS PACKAGE WAS WRITTEN TO FACILITATE PLOTTING ON THE
HEWLETT-PACKARD 2648A GRAPHICS TERMINAL. IT GIVES THE USER A WAY
TO ACCESS THE TERMINAL'S GRAPHICS CAPABILITIES THROUGH FORTRAN PROGRAMS
WITH SIMPLE SUBROUTINE CALLS. THE PLOTTING IS ACCESSED DIRECTLY RATHER
THAN THROUGH THE AUTOPLOT SYSTEM, WHICH IS A MUCH FASTER WAY OF DOING
THINGS, AND ALSO ALLOWS GREATER FLEXIBILITY IN GRAPH PLACEMENT, LABELS,
ETC. THE FORMATTER IS REQUIRED FOR MOST OF THE ROUTINES, SO USERS
SHOULD BE PREPARED FOR THE SIZE REQUIREMENTS OF BOTH THE GRAPHICS
PACKAGE AND THE FORMATTER.
EACH ROUTINE IS SEPARATE, WHICH GIVES THE USER THE OPTION OF
USING THE "SE" COMMAND IN THE LOADER RATHER THAN THE "RE" COMMAND WHICH
WOULD LOAD THE ENTIRE MODULE. SOURCE CODE IS CONTAINED IN FILE
&G2648, AND RELOCATABLE CODE FOR ALL ROUTINES IS IN %G2648.
IN AN EFFORT TO KEEP THESE ROUTINES FROM BECOMING UNWEILDY, NO
ERROR CHECKING IS DONE TO MAKE SURE PARAMETERS ARE WITHIN LIMITS, SO
THE PROGRAMMER MUST BE CAREFUL NOT TO SEND GARBAGE TO THE TERMINAL.
YOU HAVE BEEN WARNED!
**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: &G2648
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
AVAILABLE ROUTINES:
1) GCLR(LU,MODE)
THIS ROUTINE CLEARS THE GRAPHICS MEMORY (FOR MODE=1), THE ALPHANUMERIC
MEMORY (FOR MODE=2) OR BOTH (FOR MODE=0). IF GRAPHICS ARE CLEARED,
THE GRAPHIC DEFAULT VALUES WILL BE SET. FOR THIS AND ALL OTHER
ROUTINES, LU IS THE LOGICAL UNIT NUMBER OF THE 2648A TERMINAL.
2) GAREA(LU,IXMIN,IXMAX,IYMIN,IYMAX,MODE)
THIS ROUTINE SETS UP AND CLEARS AN AREA FOR GRAPHICS PLOTTING. THE
AREA IS BOUNDED BY (IXMIN,IYMIN) AND (IXMAX,IYMAX). FOR MODE=2, NORMAL
WHITE-ON-BLACK WILL BE USED. FOR MODE=1, BLACK-ON-WHITE MODE WILL BE
USED. NOTE THAT THIS IS ONLY THE AREA FOR THE GRAPH ITSELF, AND ANY
LABELS OR TEXT WILL BE OUTSIDE OF THIS AREA. THIS WILL CAUSE A PROBLEM
WITH LABELS OR TEXT IN BLACK-ON-WHITE MODE, WHICH CAN BE HANDLED AS
IN THE INSTRUCTIONS FOR "GTEXT". THE AREA SPECIFIED WILL ONLY BE
CLEARED FOR NEGATIVE VALUES OF "MODE". (MOST PLOTTING WILL PROBABLY
INVOLVE A CALL TO "GCLR", WHICH CLEARS THE WHOLE SCREEN MUCH FASTER
THAN "GAREA".)
3) GAXES(LU,XMIN,XMAX,YMIN,YMAX,IBOX,XLINE,YLINE,XTIC,YTIC)
THIS ROUTINE SETS UP AND DRAWS LABELLED AXES. IT ALSO SETS UP THE
SCALING FACTORS FOR SUBSEQUENT GRAPHS. USER COORDINATES XMIN,YMIN,ETC.
ARE SCALED TO RASTER COORDINATES IXMIN, IYMIN, ETC., WHICH MUST HAVE
BEEN SET BY AN EARLIER CALL TO GAREA. FOR IBOX=0, NO BOX WILL BE
DRAWN AROUND THE GRAPH AREA. FOR IBOX.NE.0, A BOX WILL BE DRAWN.
LABELS WILL BE DRAWN (F6.2 FORMAT, WITH SELF-SCALING FOR NUMBERS
GREATER THAN 999) FOR INCREMENTS OF XLINE AND YLINE. NEGATIVE VALUES
FOR XLINE AND YLINE WILL CAUSE DASHED LINES TO BE DRAWN AS WELL.
TIC MARKS WILL BE DRAWN AT INTERVALS OF XTIC AND YTIC.
4) GPLOT(LU,X,Y,NPTS,ITYPE,ISKIP)
THIS ROUTINE PLOTS AN X-Y GRAPH FROM DATA STARTING AT X AND Y. NPTS
POINTS WILL BE PLOTTED. LINE TYPE ITYPE (SEE MANUALS FOR LINE TYPES,
OR TRY A BUNCH YOURSELF (1-11 ARE DEFINED)) WILL BE USED. ISKIP GIVES
THE INCREMENT FOR THE PLOTTING INDEX. (ISKIP=1 FOR EACH POINT, ISKIP=2
FOR EVERY SECOND POINT, ETC. FOR ISKIP>1, NPTS DEFINES THE HIGHEST
INDEX TO BE PLOTTED, AND ONLY NPTS/ISKIP POINTS WILL BE PLOTTED.
5) GRAST(LU,X,Y,IX,IY)
THIS ROUTINE RETURNS RASTER COORDINATES (IX,IY) FOR USER COORDINATES
(X,Y) THIS MAY BE OF USE IN PLACING LABELS.
6) GUSER(LU,X,Y,IX,IY)
THIS ROUTINE RETURNS USER COORDINATES FOR RASTER COORDINATES.
7) GTEXT(LU,IX,IY,ITEXT,NCHAR,ISIZE,IOR,ISLNT)
THIS ROUTINE PUTS TEXT ON THE SCREEN STARTING AT (IX,IY). THE
TEXT IS IN ASCII STARTING AT "ITEXT". NCHAR CHARACTERS WILL BE
DISPLAYED. ISIZE (1-8) DEFINES TEXT SIZE, IOR (1-4) DEFINES TEXT
ORIENTATION (1-4), AND ISLNT (0/1) DEFINES NORMAL/SLANTED MODE.
TEXT WILL BE WRITTEN ACCORDING TO THE MODE DEFINED IN GAREA.
IF THE TEXT IS OUTSIDE THE GAREA LIMITS, A BLACK-ON-WHITE WRITE MODE
WILL NOT APPEAR IF THAT PART OF THE SCREEN IS ALREADY BLACK. TO SOLVE
THIS PROBLEM, FIRST CALL GAREA WITH AN AREA DEFINED LARGE ENOUGH
TO ACCOMODATE ALL TEXT, THEN CALL IT AGAIN TO DEFINE THE ACTUAL GRAPH
AREA.
8) GX(MODE,X,Y,I1,I2,I3,I4)
SINCE HP FORTRAN DOES NOT ALLOW FOR MULTIPLE ENTRY POINTS IN SUBROUTINES
AND SINCE USE OF COMMON IS UNDESIREABLE, AND SINCE ALL THE ABOVE
SUBROUTINES HAVE TO COMMUNICATE WITH EACH OTHER, MOST OF THE ABOVE
ROUTINES JUST REARRANGE THE INPUT PARAMETERS AND CALL GX, WHICH THEN
USES "MODE" TO DETERMINE WHAT IT IS TO DO. THIS ROUTINE IS NOT NORMALLY
ACCESSED DIRECTLY BY THE USER, BUT IN SPECIAL CASES IT MAY BE USEFUL.
COMMENTS PIN THE SOURCE LISTING DEFINE GX AND WHAT EACH PARAMETER DOES.
9) GCON(LUT,IX,IY)
THIS ROUTINE TURNS ON THE GRAPHICS CURSOR AND POSITIONS IT AT
RASTER COORDINATES (IX,IY). THIS IS DESIGNED TO BE USED IN CON-
JUNCTION WITH GREAD.
10) GREAD(LUT,IX,IY,IKEY)
THIS ROUTINE WAITS FOR ANY KEYSTROKE AND THEN RETURNS THE POSITION
(IN RASTER COORDINATES) OF THE GRAPHICS CURSOR. THIS ALLOWS THE USER
TO INTERACT WITH THE GRAPHICS FROM THE TERMINAL.
************************WARNING!**************************************
THESE ROUTINES WERE WRITTEN TO FACILITATE PLOTTING FOR THE REAL-
TIME SYSTEM. AS REQUIREMENTS CHANGE, THESE ROUTINES CHANGE TOO.
WE MAKE NO PROMISES TO MAINTAIN COMPATABILITY BETWEEN OLD AND NEW
VERSIONS, OR TO INFORM RANDOM PEOPLE OF CHANGES. IF YOU WANT
SOFTWARE THAT NEVER CHANGES, WRITE IT YOURSELF!
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E21401
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: QSUBS
**PROGRAM TITLE:
String Handling Routines
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
STRING SYSTEM
**LANGUAGES:
FTN4
**COMPUTER TYPE:
E-Series
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
QSUBS is a package of string-handling routines.
String Definition: First word of string contains # of characters in
string. Character string itself starts in word 2
with 2 chars/word. A string of zero length is
called a "null" string. The maximum length of a
string is not defined or checked. The user must
allow sufficient dimensioned space.
**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: &QSUBS
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
&RDFQ Read string from disc file
&READQ Read string from non-disc device
&WRFQ Write string to disc file
&WRITQ Write string to non-disc device
&IPOSQ Find substring within string
&KMPRQ Compare strings for equality
&LENQ Get string length
&IGETQ Get character from string
&IPRSQ Parse string with subfields
&KVALQ Decode nmeric ASCII string
&NFNBQ Get first N non-blank characters
&EQUAT Equate string to another
&ISQEZ Sqeeze multiple spaces from string
&ISWPQ Exchange subfield within a string
&IXQ Exchange substring for another
<RMQ Trim leading spaces from string
&MERGQ Merge set of strings
&TRIMQ Trim trailing spaces from string
&UCQ Change all alpha chars to upper case
&DLETQ Delete characters from string
&MOVEQ Move chars from string to string
&MOVQQ Move chars from string to string
&NSRTQ Insert characters into string
&PUTQ Put character into string
&SEGQ Create string from segment
&CHARQ Create 1-char string
&FILLQ Fill string with specified character
&KSTRQ Numeric value into printable string
&NULLQ Create null string
&PACKQ Pack buffer to string
&UNPKQ Unpack string into 1-char/word buffer
&ANDQ Merge two strings into a single string
&CLRQ Fill string with spaces
&ISTRQ Numeric value into printable string
&IVALQ Decode numeric ASCII string
&JASCQ Get character from string
&NBLQ Get first set of contig. non-spac chars
&LOC Get absolute address of spec. parameter
&NARG Get number of arguments passed to sub.
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E21501
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: SPY
**PROGRAM TITLE:
*SPY* SPIES ON ANOTHER PROGRAMING RUNNING ON AN HP-1000 COMPUTER.
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
DEBUG DUMP MEMORY
PERFORMANCE
**LANGUAGES:
RATF FTN4
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
10 PAGES
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
* SPY* SPIES ON ANOTHER PROGRAMING RUNNING ON AN HP-1000 COMPUTER.
IT DUMPS A P-CNTR HISTOGRAM TO A GRAPHICS TERMINAL(2648 OR 4014)
EVERY SO OFTEN. IF <NAMR>==6, IT WILL FORMAT A DUMP TO THE LINE PRINTER.
THE P-CNTR IS SAMPLED APPROXIMATELY EVERY 10 MS, AND THE HISTROGRAM
DUMPED EVERY COUNT SAMPLES(COUNT/100 SECONDS). ALL COUNTS ARE FLOORED
AGAINST THE LIMITS(FWA,LWA). IF *BR (THE SYSTEM INTERUPT) IS DETECTED
SPY HALTS.
**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: &SPY
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
RU,SPY,<NAMR>,PROGR[,N=COUNT] [,F=FWA] [,L=LWA] [,T=TERMINAL TYPE]
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E21601
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: &GREPA
**PROGRAM TITLE:
THIS PROGRAMS FORTRAN CALLABLE ROUTINES FOR ASMB OP CODES MVW,SFB,CBT
**REVISION? NO
**PACKAGE: 5 **CATEGORY: 5
**KEYWORDS:
ASMB FORTRAN
**LANGUAGES:
ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB
**MEMORY REQUIREMENTS:
5 K
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS ROUTINE PROVIDES FORTRAN CALLABLE ROUTINES FOR THE ASSEMBLY
OPERANDS MVW, SFB, CBT, AS WELL AS PROVIDING AN EASY MEANS FOR
DETERMINING THE ADDRESS OF AN ARGUMENT IN A FORTRAN PROGRAMm
**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: &GREPA
**LOAD INSTRUCTIONS:
NONE IS NOT LOADED SEPERATELY
**RUN INSTRUCTIONS:
THIS PROGRAM DOES NOT GET LOADED. INSTEAD IT GETS RELOCATED WITH THE
FORTRAN PROGRAM PROGRAM USING IT.
**INPUT/OUTPUT EXAMPLES:
THE ROUTINES ARE CALLED IN THE FOLLOWING MANNER:
MVW-- CALL MVW(I,J,K) I=FROM ADDRESS J=TO ADDRESS K=LENGTH
SFB-- CALL SFB(I,J,K) I=TERM BYTE J=START ADDR K=RETURN CODE
CBT-- CALL CBT(I,J,K,L) I=START ARRAY1 J=START ARRAY2 K=LENGTH
L=RETURN CODE
ADDR--CALL ADDR(ARG) FORTRAN ARGUMENT...RETURNS ADDRESS OF ARG
SEE ASSEMBLY MANUAL FOR FURTHER DETAILS OF THE MVW,SFB,CBT OPERANDS
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
E21701
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: DVC12
**PROGRAM TITLE:
CENTRONICS / TermiNET / HP printer driver with extended features
**REVISION? YES
**PACKAGE: 5 **CATEGORY: 2
**KEYWORDS:
CENTRONICS TERMINET PRINTERDRIVER
**LANGUAGES:
ASMB
**COMPUTER TYPE:
M-SERIES
**OPERATING SYSTEMS:
ALL FROM RTE-M to RTE-IVB
**MEMORY REQUIREMENTS:
607 (octal) - 391 (decimal)
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
DVC12 is a line printer driver designed to replace
DVR12/DVA12, and to give the user the option of using non-HP
printers like CENTRONICS, TermiNET, FACIT, MANNESMANN etc.
Basicly, all these printers are identical, in that the may
use the 12566B micro- circuit interface.
For HP printers, the standard 12845B interface is used. The
driver description is the same as standard HP drivers, except
for a few deviations, and quite a lot of extensions (though
the size of the driver is not large, and a lot of attention
has been given to readability and documentation).
With this driver, several parameters can be modified on line:
1. Number of lines/page (64 or 48)
2. Number of char.s/line (80 or 132)
3. Simulate display functions (On or off)
4. Print 1.st column of output (On or off)
**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: &DVC12 - DRIVER SOURCE
**LOAD INSTRUCTIONS:
Assemble driver, generate into system (see DVA12 mnl)
**RUN INSTRUCTIONS:
See driver source listing. Refer also to DVA12 Driver Mnl.
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
Standard. See HP-1000 Driver Writing Mnl.
**MISCELLANEOUS:
Uses 21MX microcode. Must be modified to run in a 2100 CPU.
F00601
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: BLKBX
**PROGRAM TITLE:
BLACK BOX GAME
**REVISION? NO
**PACKAGE: 6 **CATEGORY:
**KEYWORDS:
GAMES
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-1VB
**MEMORY REQUIREMENTS:
11 PAGES
**DEPENDENT ON SYSTEM SOFTWARE? NO
**DEPENDENT ON SYSTEM HARDWARE? NO
**ABSTRACT:
THIS PROGRAM PLAYS THE GAME BLACK BOX AS DEFINED IN THE PARKER
BROTHERS GAME OF THE SAME NAME. RULES ARE FOUND ON LABEL 1000.
THE BOARD IS 8X8 AND THE SEEKER SHOOTS RAYS INTO IT TO SEE WHERE
THEY COME OUT. BASED ON THAT INFORMATION, HE/SHE CAN LOCATE THE
BALLS. THE SPECIAL CASES ARE ENTRY WHEN A BALL EXITS ON EITHER
SIDE, AND ENTRY INTO A SQUARE WHEN THE TWO SQUARES ON THE LEFT
AND RIGHT ARE OCCUPIED. ELSE THE RAY WILL TURN TO AVOID ENTERING
A 4 ADJACENCY SQUARE TO A BALL.
**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: &BLKBX
FILE# 3: 'BLKBX
FILE# 4: ^BLKBX
FILE# 5: *BLKBX
FILE# 6: &RANF
FILE# 7: &MOVE
FILE# 8: &ADDC
FILE# 9: &CHAR
**LOAD INSTRUCTIONS:
**RUN INSTRUCTIONS:
**INPUT/OUTPUT EXAMPLES:
**PROGRAM DESCRIPTION:
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
**MISCELLANEOUS:
F00701
PLUS/1000 LIBRARY CONTRIBUTION
---------------------------------------------------------------------
**DATE CODE: 2101
**PROGRAM NAME: BRUNO
**PROGRAM TITLE:
BRUNO, DIGIT & DRWIT DESIGN GRAPHICS PROGRAMS (OVERHEAD SLIDES)
**REVISION? NO
**PACKAGE: 6 **CATEGORY:
**KEYWORDS:
GRAPHIC SLIDES FIGURES
PICTURES INTERACTIVE
**LANGUAGES:
FTN4 ASMB
**COMPUTER TYPE:
E-SERIES
**OPERATING SYSTEMS:
RTE-IVB RTE-IVA
**MEMORY REQUIREMENTS:
25K LARGE BACKGROUND + 25 PAGES OF EMA = 50 PAGE TOTAL PARTITION
**DEPENDENT ON SYSTEM SOFTWARE? YES
**DEPENDENT ON SYSTEM HARDWARE? YES
**ABSTRACT:
BRUNO IS A DESIGN GRAPHICS PROGRAM WITH TEXT, LINES, ARC/CIRCLES, AND
FIGURE CAPABILITY. BRUNO USES A 2648 OR 2647 GRAPHICS TERMINAL FOR
CREATING THE INTERACTIVE USER INTERFACE. IN MOST CASES BRUNO IS SELF
EXPLANATORY BUT THE PACKAGE ALSO INCLUDES A 50 PAGE MANUAL. BRUNO
HAS MANY SUPPORT PROGRAMS TO HELP THE GRAPHICS DESIGNER. THE MOST
SIGNIFICANT ONE IS "DIGIT", A PROGRAM WHICH USES THE HP9874 DIGITIZER
TO CREATE BRUNO COMPATABLE FIGURE FILES. THESE FIGURE FILES CAN ALSO
BE CREATED ON THE 2648 USING BRUNO AND ONCE CREATED THEY CAN BE PLACED
ON ANY SLIDE AND THEN MOVED, SCALED, ROTATED OR DUPLICATED. THE PRODUCT
OF BRUNO IS USUALLY AN 8.5" BY 10.5" OVERHEAD SLIDE ALTHOUGH BRUNO HAS
BEEN USED FOR GREETING CARDS, MAPS, INVITATIONS, NAME TAGS, MANUAL
ILLUSTRATING ETC....BRUNO DOES NOT DO GRAPHS!
BRUNO RUNS BEST ON AN F-SERIES HP1000 BUT CAN ALSO RUN ON AN
E-SERIES COMPUTER. BRUNO OUTPUT CAN BE DUMPED TO ANY GRAPHICS 1000
DEVICE, THE MOST USEFUL BEING THE 9872 FOUR COLOR PLOTTER. BRUNO USES
EXEC AND FMP CALLS AS WELL AS EMA AND GRAPHICS 1000. MINIMUM PARTITION
EQUALS 50 PAGES. BRUNO IS FUN TO USE AND HAS BEEN KNOWN TO TAKE OVER
NUMEROUS COMPUTER SYSTEMS ONCE LOADED, BUT BRUNO IS FRIENDLY!!!!!
PLEASE REFER TO THE BRUNO AND DIGIT MANUALS FOR MORE DETAILS,
AND REMEMBER TO SHARE BRUNO FIGURE FILES WITH FRIENDS!!!
**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: /BRUNO Transfer file to unload Bruno from tape.
FILE# 3: &BRUNO (AS) BRUNO main program source. (FTN4)
FILE# 4: &BRUN0 (AS) BRUNO segment #0 source. (FTN4)
FILE# 5: &BRUN1 (AS) BRUNO segment #1 source. (FTN4)
FILE# 6: &BRUN2 (AS) BRUNO segment #2 source. (FTN4)
FILE# 7: &BRUN3 (AS) BRUNO segment #3 source. (FTN4)
FILE# 8: &BRUN4 (AS) BRUNO segment #4 source. (FTN4)
FILE# 9: &BRUN5 (AS) BRUNO segment #5 source. (FTN4)
FILE# 10: &BRUN6 (AS) BRUNO segment #6 source. (FTN4)
FILE# 11: &BRUN7 (AS) BRUNO segment #7 source. (FTN4)
FILE# 12: &BSUBS (AS) BRUNO subroutine files source. (FTN4)
FILE# 13: &UPSHF (AS) BRUNO subroutine source (ASMB)
FILE# 14: &DLTBL (AS) BRUNO device link table (ASMB)
FILE# 15: %SKLIB (BR) BRUNO soft key library.
FILE# 16: *BLOAD (AS) BRUNO loading transfer file.
FILE# 17: =BRUNO (AS) BRUNO loadr command file.
FILE# 18: EXAMP1 (BN) BRUNO example slide file.
FILE# 19: EXAMP2 (BN) BRUNO example slide file.
FILE# 20: EXAMP3 (BN) BRUNO example slide file.
FILE# 21: EXAMP4 (BN) BRUNO example slide file.
FILE# 22: EXAMP5 (BN) BRUNO example slide file.
FILE# 23: EXAMP6 (BN) BRUNO example slide file.
FILE# 24: BALOON (BN) BRUNO example figure file.
FILE# 25: HP1000 (BN) BRUNO example figure file.
FILE# 26: BANDL (BN) BRUNO example figure file.
FILE# 27: LOGO (BN) BRUNO example figure file.
FILE# 28: TERM (BN) BRUNO example figure file.
FILE# 29: FRIEND (BN) BRUNO example figure file.
FILE# 30: HELIO (BN) BRUNO example figure file.
FILE# 31: &DIGIT (AS) DIGIT source program. (FTN4)
FILE# 32: &DXTBL (AS) DIGIT device link table. (ASMB)
FILE# 33: *DGLOD (AS) DIGIT loading transfer file.
FILE# 34: =DIGIT (AS) DIGIT loadr command file.
FILE# 35: &DRWIT (AS) DRWIT source program. (FTN4)
FILE# 36: &DDTBL (AS) DRWIT device link table. (ASMB)
FILE# 37: &DCTD1 (AS) DRWIT subroutine. (ASMB)
FILE# 38: &DVGD1 (AS) DRWIT subroutine. (ASMB)
FILE# 39: *DWLOD (AS) DRWIT loading transfer file.
FILE# 40: =DRWIT (AS) DRWIT loadr command file.
FILE# 41: "BMANL (AS) BRUNO manual (DU,"BMANL,6)
FILE# 42: "DMANL (AS) DIGIT & DRWIT manual (DU,"DMANL,6)
**LOAD INSTRUCTIONS:
LARGE BACKGROUND WITH A 50 PAGE MOTHER PARTITION (EMA).
BRUNO REQUIRES A 2648/47 & SOME HARD COPY PLOTTER (HP9872)
NOTE: FOURTEEN FILES OF THIS SUBMISSION TAPE MUST BE OFFLOADED
USING SPECIAL FORMATS. FILE #15 %SKLIB IS A BINARY RELOCATABLE
FILE, (ST,8,%SKLIB,BR) FILES EXAMP1, EXAMP2 EXAMP3, EXAMP4, EXAMP5,
EXAMP6, BALOON, HP1000, BANDL, LOGO, TERM, FRIEND and HELIO
are binary absolute files, (ST,8,EXAMP1,BN)
THE TRANSFER FILE FOUND ON THIS TAPE (FILE #2 /BTAPE) WILL
UNLOAD THE SUBMISSION TAPE WITH THE CORRECT FORMATS. IT ASSUMES
THE TAPE IS ALREADY POSITIONED TO FILE #3.
**RUN INSTRUCTIONS:
REFER TO BRUNO & DIGIT MANUALS
**INPUT/OUTPUT EXAMPLES:
REFER TO BRUNO & DIGIT MANUALS (:DU,"BMANL,6)
**PROGRAM DESCRIPTION:
REFER TO BRUNO & DIGIT MANUALS (:DU,"BMANL,6)
**ADDITIONAL EXITS OR DIAGNOSTIC MESSAGES:
REFER TO BRUNO & DIGIT MANUALS (:DU,"BMANL,6)
**MISCELLANEOUS:
REFER TO BRUNO & DIGIT MANUALS (:DU,"BMANL,6) THE BRUNO
AND DIGIT MANUALS ARE FILES ON THIS TAPE!