.NONUMBER
.TITLE ^^DOC -- PRODUCE STANDARD FORMAT DOCUMENTATION\\
.PAGE
.INDENT 50
DOC
.SKIP 1
.CENTER
DOC -- PRODUCE STANDARD FORMAT DOCUMENTATION\\
.LEFT MARGIN 10
.SKIP 1
.INDENT -10
^^PURPOSE:\\ 
^^DOC\\ IS A GENERAL PURPOSE PROGRAM WHICH ALLOWS FOR
INTERACTIVE ENTRY OF DOCUMENTATION INTO A VARIETY
OF STANDARD FORMS.
.SKIP 1
.INDENT -10
^^PARAMETERS:\\  
.CENTER
^^&>DOC#OUTFILE[.EXT][=INSPEC]\\
.S 1
^^DOC\\ IS INVOKED AS AN ^^RSX11-M\\ ^^CUSP\\.
^THE STANDART FORMAT FOR ^^CUSP\\ COMMAND LINES IS USED, REQUIRING
SPECIFICATION OF AN OUTPUT FILE NAME. ^THE REMAINDER OF THE OUTPUT
FILE SPECIFIER DEFAULTS TO THE DEVICE ^^SY0:\\ UNDER THE
CURRENT DEFAULT ^^UIC\\, AND THE FILENAME EXTENSION OF
^^.RNO\\. ^AN OPTION TO THE COMMAND LINE IS AN INPUT FILE SPECIFIER FROM WHICH
TO READ SPECIALIZED FORMATTING COMMANDS. ^IF NO INPUT SPECIFIER IS
GIVEN, A DEFAULT IS USED (^^DM1:[111,1]DOC.SRC\\).
.SKIP 1
.INDENT -10
^^EXAMPLES:\\  
.CENTER
^^&>DOC PROGRAM\\
.S 1
^THIS COMMAND LINE CAUSES ^^DOC\\ TO BECOME ACTIVE, AND
TO BEGIN READING FROM THE FILE ^^DM1:[111,1]DOC.SRC\\.
^^DOC\\ WILL THEN CREATE A FILE  ^^SY:PROGRAM.RNO\\ UNDER THE CURRENT ^^UIC\\,
AND WRITE THE DOCUMENTATION PRODUCED TO THIS OUTPUT FILE.
.S 2
.CENTER
^^&>DOC\\
.S 1
^THIS COMMAND CAUSES ^^DOC\\ TO BECOME ACTIVE AND AWAIT COMMAND INPUT.
.S 2
.CENTER
^^&>DOC#LETTER=LETTER\\
.S 1
^THIS COMMAND CAUSES ^^DOC\\ TO BECOME ACTIVE, USE THE FILE
^^SY:LETTER.SRC\\ AS INPUT, AND CREATE THE FILE ^^SY:LETTER.RNO\\.
.SKIP 1
.INDENT -10
^^FEATURES:\\  
^THE ^^DOC\\ UTILITY READS LINES FROM THE SPECIFIED INPUT FILE
AND DIRECTLY WRITES THESE LINES TO THE OUTPUT FILE,
WITH THE EXCEPTION OF THOSE LINES WHICH BEGIN WITH A
CONTROL CHARACTER. ^THE CONTROL CHARACTER INDICATES TO ^^DOC\\
THAT A SPECIAL FUNCTION IS TO BE PERFORMED AT THAT POINT OF THE
DOCUMENTATION PROCEDURE. ^THE FOLLOWING CONTROL CHARACTERS (AND
ASSOCIATED ACTIONS) ARE CURRENTLY RECOGNIZED BY ^^DOC\\:
.S 1
.TEST PAGE 25
.NOFILL
.TS 15,20,25
	^^CHAR\\		^^FUNCTION\\
.S 1
	_#	^MARK THIS POSITION IN OUTPUT.
	_?	^ACCEPT INPUT FROM THE TERMINAL,
		UNTIL AN END OF FILE IS TYPE
		AND IF NO INPUT, REWIND OUTPUT
		TO LAST MARKED OUTPUT POSITION.
	_\	^OUTPUT RECORD TO THE TERMINAL,
		NOT TO THE OUTPUT FILE.
	_$	^BUILD AND OUTPUT A STANDARDIZED
		TITLE (LIKE THE FIRST 5 LINES OF
		THIS DOCUMENT).
	_@	^RESUME INPUT FROM THE SPECIFIED
		FILE (FOUR LEVELS OF INDIRECTION
		ARE ALLOWED).
.FILL
.S 2
^ADDITIONAL FUNCTIONS CAN BE MADE AVAILABLE AS THEIR
NEEDS BECOME KNOWN.
.SKIP 1
.INDENT -10
^^AUTHOR:\\  
^W. ^KORENDYK
.SKIP 1
.INDENT -10
^^WRITTEN:\\  
^NOVEMBER 22, 1977
.SKIP 1
.INDENT -10
^^SOURCE LANGUAGE:\\  
^^MACRO-11\\ ^ASSEMBLER
.SKIP 1
.INDENT -10
^^LAST MODIFICATION:\\  
^JANUARY 18, 1978
.SKIP 1
.INDENT -10
^^MAINTENANCE:\\  
^^ASD\\ ^COMPUTING ^GROUP, ^DOCUMENTATION ^SECTION
.SKIP 1
.INDENT -10