File: HELP04.HF of Tape: Sources/Focal/s8

(Source file text) 

---

*** LIBRARY COMMANDS:

LIBRARY <COMMAND>[DEVICE:]<PROGRAM NAME> [LINE NUMBER]


*** OS/8 DEVICE NAMES:

SYS:	SYSTEM DEVICE (RKA0: IN RK05 SYSTEM; DTA0: OR SDA0:
	IN DECTAPE SYSTEM)
DSK:	RKB0 IN RK05 SYSTEMS; DECTAPE #1 IN DECTAPE SYSTEMS
	('DSK:' IS ASSUMED IF A DEVICE IS NOT SPECIFIED)
DTA0: - DTA7:	DECTAPE DRIVES (TC08 CONTROLLER)
SDA0: - SDA7:	DECTAPE DRIVES (TD8E SIMPLE DECTAPE)
LTA0: - LTA7:	LINCTAPE DRIVES
MTA0: - MTA7:	MAGTAPE DRIVES
CDR:	CARD READER
PTR:	HIGH SPEED READER
PTP:	HIGH SPEED PUNCH
LPT:	LINE PRINTER
BAT:	BATCH STREAM INPUT
TTY:	TERMINAL (MAY BE USED WITH OTHER DEVICES THROUGH 'ECHO')


LIBRARY CALL CHISQR	(GETS PROGRAM 'CHISQR.FC' FOR USE)
L C SDA3:PRGRAM		(GETS 'PRGRAM.FC' FROM TD8 DECTAPE #3)
L C TEST1		(GETS 'TEST1.FC' FROM DSK:)
L C BIGP(X)		(GETS BIGP11 IF X=11)

*LIBRARY CALL [DEVICE:]<PROGRAM NAME>




LIBRARY DELETE TTEST	(DELETES 'TTEST.FC' FROM DSK:)
L D SDA7:PROG		(DELETES 'PROG.FC' FROM TD8E TAPE #7)
L D HOLD.FD		(DELETES DATA FILE 'HOLD.FD')
L D ARRAY.FA		(DELETES ARRAY.FA FROM DSK:, HAS TO BE
			 USED TO CREATE NEW ARRAY OF SAME NAME)

 * * * THIS COMMAND CLOSES OPEN OUTPUT FILES * * * 

*LIBRARY DELETE [DEVICE:]<PROGRAM NAME>
		(ASSUMES .FC NAME EXTENSION)


LIBRARY GOSUB TEXT <13.7>	(LINE 13.7 OF 'TEXT' BECOMES
			A SUBROUTINE WHICH RETURNS TO THE
			COMMAND FOLLOWING 'GOSUB')
		(WHEN A 'GOSUB' IS EXECUTED BY A NEW PROGRAM,
		THE NEW PROGRAM WILL BE SAVED AS 'FOCAL.TM')
L G SUMSQR	(TREATS ENTIRE 'SUMSQR' PROGRAM AS SUBROUTINE)
L G CALC(X) <Y>	(TREATS GROUP 7 OF 'CALC4.FC' LIKE A 'DO'
		 SUBROUTINE , WHEN X=4 AND Y=7)

 * * * THIS COMMAND CLOSES OPEN OUTPUT FILES IF GIVEN BY
        AN UNSAVED VERSION OF A PROGRAM * * * 

LIBRARY LOAD PROG.SV	(OS/8 CHAIN TO PROG.SV ON SYS:)
L L FCUSER		(CHAINS TO SOME SPECIAL VERSION OF
			 FOS8 , WE LOSE ALL VARIABLES!)
L L CHAN(X)		(CHAINS TO CHAN99.SV IF X=99 , 99
			 IS MAXIMUM NUMBER FOR INDEXES)
L L FCARIT		(OVERLAYS THE ARITHMETIC FUNCTIONS
			 ON FOS8 INITIALLY WITHOUT FUNCTIONS)


*LIBRARY LOAD [SYS:]<FILE NAME>	(FORCES .SV EXTENSION)


LIBRARY RUN JOHN	(LOADS 'JOHN.FC' THEN STARTS PROGRAM)
L R DTA2:ZONK		(RUNS 'ZONK.FC' FROM TC08 TAPE #2)
L R POP <22.81>		(STARTS 'POP.FC' AT LINE 22.81)

 * * * PROGRAMS CONTAINING 'RUNS' MUST BE SAVED
			 BEFORE EXECUTION * * * 

*LIBRARY RUN [DEVICE:]<PROGRAM NAME> [LINE NUMBER]
			(TRANSFERS EXECUTION TO NAMED PROGRAM)


LIBRARY SAVE PROG	(SAVES INDIRECT PROGRAM AS 'PROG.FC')
L S SDA6:ZAAP		(SAVES 'ZAAP.FC' ON  TD8E TAPE #6)
L S PRGNAM		(SAVES 'PRGNAM.FC' ON DSK:)
- - -			LINE 0 OF PROGRAM IS CHANGED TO:
C-PRGNAM.FC MAR-75	(IF THE PROGRAM WAS SAVED IN MARCH-75)

 *** OLD 'PRGNAM.FC' IS DELETED WHEN NEW 'PRGNAM.FC' IS SAVED

 * * * THIS COMMAND CLOSES OPEN OUTPUT FILES  * * * 

*LIBRARY SAVE [DEVICE:]<PROGRAM NAME>


L E		(ABBREVIATION)

*LIBRARY EXIT	(LEAVES FOCAL; RETURNS TO OS/8 MONITOR)

*****^C		^C HAS SAME FUNCTION BUT ALSO WORKS IN
		OS/8 HANDLERS - IT IS THE PREFERRED EXIT

*** THESE EXITS CLOSE ALL FILES AND WAIT FOR END OF TTY:

---