tIntuitionBase

type tIntuitionBase = record

  LibNode: tLibrary;

  ViewLord: tView;

  ActiveWindow: pWindow;

  ActiveScreen: pScreen;

  FirstScreen: pScreen;

  Flags: ULONG;

  MouseY: SmallInt;

  MouseX: SmallInt;

  Seconds: ULONG;

  Micros: ULONG;

end;