.PAPER SIZE 52,80 .TAB STOPS 8,16,24,32,40,48,56,64,72,80 .LEFT MARGIN 5 .RIGHT MARGIN 75 .FILL .JUSTIFY .SPACING 1 .CENTER ^ASSEMBLY AND USE INSTRUCTIONS FOR ^^SOOPER-GCML\\ .PARAGRAPH ^ASSEMBLE THE MODULES AS FOLLOWS: .NOFILL .NOJUSTIFY #^^$MACRO/LIST/OBJ:SGCML;1 (GCMD+GCML) #$MACRO/LIT/OBJ:TGCM;1 (GCMD+TGCML)\\ .FILL .JUSTIFY .PARAGRAPH ^THE SECOND FILE (^^TGCML\\) IS A TEST PROGRAM TO VERIFY THE OPERATION OF THE GCML SUBROUTINE. ^THE FILE ^^GCMD\\ CONTAINS MACRO DEFINITIONS AND MUST PRECEED THE USERS PROGRAM MODULE WHICH DEFINES THE ^^GCML\\ CONTROL BLOCKS AND REFERENCES THE ^^GCML\\ MACROS. ^USERS SHOULD BE FAMILIAR WITH THE USEAGE OF THE ^^RSX-11D\\ ^^GCML\\ SUBROUTIES AND MACROS BEFORE ATTEMPTING TO UTILIZE THIS VERSION. .PARAGRAPH ^THE BASIC DIFFERENCES BETWEEN THIS AND THE STANDARD ^^GCML\\ IS THE ADDITION OF THE '^D^O^T' COMMAND FOR INTERACTIVE COMMAND OPERATION AND THE SEPARATION OF THE 'COMMAND' ^^FDB\\ WHICH REFERENCES THE TERMINAL AND THE 'FILE' ^^FDB\\ WHICH REFERENCES WHATEVER INDIRECT FILES THE USER MAY SPECIFY. ^APPENDED IS AN EXAMPLE OF AN INDIRECT COMMAND FILE USED BY THE '^^START\\' PROGRAM (SEE THE ^^DECUS\\ CATALOG). ^THIS IS A BOOT-TIME ^^MCR\\ COMMAND STUFFER FOR AN ^^RSX-11D\\ SYSTEM. ^A THIRD ENHANCEMENT IS THE ADDITION OF A PROVISION FOR THE USERS PROGRAM TO PRE-LOAD A COMMAND LINE OR SERIES OF COMMAND LINES SO THAT THEY WILL BE 'READ' PREVIOUS TO FETCHING THE NEXT COMMAND LINE FROM THE TERMINAL OR COMMAND FILE. ^AN EXAMPLE OF THIS IS AGAIN IN THE '^^START\\' PROGRAM WHERE THE COMMANDS '^^MOU#SY0:/OVR'\\ AND ^^'@SY0:STARTUP.CMD\\' ARE PRELOADED VIA THE '^^SCML\\' MACRO. .PAGE .CENTER '^^DOT\\' COMMAND DESCRIPTION .PARAGRAPH ^THIS DOCUMENT DESCRIBES THE 'DOT' COMMAND IMPLEMENTATION FOR ^^PDS\\ AND SOME FORTRAN APPLICATIONS PROGRAMS. ^THIS SYSTEM MAKES IT POSSIBLE TO GUIDE THE USER AND TAILOR DIALOG AND COMMAND SEQUENCES TO SPECIFIC NEEDS. ^THE COMMANDS AVAILABLE ARE AS FOLLOWS: .NOFILL .NOJUSTIFY # .^^ASK\\#L#QUESTION # .^^IFT\\#L#COMMAND # .^^IFF\\#L#COMMAND # .^^GOTO\\#L # .^^DELAY\\#NU # .^^SET\\#L#T####(OR '^F') # .^^DATA\\#'PREFIX'PROMPT # .FILL .JUSTIFY .PARAGRAPH ^THE COMMANDS ARE USED AS FOLLOWS: .PARAGRAPH ^NOTE THE 26 SYMBOLS ARE AVAILABLE FOR SETTING TO A TRUE OR FALSE VALUE. THE '.ASK' AND '.SET' COMMANDS ARE USED TO SET TRUE/FALSE VALUES AND THE '.IFT' AND '.IFF' COMMANDS TO TEST AND UTILIZE THE VALUES. IN THE FOLLOWING DESCRIPTIONS THE LETTER 'L' IN THE COMMANDS STANDS FOR ANY LETTER '^A-^Z'. .PARAGRAPH ^THE ".^^ASK\\" COMMAND .PARAGRAPH ^THE SYSTEM WILL PRINT THE 'QUESTION' FOLLOWED BY A '?' AND WAIT FOR A 'Y' OR 'N' ANSWER. THE VALUE OF 'L' IS SET ACCORDINGLY. A WITH NO 'Y' OR 'N' IMPLIES 'N'. .PARAGRAPH ^THE ".^^SET\\" COMMAND .PARAGRAPH ^THE ".SET" COMMAND SETS 'L' TO '^T' OR '^F'. ^FOR EXAMPLE: .BREAK .^^SET#A#T#\\##RESULTS IN '^A' BEGING GIVEN A '^^TRUE\\' VALUE. .BREAK .PARAGRAPH ^THE ".^^IFT\\ AND .^^IFF\\" COMMANDS .PARAGRAPH ^THE ".IFT AND .IFF" COMMANDS ARE USED TO TEST THE VALUES OF A LEHTER AND CONDITIONALLY PASS THE REMAINING PART OF THE LINE FOR FURTHER PROCESSING. ^AN EXAMPLE IS: .BREAK .^^IFT#A#LOGOUT .BREAK ^IN THIS EXAMPLE, THE 'LOGOUT' COMMAND IS PASSED TO THE CALLER IF '^A' IS '^^TRUE\\'. .PARAGRAPH ^THE ".^^DATA\\" COMMAND .PARAGRAPH ^THE ".DATA" COMMAND IS USED TO PASS A USER TYPED STRING PRECEEDED WITH A PREDETERMINED KEYWORD BACK TO THE CALLER. ^THE COMMAND LOOKS LIKE THIS: .BREAK .^^DATA\\#'PREFIX'#PROMPT .BREAK ^FOR EXAMPLE: .BREAK .^^DATA#'STATION='ENTER STATION NUMBER:\\ .BREAK ^RESULTS IN: .BREAK ^^ENTER STATION NUMBER:\\ .BREAK BEING PRINTED TO THE TERMINAL AND IF THE USER THEN TYPES: .BREAK ^^ ENTER STATION NUMBER:356\\ .BREAK THE FOLLOWING IS PASSED BACK TO THE CALLER: .BREAK ^^STATION=356\\ .BREAK .PARAGRAPH ^NOTE THAT THE '@FILENAME' COMMAND IS PERMITTED AT ANY TIME TO PERMIT FILES OF COMMANDS. ^THE DEFAULT NESTING DEPTH PERMITTED FOR '@' FILES IS 3 LEVELS BUT SPECIFIC PROGRAMS MAY PERMIT MORE OR LESS. .FIGURE 15   .PAGE .PARAGRAPH ^EXAMPLE OF AN INDIRECT COMMAND FILE USED TO SETUP A SYSTEM AT BOOT TIME FOR TIMSHARE OR NON-TIMESHARE OPERATION. ^THE '*' COMMANDS ARE INTERPRETED BY THE '^^START\'' PROGRAM. .FIGURE 3 .NOFILL .NOJUSTIFY ##.; STARTUP VERSION 1E ##.; ##*QUIET ##.; ##.DOTIM:.; ##.DATA 'TIM ' ENTER TIME AND DATE AS HH:MM:SS DD-MMM-YY > ##.; CURRENT SYSTEM TIME IS ##TIM ##.ASK A IS THIS CORRECT ##.IFF A .GOTO .DOTIM ##*NOQUIET ##; ##; ##.SET Q T ;NO ECHO OF COMMANDS ##.SET M F ;DON'T INIT DF0: SWAP DISK ##; ##.ASK A NORMAL TIMESHARE BOOT ##.IFT A .GOTO .NORML ##; ##.ASK A TIMESHARE BOOT ##.IFF A .GOTO .NOTTS ##; ##.ASK A NOISY TIMESHARE BOOT ##.IFT A .SET Q F ##.ASK A INITALIZE DF0: SWAP DISK ##.IFT A .SET M T ##.GOTO .NORML ##; ##.NOTTS:.; ##.GOTO .EXIT ##; ##; ##.NORML:.; ##.; SETUP FOR TIMESHARE SYSTEM ##.IFT Q *QUIET ##.IFT M INI DF0:IASSWP/INDX=BEG ##MOU DF0:IASSWP ##.IFT M UFD DF0:[1,1] ##RED DP0:=SP0: ##.MOUDP.; ##MOU DP0:USRDSK ##.ASK B WAS THE DP0:USRDSK MOUNT SUCCESSFUL ##.IFT B .GOTO .NEXT ##.ASK C RETRY MOUNT OF DP0: ##.IFT C .GOTO .MOUDP ##.NEXT:.; ##.; WHEN THE 'SCI>' PROMPT APPEARS, TYPE '@DK0:SCISTART' ##.; ##IAS @IASTART ##@DP0:START2.CMD ##@DP0:[100,1]IGADSMCR.CMD ##.EXIT:*EXIT .FILL .JUSTIFY