{$if not def INTUITION_LIB} CONST INTUITION_LIB=0;

{ ***************************************************************
  ** KickPascal-Include-Datei "intuition.lib" zu Kickstart 3.0 **
  *************************************************************** }

{$if not def INTUITION_INTUITION_H;incl "intuition/intuition.h";endif}
{$if not def INTUITION_CLASSES_H;incl "intuition/classes.h";endif}
{$if not def INTUITION_GADGETCLASS_H;incl "intuition/gadgetclass.h";endif}
{$if not def INTUITION_INTUITIONBASE_H;incl "intuition/gadgetclass.h";endif}

VAR IntuitionBase : Ptr;

LIBRARY IntuitionBase :

 -30 : PROCEDURE OpenIntuition;
 -36 : PROCEDURE _Intuition(A0:p_InputEvent);
 -42 : FUNCTION  AddGadget(A0:p_Window; A1:p_Gadget; D0:Long): Word;
 -48 : FUNCTION  ClearDMRequest(A0:p_Window): Boolean;
 -54 : PROCEDURE ClearMenuStrip(A0:p_Window);
 -60 : PROCEDURE ClearPointer(A0:p_Window);
 -66 : FUNCTION  CloseScreen(A0:p_Screen): Boolean;
 -72 : PROCEDURE CloseWindow(A0:p_Window);
 -78 : FUNCTION  CloseWorkBench: LongInt;
 -84 : PROCEDURE CurrentTime(A0,A1:Ptr);
 -90 : FUNCTION  DisplayAlert(D0:Long; A0:Str; D1:Long): Boolean;
 -96 : PROCEDURE DisplayBeep(A0:p_Screen);
-102 : FUNCTION  DoubleClick(D0,D1,D2,D3: Long): Boolean;
-108 : PROCEDURE DrawBorder(A0:p_RastPort; A1:p_Border; D0,D1:LongInt);
-114 : PROCEDURE DrawImage(A0:p_RastPort; A1:p_Image; D0,D1:LongInt);
-120 : PROCEDURE EndRequest(A0:p_Requester; A1:p_Window);
-126 : FUNCTION  GetDefPrefs(A0:p_Preferences; D0:LongInt): p_Preferences;
-132 : FUNCTION  GetPrefs(A0:p_Preferences; D0:LongInt): p_Preferences;
-138 : PROCEDURE InitRequester(A0:p_Requester);
-144 : FUNCTION  ItemAddress(A0:p_Menu; D0:Long): p_MenuItem;
-150 : FUNCTION  ModifyIDCMP(A0:p_Window; D0:Long): Boolean;
-156 : PROCEDURE ModifyProp(A0:p_Gadget; A1:p_Window; A2:Requester; D0,D1,D2,D3,D4:Long)
-162 : PROCEDURE MoveScreen(A0:p_Screen; D0,d1:LongInt);
-168 : PROCEDURE MoveWindow(A0:p_Window; D0,d1:LongInt);
-174 : PROCEDURE OffGadget(A0:p_Gadget; A1:p_Window; A2:p_Requester);
-180 : PROCEDURE OffMenu(A0:p_Window; D0:Long);
-186 : PROCEDURE OnGadget(A0:p_Gadget; A1:p_Window; A2:p_Requester);
-192 : PROCEDURE OnMenu(A0:p_Window; D0:Long);
-198 : FUNCTION  OpenScreen(A0:p_NewScreen): p_Screen;
-204 : FUNCTION  OpenWindow(A0:p_NewWindow): p_Window;
-210 : FUNCTION  OpenWorkBench : Boolean;
-216 : PROCEDURE PrintIText(A0:p_RastPort; A1:p_IntuiText; D0,D1:LongInt);
-222 : PROCEDURE RefreshGadgets(A0:p_Gadget; A1:p_Window; A2:p_Requester);
-228 : FUNCTION  RemoveGadget(A0:p_Window, A1:p_Gadget): Word;
-234 : PROCEDURE ReportMouse(D0:LongInt; A0:p_Window);
-234 : PROCEDURE ReportMouse1(A0:p_Window; D0:LongInt);
-240 : FUNCTION  Request(A0:p_Requester; A1:p_Window): Boolean;
-246 : PROCEDURE ScreenToBack(A0:p_Screen);
-252 : PROCEDURE ScreenToFront(A0:p_Screen);
-258 : FUNCTION  SetDMRequest(A0:p_Window; A1:p_Requester): Boolean;
-264 : FUNCTION  SetMenuStrip(A0:p_Window; A1:p_Menu): Boolean;
-270 : PROCEDURE SetPointer(A0:p_Window; A1:Ptr; D0,D1,D2,D3:LongInt);
-276 : PROCEDURE SetWindowTitles(A0:p_Window; A1,A2:Str);
-282 : PROCEDURE ShowTitle(A0:p_Screen; D0:LongInt);
-288 : PROCEDURE SizeWindow(A0:p_Window; D0,D1:LongInt);
-294 : FUNCTION  ViewAddress: p_View;
-300 : FUNCTION  ViewPortAddress(A0:p_Window): p_ViewPort;
-306 : PROCEDURE WindowToBack(A0:p_Window);
-312 : PROCEDURE WindowToFront(A0:p_Window);
-318 : FUNCTION  WindowLimits(A0:p_Window; D0,D1:Long; D2,D3:Long): Boolean;
-324 : FUNCTION  SetPrefs(A0:p_Preferences; D0,D1:LongInt): p_Preferences;
-330 : FUNCTION  IntuiTextLength(A0:p_IntuiText): LongInt;
-336 : FUNCTION  WBenchToBack: Boolean;
-342 : FUNCTION  WBenchToFront: Boolean;
-348 : FUNCTION  AutoRequest(A0:p_Window; A1,A2,A3:p_IntuiText; D0,D1,D2,D3:Long): Boolean;
-354 : PROCEDURE BeginRefresh(A0:p_Window);
-360 : FUNCTION  BuildSysRequest(A0:p_Window; A1,A2,A3:p_IntuiText; D0,D1,D2:Long): p_Window;
-366 : PROCEDURE EndRefresh(A0:p_Window; D0:LongInt);
-372 : PROCEDURE FreeSysRequest(A0:p_Window);
-378 : PROCEDURE MakeScreen(A0:p_Screen);
-384 : PROCEDURE RemakeDisplay;
-390 : PROCEDURE RethinkDisplay;
-396 : FUNCTION  AllocRemember(A0:Ptr; D0,D1:Long): Ptr;
-402 : PROCEDURE AlohaWorkbench(D0:LongInt);
-408 : PROCEDURE FreeRemember(A0:Ptr; D0:LongInt);
-414 : FUNCTION  LockIBase(D0:LongInt): Long;
-420 : PROCEDURE UnlockIBase(A0:LongInt);

{ --- Routinen ab V33 / Kickstart 1.2 --- }

-426 : FUNCTION  GetScreenData(A0:Ptr; D0,D1:Long; A1:p_Screen): LongInt;
-432 : PROCEDURE RefreshGList(A0:p_Gadget; A1:p_Window; A2:p_Requester; D0:LongInt);
-438 : FUNCTION  AddGList(A0:p_Window, A1:p_Gadget; D0:Long; D1:LongInt; A2:p_Requester): Word;
-444 : FUNCTION  RemoveGList(A0:p_Window; A1:p_Gadget; D0:LongInt): Word;
-450 : FUNCTION  ActivateWindow(A0:p_Window): LongInt;
-456 : PROCEDURE RefreshWindowFrame(A0:p_Window);
-462 : FUNCTION  ActivateGadget(A0:p_Gadget; A1:p_Window; A2:p_Requester): Boolean;
-468 : PROCEDURE NewModifyProp(A0:p_Gadget; A1:p_Window; A2:p_Requester; D0,D1,D2,D3,D4: Long; D5:LongInt)

{ --- Routinen ab V36 / Kickstart 2.0 --- }

-474 : FUNCTION  QueryOverscan(A0:Long; A1:p_Rectangle; D0:LongInt): LongInt;
-480 : PROCEDURE MoveWindowInFrontOf(A0,A1:p_Window);
-486 : PROCEDURE ChangeWindowBox(A0:p_Window; D0,D1,D2,D3: LongInt);
-492 : FUNCTION  SetEditHook(A0:p_Hook): p_Hook;
-498 : FUNCTION  SetMouseQueue(A0:p_Window; D0:Long): LongInt;
-504 : PROCEDURE ZipWindow(A0:p_Window);
-510 : FUNCTION  LockPubScreen(A0:Str): p_Screen;
-516 : PROCEDURE UnlockPubScreen(A0:Str; A1:p_Screen);
-522 : FUNCTION  LockPubScreenList: p_List;
-528 : PROCEDURE UnlockPubScreenList;
-534 : FUNCTION  NextPubScreen(A0:p_Screen; A1:Str): Str;
-540 : PROCEDURE SetDefaultPubScreen(A0:Str);
-546 : FUNCTION  SetPubScreenModes(D0:Long): Word;
-552 : FUNCTION  PubScreenStatus(A0:p_Screen; D0:Long): Word;
-558 : FUNCTION  ObtainGIRPort(A0:p_GadgetInfo): p_RastPort;
-564 : PROCEDURE ReleaseGIRPort(A0:p_RastPort);
-570 : PROCEDURE GadgetMouse(A0:P_Gadget; A1:P_GadgetInfo; a2:Ptr);
{ ** private Routine ** }
-582 : PROCEDURE GetDefaultPubScreen(A0:Str);
-588 : FUNCTION  EasyRequestArgs(A0:p_Window; A1:p_EasyStruct; A2:Ptr; A3:Ptr): LongInt;
-594 : FUNCTION  BuildEasyRequestArgs(A0:p_Window; A1:p_EasyStruct; D0:Long; A3:Ptr): p_Window;
-600 : FUNCTION  SysReqHandler(A0:p_Window; A1:Ptr; D0:LongInt): LongInt;
-606 : FUNCTION  OpenWindowTagList(A0:p_NewWindow; A1:p_TagItem): p_Window;
-612 : FUNCTION  OpenScreenTagList(A0:p_NewScreen; A1:p_TagItem): p_Screen;
-618 : PROCEDURE DrawImageState(A0:p_RastPort; A1:p_Image; D0,D1:LongInt; D2:Long; A2:p_DrawInfo);
-624 : FUNCTION  PointInImage(D0:Long; A0:p_Image): Boolean;
-630 : PROCEDURE EraseImage(A0:p_RastPort; A1:p_Image; D0,D1:LongInt);
-636 : FUNCTION  NewObjectA(A0:p_IClass; A1:Ptr; A2:p_TagItem): Ptr;
-642 : PROCEDURE DisposeObject(A0:Ptr);
-648 : FUNCTION  SetAttrsA(A0:Ptr; A1:p_TagItem): Long;
-654 : FUNCTION  GetAttr(D0:Long; A0,A1: Ptr): Long;
-660 : FUNCTION  SetGadgetAttrsA(A0:p_Gadget; A1:p_Window; A2:p_Requester; A3:p_TagItem) : Long;
-666 : FUNCTION  NextObject(A0:Ptr): Ptr;
{ ** private Routine ** }
-678 : FUNCTION  MakeClass(A0,A1:Ptr; A2:IClass; D0,D1:Long): p_IClass;
-684 : PROCEDURE AddClass(A0:p_IClass);
-690 : FUNCTION  GetScreenDrawInfo(A0:p_Screen): p_DrawInfo;
-696 : PROCEDURE FreeScreenDrawInfo(A0:p_Screen; A1:p_DrawInfo);
-702 : FUNCTION  ResetMenuStrip(A0:p_Window; A1: p_Menu): Boolean;
-708 : PROCEDURE RemoveClass(A0:p_IClass);
-714 : FUNCTION  FreeClass(A0:p_IClass): Boolean;
{ *** 2 private Routinen *** }

{ *** weitere 6 private Routinen *** }

{ *** Routinen ab V39 / Kickstart 3.0 *** }

-768 : FUNCTION  AllocScreenBuffer(A0:p_Screen; A1:p_BitMap; D0:Long): p_ScreenBuffer;
-774 : PROCEDURE FreeScreenBuffer(A0:p_Screen; A1:p_ScreenBuffer);
-780 : FUNCTION  ChangeScreenBuffer(A0:p_Screen; A1:p_ScreenBuffer): Long;
-786 : PROCEDURE ScreenDepth(A0:p_Screen; D0:Long; A1:Ptr);
-792 : PROCEDURE ScreenPosition(A0:p_Screen; D0:Long; D1,D2,D3,D4:LongInt);
-798 : PROCEDURE ScrollWindowRaster(A1:p_Window; D0,D1,D2,D3,D4,D5:LongInt);
-804 : PROCEDURE LendMenus(A0:p_Window; A1:p_Window);
-810 : FUNCTION  DoGadgetMethodA(A0:p_Gadget; A1:p_Window; A2:p_Requester; A3:LongInt): Long;
-816 : PROCEDURE SetWindowPointerA(A0:p_Window; A1:p_TagItem);
-822 : FUNCTION  TimedDisplayAlert(D0:Long; A0:Str; D1:Long; A1:Long): Boolean;
-828 : PROCEDURE HelpControl(A0:p_Window; D0:Long);

END;

{$endif}