[Date Prev][Date Next][Subject Prev][Subject Next][ Date Index][ Subject Index]

Re: hardcode.pgm anomaly--fourth try



Y'all,
Success. I now have two hardcode.pgms which work smoothly; one works in xy3+ but not in xy4; the other pgm appears to work smoothly in both xy3+ and xy4 (but I've given the pgms separate names anyway for the purists).
The two files are: hardcod3.pgm for you Threebies, and hardcod4.pgm for
the Fourblers (it has worked in xy3+ so far but is not thoroughly
tested--so hardcod3.pgm is advised for xy3+ users until further notice).
The difference between them is this: hardcod3.pgm contains the parameter
≪VA ao≫, which won't run in xy4; whereas hardcod4.pgm changed that to
≪VA aot≫ which runs in xy4 and xy3 at least didn't generate an error
message on account of it.
So now my counters all import correctly into PageMaker (which BTW, has a
pretty competent xy3+ import filter). Thanks to all who gave tips on this.
Now, someone, please tell me syntax in xy4 settings.dfl to lay in the
autosave path.

Cheers,
®GLDECIDE¯®PT1¯®IP0,10¯
FUNCTION: This program will "hard code" counters and their associated Define Counters and
References to Counters commands, while retaining all other formatting commands. It will create a new
file to do this; your original file will be saved exactly as it is on screen before you run this
program. You can choose to have a "label" marker added at each hard-coded spot, to show
you what used to be there (these markers will not interfere with printing). If you don't want to
have to make this choice every time you run the program, copy one of these two triangles to the very
beginning of this file:
     A. To always have markers: ®GLMARKERS¯
     B. To never have markers: ®GLNOMARKERS¯

TO USE:  Make certain file is on screen. RUN HARDCODE.PGM.

CAUTION: After running this program, you MUST reload your regular printer file. You must also STORE
the resulting "hard coded" file to disk under a new name.

This program revised 11/14/90 to include support for references to footnotes, non-incrementing
counters (ÿAEC1-ÿAF) and hyphens within DC commands (ÿAEDC1=I-A-1ÿAF)

This program was revised again 08/22/2008 to correct an anomaly. The original pgm used the string 'fix' as a placeholder and later deleted it in the target file, with the undesired result that any occurance of the string 'fix' (e.g. fix, fixed, fixture, affix, etc.) in the source file would get deleted (or truncated to ed, ture, af, etc.). This revision replaces the placeholder string 'fix' by the string '|||' (3 pipes, ASCII 124). There are five instances of this string in the pgm (some with, others w/o, a trailing space)--note: do not change the command calls ≪GLfix≫ or ≪LBfix≫. This revision will work in xy4 (initial testing ran smoothly in xy3+ also, but don't count on it), so long as your source file does not contain any occurance of |||. Should your source file contain such a string, then modify this pgm and replace the five instances of ||| by any other string which does not occur in your source file (the characters need not be 3 of the same). [The difference between hardcod3.pgm and hardcod4.pgm is this: version three has the parameter ≪VAao≫, whereas version four changed this to ≪VAaot≫.]


®IP0¯DECIDE ABOUT MARKERS:
®LBDECIDE¯®SX01,®VA$WS¯¯®IF®PV01¯<>1¯ÿ?Program halted; file must be on screen.®EX¯®EI¯ÿ?Do you want "label" markers? (Y/N)®SV03,¯®SV02,YN¯®LB1¯®PR ESC=quits¯®SX01,®RC¯¯®SX01,@UPR(®IS01¯)¯®IF®IS01¯==®IS03¯¯ÿ?®PR Program halted¯®EX¯®EI¯®IF®IS01¯î®IS02¯==-1¯®GL1¯®EI¯®SX04,®VASL¯¯ÿ?ñ®IF®IS01¯î®IS02¯==0¯®GLMARKERS¯®EI¯®GLNOMARKERS¯


WITH MARKERS:
Change counters temporarily
®LBMARKERS¯®SV101,¯®SV102,¯®SV103,¯®SV104,¯®SV105,¯®SV106,ô¯®SV107,õ¯®SV108,ﯮSV109,ð¯®SV110,¯®SX01,®VA$WS¯¯®IF®PV01¯<>1¯ÿ?Program halted; file must be on screen.®EX¯®EI¯®SX01,®VAEH¯¯®SX02,®VAAL¯¯®SX03,®VAOF¯¯®SX04,®VATP¯¯®SX05,®VATB¯¯®SX06,®VARM¯¯®SX07,®VAPL¯¯®SX08,®VAHY¯¯®SX09,®VAAOT¯¯®SX210,®VAEP¯¯ÿ?saÿ?	®IF®ER¯¯ÿ?Program halted: Can't save file. ®EX¯®EI¯ÿ?es 1ÿ?	ÿ?d eh=0,hy=0ÿ?	ÿ?d ao=0,0ÿ?	ÿ?D EP=0ÿ?	ÿ?ñ
ÿ?ñ®PR Working . . .¯ÿ?Aÿ?­ÿ?ci ®C1¯
®PV101¯C1®PV102¯®C1¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C2¯
®PV101¯c2®PV102¯®C2¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C3¯
®PV101¯c3®PV102¯®C3¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C4¯
®PV101¯c4®PV102¯®C4¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C5¯
®PV101¯c5®PV102¯®C5¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C6¯
®PV101¯c6®PV102¯®C6¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C7¯
®PV101¯c7®PV102¯®C7¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C8¯
®PV101¯c8®PV102¯®C8¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C9¯
®PV101¯c9®PV102¯®C9¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C10¯
®PV101¯c10®PV102¯®C10¯ÿ?[ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
 ®C11¯
®PV101¯c11®PV102¯®C11¯ÿ?[ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
 ®C12¯
®PV101¯c12®PV102¯®C12¯ÿ?[ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
 ®C13¯
®PV101¯c13®PV102¯®C13¯ÿ?[ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
 ®C14¯
®PV101¯c14®PV102¯®C14¯ÿ?[ÿ?[ÿ?[ÿ?[lbÿ?	®LB8¯ÿ?es
1ÿ?	ÿ?se
®C1¯ÿ?[ÿ?+ÿ?ÿ?ÿ?	®IF®ER¯¯ÿ?ñ®GL10¯®EI¯ÿ?seb
 ®C1¯ÿ?+ÿ?+ÿ?	ÿ?kÿ?se
®C1¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?aÿ?ÿ?seb
®C1¯ÿ?+ÿ?+ÿ?+ÿ?	ÿ?clbÿ?seb
®C1¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?	ÿ?Ï®PV102¯ÿ?seb
®C1¯ÿ?+ÿ?+ÿ?+ÿ?	ÿ?Ï®PV101¯®GL8¯

Change REF commands temporarily
®LB10¯ÿ?es 1ÿ?	ÿ?se
®REF¯ÿ?+ÿ?	®IF®ER¯¯ÿ?ñ®GL6¯®EI¯ÿ?seb
 ®REF¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?se
®REF¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?aÿ?ÿ?seb
®REF¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?clbÿ?seb
®REF¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?Ï®PV102¯ÿ?seb
 ®REF¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?Ï®PV101¯®GL10¯

Change DC commands
®LB6¯ÿ?es 1ÿ?	ÿ?se
®DC1=1¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	®IF®ER¯¯ÿ?ñ®GLQ1¯®EI¯ÿ?seb
 ®REF¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?se
®REF¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?aÿ?ÿ?seb
®REF¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?clbÿ?seb
®REF¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?Ï®PV102¯ÿ?seb
 ®REF¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?Ï®PV101¯®GL6¯

Change footnotes
®LBQ1¯®LBagain1¯ÿ?ES 1ÿ?	ÿ?se
®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+FNÿ?	®IF®ER¯¯ÿ?ñ®GLsf1¯®EI¯ÿ?[ÿ?[ÿ?[®SX21,®CP¯¯ÿ?se
 ®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?[®SX22,®CP¯¯ÿ?seb
 ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	®SX23,®CP¯¯®IF®PV23¯==®PV21¯¯®GLfix1¯®LB

¯®EI¯®LBrept1¯ÿ?jmp ®PV22¯ÿ?	ÿ?cÿ?se
®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?[®SX22,®CP¯¯ÿ?seb
 ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	®SX24,®CP¯¯®IF®PV24¯==®PV23¯¯®GLfix1¯®EI¯®SX23,®PV24¯¯®GLrept1¯

®LBfix1¯ÿ?jmp ®PV21¯ÿ?	ÿ?kÿ?jmp ®PV22¯ÿ?	ÿ?cÿ?kÿ?a®SX25,®CP¯¯ÿ?ÿ?jmp ®PV21¯ÿ?	ÿ?Ï®PV101¯ÿ?jmp ®PV22¯ÿ?	ÿ?Ï®PV102¯ÿ?jmp ®PV21¯ÿ?	ÿ?se ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+lbÿ?	®SX26,®CP¯¯®IF®ER¯¯ÿ?jmp ®PV25¯ÿ?	®GLagain1¯®EI¯®IF®PV26¯<®PV22¯¯ÿ?[ÿ?[ÿ?[ÿ?Ï®PV101¯ÿ?se ®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?[ÿ?Ï®PV102¯®EI¯ÿ?jmp ®PV25¯ÿ?	®GLagain1¯

®LBsf1¯ÿ?es 1ÿ?	ÿ?se
®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+sfÿ?	®IF®ER¯¯ÿ?ñ®GL9¯®EI¯ÿ?seb
 ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?se
®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?aÿ?ÿ?seb
®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+sfÿ?	ÿ?Ï®PV101¯ÿ?se
®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?+®PV102¯®GLsf1¯


Change all other commands to preserve them; change counters back; save hard returns, tabs, hard
hyphens, hard spaces.
®LB9¯ÿ?ñÿ?­ÿ?es 1ÿ?	ÿ?ci
/ÿ?Áÿ?¿/®PV108¯/ÿ?	ÿ?ci / /®PV109¯
/ÿ?	ÿ?ci ®C1¯ÿ?+ÿ?+ÿ?+ ®PV103¯ÿ?	ÿ?ci
®C1¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?c ®PV104¯ÿ?	ÿ?ci
®PV101¯ |||®C1¯ÿ?+ÿ?+ÿ?+ÿ?	ÿ?ci ®PV102¯
®C1¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?	ÿ?ñÿ?Ïÿ?ci ÿ0A
®PV105¯ÿ?	ÿ?ci 	 ®PV107¯ÿ?	ÿ?ci
ÿ?Ãÿ?Å ®PV106¯ÿ?	®GL9A¯


Process non-incrementing counters and DC commands containing hyphens to protect counter & DC
hyphens from upcoming conversion to 3-byte hard hyphens.
®LB9A¯®LBloop1¯ÿ?se
/®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+Cÿ?ÿ?-¯/ÿ?	®IF®ER¯¯®GL9AA¯®EI¯ÿ?[ÿ?+Û®GLloop1¯

®LB9AA¯ÿ?ñ®LBloop8¯ÿ?se /®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+DCÿ?-ÿ?ÿ?c/ÿ?	®IF®ER¯¯®GL9B¯®EI¯ÿ?seb /®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+DC/ÿ?	®SX600,®CP¯¯ÿ?se ®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	®LB-loop9¯ÿ?seb /-/ÿ?	®IF®ER¯¯®GLloop8¯®EI¯®SX601,®CP¯¯®IF®PV600¯<®PV601¯¯ÿ?ÏÛ®GL-loop9¯®EI¯ÿ?se /®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+DCÿ?-ÿ?ÿ?c/ÿ?	®GLloop8¯


Change remaining hyphens to hard hyphens, change back non-incrementing counter & DC-hyphens.
®LB9B¯ÿ?ñÿ?ci - ÿ?Ãÿ?Åÿ?	ÿ?ci
/Û/-/ÿ?	®GL7¯


Remove existing printer file; load temp printer file; TYF this file; reinstate other commands
®LB7¯®SV12,PG<®PV110¯
DF TB=1
DF OF=0,0
DF TP=0
DF AL=0
DF RM=100
DF PL=250,250,250
PT=1,2,3
MD NM+10CPI
MD BO+10CPI
MD UL+10CPI
MD RV+0CPI
MD BU+10CPI
MD BR+10CPI
MD SU+10CPI
MD SD+10CPI
FO:10CPI
UW:10CPI
ET
WD:10CPI
SW=1
ET
FO:0CPI
UW:0CPI
ET
WD:0CPI
SW=0
ET
VU=1,1,10
VS:1

MU=1
DU=1
MS=1
CP:1

¯®SV13,ÿ?½ÿ?Á¯®SV10,ÿ?½ÿ?»¯ÿ?es
1ÿ?	ÿ?unload 7fÿ?	ÿ?ñÿ?k;PR;
LE<{++LE++}
PE<®PV13¯®PV10¯
FB<
FE<
®PV12¯ÿ?kÿ?sad
hardcode.prnÿ?	ÿ?Ñÿ?ñÿ?nfÿ?	ÿ?load
hardcode.prnÿ?	®IF®ER¯¯ÿ?abÿ?	ÿ?d
al=®PV02¯ÿ?	ÿ?d of=®PV03¯ÿ?	ÿ?d
tp=®PV04¯ÿ?	ÿ?d tb=®PV05¯ÿ?	ÿ?d
rm=®PV06¯,hy=®PV08¯ÿ?	ÿ?d ao=®PV09¯ÿ?	ÿ?d
pl=®PV07¯ÿ?	ÿ?D EP=®PV210¯ÿ?	ÿ?es
0ÿ?	ÿ?caÿ?	ÿ?d eh=®PV01¯ÿ?	ÿ??ÿ?Program halted:
Can't load special printer file.®EX¯®EI¯ÿ?ernv
hardcode.prnÿ?	ÿ?ñÿ?ci  ®MDRV¯ÿ?	ÿ?ci 
®MDNM¯ÿ?	ÿ?ci /|||/|||
/ÿ?	ÿ?tyfÿ?	ÿ?waitÿ?	ÿ?abÿ?	ÿ?ca fo.tmpÿ?	®LB

¯®SV31,1234567890¯®LB
 -The following section has revisions in the last line.
¯ÿ?­ÿ??ÿ?d eh=®PV01¯ÿ?	ÿ?d
al=®PV02¯ÿ?	ÿ?d of=®PV03¯ÿ?	ÿ?d
tp=®PV04¯ÿ?	ÿ?d tb=®PV05¯ÿ?	ÿ?d
rm=®PV06¯,hy=®PV08¯ÿ?	ÿ?d pl=®PV07¯ÿ?	ÿ?D
EP=®PV210¯ÿ?	ÿ?ci ®PV104¯
®C1¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?	ÿ?ci ®PV103¯
®C1¯ÿ?+ÿ?+ÿ?+ÿ?	ÿ?ci ®PV106¯
ÿ?Ãÿ?Åÿ?	ÿ?ci ®PV105¯ ÿ0Aÿ?	ÿ?ci
®PV107¯ 	ÿ?	ÿ?ci
/®PV108¯/ÿ?Áÿ?¿/ÿ?	ÿ?ci /||| //ÿ?	ÿ?ci
/|||//ÿ?	ÿ?ci /®PV109¯ / /ÿ?	ÿ?ci /{++LE++}//ÿ?	ÿ?ci
/®PV109¯/ /ÿ?	®LB

Delete all footnote numbers in text generated by typef:
¯®LBloopz¯ÿ?se ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+fnÿ?ÿ?	®IF®ER¯¯®GLfinish¯®EI¯ÿ?[ÿ?[ÿ?[ÿ?[®SX30,®CP¯¯®LBdeloo¯ÿ?kÿ?[ÿ?k®SV35¯ÿ?®IF®IS35¯î®IS31¯>=0¯®GLdeloo¯®EI¯ÿ?cÿ?kÿ?jmp ®PV30¯ÿ?	ÿ?kÿ?Ñÿ?cÿ?cÿ?cÿ?c®GLloopz¯

®LBfinish¯ÿ?¯®LB2¯ÿ?ñÿ??ÿ?;ÿ?¡ÿ?¡ÿ?se
 ®PV110¯ÿ?	ÿ?[ÿ?Word space or hard return? ®PRPress space bar or
ENTER¯ÿ?S®IF®ER¯¯ÿ?ñÿ?d
ao=®PV09¯ÿ?	ÿ?es 0ÿ?	ÿ?Please store under new name and reload
printer file®EX¯®EI¯®SV02, ¯®SV03,
¯®SX01,®RC¯¯®IF®IS01¯==®IS02¯¯ÿ?Ï ®GL2¯®EI¯®IF®IS01¯î®IS03¯<>-1¯ÿ?Ïÿ0D®GL2¯®EI¯®GL2¯


WITHOUT MARKERS:
®LBNOMARKERS¯®SV101,¯®SV102,¯®SV103,¯®SV104,¯®SV105,¯®SV106,ô¯®SV107,õ¯®SV108,ﯮSV109,ð¯®SV110,¯®SV111,ÿ20¯®SX01,®VA$WS¯¯®IF®PV01¯<>1¯ÿ?Program halted; file must be on screen.®EX¯®EI¯®SX01,®VAEH¯¯®SX02,®VAAL¯¯®SX03,®VAOF¯¯®SX04,®VATP¯¯®SX05,®VATB¯¯®SX06,®VARM¯¯®SX07,®VAPL¯¯®SX08,®VAHY¯¯®SX210,®VAEP¯¯ÿ?saÿ?	®IF®ER¯¯ÿ?Program halted: Can't save file. ®EX¯®EI¯ÿ?es 1ÿ?	ÿ?d eh=0,hy=0ÿ?	ÿ?d ao=0,0ÿ?	ÿ?D EP=0ÿ?	ÿ?ñ
ÿ?ñ®PR Working . . .¯ÿ?Aÿ?­ÿ?ci ®C1¯
®PV101¯C1®PV102¯ÿ?	ÿ?ci ®C2¯
®PV101¯C2®PV102¯ÿ?	ÿ?ci ®C3¯
®PV101¯C3®PV102¯ÿ?	ÿ?ci ®C4¯
®PV101¯C4®PV102¯ÿ?	ÿ?ci ®C5¯
®PV101¯C5®PV102¯ÿ?	ÿ?ci ®C6¯
®PV101¯C6®PV102¯ÿ?	ÿ?ci ®C7¯
®PV101¯C7®PV102¯ÿ?	ÿ?ci ®C8¯
®PV101¯C8®PV102¯ÿ?	ÿ?ci ®C9¯
®PV101¯C9®PV102¯ÿ?	ÿ?ci ®C10¯
®PV101¯C10®PV102¯ÿ?	ÿ?ci ®C11¯
®PV101¯C11®PV102¯ÿ?	ÿ?ci ®C12¯
®PV101¯C12®PV102¯ÿ?	ÿ?ci ®C13¯
®PV101¯C13®PV102¯ÿ?	ÿ?ci ®C14¯
®PV101¯C14®PV102¯ÿ?	®LB4¯ÿ?se
®C1¯ÿ?[ÿ?+ÿ?ÿ?ÿ?	®IF®ER¯¯ÿ?ñ®GL5¯®EI¯ÿ?seb
 ®C1¯ÿ?+ÿ?+ÿ?	ÿ?Ï®PV101¯ÿ?se
®C1¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?	ÿ?+®PV102¯®GL4¯

Change REF commands temporarily
®LB5¯ÿ?se
®REF¯ÿ?+ÿ?	®IF®ER¯¯ÿ?ñ®GL3¯®EI¯ÿ?seb
 ®REF¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?Ï®PV101¯ÿ?se
®REF¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?+®PV102¯®GL5¯

Change DC commands
®LB3¯ÿ?se
®DC1=1¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	®IF®ER¯¯ÿ?ñ®GLQ¯®EI¯ÿ?seb
 ®REF¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?Ï®PV101¯ÿ?se
®REF¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?+®PV102¯®GL3¯

Change footnotes
®LBQ¯®LBagain¯ÿ?ES 1ÿ?	ÿ?se
®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+FNÿ?	®IF®ER¯¯ÿ?ñ®GLsf¯®EI¯ÿ?[ÿ?[ÿ?[®SX21,®CP¯¯ÿ?se
 ®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?[®SX22,®CP¯¯ÿ?seb
 ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	®SX23,®CP¯¯®IF®PV23¯==®PV21¯¯®GLfix¯®LB

¯®EI¯®LBrept¯ÿ?jmp ®PV22¯ÿ?	ÿ?cÿ?se
®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?[®SX22,®CP¯¯ÿ?seb
 ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	®SX24,®CP¯¯®IF®PV24¯==®PV23¯¯®GLfix¯®EI¯®SX23,®PV24¯¯®GLrept¯

®LBfix¯ÿ?jmp ®PV21¯ÿ?	ÿ?kÿ?jmp ®PV22¯ÿ?	ÿ?cÿ?kÿ?a®SX25,®CP¯¯ÿ?ÿ?jmp ®PV21¯ÿ?	ÿ?Ï®PV101¯ÿ?jmp ®PV22¯ÿ?	ÿ?Ï®PV102¯ÿ?jmp ®PV21¯ÿ?	ÿ?se ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+lbÿ?	®SX26,®CP¯¯®IF®ER¯¯ÿ?jmp ®PV25¯ÿ?	®GLagain¯®EI¯®IF®PV26¯<®PV22¯¯ÿ?[ÿ?[ÿ?[ÿ?Ï®PV101¯ÿ?se ®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?[ÿ?Ï®PV102¯®EI¯ÿ?jmp ®PV25¯ÿ?	®GLagain¯

®LBsf¯ÿ?es 1ÿ?	ÿ?se
®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+sfÿ?	®IF®ER¯¯ÿ?ñ®GL9¯®EI¯ÿ?seb
 ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?se
®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?aÿ?ÿ?seb
®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+sfÿ?	ÿ?Ï®PV101¯ÿ?se
®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?+®PV102¯®GLsf¯


NO MARKERS segment of program ends here; uses last two sections of MARKERS segment.
®GLDECIDE¯®PT1¯®IP0,10¯
FUNCTION: This program will "hard code" counters and their associated Define Counters and
References to Counters commands, while retaining all other formatting commands. It will create a new
file to do this; your original file will be saved exactly as it is on screen before you run this
program. You can choose to have a "label" marker added at each hard-coded spot, to show
you what used to be there (these markers will not interfere with printing). If you don't want to
have to make this choice every time you run the program, copy one of these two triangles to the very
beginning of this file:
     A. To always have markers: ®GLMARKERS¯
     B. To never have markers: ®GLNOMARKERS¯

TO USE:  Make certain file is on screen. RUN HARDCODE.PGM.

CAUTION: After running this program, you MUST reload your regular printer file. You must also STORE
the resulting "hard coded" file to disk under a new name.

This program revised 11/14/90 to include support for references to footnotes, non-incrementing
counters (ÿAEC1-ÿAF) and hyphens within DC commands (ÿAEDC1=I-A-1ÿAF)

This program was revised again 08/22/2008 to correct an anomaly. The original pgm used the string 'fix' as a placeholder and later deleted it in the target file, with the undesired result that any occurance of the string 'fix' (e.g. fix, fixed, fixture, affix, etc.) in the source file would get deleted (or truncated to ed, ture, af, etc.). This revision replaces the placeholder string 'fix' by the string '|||' (3 pipes, ASCII 124). There are five instances of this string in the pgm (some with, others w/o, a trailing space). This revision will work in xy3+, but not in xy4 (see hardcod4.pgm), so long as your source file does not contain any occurance of |||. Should your source file contain such a string, then modify this pgm and replace the five instances of ||| by any other string which does not occur in your source file (the characters need not be 3 of the same).[The difference between hardcod3.pgm and hardcod4.pgm is this: version three has the parameter ≪VAao≫, whereas version four changed this to ≪VAaot≫.]


®IP0¯DECIDE ABOUT MARKERS:
®LBDECIDE¯®SX01,®VA$WS¯¯®IF®PV01¯<>1¯ÿ?Program halted; file must be on screen.®EX¯®EI¯ÿ?Do you want "label" markers? (Y/N)®SV03,¯®SV02,YN¯®LB1¯®PR ESC=quits¯®SX01,®RC¯¯®SX01,@UPR(®IS01¯)¯®IF®IS01¯==®IS03¯¯ÿ?®PR Program halted¯®EX¯®EI¯®IF®IS01¯î®IS02¯==-1¯®GL1¯®EI¯®SX04,®VASL¯¯ÿ?ñ®IF®IS01¯î®IS02¯==0¯®GLMARKERS¯®EI¯®GLNOMARKERS¯


WITH MARKERS:
Change counters temporarily
®LBMARKERS¯®SV101,¯®SV102,¯®SV103,¯®SV104,¯®SV105,¯®SV106,ô¯®SV107,õ¯®SV108,ﯮSV109,ð¯®SV110,¯®SX01,®VA$WS¯¯®IF®PV01¯<>1¯ÿ?Program halted; file must be on screen.®EX¯®EI¯®SX01,®VAEH¯¯®SX02,®VAAL¯¯®SX03,®VAOF¯¯®SX04,®VATP¯¯®SX05,®VATB¯¯®SX06,®VARM¯¯®SX07,®VAPL¯¯®SX08,®VAHY¯¯®SX09,®VAao¯¯®SX210,®VAEP¯¯ÿ?saÿ?	®IF®ER¯¯ÿ?Program halted: Can't save file. ®EX¯®EI¯ÿ?es 1ÿ?	ÿ?d eh=0,hy=0ÿ?	ÿ?d ao=0,0ÿ?	ÿ?D EP=0ÿ?	ÿ?ñ
ÿ?ñ®PR Working . . .¯ÿ?Aÿ?­ÿ?ci ®C1¯
®PV101¯C1®PV102¯®C1¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C2¯
®PV101¯c2®PV102¯®C2¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C3¯
®PV101¯c3®PV102¯®C3¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C4¯
®PV101¯c4®PV102¯®C4¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C5¯
®PV101¯c5®PV102¯®C5¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C6¯
®PV101¯c6®PV102¯®C6¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C7¯
®PV101¯c7®PV102¯®C7¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C8¯
®PV101¯c8®PV102¯®C8¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C9¯
®PV101¯c9®PV102¯®C9¯ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
®C10¯
®PV101¯c10®PV102¯®C10¯ÿ?[ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
 ®C11¯
®PV101¯c11®PV102¯®C11¯ÿ?[ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
 ®C12¯
®PV101¯c12®PV102¯®C12¯ÿ?[ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
 ®C13¯
®PV101¯c13®PV102¯®C13¯ÿ?[ÿ?[ÿ?[ÿ?[lbÿ?	ÿ?ci
 ®C14¯
®PV101¯c14®PV102¯®C14¯ÿ?[ÿ?[ÿ?[ÿ?[lbÿ?	®LB8¯ÿ?es
1ÿ?	ÿ?se
®C1¯ÿ?[ÿ?+ÿ?ÿ?ÿ?	®IF®ER¯¯ÿ?ñ®GL10¯®EI¯ÿ?seb
 ®C1¯ÿ?+ÿ?+ÿ?	ÿ?kÿ?se
®C1¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?aÿ?ÿ?seb
®C1¯ÿ?+ÿ?+ÿ?+ÿ?	ÿ?clbÿ?seb
®C1¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?	ÿ?Ï®PV102¯ÿ?seb
®C1¯ÿ?+ÿ?+ÿ?+ÿ?	ÿ?Ï®PV101¯®GL8¯

Change REF commands temporarily
®LB10¯ÿ?es 1ÿ?	ÿ?se
®REF¯ÿ?+ÿ?	®IF®ER¯¯ÿ?ñ®GL6¯®EI¯ÿ?seb
 ®REF¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?se
®REF¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?aÿ?ÿ?seb
®REF¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?clbÿ?seb
®REF¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?Ï®PV102¯ÿ?seb
 ®REF¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?Ï®PV101¯®GL10¯

Change DC commands
®LB6¯ÿ?es 1ÿ?	ÿ?se
®DC1=1¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	®IF®ER¯¯ÿ?ñ®GLQ1¯®EI¯ÿ?seb
 ®REF¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?se
®REF¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?aÿ?ÿ?seb
®REF¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?clbÿ?seb
®REF¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?Ï®PV102¯ÿ?seb
 ®REF¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?Ï®PV101¯®GL6¯

Change footnotes
®LBQ1¯®LBagain1¯ÿ?ES 1ÿ?	ÿ?se
®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+FNÿ?	®IF®ER¯¯ÿ?ñ®GLsf1¯®EI¯ÿ?[ÿ?[ÿ?[®SX21,®CP¯¯ÿ?se
 ®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?[®SX22,®CP¯¯ÿ?seb
 ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	®SX23,®CP¯¯®IF®PV23¯==®PV21¯¯®GLfix1¯®LB

¯®EI¯®LBrept1¯ÿ?jmp ®PV22¯ÿ?	ÿ?cÿ?se
®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?[®SX22,®CP¯¯ÿ?seb
 ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	®SX24,®CP¯¯®IF®PV24¯==®PV23¯¯®GLfix1¯®EI¯®SX23,®PV24¯¯®GLrept1¯

®LBfix1¯ÿ?jmp ®PV21¯ÿ?	ÿ?kÿ?jmp ®PV22¯ÿ?	ÿ?cÿ?kÿ?a®SX25,®CP¯¯ÿ?ÿ?jmp ®PV21¯ÿ?	ÿ?Ï®PV101¯ÿ?jmp ®PV22¯ÿ?	ÿ?Ï®PV102¯ÿ?jmp ®PV21¯ÿ?	ÿ?se ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+lbÿ?	®SX26,®CP¯¯®IF®ER¯¯ÿ?jmp ®PV25¯ÿ?	®GLagain1¯®EI¯®IF®PV26¯<®PV22¯¯ÿ?[ÿ?[ÿ?[ÿ?Ï®PV101¯ÿ?se ®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?[ÿ?Ï®PV102¯®EI¯ÿ?jmp ®PV25¯ÿ?	®GLagain1¯

®LBsf1¯ÿ?es 1ÿ?	ÿ?se
®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+sfÿ?	®IF®ER¯¯ÿ?ñ®GL9¯®EI¯ÿ?seb
 ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?se
®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?aÿ?ÿ?seb
®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+sfÿ?	ÿ?Ï®PV101¯ÿ?se
®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?+®PV102¯®GLsf1¯


Change all other commands to preserve them; change counters back; save hard returns, tabs, hard
hyphens, hard spaces.
®LB9¯ÿ?ñÿ?­ÿ?es 1ÿ?	ÿ?ci
/ÿ?Áÿ?¿/®PV108¯/ÿ?	ÿ?ci / /®PV109¯
/ÿ?	ÿ?ci ®C1¯ÿ?+ÿ?+ÿ?+ ®PV103¯ÿ?	ÿ?ci
®C1¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?c ®PV104¯ÿ?	ÿ?ci
®PV101¯ |||®C1¯ÿ?+ÿ?+ÿ?+ÿ?	ÿ?ci ®PV102¯
®C1¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?	ÿ?ñÿ?Ïÿ?ci ÿ0A
®PV105¯ÿ?	ÿ?ci 	 ®PV107¯ÿ?	ÿ?ci
ÿ?Ãÿ?Å ®PV106¯ÿ?	®GL9A¯


Process non-incrementing counters and DC commands containing hyphens to protect counter & DC
hyphens from upcoming conversion to 3-byte hard hyphens.
®LB9A¯®LBloop1¯ÿ?se
/®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+Cÿ?ÿ?-¯/ÿ?	®IF®ER¯¯®GL9AA¯®EI¯ÿ?[ÿ?+Û®GLloop1¯

®LB9AA¯ÿ?ñ®LBloop8¯ÿ?se /®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+DCÿ?-ÿ?ÿ?c/ÿ?	®IF®ER¯¯®GL9B¯®EI¯ÿ?seb /®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+DC/ÿ?	®SX600,®CP¯¯ÿ?se ®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	®LB-loop9¯ÿ?seb /-/ÿ?	®IF®ER¯¯®GLloop8¯®EI¯®SX601,®CP¯¯®IF®PV600¯<®PV601¯¯ÿ?ÏÛ®GL-loop9¯®EI¯ÿ?se /®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+DCÿ?-ÿ?ÿ?c/ÿ?	®GLloop8¯


Change remaining hyphens to hard hyphens, change back non-incrementing counter & DC-hyphens.
®LB9B¯ÿ?ñÿ?ci - ÿ?Ãÿ?Åÿ?	ÿ?ci
/Û/-/ÿ?	®GL7¯


Remove existing printer file; load temp printer file; TYF this file; reinstate other commands
®LB7¯®SV12,PG<®PV110¯
DF TB=1
DF OF=0,0
DF TP=0
DF AL=0
DF RM=100
DF PL=250,250,250
PT=1,2,3
MD NM+10CPI
MD BO+10CPI
MD UL+10CPI
MD RV+0CPI
MD BU+10CPI
MD BR+10CPI
MD SU+10CPI
MD SD+10CPI
FO:10CPI
UW:10CPI
ET
WD:10CPI
SW=1
ET
FO:0CPI
UW:0CPI
ET
WD:0CPI
SW=0
ET
VU=1,1,10
VS:1

MU=1
DU=1
MS=1
CP:1

¯®SV13,ÿ?½ÿ?Á¯®SV10,ÿ?½ÿ?»¯ÿ?es
1ÿ?	ÿ?unload 7fÿ?	ÿ?ñÿ?k;PR;
LE<{++LE++}
PE<®PV13¯®PV10¯
FB<
FE<
®PV12¯ÿ?kÿ?sad
hardcode.prnÿ?	ÿ?Ñÿ?ñÿ?nfÿ?	ÿ?load
hardcode.prnÿ?	®IF®ER¯¯ÿ?abÿ?	ÿ?d
al=®PV02¯ÿ?	ÿ?d of=®PV03¯ÿ?	ÿ?d
tp=®PV04¯ÿ?	ÿ?d tb=®PV05¯ÿ?	ÿ?d
rm=®PV06¯,hy=®PV08¯ÿ?	ÿ?d ao=®PV09¯ÿ?	ÿ?d
pl=®PV07¯ÿ?	ÿ?D EP=®PV210¯ÿ?	ÿ?es
0ÿ?	ÿ?caÿ?	ÿ?d eh=®PV01¯ÿ?	ÿ??ÿ?Program halted:
Can't load special printer file.®EX¯®EI¯ÿ?ernv
hardcode.prnÿ?	ÿ?ñÿ?ci  ®MDRV¯ÿ?	ÿ?ci 
®MDNM¯ÿ?	ÿ?ci /|||/|||
/ÿ?	ÿ?tyfÿ?	ÿ?waitÿ?	ÿ?abÿ?	ÿ?ca fo.tmpÿ?	®LB

¯®SV31,1234567890¯®LB
 -The following section has revisions in the last line.
¯ÿ?­ÿ??ÿ?d eh=®PV01¯ÿ?	ÿ?d
al=®PV02¯ÿ?	ÿ?d of=®PV03¯ÿ?	ÿ?d
tp=®PV04¯ÿ?	ÿ?d tb=®PV05¯ÿ?	ÿ?d
rm=®PV06¯,hy=®PV08¯ÿ?	ÿ?d pl=®PV07¯ÿ?	ÿ?D
EP=®PV210¯ÿ?	ÿ?ci ®PV104¯
®C1¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?	ÿ?ci ®PV103¯
®C1¯ÿ?+ÿ?+ÿ?+ÿ?	ÿ?ci ®PV106¯
ÿ?Ãÿ?Åÿ?	ÿ?ci ®PV105¯ ÿ0Aÿ?	ÿ?ci
®PV107¯ 	ÿ?	ÿ?ci
/®PV108¯/ÿ?Áÿ?¿/ÿ?	ÿ?ci /||| //ÿ?	ÿ?ci
/|||//ÿ?	ÿ?ci /®PV109¯ / /ÿ?	ÿ?ci /{++LE++}//ÿ?	ÿ?ci
/®PV109¯/ /ÿ?	®LB

Delete all footnote numbers in text generated by typef:
¯®LBloopz¯ÿ?se ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+fnÿ?ÿ?	®IF®ER¯¯®GLfinish¯®EI¯ÿ?[ÿ?[ÿ?[ÿ?[®SX30,®CP¯¯®LBdeloo¯ÿ?kÿ?[ÿ?k®SV35¯ÿ?®IF®IS35¯î®IS31¯>=0¯®GLdeloo¯®EI¯ÿ?cÿ?kÿ?jmp ®PV30¯ÿ?	ÿ?kÿ?Ñÿ?cÿ?cÿ?cÿ?c®GLloopz¯

®LBfinish¯ÿ?¯®LB2¯ÿ?ñÿ??ÿ?;ÿ?¡ÿ?¡ÿ?se
 ®PV110¯ÿ?	ÿ?[ÿ?Word space or hard return? ®PRPress space bar or
ENTER¯ÿ?S®IF®ER¯¯ÿ?ñÿ?d
ao=®PV09¯ÿ?	ÿ?es 0ÿ?	ÿ?Please store under new name and reload
printer file®EX¯®EI¯®SV02, ¯®SV03,
¯®SX01,®RC¯¯®IF®IS01¯==®IS02¯¯ÿ?Ï ®GL2¯®EI¯®IF®IS01¯î®IS03¯<>-1¯ÿ?Ïÿ0D®GL2¯®EI¯®GL2¯


WITHOUT MARKERS:
®LBNOMARKERS¯®SV101,¯®SV102,¯®SV103,¯®SV104,¯®SV105,¯®SV106,ô¯®SV107,õ¯®SV108,ﯮSV109,ð¯®SV110,¯®SV111,ÿ20¯®SX01,®VA$WS¯¯®IF®PV01¯<>1¯ÿ?Program halted; file must be on screen.®EX¯®EI¯®SX01,®VAEH¯¯®SX02,®VAAL¯¯®SX03,®VAOF¯¯®SX04,®VATP¯¯®SX05,®VATB¯¯®SX06,®VARM¯¯®SX07,®VAPL¯¯®SX08,®VAHY¯¯®SX210,®VAEP¯¯ÿ?saÿ?	®IF®ER¯¯ÿ?Program halted: Can't save file. ®EX¯®EI¯ÿ?es 1ÿ?	ÿ?d eh=0,hy=0ÿ?	ÿ?d ao=0,0ÿ?	ÿ?D EP=0ÿ?	ÿ?ñ
ÿ?ñ®PR Working . . .¯ÿ?Aÿ?­ÿ?ci ®C1¯
®PV101¯C1®PV102¯ÿ?	ÿ?ci ®C2¯
®PV101¯C2®PV102¯ÿ?	ÿ?ci ®C3¯
®PV101¯C3®PV102¯ÿ?	ÿ?ci ®C4¯
®PV101¯C4®PV102¯ÿ?	ÿ?ci ®C5¯
®PV101¯C5®PV102¯ÿ?	ÿ?ci ®C6¯
®PV101¯C6®PV102¯ÿ?	ÿ?ci ®C7¯
®PV101¯C7®PV102¯ÿ?	ÿ?ci ®C8¯
®PV101¯C8®PV102¯ÿ?	ÿ?ci ®C9¯
®PV101¯C9®PV102¯ÿ?	ÿ?ci ®C10¯
®PV101¯C10®PV102¯ÿ?	ÿ?ci ®C11¯
®PV101¯C11®PV102¯ÿ?	ÿ?ci ®C12¯
®PV101¯C12®PV102¯ÿ?	ÿ?ci ®C13¯
®PV101¯C13®PV102¯ÿ?	ÿ?ci ®C14¯
®PV101¯C14®PV102¯ÿ?	®LB4¯ÿ?se
®C1¯ÿ?[ÿ?+ÿ?ÿ?ÿ?	®IF®ER¯¯ÿ?ñ®GL5¯®EI¯ÿ?seb
 ®C1¯ÿ?+ÿ?+ÿ?	ÿ?Ï®PV101¯ÿ?se
®C1¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?	ÿ?+®PV102¯®GL4¯

Change REF commands temporarily
®LB5¯ÿ?se
®REF¯ÿ?+ÿ?	®IF®ER¯¯ÿ?ñ®GL3¯®EI¯ÿ?seb
 ®REF¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?Ï®PV101¯ÿ?se
®REF¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?+®PV102¯®GL5¯

Change DC commands
®LB3¯ÿ?se
®DC1=1¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	®IF®ER¯¯ÿ?ñ®GLQ¯®EI¯ÿ?seb
 ®REF¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?Ï®PV101¯ÿ?se
®REF¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?+®PV102¯®GL3¯

Change footnotes
®LBQ¯®LBagain¯ÿ?ES 1ÿ?	ÿ?se
®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+FNÿ?	®IF®ER¯¯ÿ?ñ®GLsf¯®EI¯ÿ?[ÿ?[ÿ?[®SX21,®CP¯¯ÿ?se
 ®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?[®SX22,®CP¯¯ÿ?seb
 ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	®SX23,®CP¯¯®IF®PV23¯==®PV21¯¯®GLfix¯®LB

¯®EI¯®LBrept¯ÿ?jmp ®PV22¯ÿ?	ÿ?cÿ?se
®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?[®SX22,®CP¯¯ÿ?seb
 ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	®SX24,®CP¯¯®IF®PV24¯==®PV23¯¯®GLfix¯®EI¯®SX23,®PV24¯¯®GLrept¯

®LBfix¯ÿ?jmp ®PV21¯ÿ?	ÿ?kÿ?jmp ®PV22¯ÿ?	ÿ?cÿ?kÿ?a®SX25,®CP¯¯ÿ?ÿ?jmp ®PV21¯ÿ?	ÿ?Ï®PV101¯ÿ?jmp ®PV22¯ÿ?	ÿ?Ï®PV102¯ÿ?jmp ®PV21¯ÿ?	ÿ?se ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+lbÿ?	®SX26,®CP¯¯®IF®ER¯¯ÿ?jmp ®PV25¯ÿ?	®GLagain¯®EI¯®IF®PV26¯<®PV22¯¯ÿ?[ÿ?[ÿ?[ÿ?Ï®PV101¯ÿ?se ®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?[ÿ?Ï®PV102¯®EI¯ÿ?jmp ®PV25¯ÿ?	®GLagain¯

®LBsf¯ÿ?es 1ÿ?	ÿ?se
®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+sfÿ?	®IF®ER¯¯ÿ?ñ®GL9¯®EI¯ÿ?seb
 ®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?se
®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?kÿ?aÿ?ÿ?seb
®LM0¯ÿ?+ÿ?+ÿ?+ÿ?+sfÿ?	ÿ?Ï®PV101¯ÿ?se
®LM0¯ÿ?[ÿ?+ÿ?+ÿ?+ÿ?+ÿ?	ÿ?+®PV102¯®GLsf¯


NO MARKERS segment of program ends here; uses last two sections of MARKERS segment.