{$if not def LIBRARIES_ASL_H} CONST LIBRARIES_ASL_H=1;

{ ******************************************************************
  ** KickPascal-Include-Datei "libraries/asl.h" zu Kickstart 2.04 **
  ****************************************************************** }

TYPE p_FontRequester = ^FontRequester;
TYPE p_FileRequester = ^FileRequester;

{$if not def EXEC_LISTS_H;incl "exec/lists.h";endif}
{$if not def EXEC_LIBRARIES_H;incl "exec/libraries.h";endif}
{$if not def UTILITY_HOOKS_H;incl "utility/hooks.h";endif}
{$if not def UTILITY_TAGITEM_H;incl "utility/tagitem.h";endif}
{$if not def WBArg;incl "workbench/startup.h";endif}
{$if not def GRAPHICS_TEXT_H;incl "graphics/text.h";endif}


CONST AslName = "asl.library";

TYPE FileRequester = RECORD
 rf_Reserved1 : Ptr;
 rf_File      : Str;
 rf_Dir       : Str;
 rf_Reserved2 : Ptr;
 rf_Reserved3 : Byte;
 rf_Reserved4 : Byte;
 rf_Reserved5 : Ptr;
 rf_LeftEdge  : Integer;
 rf_TopEdge   : Integer;
 rf_Width     : Integer;
 rf_Height    : Integer;
 rf_Reserved6 : Integer;
 rf_NumArgs   : LongInt;
 rf_ArgList   : p_WBArg;
 rf_UserData  : Ptr;
 rf_Reserved7 : Ptr;
 rf_Reserved8 : Ptr;
 rf_Pat       : Str;
END;

CONST
 FILB_DOWILDFUNC  = 7;
 FILB_DOMSGFUNC   = 6;
 FILB_SAVE        = 5;
 FILB_NEWIDCMP    = 4;
 FILB_MULTISELECT = 3;
 FILB_PATGAD      = 0;

CONST
 FILF_DOWILDFUNC  = $80;
 FILF_DOMSGFUNC   = $40;
 FILF_SAVE        = $20;
 FILF_NEWIDCMP    = $10;
 FILF_MULTISELECT = $8;
 FILF_PATGAD      = $1;

CONST
 FIL1B_NOFILES    = 0;
 FIL1B_MATCHDIRS  = 1;

CONST
 FIL1F_NOFILES    =  $1;
 FIL1F_MATCHDIRS  = $2;


TYPE FontRequester = RECORD
 fo_Reserved1 : ARRAY[0..1] OF Ptr;
 fo_Attr      : TextAttr;
 fo_FrontPen  : Byte;
 fo_BackPen   : Byte;
 fo_DrawMode  : Byte;
 fo_UserData  : Ptr;
END;

CONST
 FONB_FRONTCOLOR = 0;
 FONB_BACKCOLOR  = 1;
 FONB_STYLES     = 2;
 FONB_DRAWMODE   = 3;
 FONB_FIXEDWIDTH = 4;
 FONB_NEWIDCMP   = 5;
 FONB_DOMSGFUNC  = 6;
 FONB_DOWILDFUNC = 7;

 FONF_FRONTCOLOR = $1;
 FONF_BACKCOLOR  = $2;
 FONF_STYLES     = $4;
 FONF_DRAWMODE   = $8;
 FONF_FIXEDWIDTH = $10;
 FONF_NEWIDCMP   = $20;
 FONF_DOMSGFUNC  = $40;
 FONF_DOWILDFUNC = $80;


CONST
 ASL_FileRequest = 0;
 ASL_FontRequest = 1;

CONST
 ASL_Dummy      = TAG_USER+$80000;

 ASL_Hail       = ASL_Dummy+1;
 ASL_Window     = ASL_Dummy+2;
 ASL_LeftEdge   = ASL_Dummy+3;
 ASL_TopEdge    = ASL_Dummy+4;
 ASL_Width      = ASL_Dummy+5;
 ASL_Height     = ASL_Dummy+6;
 ASL_HookFunc   = ASL_Dummy+7;
 ASL_File       = ASL_Dummy+8;
 ASL_Dir        = ASL_Dummy+9;

 ASL_FontName   = ASL_Dummy+10;
 ASL_FontHeight = ASL_Dummy+11;
 ASL_FontStyles = ASL_Dummy+12;
 ASL_FontFlags  = ASL_Dummy+13;
 ASL_FrontPen   = ASL_Dummy+14;
 ASL_BackPen    = ASL_Dummy+15;
 ASL_MinHeight  = ASL_Dummy+16;
 ASL_MaxHeight  = ASL_Dummy+17;

 ASL_OKText     = ASL_Dummy+18;
 ASL_CancelText = ASL_Dummy+19;
 ASL_FuncFlags  = ASL_Dummy+20;

 ASL_ModeList   = ASL_Dummy+21;
 ASL_ExtFlags1  = ASL_Dummy+22;

 ASL_Pattern    = ASL_FontName;

{$endif}