home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / Misc / M2V11-1.LHA / modula / amiga / Asl.def < prev    next >
Encoding:
Text File  |  1993-11-10  |  17.9 KB  |  396 lines
  1. DEFINITION FOR LIBRARY MODULE Asl ;
  2.  
  3. FROM SYSTEM    IMPORT ADDRESS, LONGSET, SHORTSET, STRING ;
  4. FROM Exec    IMPORT Node, LibraryPtr ;
  5. FROM Utility    IMPORT TagItemPtr, TAG_USER, Tag ;
  6. FROM Graphics    IMPORT TextAttr, TTextAttr, DimensionInfo ;
  7. FROM Workbench    IMPORT WBArg ;
  8.  
  9. (* ASL library structures and constants *)
  10.  
  11. TYPE
  12.   FileRequesterPtr     = POINTER TO FileRequester ;
  13.   FontRequesterPtr     = POINTER TO FontRequester ;
  14.   ScreenModeRequesterPtr = POINTER TO ScreenModeRequester ;
  15.   DisplayModePtr     = POINTER TO DisplayMode ;
  16.  
  17. (*============================================================================*)
  18.  
  19. CONST
  20.   AslName = "asl.library" ;
  21.   ASL_TB  = TAG_USER+080000H ;
  22.  
  23. (*============================================================================*)
  24.  
  25. (* Types of requesters known to ASL, used as arguments to AllocAslRequest() *)
  26.   ASL_FileRequest    = 0 ;
  27.   ASL_FontRequest    = 1 ;
  28.   ASL_ScreenModeRequest = 2 ;
  29.  
  30. (*=============================================================================
  31. |
  32. | ASL File Requester data structures and constants
  33. |
  34. | This structure must only be allocated by asl.library amd is READ-ONLY!
  35. | Control of the various fields is provided via tags when the requester
  36. | is created with AllocAslRequest() and when it is displayed via
  37. | AslRequest()
  38. |
  39. |=============================================================================*)
  40.  
  41. TYPE
  42.   FileRequester = RECORD
  43.     CASE :BOOLEAN OF
  44.     |TRUE:
  45.       fr_Reserved0 : ARRAY [0..3] OF SHORTCARD ;
  46.       fr_File       : STRING ;  (* Contents of File gadget on exit    *)
  47.       fr_Drawer       : STRING ;  (* Contents of Drawer gadget on exit  *)
  48.       fr_Reserved1 : ARRAY [0..9] OF SHORTCARD ;
  49.       fr_LeftEdge  : INTEGER ; (* Coordinates of requester on exit   *)
  50.       fr_TopEdge   : INTEGER ;
  51.       fr_Width       : INTEGER ;
  52.       fr_Height       : INTEGER ;
  53.       fr_Reserved2 : ARRAY [0..1] OF SHORTCARD ;
  54.       fr_NumArgs   : LONGINT ; (* Number of files selected         *)
  55.       fr_ArgList   : POINTER TO ARRAY OF WBArg ;
  56.                        (* List of files selected         *)
  57.       fr_UserData  : ADDRESS ; (* You can store your own data here   *)
  58.       fr_Reserved3 : ARRAY [0..7] OF SHORTCARD ;
  59.       fr_Pattern   : STRING ;  (* Contents of Pattern gadget on exit *)
  60.     |FALSE:
  61.  
  62.    (* Obsolete ASL field definitions, here for source code compatibility only.*)
  63.    (* Please do NOT use in new code.                              *)
  64.  
  65.       rf_Reserved0    : ARRAY [0..3] OF SHORTCARD ;
  66.       rf_File          : STRING ;
  67.       rf_Dir          : STRING ;
  68.       rf_Reserved1    : ARRAY [0..9] OF SHORTCARD ;
  69.       rf_LeftEdge    : INTEGER ;
  70.       rf_TopEdge    : INTEGER ;
  71.       rf_Width        : INTEGER ;
  72.       rf_Height        : INTEGER ;
  73.       rf_Reserved2    : ARRAY [0..1] OF SHORTCARD ;
  74.       rf_NumArgs    : LONGINT ;
  75.       rf_ArgList    : POINTER TO ARRAY OF WBArg ;
  76.       rf_UserData    : ADDRESS ;
  77.       rf_Reserved3    : ARRAY [0..7] OF SHORTCARD ;
  78.       rf_Pat        : STRING ;
  79.     END ;
  80.   END ;
  81.  
  82. (* File requester tag values, used by AllocAslRequest() and AslRequest() *)
  83.  
  84. (* Window control *)
  85. CONST
  86.   ASLFR_Window        = ASL_TB+02 ;  (* Parent window                 *)
  87.   ASLFR_Screen        = ASL_TB+40 ;  (* Screen to open on if no window     *)
  88.   ASLFR_PubScreenName    = ASL_TB+41 ;  (* Name of public screen             *)
  89.   ASLFR_PrivateIDCMP    = ASL_TB+42 ;  (* Allocate private IDCMP?         *)
  90.   ASLFR_IntuiMsgFunc    = ASL_TB+70 ;  (* Function to handle IntuiMessages   *)
  91.   ASLFR_SleepWindow    = ASL_TB+43 ;  (* Block input in ASLFR_Window?       *)
  92.   ASLFR_UserData    = ASL_TB+52 ;  (* What to put in fr_UserData         *)
  93.  
  94. (* Text display *)
  95.   ASLFR_TextAttr    = ASL_TB+51 ;  (* Text font to use for gadget text   *)
  96.   ASLFR_Locale        = ASL_TB+50 ;  (* Locale ASL should use for text     *)
  97.   ASLFR_TitleText       = ASL_TB+01 ;  (* Title of requester             *)
  98.   ASLFR_PositiveText    = ASL_TB+18 ;  (* Positive gadget text             *)
  99.   ASLFR_NegativeText    = ASL_TB+19 ;  (* Negative gadget text             *)
  100.  
  101. (* Initial settings *)
  102.   ASLFR_InitialLeftEdge = ASL_TB+03 ;  (* Initial requester coordinates    *)
  103.   ASLFR_InitialTopEdge  = ASL_TB+04 ;
  104.   ASLFR_InitialWidth    = ASL_TB+05 ;  (* Initial requester dimensions     *)
  105.   ASLFR_InitialHeight   = ASL_TB+06 ;
  106.   ASLFR_InitialFile     = ASL_TB+08 ;  (* Initial contents of File gadget  *)
  107.   ASLFR_InitialDrawer   = ASL_TB+09 ;  (* Initial contents of Drawer gadg. *)
  108.   ASLFR_InitialPattern  = ASL_TB+10 ;  (* Initial contents of Pattern gadg.*)
  109.  
  110. (* Options *)
  111.   ASLFR_Flags1        = ASL_TB+20 ;  (* Option flags                 *)
  112.   ASLFR_Flags2        = ASL_TB+22 ;  (* Additional option flags         *)
  113.   ASLFR_DoSaveMode      = ASL_TB+44 ;  (* Being used for saving?         *)
  114.   ASLFR_DoMultiSelect   = ASL_TB+45 ;  (* Do multi-select?             *)
  115.   ASLFR_DoPatterns      = ASL_TB+46 ;  (* Display a Pattern gadget?         *)
  116.  
  117. (* Filtering *)
  118.   ASLFR_DrawersOnly     = ASL_TB+47 ;  (* Don't display files?             *)
  119.   ASLFR_FilterFunc      = ASL_TB+49 ;  (* Function to filter files         *)
  120.   ASLFR_RejectIcons     = ASL_TB+60 ;  (* Display .info files?             *)
  121.   ASLFR_RejectPattern   = ASL_TB+61 ;  (* Don't display files matching pat   *)
  122.   ASLFR_AcceptPattern   = ASL_TB+62 ;  (* Accept only files matching pat     *)
  123.   ASLFR_FilterDrawers   = ASL_TB+63 ;  (* Also filter drawers with patterns  *)
  124.   ASLFR_HookFunc    = ASL_TB+07 ;  (* Combined callback function         *)
  125.  
  126. (* Flag bits for the ASLFR_Flags1 tag *)
  127.  
  128.   FRB_FILTERFUNC    = 7 ; FRF_FILTERFUNC    = {FRB_FILTERFUNC}    ;
  129.   FRB_INTUIFUNC         = 6 ; FRF_INTUIFUNC    = {FRB_INTUIFUNC}    ;
  130.   FRB_DOSAVEMODE    = 5 ; FRF_DOSAVEMODE    = {FRB_DOSAVEMODE}    ;
  131.   FRB_PRIVATEIDCMP    = 4 ; FRF_PRIVATEIDCMP    = {FRB_PRIVATEIDCMP}    ;
  132.   FRB_DOMULTISELECT    = 3 ; FRF_DOMULTISELECT = {FRB_DOMULTISELECT}    ;
  133.   FRB_DOPATTERNS    = 0 ; FRF_DOPATTERNS    = {FRB_DOPATTERNS}    ;
  134.  
  135. (* Flag bits for the ASLFR_Flags2 tag *)
  136.   FRB_DRAWERSONLY        = 0 ; FRF_DRAWERSONLY    = {FRB_DRAWERSONLY}   ;
  137.   FRB_FILTERDRAWERS    = 1 ; FRF_FILTERDRAWERS = {FRB_FILTERDRAWERS} ;
  138.   FRB_REJECTICONS    = 2 ; FRF_REJECTICONS    = {FRB_REJECTICONS}   ;
  139.  
  140. (*==============================================================================
  141. |
  142. | ASL Font Requester data structures and constants
  143. |
  144. | This structure must only be allocated by asl.library amd is READ-ONLY!
  145. | Control of the various fields is provided via tags when the requester
  146. | is created with AllocAslRequest() and when it is displayed via
  147. | AslRequest()
  148. |
  149. |=============================================================================*)
  150.  
  151. TYPE
  152.   FontRequester = RECORD
  153.     fo_Reserved0 : ARRAY [0..7] OF SHORTCARD ;
  154.     fo_Attr     : TextAttr ;    (* Returned TextAttr            *)
  155.     fo_FrontPen     : SHORTCARD ;    (* Returned front pen            *)
  156.     fo_BackPen     : SHORTCARD ;    (* Returned back pen            *)
  157.     fo_DrawMode  : SHORTSET ;    (* Returned drawing mode        *)
  158.     fo_Reserved1 : SHORTCARD ;
  159.     fo_UserData     : ADDRESS ;    (* You can store your own data here *)
  160.     fo_LeftEdge  : INTEGER ;    (* Coordinates of requester on exit *)
  161.     fo_TopEdge     : INTEGER ;
  162.     fo_Width     : INTEGER ;
  163.     fo_Height     : INTEGER ;
  164.     fo_TAttr     : TTextAttr ;    (* Returned TTextAttr            *)
  165.   END ;
  166.  
  167. (* Font requester tag values, used by AllocAslRequest() and AslRequest() *)
  168.  
  169. (* Window control *)
  170. CONST
  171.   ASLFO_Window        = ASL_TB+02 ;  (* Parent window               *)
  172.   ASLFO_Screen        = ASL_TB+40 ;  (* Screen to open on if no window   *)
  173.   ASLFO_PubScreenName   = ASL_TB+41 ;  (* Name of public screen           *)
  174.   ASLFO_PrivateIDCMP    = ASL_TB+42 ;  (* Allocate private IDCMP?       *)
  175.   ASLFO_IntuiMsgFunc    = ASL_TB+70 ;  (* Function to handle IntuiMessages *)
  176.   ASLFO_SleepWindow     = ASL_TB+43 ;  (* Block input in ASLFO_Window?     *)
  177.   ASLFO_UserData    = ASL_TB+52 ;  (* What to put in fo_UserData       *)
  178.  
  179. (* Text display *)
  180.   ASLFO_TextAttr    = ASL_TB+51 ;  (* Text font to use for gadget text *)
  181.   ASLFO_Locale        = ASL_TB+50 ;  (* Locale ASL should use for text   *)
  182.   ASLFO_TitleText       = ASL_TB+01 ;  (* Title of requester           *)
  183.   ASLFO_PositiveText    = ASL_TB+18 ;  (* Positive gadget text           *)
  184.   ASLFO_NegativeText    = ASL_TB+19 ;  (* Negative gadget text           *)
  185.  
  186. (* Initial settings *)
  187.   ASLFO_InitialLeftEdge = ASL_TB+03 ;  (* Initial requester coordinates    *)
  188.   ASLFO_InitialTopEdge  = ASL_TB+04 ;
  189.   ASLFO_InitialWidth    = ASL_TB+05 ;  (* Initial requester dimensions     *)
  190.   ASLFO_InitialHeight   = ASL_TB+06 ;
  191.   ASLFO_InitialName     = ASL_TB+10 ;  (* Initial contents of Name gadget  *)
  192.   ASLFO_InitialSize     = ASL_TB+11 ;  (* Initial contents of Size gadget  *)
  193.   ASLFO_InitialStyle    = ASL_TB+12 ;  (* Initial font style           *)
  194.   ASLFO_InitialFlags    = ASL_TB+13 ;  (* Initial font flags for TextAttr  *)
  195.   ASLFO_InitialFrontPen = ASL_TB+14 ;  (* Initial front pen           *)
  196.   ASLFO_InitialBackPen  = ASL_TB+15 ;  (* Initial back pen           *)
  197.   ASLFO_InitialDrawMode = ASL_TB+59 ;  (* Initial draw mode           *)
  198.  
  199. (* Options *)
  200.   ASLFO_Flags        = ASL_TB+20 ;  (* Option flags               *)
  201.   ASLFO_DoFrontPen      = ASL_TB+44 ;  (* Display Front color selector?    *)
  202.   ASLFO_DoBackPen       = ASL_TB+45 ;  (* Display Back color selector?     *)
  203.   ASLFO_DoStyle        = ASL_TB+46 ;  (* Display Style checkboxes?       *)
  204.   ASLFO_DoDrawMode      = ASL_TB+47 ;  (* Display DrawMode cycle gadget?   *)
  205.  
  206. (* Filtering *)
  207.   ASLFO_FixedWidthOnly  = ASL_TB+48 ;  (* Only allow fixed-width fonts?    *)
  208.   ASLFO_MinHeight       = ASL_TB+16 ;  (* Minimum font height to display   *)
  209.   ASLFO_MaxHeight       = ASL_TB+17 ;  (* Maximum font height to display   *)
  210.   ASLFO_FilterFunc      = ASL_TB+49 ;  (* Function to filter fonts       *)
  211.   ASLFO_HookFunc    = ASL_TB+07 ;  (* Combined callback function       *)
  212.   ASLFO_MaxFrontPen     = ASL_TB+66 ;  (* Max # of colors in front palette *)
  213.   ASLFO_MaxBackPen      = ASL_TB+67 ;  (* Max # of colors in back palette  *)
  214.  
  215. (* Custom additions *)
  216.   ASLFO_ModeList    = ASL_TB+21 ;  (* Substitute list for drawmodes    *)
  217.   ASLFO_FrontPens       = ASL_TB+64 ;  (* Color table for front pen palette*)
  218.   ASLFO_BackPens    = ASL_TB+65 ;  (* Color table for back pen palette *)
  219.  
  220. (* Flag bits for ASLFO_Flags tag *)
  221.  
  222.    FOB_DOFRONTPEN    = 0 ;  FOF_DOFRONTPEN      = {FOB_DOFRONTPEN} ;
  223.    FOB_DOBACKPEN    = 1 ;  FOF_DOBACKPEN      = {FOB_DOBACKPEN} ;
  224.    FOB_DOSTYLE        = 2 ;  FOF_DOSTYLE      = {FOB_DOSTYLE} ;
  225.    FOB_DODRAWMODE    = 3 ;  FOF_DODRAWMODE       = {FOB_DODRAWMODE} ;
  226.    FOB_FIXEDWIDTHONLY    = 4 ;  FOF_FIXEDWIDTHONLY = {FOB_FIXEDWIDTHONLY} ;
  227.    FOB_PRIVATEIDCMP    = 5 ;  FOF_PRIVATEIDCMP   = {FOB_PRIVATEIDCMP} ;
  228.    FOB_INTUIFUNC    = 6 ;  FOF_INTUIFUNC      = {FOB_INTUIFUNC} ;
  229.    FOB_FILTERFUNC    = 7 ;  FOF_FILTERFUNC      = {FOB_FILTERFUNC} ;
  230.  
  231. (*=============================================================================
  232. |
  233. |  ASL Screen Mode Requester data structures and constants
  234. |
  235. |  This structure must only be allocated by asl.library and is READ-ONLY!
  236. |  Control of the various fields is provided via tags when the requester
  237. |  is created with AllocAslRequest() and when it is displayed via
  238. |  AslRequest()
  239. |
  240. |============================================================================*)
  241.  
  242. TYPE
  243.   ScreenModeRequester = RECORD
  244.     sm_DisplayID    : LONGINT ;    (* Display mode ID            *)
  245.     sm_DisplayWidth    : LONGINT ;    (* Width of display in pixels       *)
  246.     sm_DisplayHeight    : LONGINT ;    (* Height of display in pixels      *)
  247.     sm_DisplayDepth    : CARDINAL ;    (* Number of bit-planes of display  *)
  248.     sm_OverscanType    : CARDINAL ;    (* Type of overscan of display      *)
  249.     sm_AutoScroll    : INTEGER ;    (* Display should auto-scroll?      *)
  250.  
  251.     sm_BitMapWidth    : LONGINT ;    (* Used to create your own BitMap   *)
  252.     sm_BitMapHeight    : LONGINT ;
  253.  
  254.     sm_LeftEdge        : INTEGER ;    (* Coordinates of requester on exit *)
  255.     sm_TopEdge        : INTEGER ;
  256.     sm_Width        : INTEGER ;
  257.     sm_Height        : INTEGER ;
  258.  
  259.     sm_InfoOpened    : INTEGER ;    (* Info window opened on exit?      *)
  260.     sm_InfoLeftEdge    : INTEGER ;    (* Last coordinates of Info window  *)
  261.     sm_InfoTopEdge    : INTEGER ;
  262.     sm_InfoWidth    : INTEGER ;
  263.     sm_InfoHeight    : INTEGER ;
  264.  
  265.     sm_UserData        : ADDRESS ;    (* You can store your own data here *)
  266.   END ;
  267.  
  268. (* An Exec list of custom modes can be added to the list of available modes.  *)
  269. (* The DimensionInfo structure must be completely initialized, including the  *)
  270. (* Header. See <graphics/displayinfo>. Custom mode ID's must be in the range  *)
  271. (* 0FFFF0000H..0FFFFFFFFH.Regular properties which apply to your custom modes *)
  272. (* can be added in the dn_PropertyFlags field. Custom properties are not      *)
  273. (* allowed.                                      *)
  274.  
  275. TYPE
  276.   DisplayMode = RECORD
  277.     dm_Node         : Node ;            (* see ln_Name             *)
  278.     dm_DimensionInfo : DimensionInfo ;  (* mode description      *)
  279.     dm_PropertyFlags : LONGSET ;    (* applicable properties *)
  280.   END ;
  281.  
  282. (* ScreenMode requester tag values, used by AllocAslRequest() and AslRequest()*)
  283.  
  284. (* Window control *)
  285. CONST
  286.   ASLSM_Window            = ASL_TB+02 ;  (* Parent window               *)
  287.   ASLSM_Screen            = ASL_TB+40 ;  (* Screen to open on if no window   *)
  288.   ASLSM_PubScreenName   = ASL_TB+41 ;  (* Name of public screen           *)
  289.   ASLSM_PrivateIDCMP    = ASL_TB+42 ;  (* Allocate private IDCMP?       *)
  290.   ASLSM_IntuiMsgFunc    = ASL_TB+70 ;  (* Function to handle IntuiMessages *)
  291.   ASLSM_SleepWindow     = ASL_TB+43 ;  (* Block input in ASLSM_Window?     *)
  292.   ASLSM_UserData    = ASL_TB+52 ;  (* What to put in sm_UserData       *)
  293.  
  294. (* Text display *)
  295.   ASLSM_TextAttr    = ASL_TB+51 ;  (* Text font to use for gadget text *)
  296.   ASLSM_Locale            = ASL_TB+50 ;  (* Locale ASL should use for text   *)
  297.   ASLSM_TitleText       = ASL_TB+01 ;  (* Title of requester           *)
  298.   ASLSM_PositiveText    = ASL_TB+18 ;  (* Positive gadget text           *)
  299.   ASLSM_NegativeText    = ASL_TB+19 ;  (* Negative gadget text           *)
  300.  
  301. (* Initial settings *)
  302.   ASLSM_InitialLeftEdge      = ASL_TB+3 ;   (* Initial requester coordinates *)
  303.   ASLSM_InitialTopEdge       = ASL_TB+4 ;
  304.   ASLSM_InitialWidth         = ASL_TB+5 ;   (* Initial requester dimensions  *)
  305.   ASLSM_InitialHeight         = ASL_TB+6 ;
  306.   ASLSM_InitialDisplayID     = ASL_TB+100 ; (* Initial display mode id     *)
  307.   ASLSM_InitialDisplayWidth  = ASL_TB+101 ; (* Initial display width       *)
  308.   ASLSM_InitialDisplayHeight = ASL_TB+102 ; (* Initial display height      *)
  309.   ASLSM_InitialDisplayDepth  = ASL_TB+103 ; (* Initial display depth       *)
  310.   ASLSM_InitialOverscanType  = ASL_TB+104 ; (* Initial type of overscan    *)
  311.   ASLSM_InitialAutoScroll    = ASL_TB+105 ; (* Initial autoscroll setting  *)
  312.   ASLSM_InitialInfoOpened    = ASL_TB+106 ; (* Info wndw initially opened? *)
  313.   ASLSM_InitialInfoLeftEdge  = ASL_TB+107 ; (* Initial Info window coords. *)
  314.   ASLSM_InitialInfoTopEdge   = ASL_TB+108 ;
  315.  
  316. (* Options *)
  317.   ASLSM_DoWidth        = ASL_TB+109 ;  (* Display Width gadget?       *)
  318.   ASLSM_DoHeight    = ASL_TB+110 ;  (* Display Height gadget?       *)
  319.   ASLSM_DoDepth        = ASL_TB+111 ;  (* Display Depth gadget?       *)
  320.   ASLSM_DoOverscanType  = ASL_TB+112 ;  (* Display Overscan Type gadget?   *)
  321.   ASLSM_DoAutoScroll    = ASL_TB+113 ;  (* Display AutoScroll gadget?      *)
  322.  
  323. (* Filtering *)
  324.   ASLSM_PropertyFlags   = ASL_TB+114 ;  (* Must have these Property flags  *)
  325.   ASLSM_PropertyMask    = ASL_TB+115 ;  (* Only these should be looked at  *)
  326.   ASLSM_MinWidth    = ASL_TB+116 ;  (* Minimum display width to allow  *)
  327.   ASLSM_MaxWidth    = ASL_TB+117 ;  (* Maximum display width to allow  *)
  328.   ASLSM_MinHeight       = ASL_TB+118 ;  (* Minimum display height to allow *)
  329.   ASLSM_MaxHeight       = ASL_TB+119 ;  (* Maximum display height to allow *)
  330.   ASLSM_MinDepth    = ASL_TB+120 ;  (* Minimum display depth       *)
  331.   ASLSM_MaxDepth    = ASL_TB+121 ;  (* Maximum display depth       *)
  332.   ASLSM_FilterFunc      = ASL_TB+122 ;  (* Function to filter mode id's    *)
  333.  
  334. (* Custom additions *)
  335.   ASLSM_CustomSMList    = ASL_TB+123 ;  (* Exec list of struct DisplayMode *)
  336.  
  337. (*==============================================================================
  338. |
  339. |    Obsolete ASL definitions, here for source code compatibility only.
  340. |    Please do NOT use in new code.
  341. |
  342. |=============================================================================*)
  343.  
  344.   ASL_Dummy     = TAG_USER+080000H ;
  345.   ASL_Hail     = ASL_Dummy+1  ; ASL_Window     = ASL_Dummy+2  ;
  346.   ASL_LeftEdge     = ASL_Dummy+3  ; ASL_TopEdge     = ASL_Dummy+4  ;
  347.   ASL_Width     = ASL_Dummy+5  ; ASL_Height     = ASL_Dummy+6  ;
  348.   ASL_HookFunc     = ASL_Dummy+7  ; ASL_File     = ASL_Dummy+8  ;
  349.   ASL_Dir     = ASL_Dummy+9  ; ASL_FontName     = ASL_Dummy+10 ;
  350.   ASL_FontHeight = ASL_Dummy+11 ; ASL_FontStyles = ASL_Dummy+12 ;
  351.   ASL_FontFlags     = ASL_Dummy+13 ; ASL_FrontPen     = ASL_Dummy+14 ;
  352.   ASL_BackPen     = ASL_Dummy+15 ; ASL_MinHeight     = ASL_Dummy+16 ;
  353.   ASL_MaxHeight     = ASL_Dummy+17 ; ASL_OKText     = ASL_Dummy+18 ;
  354.   ASL_CancelText = ASL_Dummy+19 ; ASL_FuncFlags     = ASL_Dummy+20 ;
  355.   ASL_ModeList     = ASL_Dummy+21 ; ASL_ExtFlags1     = ASL_Dummy+22 ;
  356.   ASL_Pattern     = ASL_FontName ;
  357.  
  358. (* remember what I said up there? Do not use these anymore! *)
  359.  
  360.   FILB_DOWILDFUNC    = 7 ; FILF_DOWILDFUNC    = {FILB_DOWILDFUNC} ;
  361.   FILB_DOMSGFUNC    = 6 ; FILF_DOMSGFUNC    = {FILB_DOMSGFUNC} ;
  362.   FILB_SAVE        = 5 ; FILF_SAVE        = {FILB_SAVE} ;
  363.   FILB_NEWIDCMP        = 4 ; FILF_NEWIDCMP    = {FILB_NEWIDCMP} ;
  364.   FILB_MULTISELECT    = 3 ; FILF_MULTISELECT    = {FILB_MULTISELECT} ;
  365.   FILB_PATGAD        = 0 ; FILF_PATGAD    = {FILB_PATGAD} ;
  366.  
  367.   FIL1B_NOFILES        = 0 ; FIL1F_NOFILES    = {FIL1B_NOFILES} ;
  368.   FIL1B_MATCHDIRS    = 1 ; FIL1F_MATCHDIRS    = {FIL1B_MATCHDIRS} ;
  369.  
  370.   FONB_FRONTCOLOR    = 0 ; FONF_FRONTCOLOR    = {FONB_FRONTCOLOR} ;
  371.   FONB_BACKCOLOR    = 1 ; FONF_BACKCOLOR    = {FONB_BACKCOLOR} ;
  372.   FONB_STYLES        = 2 ; FONF_STYLES    = {FONB_STYLES} ;
  373.   FONB_DRAWMODE        = 3 ; FONF_DRAWMODE    = {FONB_DRAWMODE} ;
  374.   FONB_FIXEDWIDTH    = 4 ; FONF_FIXEDWIDTH    = {FONB_FIXEDWIDTH} ;
  375.   FONB_NEWIDCMP        = 5 ; FONF_NEWIDCMP    = {FONB_NEWIDCMP} ;
  376.   FONB_DOMSGFUNC    = 6 ; FONF_DOMSGFUNC    = {FONB_DOMSGFUNC} ;
  377.   FONB_DOWILDFUNC    = 7 ; FONF_DOWILDFUNC    = {FONB_DOWILDFUNC} ;
  378.  
  379. (*============================================================================*)
  380.  
  381. VAR
  382.   AslBase : LibraryPtr ;
  383.  
  384. (* OBSOLETE -- Please use the generic requester functions instead *)
  385. PROCEDURE AllocFileRequest( ) : FileRequesterPtr ;
  386. PROCEDURE FreeFileRequest( fileReq : FileRequesterPtr ) ;
  387.  
  388. PROCEDURE RequestFile( fileReq : FileRequesterPtr ) : BOOLEAN ;
  389. PROCEDURE AllocAslRequest( reqType : LONGINT ; tagList : TagItemPtr) : ADDRESS ;
  390. PROCEDURE AllocAslRequestTags( reqType : LONGINT ; Tag1 : Tag ; .. ) : ADDRESS ;
  391. PROCEDURE FreeAslRequest( requester : ADDRESS ) ;
  392. PROCEDURE AslRequest( requester : ADDRESS ; tagList : TagItemPtr ) : BOOLEAN ;
  393. PROCEDURE AslRequestTags( requester : ADDRESS ; Tag1 : Tag ; .. ) : BOOLEAN ;
  394.  
  395. END Asl.
  396.