0018 .TITLE RATHLP0019 .IDENT "V20.0"0014 .ENABL LC0082;-----------------------------------------------------------------------------0005;0034; ***************************0034; * R A T H L P . M A C *0034; ***************************0005;0075; This is the subroutine which displays help info for RATFOR/RT-11 V20.0071; It is activated when the user uses the "/H" switch in the command0069; line. It's operation should be obvious to even the novice MACRO0018; programmer. 0005;0015; Bob Denny^^^^^^^^^^^^^^0032; Creative System Design Co.0039; 3452 E. Foothill Blvd. Suite 6010025; Pasadena, Ca. 911070020; (213) 355-68360005;0082;-----------------------------------------------------------------------------00040058 .PSECT USER$I ;PUT THIS IN THE "PURE" USER P-SECTION00040015 .NLIST BEX0074HLPTXT: .ASCII \This is RATFOR/RT-11 Prototype version Y20.4.\<15><12>0066 .ASCII \The command line has the usual RT-11 syntax:\<15><12>0058 .ASCII \outfile,listfile=infile{,infile,...}\<15><12>^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^0072 .ASCII \The following switches may be applied to any file:\<15><12>0020 .ASCII <15><12>0071 .ASCII <11>\/C - Compress FORTRAN output, no blanks\<15><12>0070 .ASCII <11>\/D{:n} - Process debug lines to level "n".\<15><12>0069 .ASCII <11>\ If :n not given, n defaults to 1\<15><12>0062 .ASCII <11>\/H - Display this help message\<15><12>0073 .ASCII <11>\/L:FOR - Include generated FORTRAN in listing\<15><12>0074 .ASCII <11>\/L:DEF - List symbolic constant (DEFINE) table\<15><12>^0072 .ASCII <11>\/L:LC - Output gen'ed FORTRAN in lower case\<15><12>0071 .ASCII <11>\ List RATFOR comments in lower case\<15><12>0073 .ASCII <11>\/L:CND - List code inside unsatisfied IFDEF's\<15><12>0071 .ASCII <11>\/R - Retain DEFINE's from last cmd line\<15><12>0067 .ASCII <11>\/F - Automatically chain to FORTRAN\<15><12>0052 .ASCII <11>\/X - Compile-Link-GO\<15><12>0020 .ASCII <15><12>0074 .ASCIZ \The "L:xxx" options may be chained, e.g., /L:xxx:yyy\<15><12>0010 .EVEN^^00040026 .MCALL .RCTRLO .PRINT00040012RATHLP::0032 .RCTRLO ;CANCEL ANY ^O'S.0043 .PRINT #HLPTXT ;DISPLAY THE HELP TEXT0024 RTS PC ;BACK TO F40009 .END^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^