-- MagicDefs.mesa
-- Written by Joe Maleson
-- Last changed by Doug Wyatt, October 20, 1980 2:45 PM

DIRECTORY
GraphicsDefs: FROM "GraphicsDefs";

MagicDefs: DEFINITIONS =
BEGIN

MakeLongPointer: PUBLIC PROCEDURE [ptr: POINTER,bank: CARDINAL] RETURNS [LONG POINTER] = MACHINE CODE BEGIN END;

Random: PROCEDURE RETURNS [CARDINAL];
GetUserBox: PROCEDURE [xRatio,yRatio: CARDINAL] RETURNS [x,y: CARDINAL,dx,dy: INTEGER];
Menu: PROCEDURE [nItems: CARDINAL,itemList: POINTER TO ARRAY [0..0) OF STRING,font: POINTER TO GraphicsDefs.StrikeFont] RETURNS [index: CARDINAL];
InitReadBlock: PROCEDURE;
ReadBlock: PROCEDURE[sfd: POINTER,p: POINTER TO UNSPECIFIED,nwords: CARDINAL] RETURNS [POINTER TO UNSPECIFIED];

END.