-- file: MFExternals.mesa
-- Pascal-to-Mesa translator output, translated at October 31, 1985 4:28:00 pm PST


DIRECTORY
  PascalBasic,
  PascalWizardFiles,
  MFTypes;

MFExternals: DEFINITIONS IMPORTS  =
BEGIN OPEN PascalBasic, PascalWizardFiles, MFTypes;

--:1202----1213:
 ResetTermIn: PROCEDURE[ F: LONG POINTER TO AlphaFile];


 RewriteTermOut: PROCEDURE[ F: LONG POINTER TO AlphaFile];


 ReadTheClock: PROCEDURE[ Ttime,Dday,Mmonth,Yyear: LONG POINTER TO PascalInteger];


 FileGetPos: PROCEDURE[ F: LONG POINTER TO AlphaFile] RETURNS[FileGetPosResult: PascalInteger];


 SetPoolName: PROCEDURE;

 ReadProfileForDirectories: PROCEDURE
;

 SetNormalPriority: PROCEDURE;


 SetBackgroundPriority: PROCEDURE;


 StuffOnCmdLine: PROCEDURE RETURNS[StuffOnCmdLineResult: PascalInteger];


 RegisterMfCommands: PROCEDURE;

--:4----26:-- AOpenIn: PROCEDURE[ F: LONG POINTER TO AlphaFile] RETURNS[AOpenInResult: PascalBoolean];


 AOpenOut: PROCEDURE[ F: LONG POINTER TO AlphaFile] RETURNS[AOpenOutResult: PascalBoolean];


 BOpenIn: PROCEDURE[ F: LONG POINTER TO ByteFile] RETURNS[BOpenInResult: PascalBoolean];


 BOpenOut: PROCEDURE[ F: LONG POINTER TO ByteFile] RETURNS[BOpenOutResult: PascalBoolean];


 WOpenIn: PROCEDURE[ F: LONG POINTER TO WordFile] RETURNS[WOpenInResult: PascalBoolean];


 WOpenOut: PROCEDURE[ F: LONG POINTER TO WordFile] RETURNS[WOpenOutResult: PascalBoolean];

--:26----27:
 AClose: PROCEDURE[ F: LONG POINTER TO AlphaFile];


 BClose: PROCEDURE[ F: LONG POINTER TO ByteFile];


 WClose: PROCEDURE[ F: LONG POINTER TO WordFile];

 InitScreen: PROCEDURE RETURNS[InitScreenResult: PascalBoolean];

 UpdateScreen: PROCEDURE;


--:564----567:-- BlankRectangle: PROCEDURE[LeftCol,RightCol: ScreenCol,
TopRow,BotRow: ScreenRow];

--:567----568:
 PaintRow: PROCEDURE[R: ScreenRow,B: PixelColor, A: LONG POINTER TO TransSpec,
N: ScreenCol];

--:773----777:-- PackBufferedName: PROCEDURE[A,B: PascalInteger];


 PackDefaultArea: PROCEDURE[A,B: PascalInteger];


 PackAllDefault: PROCEDURE;

 AMakeNameString: PROCEDURE[ F: LONG POINTER TO AlphaFile] RETURNS[AMakeNameStringResult: StrNumber];


 BMakeNameString: PROCEDURE[ F: LONG POINTER TO ByteFile] RETURNS[BMakeNameStringResult: StrNumber];


 WMakeNameString: PROCEDURE[ F: LONG POINTER TO WordFile] RETURNS[WMakeNameStringResult: StrNumber];

END.