-- FOR INTERNAL USE ONLY

-- Session started  8-Oct-85 17:28:23 PDT
-- Before running this script in ToolDriver change 'Teaching' to 'Running' in following statement.
Typefounder1.cmdSW.Mode ¬ "Running ToolDriver" 
FileTool.paramSW.Source ¬ "BOLDPS10-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["BOLDPS10-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>BOLDPS10-B-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["BOLDPS10-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "BOLDPS10-B-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["BOLDPS10-B-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>BOLDPS10-B-I-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["BOLDPS10-B-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "BOLDPS10-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["BOLDPS10-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>BOLDPS10-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["BOLDPS10-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "BOLDPS10-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["BOLDPS10-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>BOLDPS10-I-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["BOLDPS10-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC10-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC10-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC10-B-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC10-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC10-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC10-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC10-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC10-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC10-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC10-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC10-I-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC10-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC12-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC12-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC12-B-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC12-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC12-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC12-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC12-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC12-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC12-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC12-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC12-I-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC12-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC14-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC14-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC14-B-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC14-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC14-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC14-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC14-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC14-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC14-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC14-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC14-I-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC14-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC18-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC18-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC18-B-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC18-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC18-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC18-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC18-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC18-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC18-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC18-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC18-I-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC18-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC24-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC24-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC24-B-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC24-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC24-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC24-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC24-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC24-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC24-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC24-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC24-I-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC24-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC6-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC6-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC6-B-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC6-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC6-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC6-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC6-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC6-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC6-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC6-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC6-I-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC6-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC8-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC8-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC8-B-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC8-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC8-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC8-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC8-B-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC8-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC8-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC8-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC8-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC8-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSIC8-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSIC8-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSIC8-I-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSIC8-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSICTHIN16-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSICTHIN16-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSICTHIN16-B-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSICTHIN16-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSICTHIN16-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSICTHIN16-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSICTHIN16-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSICTHIN16-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSICTHIN20-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSICTHIN20-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSICTHIN20-B-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSICTHIN20-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSICTHIN20-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSICTHIN20-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSICTHIN20-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSICTHIN20-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSICTHIN26-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSICTHIN26-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSICTHIN26-B-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSICTHIN26-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSICTHIN26-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSICTHIN26-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSICTHIN26-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSICTHIN26-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSICTHIN30-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSICTHIN30-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSICTHIN30-B-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSICTHIN30-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "CLASSICTHIN30-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["CLASSICTHIN30-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>CLASSICTHIN30-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["CLASSICTHIN30-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "LETTERGOTHIC10-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["LETTERGOTHIC10-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>LETTERGOTHIC10-B-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["LETTERGOTHIC10-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "LETTERGOTHIC10-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["LETTERGOTHIC10-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>LETTERGOTHIC10-C0.DISPLAYFONT"] 
Font1.cmdSW.Load
 
Font1.cmdSW.Edit
 
SetSelection["96, 151"] 
InvokeMCR[Font1.formatSW, "Typefounder", "Merger"]
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "¤ (244B)" 
Merger1.rangeSW.First2 ¬ "¤ (244B)" 
Merger1.rangeSW.Start2 ¬ "$ (44B)" 
Merger1.rangeSW.First3 ¬ "$ (44B)" 
Merger1.rangeSW.Start3 ¬ " (177B)" 
Merger1.cmdSW.Merge
 
Merger1.cmdSW.Clear
 
Merger1.rangeSW.First1 ¬ " (177B)" 
Merger1.rangeSW.Start1 ¬ "" 
Merger1.rangeSW.First2 ¬ "" 
Merger1.rangeSW.Start2 ¬ "" 
Merger1.rangeSW.First3 ¬ "" 
Merger1.rangeSW.Start3 ¬ "" 
Merger1.cmdSW.Delete
 
InvokeMCR[Merger1.statusSW, "Typefounder", "Destroy"] 
Font1.cmdSW.Save
 
InvokeMCR[Font1.formatSW, "Typefounder", "Destroy"] 
FileTool.cmdSW.Store wait[10] FileTool.cmdSW.Local'-Delete DO IF FALSE = FileCreated["LETTERGOTHIC10-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;