-- 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 ¬ "MODERN10-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN10-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN10-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["MODERN10-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN10-B-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN10-B-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN10-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["MODERN10-B-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN10-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN10-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN10-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["MODERN10-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN10-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN10-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN10-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["MODERN10-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN12-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN12-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN12-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["MODERN12-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN12-B-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN12-B-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN12-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["MODERN12-B-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN12-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN12-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN12-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["MODERN12-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN12-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN12-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN12-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["MODERN12-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN14-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN14-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN14-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["MODERN14-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN14-B-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN14-B-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN14-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["MODERN14-B-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN14-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN14-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN14-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["MODERN14-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN14-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN14-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN14-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["MODERN14-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN18-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN18-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN18-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["MODERN18-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN18-B-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN18-B-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN18-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["MODERN18-B-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN18-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN18-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN18-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["MODERN18-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN18-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN18-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN18-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["MODERN18-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN24-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN24-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN24-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["MODERN24-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN24-B-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN24-B-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN24-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["MODERN24-B-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN24-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN24-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN24-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["MODERN24-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN24-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN24-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN24-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["MODERN24-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN30-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN30-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN30-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["MODERN30-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN30-B-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN30-B-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN30-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["MODERN30-B-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN30-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN30-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN30-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["MODERN30-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN30-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN30-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN30-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["MODERN30-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN36-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN36-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN36-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["MODERN36-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN36-B-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN36-B-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN36-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["MODERN36-B-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN36-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN36-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN36-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["MODERN36-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN36-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN36-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN36-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["MODERN36-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN6-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN6-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN6-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["MODERN6-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN6-B-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN6-B-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN6-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["MODERN6-B-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN6-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN6-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN6-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["MODERN6-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN6-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN6-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN6-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["MODERN6-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN8-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN8-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN8-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["MODERN8-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN8-B-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN8-B-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN8-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["MODERN8-B-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN8-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN8-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN8-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["MODERN8-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "MODERN8-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["MODERN8-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>MODERN8-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["MODERN8-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "TERMINAL12-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["TERMINAL12-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>TERMINAL12-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["TERMINAL12-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "TERMINAL12-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["TERMINAL12-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>TERMINAL12-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["TERMINAL12-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "TERMINAL8-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["TERMINAL8-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>TERMINAL8-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["TERMINAL8-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "TERMINAL8-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["TERMINAL8-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>TERMINAL8-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["TERMINAL8-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "TERMINAL10-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["TERMINAL10-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>TERMINAL10-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["TERMINAL10-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "TERMINAL10-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["TERMINAL10-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>TERMINAL10-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["TERMINAL10-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "TERMINAL6-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["TERMINAL6-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>TERMINAL6-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["TERMINAL6-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "TERMINAL6-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["TERMINAL6-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>TERMINAL6-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["TERMINAL6-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "TITAN10-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["TITAN10-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>TITAN10-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["TITAN10-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "TITAN10-B-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["TITAN10-B-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>TITAN10-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["TITAN10-B-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "TITAN10-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["TITAN10-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>TITAN10-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["TITAN10-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "TITAN10-I-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["TITAN10-I-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>TITAN10-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["TITAN10-I-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "TITAN12-B-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["TITAN12-B-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>TITAN12-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["TITAN12-B-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;
FileTool.paramSW.Source ¬ "TITAN12-C0.DISPLAYFONT" 
FileTool.cmdSW.Retrieve 
DO IF FileCreated["TITAN12-C0.DISPLAYFONT",1000] then EXITLOOP; WAIT[1] ENDLOOP;SetSelection["54, 168"] 
InvokeMCR[Typefounder1.logSW, "Typefounder", "Font"]
 
SetSelection["wdfiles>TITAN12-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["TITAN12-C0.DISPLAYFONT",1000] THEN EXITLOOP; Wait[1] ENDLOOP;