DEFINITION MODULE ApplFish; IMPORT Windows,WMain; (*# name(prefix=>windows) *) (*# call(near_call=> off, reg_param=>()) *) (*# save *) (*# call(windows=>on) *) (*# restore *) PROCEDURE ReOutputOtherInstances(ThisFish : WMain.Fish ; hMemoryDC,hdc : Windows.HDC); PROCEDURE DeleteFishInstances; PROCEDURE AnimateOtherInstances(hdc,hMemoryDC : Windows.HDC; ThisFish : WMain.Fish); PROCEDURE RandomizeInstances(ThisFish : WMain.Fish); VAR TempInst : WMain.InstancePtr; PROCEDURE ReInitInstances(hWnd : Windows.HWND ; hdc : Windows.HDC; NInstances, FishHere : CARDINAL); PROCEDURE ResourcesLow(hWnd : Windows.HWND) : BOOLEAN; PROCEDURE TimersLow(hWnd : Windows.HWND); END ApplFish.