FSHPFIN
(GIN Macro)
Defined in: MACROS SHFSB
Used in:
- FSHPFIN.mac.txt
6GH2 [??? FSHPFIN SECT FILE FGN 1 DOC 6H2L #MAC FSHPFIN 6HG= #SKI FSHA<1$1 [INCLUDE IF NOT COMPILING FOR MACHINE A 6H^W ( 6JFG ! PARAMETER 2 ONLY APPLIES IN M/C A 6J^6 #EXI 6KDQ ) [#SKI FSHA<1#1 6KYB #SKI FSHA [INCLUDE IF COMPILING FOR MACHINE A 6LD2 ( 6LXL #STR #,%A 6MC= ( 6MWW ! PARAMETER 2 MUST BEGIN WITH A '#' 6NBG #EXI 6NW6 ) [#STR #,%A 6P*Q #SKI %A<1$1 6PTB ( 6Q*2 ! PARAMETER 2 MAY NOT BE ZERO 6QSL #EXI 6R#= ) [#SKI %A<1$1 6RRW #SKI %A�<1$1 [FIRST 3 CHARACTERS ARE ZEROS 6S?G ( 6SR6 #MEN CONSOLE 6T=Q #TRA K60CONSOLE [ALTER PREFIX ENTRY 6TQB +%A@L18 [1 CHARACTER PREFIX 6W=2 +#77000000 [MASK FOR PREFIX 6WPL +#00777777 [MASK OUT PREFIX 6X9= +#20000000 [REPLACE WITH SPACE 6XNW #END 6Y8G #EXI 6YN6 ) [#SKI %A�<1$1 6^7Q #SKI %A�<1$1 [FIRST 2 CHARACTERS ARE ZEROS 6^MB ( 7272 #MEN CONSOLE 72LL #TRA K60CONSOLE [ALTER PREFIX ENTRY 736= +%A@L12 [2 CHARACTER PREFIX 73KW +#77770000 [MASK FOR PREFIX TEST 745G +#00007777 [MASK OUT PREFIX 74K6 +#20200000 [REPLACE WITH SPACES 754Q #END 75JB #EXI 7642 ) [#SKI %A�<1$1 76HL #SKI %A�<1$1 [FIRST CHARACTER IS ZERO 773= ( 77GW #MEN CONSOLE 782G #TRA K60CONSOLE [ALTER PREFIX ENTRY 78G6 +%A@L6 [3 CHARACTER PREFIX 78^Q +#77777700 [MASK FOR PREFIX TEST 79FB +#00000077 [MASK OUT PREFIX 79^2 +#20202000 [REPLACE WITH SPACES 7=DL #END 7=Y= #EXI 7?CW ) [#SKI %A�<1$1 7?XG #MEN CONSOLE 7#C6 #TRA K60CONSOLE [ALTER PREFIX ENTRY 7#WQ +%A [4 CHARACTER PREFIX 7*BB +#77777777 [MASK FOR PREFIX TEST 7*W2 +#00000000 [MASK OUT PREFIX 7B*L +#20202020 [REPLACE WITH SPACES 7BT= #END 7C#W #EXI 7CSG ) [#SKI FSHA 7D#6 #NOR