DIRECTORYIPOperatorOut USING [Handle],PressReader USING [Handle],Rope USING [ROPE];PressToIP: DEFINITIONS = BEGINPressFile: TYPE = PressReader.Handle;IPMaster: TYPE = IPOperatorOut.Handle;OpenPressFile: PROCEDURE [pressFileName: Rope.ROPE] RETURNS [pressFile: PressFile];OpenOutputIPMaster: PROCEDURE [ipMasterName: Rope.ROPE] RETURNS [ipMaster: IPMaster];ConvertPressToInterpress: PROCEDURE [pressFile: PressFile,ipMaster: IPMaster,usePriority: BOOLEAN _ FALSE,  -- if TRUE, set priorityImportant on each pagefullInterpress: BOOLEAN _ FALSE,  -- if TRUE, generate full Interpress instead of IP 2.0progressProc: ProgressProc _ NIL,progressData: REF ANY];ProgressProc: TYPE = PROCEDURE[finishedWhat: FinishedWhat, progressData: REF ANY];FinishedWhat: TYPE = {preamble, page, document};Error: ERROR [errorCode: ErrorCode];ErrorCode: PUBLIC TYPE = {FileNotAvailable, FileNotAPressFile, FontNotFound};END.   |  PressToIP.mesaLast edited by Shore; January 30, 1983 5:18 pmLast edited by Wyatt; March 2, 1983 10:47 amThis interface provides a Press to Interpress converter.opens the Press file to be convertedERRORS: Error[FileNotAvailable, FileNotAPressFile]opens the Interpress Master for writtingERRORS: Error[FileNotAvailable]performs the conversion and closes both filesprogressProc is called (with progressData) upon the completion of the preamble, each page, and the entire documentChange LogCreated by Shore; September 16, 1982 2:30 pmChanged by Shore; September 22, 1982 10:33 amAdded ProgressProcChanged by Shore; September 26, 1982 2:54 pmconverted to new operator interface and added usePriority stuffChanged by Shore; November 16, 1982 12:54 pmconverted to Cedar.Style and added node formatsChanged by Wyatt; March 2, 1983 10:47 amadded fullInterpress parameter Êà  –"Cedar" style˜ head1šÏc™Jš.™.Jš,™,Ibodyš8™8unitšÏk	˜	Jšœžœ
˜Jšœžœ
˜Jšœžœžœ˜——šÏn	œžœž˜J˜ Jšœžœ˜%Jšœ
žœ˜&šŸœž	œžœžœ˜SJš$™$Jš2™2—šŸœž	œžœžœ˜UJš(™(Jš™—šŸœž	œ˜%Jšœ˜Jšœ˜Jšœžœžœ.˜MJšœžœžœ6˜XJšœžœ˜!Jšœžœžœ˜Jš-™-Jšr™r—J˜ Jš
Ÿœžœž	œ+žœžœ˜RJšœžœ˜0J˜ Jšœžœ˜$Jšœžœžœ7˜MJ˜ Jšžœ˜—š
™
J™,J™ ™-J™—J™ ™,J™?—J™ ™,J™/—J™ ™(J™——— …—       ü  