Directory of image this file is from
This file as a plain text file

/******* MULTI8 SPOOL FILE XFER TASK *******

/NAME:	SP
/LENGTH: 2 PAGES +2 PAGE BUFFER.
/FUNCTION:THIS MODULE PERFORMS BLOCK TRANSFERS FROM A FILE-
/	ORIENTED MASS STORAGE DEVICE OR A CHARACTERORIENTED
/	INPUT DEVICE TO A CHARACTERORIENTED OUTPUT DEVICE.
/	SINCE THE FOREGROUND IS NOT ALLOWED TO WRITE ONTO
/	THE BACKGROUND DISK,THIS TASK CAN ONLY DRAIN INFOR-
/	MATION FROM THE DISK AND OTHER MASS STORAGE DEVICES.
/	IT IS CONTROLLED BY THE FOLLOWING TYPE-IN:
/	*PP:<PR:
/	*FILENA.ME,FILE2.AS,FILE3.LS....ETC.
/	*PP:<DK1:FILE.EX.........ETC
/	ALSO RECOGNISES UNIT NUMBERS.
/	*[OUTPUT MOD."<"][MASS INPUT MOD.][FILENAME][EXT]
/	THE COMMAND STRING *:FILENA.ME
/	TAKES DEFAULT DEVICES LP AND SY.
/	SPOOL RECOGNIZES THE FILE-ORIENTED DEVICE BY THE
/	FACT THAT A FILENAME HAS BEEN ENTERED.
/	WHEN A CR IS TYPED IMMEDIATELY BEHIND THE *,THEN
/	THE DEFAULT COMMAND:
/	*LP:<SY:1.LS,2.LS,3.LS,4.LS,5.LS
/	WILL BE EXECUTED.
/	WHEN A DIRECTORY SEARCH FAILS,I.E. A FILENAME DOES
/	NOT EXIST, THEN THE PROGRAM TRIES TO FIND THE NEXT
/	ONE SPECIFIED.
/CONCEPT:LISTING FILES CAN BE PRINTED BY THE FOREGROUND.
/	THE MODULE READS A LINE FROM THE LINE INPUTTER, PER-
/	FORMS A DIRECTORY SEARCH ON THE MASS INPUT DEVICE,
/	AND TRANSFERS BLOCKS FROM INPUT TO OUTPUT DEVICE.
/	THE INTERMEDIATE BUFFER IS LOCATED WITHIN SPOOL.
/	THIS ENABLES ONE TO KILL SPOOL DURING EXECUTION.
/	THE MODULE BEHAVES SILENTLY AFTER THE TYPE-IN: ANY
/	ERROR CAUSES THE MODULE TO STOP.
/
/NOTE:	ONE MUST BE CAREFUL IN TYPING THE COMMAND LINE, SIN-
/	CE NO CHECK IS IMPLEMENTED, WHETHER THE TYPED NAME
/	INDEED CORRESPONDS TO A BLOCKDRIVER. THIS CAN BLOW
/	UP THE SYSTEM !
/
/ERRORS:1) LINE INPUTTER NOT THERE
/	2) DIRECTORY SEARCHER NOT THERE
/	3) ERRONEOUS COMMAND LINE
/	4) CTRL/B  TYPED IN COMMAND LINE
/	5) MONITOR HAS NO ROOM FOR BUFFER
/	6) I/O ERRORS
/MODULES USED:DIRECTORY SEARCHER;LINE INPUTTER;COMMANDINPUT;
/	COMMAND OUTPUT(ECHO);OUTPUT MODULE;INPUT MODULE
/USE:	TAD ("K^100+"1&3777  /ENTRY DEVICE NAME IN AC
/	JMS MONITOR	    /OR AC=0: DEFAULT "K1","T1"
/	   CALL		   /
/	   "S^100+"P&3777 /SPOOL
/	 ERROR RETURN	 /SPOOL NOT AVAILABLE; AC UNCHANGED
/	NORMAL RETURN	/AC=0;DF=ANY VALUE
	IDEV="K^100+"1&3777	/COMMAND INPUT DEVICE
	ODEV="L^100+"P&3777	/OUTPUT DEVICE
	MDEV="S^100+"Y&3777	/DEFAULT MASS DEVICE
*200
SPNTR1,	"S^100+"P&3777	/NAME SP
	1000		/4 PAGES; NO CONNECTS
SPI1,	SPLINE		/A NUMBER OF INDIRECT REFERENCES
SPI2,	SPFIL
SPI3,	SPDTV
SPI4,	SPMDEV
SPI5,	SPLINE+2
SPI6,	SPDO
SPI7,	SPODEV
SPI9,	SPDEV
SPI12,	SPDTV+1
SPI14,	SPSTALL
SPI17,	SPDTV+2
SPSWIT,	0		/END OF RELOCATORS
SPNTR2=ZTEM2

SP,	CDTOIF
	SZA		/IF NO NAME, TAKE DEFAULTmzUm|42z.