N. I. H. OS/8 Package
8-597

Peter Lemkin, National Institutes of Health, Bethesda,
Maryland

This package consists of various programs written at N. I. H.
for use with the OS/8 Operating System. There are two
OS/8 tapes offered; one contains source files for each pro-
gram and includes the necessary documentation, the other
tape contains object or SAV files. The write-up which is
offered consists of program abstracts and directories for both
tapes. The listings have been compiled and are offered as
one volume.

Abstracts for all programs in the package are listed below.

1. LIST - A Batch Processing Utility for OS/8
October 12, 1971 - Revised: December 4, 1972

Program LIST is an OS/8 program which lists a maximum of
150 ".DA" files on the lineprinter. The listings include the
file name, date and listing line and page sequence numbers.
The set of files to be listed may be specified individually on
the teletype or by using an indirect file. Five edit codes are
available to insert in the text to modify the listing.

Minimum Hardware:
A.B. Dick 960 lineprinter or
equivalent
Storage Requirement:
12K
Restrictions:
Current version uses A. B. Dick 960
as the FORTRAN device 3 linepr-
inter, but set up to use general
I/O LPT:. Only .DA files may be
listed
Source Language:
OS/8 FORTRAN II/SABR

2. UTIL2.SB - A Modified UTILITY .SB for PS/8 (OS/8)
FORTRAN II
September 2, 1971 - Revised: December 4, 1972

UTIL2.SB is the modified version of the PS/8 FORTRAN II
library program UTILITY.SB. There are changes in some of the
I/O devices to allow the use of a PT08 or DC02G as device 2
(as a teletype), an A.B. Dick 960 videojet as device 3, and a
non-echo PT08/DC02G as device 3 input. CONTROL/Z on
device 4 input can be detected by a new subroutine "EOF."
UTIL2.SB may be conditionally assembled with SABR as a
PT08 or DC02G or A.B. Dick 960 videojet subroutine. UTIL28.
RL is a version for PT08 and A. B. Dick video jet. UTIL2G.RL
is a version for DC02G.

Minimum !Hardware: PS/8 or OS/8, ASR33, PT08,
DC02G and/or A. B. Dick 960
Lineprinter
Source Language:
SABR

3. MAGTAP - A TC58 Magtape Handler for OS/8 FORTRAN II
October 11, 1972 - Revised: December 4, 1972

"MAGTAP" is an OS/8 FORTRAN II subroutine which enables
the user to control either a TU10 or a TU20 9 track magtape
drive utilizing the TC58 controller. This magtape device
handler allows the user to read, write, read-compare, space
backwards, space forward, write end of file, check for
beginning or end of tape, check for end of file mark, and
rewind the tape. MAGTAP runs with interrupts off.

Minimum Hardware:

TC58 and TU10 or TU20
Restrictions:
No double buffering possible in
current version
Source Language:
OS/8 FORTRAN II/SABR

4. MAGDMP - An OS/8 TC58 Magtape File Storage and
Retrieval System
April 4, 1972, Version 1.2 - Revised: December 7, 1972
Version 1.3

MAGDMP is an OS/8 program used to selectively save, restore
append and copy OS/8 files between the system device and
one or more TU20 magtapes (on a TC58). Files may be manipulated
by their file names, extensions, creation dates or access
dates. Wild card (i.e. *) naming conventions are also allowed.

Minimum Hardware:

TC58 and TU20 or TU10 Magtape
Storage Requirement:
12K
Restrictions:
The restoration by time and date is
not yet implemented
Source Language:
OS/8 FORTRAN II, SABR

5. SNDFIL.FT, RECYER.FT, SEND.FT - An Inter - PDP-8
Batch File Transmission Program
July 9, 1972 - Revised: November 29, 1972

SNDFIL stacks a list of up to 240 file names of files on device
DSK: (which is assignable). This set of files residing on
PDP8#1 is then transferred to a second computer, a PDP-8#2
via a PT08 or DC02G link. The PDP-8#2 has a program called
"RECYER" running to put the files which it receives from
PDP-8#1 onto its (assignable) DSK:. Core images for PDP-8's
with PT08's (SNDFL8.SY, RECYR8.SY) and with DC02G's
(SNDFLG.SY RECYRG.SY are also given.

Minimum Hardware:

2 PDP-8's with either DC02 or
PT08 to communicate with each
other
Storage Requirement:
12K for sender, 8K for receiver
Source Language:
OS/8 FORTRAN II, SABR

6. FAILSAFE - A Disk/Magtape Utility for Use with OS/8
January 22, 1971 - Revised: December 4, 1972

There is a need in a disk based operating system to do periodic
dumps of the disk in order to easily recover from system
crashes which destroy the disk files. FAILSAFE is a PDP-8
utility program which can be used to save (or restore) one or
more RF08 disk platters onto (or from) a TU20 magtape.
The FAILSAFE program is currently being used with a PS/8
system running on a LINC8 with a 4 platter RF08 and TC58/
TU20 magtape, but it should be completely compatible with
OS/8.

Minimum Hardware:

TC58/TU20 and RF08 or RK8 or
DC32 disk (optional PT08)
Other Programs Needed:
OS/8 disk system
Restrictions:
Modifications must be made for
other disk and/or magtape systems
Source Language:
PAL-8

7. SENDIT/SENDME - A PDP-10 to PDP-8 File Transmission
Utility Program
September 22, 1972 - Revised: December 4, 1972

Two programs "SENDIT" (on a PDP-10) and "SENDME" (on a
PDP-8 with OS/8) allow the specification, synchronization
and transmission of a PDP-10 ASCII ".DAT" file to the PDP-8
using a PT08 hardware interface.

Minimum Hardware:

PT08 connection between the
PDP-8 and PDP-10
Other Programs Needed:
OS/8 and TOPS-10
Storage Requirement:
8K on the PDP-8
Source Language:
PDP-10 FORTRAN and PDP-8
FORTRAN II/SABR

8. DELETE - A Program to Delete Illegal OS/8 Files
March 6, 1972 - Revised: December 4, 1972

DELETE is an OS/8 program which deletes files with illegal
"PIP" file names from device SYS:. Such file names can be
created in the system under FORTRAN. For example the file

"%!.. Y,,DA"

could be created by FORTRAN. This file name will not be
accepted by PIP since the command decoder will trap it as
illegal since it has a space in the middle of the name and
"%", "." and "," are illegal characters. When DELETE
starts it will give instructions as to its usage.

Storage Requirement:

8K
Restrictions:
Can only delete files from device
SYS
Source Language:
OS/8 FORTRAN II, SABR

9. PS/8 "EDIT" Modified for High Speed PT08 and DC02G
Serial Interface
December 4, 1972

The PS/8 editor, EDIT.SY, has been patched with ODT to
allow operation from a datapoint 3300 over either a PT08 or
DC02G serial interface. The operation is exactly the same
as for the PS/8 EDIT.SY. The PT08 version is called
PT08ED.SY and the DC02G version is called DC02ED.SY.
The PT08 version uses device codes (40/41) while the
DC02G version uses the currently selected station/group.

Minimum Hardware:

PT08 or DC02G serial interface
Other Programs Needed:
PS/8 or OS/8
Restrictions:
"Escape" has been used instead of
"altmode" and the input parity is
now ignored for use with DATA
POINT 3300 videoterminal
Source Language:
ODT patches to PS/8, EDIT.SY

10. OS/8 FORTRAN II Logical Arithmetic Subroutines
November 8, 1972 - Revised: December 4, 1972

The OS/8 FORTRAN II subroutines "OCTL", "SHIFT" and
"ANDS" let the FORTRAN user perform bit manipulation
from FORTRAN without using SABR code.

Other Programs Needed:

OS/8 FORTRAN II
Source Language:
OS/8 FORTRAN II

11. GTCHR - An OS/8 FORTRAN II Subroutine to Analyze
a Character Input Stream from a SYS: Data File
September 17, 1971 - Revised: December 4, 1972

GTCHR gets sequential characters, in 6 Bit ASCII right
justified, from the specified ".DA" file. Switch IRSTSW is
used to reopen a file at the start of the file or to get the next
character in the file. The file EOF is detected by the EOF
(IFLAG) routine which detects CONTROL/Z characters. A
line may be up to 127 characters long. Any legal 6-Bit
character is allowed.

Restrictions:

Will only read ".DA" files from
device SYS:
Source Language:
OS/8 FORTRAN II/SABR

12. Double Precision Arithmetic Package for OS/8
FORTRAN II
March 13, 1972 - Revised: December 4, 1972

DPARITH.FT is a fast double precision integer arithmetic
internal SABR type code subroutine package for use in OS/8
FORTRAN II. This package will work on any PDP-8 with or
without EAE. DPCVT.FT is a FORTRAN II subroutine using
DPARITH.FT to convert double precision integers to and from
floating point numbers,

Other Programs Needed:

OS/8 FORTRAN II/SABR
Restrictions:
All calls to DPARITH.FT must be
inside of a subroutine or main
with which it is compiled
Source Language:
OS/8 FORTRAN II/SABR

13. An OS/8 FORTRAN II Function to do BCD/Decimal
Number Conversion
July 6, 1972 - Revised: December 4, 1972

IBCD packs or unpacks a BCD word (3 4-bit bytes) from or to
a FORTRAN integer. The word to be packed or unpacked is
given in argument "I" while the result is returned in "IBCD."

Restrictions:

Converts BCD numbers in the
range of 0 to 999
Source Language:
OS/8 FORTRAN II/SABR

14. DICOMED 31 Image Display Device Handler
December 5, 1972

OS/8 subroutine "DIOMED" is a FORTRAN/SABR subroutine.
It displays the point, 256X256, or 1024X1024 raster image on
the DICOMED model 31 image display as well as doing other
DICOMED commands such as ERASE, CHANGE GAMMA,
TURN ON VIEW LIGHT, etc.

Minimum Hardware:

DICOMED 31 display and
interface, EAE
Other Programs Needed:
OS/8 FORTRAN MAIN program
Restrictions:
Arrays are passed to DIOMED
through COMMON
Source Language:
FORTRAN II/SABR

15. Program to Put a LINC8 Block 0 Bootstrap to Bring in
the OS/8 System Disk
January 16, 1971 - Revised: December 5, 1972

TAPBOT writes a bootstrap block on block 0 of a unit 0
LINC8 128 word/block LINCtape which is being used as an
OS/8 DECtape. The LINC load switch may then be used to
bootstrap in the system device which in this case is an RF08
disk. It should also work with minor modification for other
types of disks such as the DF32 or RK8.

Minimum Hardware:

LINC8 with at least one LINCtape
drive and a disk
Restrictions:
OS/8 running on a LINC8 uses
some device other than LINCtape
as device SYS:
Source Language:
PAL-8

16 DATE - FORTRAN II OS/8 Subroutines to Return the
OS/8 Date
November 8, 1971 - Revised: December 5, 1972

"DATE" returns the OS/8 date word in integer format. The
algorithm for this FORTRAN callable subroutine was borrowed
from the PS/8 system support manual.

Restrictions:

Requires OS/8 date word to be
previously entered
Source Language:
OS/8 FORTRAN II/SABR

17. PT08/Datapoint 3300 PS/8 Build Programs
December 5, 1972

Five core images modified from the original version of
November 1969 PS/8 software let the user build and run a
PS/8 system with a PT08 as the system teletype. Used at
1200 or 2400 baud with a datapoint or similar terminal, PS/8
can be run with a much greater throughput.

Minimum Hardware:

PT08 serial interface (device codes
40/41
Other Programs Needed:
Existing PS/8 or OS/8 system
Restrictions:
The PS/8 core image has CONFIG
set for a 4 platter RF08. To change
this, another configuration .BN
image from CONFIG must be used
Source Language:
ODT patched core images

Catalog: July 1973