PWTABLE
(GIN Macro)
Defined in: MES INTLUDES
Used in:
- PWTABLE.mac.txt
22FL #MAC PWTABLE 22^= #STR %A 23DW ( 23YG #MEN INITJOB 24D6 #TRA K21INITJOB 24XQ 3H%A,3H%B,3H%C,3H%D,3H%E,3H%F,3H%G,3H%H 25CB #END 25X2 ) 26BL #DEF Z = 1? 26W= #LIS 0%I 27*W #ORD 27TG #INT 28*6 ZB 28SQ #GAP K21INITJOB+8 29#B SLINK 0 29S2 PFA +DINITJOB 2=?L SPS 4H 2=R= #DEF SW = #20202020 2?=W T1 24HPASSWORD CHECK SETTINGS ,+SW,+SW,+SW,#20202043 2?QG 8HENTRAL 2#=6 T1A #20202062,8HEMOTE 2#PQ T2 #20206345,8HCURITY : 2*9B T2A #20545767,#20202056,#57625541,#54202020,#50514750 2*P2 T31 28HLOGIN/CONNECT 2B8L T32 16HJOB/RUNJOB/INPUT,#20202030,8HMOP) 2BN= T33 16HJOB/RUNJOB/INPUT,#20203062,8HEADER) 2C7W T34 #20202020,8HRUNJOB 2CMG #20202020,12H(OPERATOR) 2D76 T3 +T31,+T32,+T33,+T34 2DLQ SIGN #40000000 2F6B # 2FL2 P STO 0 SLINK 2G5L CALL 3 18?+2]+5] 2GK= STOZ 18?+3]+20 2H4W LDN 5 ZB 2HJG LDN 2 K21INITJOB+8 2J46 LDX 6 PFA 2JHQ CALL 0 18?+2]+3] 2K3B CALL 3 18?+2]+10] 2KH2 CALL 0 NBL 2L2L LDN 0 T1 2LG= MOVE 0 12 2L^W LDN 5 T1A 2MFG LDN 6 16(1) 2M^6 MOVE 5 3 2NDQ CALL 3 18?+2]+19] 2NYB CALL 0 NBL 2PD2 LDN 5 T2 2PXL LDN 6 4(1) 2QC= MOVE 5 3 2QWW LDN 5 T2A 2RBG LDN 6 8(1) 2RW6 MOVE 5 5 2S*Q LDN 6 15(1) 2STB MOVE 5 5 2T*2 CALL 3 18?+2]+19] 2TSL LDN 7 4 2W#= PL CALL 0 NBL 2WRW LDN 2 4 2X?G SBX 2 7 2XR6 LDX 0 T3(2) 2Y=Q MOVE 0 7 2YQB ADN 1 8 2^=2 ADX 1 SIGN 2^PL LDX 6 ZB+K21INITJOB(2) 329= CALL 0 PTAB 32NW ADN 1 1 338G LDX 6 ZB+K21INITJOB+4(2) 33N6 CALL 0 PTAB 347Q CALL 3 18?+2]+19] 34MB BCT 7 PL 3572 CALL 3 18?+2]+10] 35LL CALL 3 18?+2]+10] 366= LDX 0 SLINK 36KW EXIT 0 0 375G # 37K6 PTAB LDN 3 3 384Q PTC LDN 5 0 38JB SLL 56 6 3942 DCH 5 0(1) 39HL SBN 5 #55 3=3= BPZ 5 OK1 3=GW ADN 5 #55-#46 3?2G BZE 5 OK 3?G6 NOK LDCT 5 #320 3?^Q ORS 5 0(1) 3#FB ORS 5 1(1) 3#^2 STO 5 18?+3]+20 3*DL BRN OK 3*Y= OK1 SBN 5 5 3BCW BPZ 5 NOK 3BXG OK ADN 1 2 3CC6 BCT 3 PTC 3CWQ EXIT 0 0 3DBB # 3DW2 NBL CALL 3 18?+2]+10] 3F*L CALL 5 18?+2]+20] 3FT= LDX 1 18?+1]+62 3G#W LDN 2 1(1) 3GSG LDX 5 SPS 3H#6 STO 5 0(1) 3HRQ MOVE 1 29 3J?B EXIT 0 0 3JR2 #JUM P 3K=L #EXT 3KQ= #LIS Z 3L9W #SKI 20? 3LPG ! **** ERROR IN PASSWORD CHECK TABLE * * * * * * * * * * * * * * * * * 3M96 #FRL 3MNQ #NOR