GERTABINIT
(GIN Macro)
Defined in: MACSGERONIMO
Used in:
- GERTABINIT.mac.txt
44LS ...[??? GERTABIN SECT COMM FGN 7 DOC 44WL [ 45B= [ 45TW [ 46*G [ 46T6 #MAC GERTABINIT 47#Q #FRL 47SB #ORD 48#2 #INT 48RL GERLABEL QZLINK 49?= 0 49QW GERLABEL QZNULL 4==G NULL 4=Q6 GERLABEL QZCPTPCA 4?9Q 0,0,80,+QZBUFF 4?PB GERLABEL QZONLINE 4#92 60:1,0,32,0 4##X ...#STR %B 4#DS ...#STR 4#JP ...( 4#NL GERLABEL QZOLTP 4*8= 8HOL *TP, 4*MW GERLABEL QZOLTPNM 4B7G #STR %A 4BM6 #STR 4C6Q 24HVIDEOPARAM 4CLB #STR %A 4D62 24H%A 4F5= GERLABEL QZOLCP 4FJW 8HOL *CP, 4G4G GERLABEL QZOLCPNM 4GJ6 #STR %A 4H3Q #STR 4HHB 24HVIDEOPARAM 4J32 #STR %A 4JGL 24H%A 4K=4 ...) 4KFW GERLABEL QZBLANKS 4K^G 1:20,0,60,0 4LF6 GERLABEL QZNEWLINE 4LYQ 1:0,0,2,+QZNEWLINE+4,4H^* 4MDB GERLABEL QZNOSP 4MY2 40:QZNOSP+1 4NCL #STR %A 4NX= #STR 4PBW ... 40HUNABLE TO OUTPUT 'VIDEOPARAM' 4PWG #STR %A 4QB6 ... 40HUNABLE TO OUTPUT '%A' 4QTQ GERLABEL QZAB 4R*B 40:QZAB+1 4RT2 #STR %A 4S#L #STR 4SS= 40HOUTPUT OF 'VIDEOPARAM' ABANDONED 4T?W #STR %A 4TRG 40HOUTPUT OF '%A' ABANDONED 4W?6 GERLABEL QZCOMP 4WQQ 40:QZCOMP+1 4X=B #STR %A 4XQ2 #STR 4Y9L 40HOUTPUT OF 'VIDEOPARAM' COMPLETED 4YP= #STR %A 4^8W 40HOUTPUT OF '%A' COMPLETED 4^NG GERLABEL QZTEN 5286 10 52MQ ...[ 537B ...[ 53M2 ...[ 546L GERLABEL QZENTRY 54L= STO 0 QZLINK 555W LDN 7 G3ISSUE 55KG DVS 6 QZTEN [X7=1 FOR 10,1 FOR 15,2 FOR 20,ETC 5656 LDN 4 G3MARK 56JQ SLL 4 6 574B ADX 4 7 57J2 STO 4 QZLINE1+3 583L LDN 3 27? 58H= STO 3 QZLINE1+2 592W #STR %A 59GG #STR 5=26 ( 5=FQ LDN 2 QZNAME+6 5=^B DCH 3 0(2) 5?F2 BCHX 2 £ 5?YL LDN 4 G3MARK 5#D= DCH 4 0(2) 5#XW BCHX 2 £ 5*CG DCH 7 0(2) 5*X6 BCHX 2 £ 5BBQ LDN 3 #31 [A ) 5BWB DCH 3 0(2) 5CB2 ) 5CTL GIVE 4 5 [GEORGE OR OPS 5D*= ANDN 4 #7 [3 OR 4 FOR GEORGE 5DSW BZE 4 QZOPSEXEC [J IF OPS 5F#G ...[ 5FS6 ...[ 5G?Q ...[ 5GRB GERLABEL QZGEORGE 5GTK ...#STR %B 5GXS ...( 5H23 ... LDN 4 QZNAME 5H4= ... LDN 3 3 [SET CP 5H6F ... BRN QZCPONLY 5H8N ...) 5H?2 LDN 3 0 [O FOR TP 5HQL GERLABEL QZNOWTRY 5J== LDN 4 QZOLTP 5JPW GERLABEL QZCPONLY 5K9G STO 4 QZONLINE+3 5KP6 PERI 0 QZONLINE 5L8Q LDX 4 QZONLINE+1 [REPLY 5LNB SLC 4 4 5M82 BPZ 4 QZEND [J IF OK 5MML BZE 3 QZTRYCPNEXT [J IF NOT TRIED CP 5N7= DISTY QZNOSP 5NLW LDX 0 QZLINK 5P6G EXIT 0 0 5PL6 GERLABEL QZTRYCPNEXT 5Q5Q LDN 3 3 [TRY CP NEQZT 5QKB LDN 4 QZOLCP 5R52 BRN QZCPONLY [J I TO DO OL 5RJL # 5S4= # 5SHW # 5T3G GERLABEL QZOPSEXEC 5TH6 LDN 3 0 [0 FOR TP 5W2Q GERLABEL QZALLOTS 5WGB ALLOT 0 1(3) [TRY CP-TP 5X22 LDX 4 9 5XFL BPZ 4 QZEND 5X^= BZE 3 QZNOTGOTTP [J IF NOT TRIED CP 5YDW DISTY QZNOSP 5YYG LDX 0 QZLINK 5^D6 EXIT 0 0 5^XQ GERLABEL QZNOTGOTTP 62CB LDN 3 3 [3 FPR CP 62X2 BRN QZALLOTS 63BL ...[ 63W= ...[ 64*W ...[ 64TG GERLABEL QZNAME 652N ...#STR %B 657W ...#STR 65*6 12HIN :MANAGER, 65G# ...#STR %B 65MG ... 12HAS *CP, 65SQ GERLABEL QZFILENAME 66#B #STR %A 66S2 #STR 67?L 24HVIDEOPARAM( 67R= #STR %A 68=W 24H%A 68QG ... 8H 69=6 GERLABEL QZLINE1 69PQ 16HGEORGE 6=9B GERLABEL QZLINE2 6=P2 12HOPINF+SYREQ 6?8L CATMASK OPINF,SYSREQ 6?#= ... 12HSYSREQ 6?B4 ... CATMASK SYSREQ 6?CW ... 12HARVSET 6?FN ... +0 6?HG ...#FID BIFDTO% BIFDTO% 1 6?K# ... 12HARVCLEAR 6?M6 ... +0 6?NY ...#FID BIFDTOW% BIFDTOW% 1 6?QQ ...#FID BIFDTUW% BIFDTUW% 1 6?SJ ...#FID BIFDTJL% BIFDTJL% 1 6?WB ...#FID BIFDTCL% BIFDTCL% 1 6?Y8 ... 12HARVWPR 6#22 ... +0 6#3S ...#FID BIFDTNW% BIFDTNW% 1 6#5L ...#DEF 20?=6 6#7W #NOR