@DATABASE "OS_DevKit Extension" @INDEX "os_index.guide/main" @AUTHOR "Fromentin BRICE & Jens Vang Petersen" @node MAIN "OS_DevKit, other libraries" @toc "os_Documentation.guide/main" ___________ ___________ / /\ / /\ OS-DevKit Extension / ___ / // _______/ / Additional power for AMOS Pro V2.00+ / /\_/ / // /\_____ \/ / / // / // /\ Written by: / / // / //______ / / Fromentin BRICE / /_// / /_\_____/ / / / / // / / /__________/ //__________/ / \__________\/ \__________\/ @{b}@{u}Support of other libraries@{uu}@{ub} @{" ASL requesters " link "ASLR"} @{" Datatypes " link "DATA"} @{" Locale " link "LOCA"} @{" LowLevel (Gameports) " link "LOWL"} @{" Layers " link "LAYE"} @{" IFF-Parse " link "IFFP"} @{" BOOPSI " link "BOOP"} @{" Commodities " link "COMO"} @endnode @node DATA "OS_DevKit, other libraries" @toc "MAIN" ___________ ___________ / /\ / /\ OS-DevKit Extension / ___ / // _______/ / Additional power for AMOS Pro V2.00+ / /\_/ / // /\_____ \/ / / // / // /\ Written by: / / // / //______ / / Fromentin BRICE / /_// / /_\_____/ / / / / // / / /__________/ //__________/ / \__________\/ \__________\/ @{b}@{u}Support of other libraries@{uu}@{ub} @{b}@{u}Datatypes@{uu}@{ub} @{u}Commands:@{uu} @{" _dt Init " link "_dt Init"} @{" _dt Create " link "_dt Create"} @{" _dt Delete " link "_dt Delete"} @{" _dt Str$ " link "_dt Str$"} @{" _dt Obtain " link "_dt Obtain"} @{" _dt Remove " link "_dt Remove"} @{" _dt Release " link "_dt Release"} @{" _dt Refresh " link "_dt Refresh"} @{" _dt Do " link "_dt Do"} @{" _dt Add " link "_dt Add"} @{" _dt Set Attrs " link "_dt Set Attrs"} @{" _dt What Attrs " link "_dt What Attrs"} @{" _dt What Methods " link "_dt What Methods"} @{" _dt What Triggers " link "_dt What Triggers"} @endnode @node "_dt Init" @toc "DATA" OK=_@{b}_dt Init@{ub} @endnode @node "_dt Create" @toc "DATA" OBJ=_@{b}_dt Create@{ub}(PTRFILE,TAGLIST) @endnode @node "_dt Delete" @toc "DATA" @{b}_dt Delete@{ub} OBJ @endnode @node "_dt Str$" @toc "DATA" OK$=_@{b}_dt Str$@{ub}(ID) @endnode @node "_dt Obtain" @toc "DATA" OK=_@{b}_dt Obtain@{ub}(TYPE,HANDLE,ATTRS) @endnode @node "_dt Remove" @toc "DATA" OK=_@{b}_dt Remove@{ub}(WND,OBJ) @endnode @node "_dt Release" @toc "DATA" @{b}_dt Release@{ub} OBJ @endnode @node "_dt Refresh" @toc "DATA" @{b}_dt Refresh@{ub} OBJ,WND,REQ,ATTRS @endnode @node "_dt Do" @toc "DATA" OK=_@{b}_dt Do@{ub}(OBJ,WND,REQ,MSG) @endnode @node "_dt Add" @toc "DATA" OK=_@{b}_dt Add@{ub}(OBJ,WND,REQ,POS) @endnode @node "_dt Set Attrs" @toc "DATA" @{b}_dt Set Attrs@{ub} OBJ,WND,REQ,ATTRS @endnode @node "_dt What Attrs" @toc "DATA" RES=_@{b}_dt What Attrs@{ub}(OBJ,TAGLIST) @endnode @node "_dt What Methods" @toc "DATA" RES=_@{b}_dt What Methods@{ub}(OBJ) @endnode @node "_dt What Triggers" @toc "DATA" RES=_@{b}_dt What Triggers@{ub}(OBJ) @endnode @node LOWL "OS_DevKit, other libraries" @toc "MAIN" ___________ ___________ / /\ / /\ OS-DevKit Extension / ___ / // _______/ / Additional power for AMOS Pro V2.00+ / /\_/ / // /\_____ \/ / / // / // /\ Written by: / / // / //______ / / Fromentin BRICE / /_// / /_\_____/ / / / / // / / /__________/ //__________/ / \__________\/ \__________\/ @{b}@{u}Support of other libraries@{uu}@{ub} @{b}@{u}Lowlevel (Gameports)@{uu}@{ub} @{u}Commands:@{uu} @{" _low Init " link "_low Init"} @{" _sys Own " link "_sys Own"} @{" _Sys Disown " link "_Sys Disown"} @{" _joy Set " link "_joy Set"} @{" _joy Init " link "_joy Init"} @{" _joy Read " link "_joy Read"} @{" _joy Type " link "_joy Type"} @{" _time Elapsed " link "_time Elapsed"} @{" _key Pressed " link "_key Pressed"} @endnode @node "_low Init" @toc "LOWL" LIB=_@{b}_low Init@{ub} @endnode @node "_sys Own" @toc "LOWL" @{b}_sys Own@{ub} @endnode @node "_Sys Disown" @toc "LOWL" @{b}_Sys Disown@{ub} @endnode @node "_joy Set" @toc "LOWL" OLD=_@{b}_joy Set@{ub}(PORTNB,JOYTYPE) @endnode @node "_joy Init" @toc "LOWL" OLD=_@{b}_joy Init@{ub}(PORTNB) @endnode @node "_joy Read" @toc "LOWL" JVAL=_@{b}_joy Read@{ub}(PORTNB) @endnode @node "_joy Type" @toc "LOWL" TYPE=_@{b}_joy Type@{ub}(PORTNB) @endnode @node "_time Elapsed" @toc "LOWL" TIME=_@{b}_time Elapsed@{ub} @endnode @node "_key Pressed" @toc "LOWL" KEYS=_@{b}_key Pressed@{ub} @endnode @node IFFP "OS_DevKit, other libraries" @toc "MAIN" ___________ ___________ / /\ / /\ OS-DevKit Extension / ___ / // _______/ / Additional power for AMOS Pro V2.00+ / /\_/ / // /\_____ \/ / / // / // /\ Written by: / / // / //______ / / Fromentin BRICE / /_// / /_\_____/ / / / / // / / /__________/ //__________/ / \__________\/ \__________\/ @{b}@{u}Support of other libraries@{uu}@{ub} @{b}@{u}IFF-Parse@{uu}@{ub} @{u}Commands:@{uu} @{" _iff Init " link "_iff Init"} @{" _iff Open In " link "_iff Open In"} @{" _iff Open Out " link "_iff Open Out"} @{" _iff Close " link "_iff Close"} @{" _iff Parse " link "_iff Parse"} @{" _chunk Current " link "_chunk Current"} @{" _chunk Parent " link "_chunk Parent"} @{" _chunk Read " link "_chunk Read"} @{" _chunk Write " link "_chunk Write"} @{" _chunk Child " link "_chunk Child"} @{" _chunk End " link "_chunk End"} @{" _chunk What Size " link "_chunk What Size"} @{" _chunk What Type " link "_chunk What Type"} @{" _chunk What Id " link "_chunk What Id"} @{" _chunk What Scan " link "_chunk What Scan"} @endnode @node "_iff Init" @toc "IFFP" OK=_@{b}_iff Init@{ub} @endnode @node "_iff Open In" @toc "IFFP" HIFF=_@{b}_iff Open In@{ub}(NAME$) @endnode @node "_iff Open Out" @toc "IFFP" HIFF=_@{b}_iff Open Out@{ub}(NAME$) @endnode @node "_iff Close" @toc "IFFP" @{b}_iff Close@{ub} @endnode @node "_iff Parse" @toc "IFFP" OK=_@{b}_iff Parse@{ub}(HIFF,CTRL) @endnode @node "_chunk Current" @toc "IFFP" CHUNK=_@{b}_chunk Current@{ub}(HIFF) @endnode @node "_chunk Parent" @toc "IFFP" CHUNK=_@{b}_chunk Parent@{ub}(CHUNK) @endnode @node "_chunk Read" @toc "IFFP" OK=_@{b}_chunk Read@{ub}(HIFF,BUF,SIZE) @endnode @node "_chunk Write" @toc "IFFP" OK=_@{b}_chunk Write@{ub}(HIFF,BUF,SIZE) @endnode @node "_chunk Child" @toc "IFFP" OK=_@{b}_chunk Child@{ub}(HIFF,TYPE,ID,SIZE) @endnode @node "_chunk End" @toc "IFFP" OK=_@{b}_chunk End@{ub}(HIFF) @endnode @node "_chunk What Size" @toc "IFFP" SIZE=_@{b}_chunk What Size@{ub}(CHUNK) @endnode @node "_chunk What Type" @toc "IFFP" TYPE=_@{b}_chunk What Type@{ub}(CHUNK) @endnode @node "_chunk What Id" @toc "IFFP" ID=_@{b}_chunk What Id@{ub}(CHUNK) @endnode @node "_chunk What Scan" @toc "IFFP" SCAN=_@{b}_chunk What Scan@{ub}(CHUNK) @endnode @node BOOP "OS_DevKit, other libraries" @toc "MAIN" ___________ ___________ / /\ / /\ OS-DevKit Extension / ___ / // _______/ / Additional power for AMOS Pro V2.00+ / /\_/ / // /\_____ \/ / / // / // /\ Written by: / / // / //______ / / Fromentin BRICE / /_// / /_\_____/ / / / / // / / /__________/ //__________/ / \__________\/ \__________\/ @{b}@{u}Support of other libraries@{uu}@{ub} @{b}@{u}BOOPSI@{uu}@{ub} @{u}Commands:@{uu} @{" _obj new " link "_obj new"} @{" _obj free " link "_obj free"} @{" _obj what attr " link "_obj what attr"} @{" _obj set attrs " link "_obj set attrs"} @{" _obj do " link "_obj do"} @{" _class get file " link "_class get file"} @endnode @node "_obj new" @toc "BOOP" OBJ=_@{b}_obj new@{ub}(PVCLASS,CLASSNAME$,TAGLIST) @endnode @node "_obj free" @toc "BOOP" @{b}_obj free@{ub} OBJ @endnode @node "_obj what attr" @toc "BOOP" ATTR=_@{b}_obj what attr@{ub}(OBJ,ATTR) @endnode @node "_obj set attrs" @toc "BOOP" OK=_@{b}_obj set attrs@{ub}(OBJ,WND,REQ,TAGLIST) @endnode @node "_obj do" @toc "BOOP" OK=_@{b}_obj do@{ub}(OBJ,WND,REQ,OOPMSG) @endnode @node "_class get file" @toc "BOOP" CLASS=_@{b}_class get file@{ub} @endnode @node LAYE "OS_DevKit, other libraries" @toc "MAIN" ___________ ___________ / /\ / /\ OS-DevKit Extension / ___ / // _______/ / Additional power for AMOS Pro V2.00+ / /\_/ / // /\_____ \/ / / // / // /\ Written by: / / // / //______ / / Fromentin BRICE / /_// / /_\_____/ / / / / // / / /__________/ //__________/ / \__________\/ \__________\/ @{b}@{u}Support of other libraries@{uu}@{ub} @{b}@{u}Layers@{uu}@{ub} @{u}Commands:@{uu} @{" _li New " link "_li New"} @{" _li Free " link "_li Free"} @{" _layer Create Behind " link "_layer Create Behind"} @{" _layer Create Upfront " link "_layer Create Upfront"} @{" _layer Delete " link "_layer Delete"} @endnode @node "_li New" @toc "LAYE" LI=@{b}_li New@{ub} @endnode @node "_li Free" @toc "LAYE" @{b}_li Free@{ub} LI @endnode @node "_layer Create Behind" @toc "LAYE" LAYER=@{b}_layer Create Behind@{ub}(LI,BM,X0,Y0,X1,Y1,FLAGS,BM2) @endnode @node "_layer Create Upfront" @toc "LAYE" LAYER=@{b}_layer Create Upfront@{ub}(LI,BM,X0,Y0,X1,Y1,FLAGS,BM2) @endnode @node "_layer Delete" @toc "LAYE" @{b}_layer Delete@{ub} LAYER @endnode @node COMO "OS_DevKit, other libraries" @toc "MAIN" ___________ ___________ / /\ / /\ OS-DevKit Extension / ___ / // _______/ / Additional power for AMOS Pro V2.00+ / /\_/ / // /\_____ \/ / / // / // /\ Written by: / / // / //______ / / Fromentin BRICE / /_// / /_\_____/ / / / / // / / /__________/ //__________/ / \__________\/ \__________\/ @{b}@{u}Support of other libraries@{uu}@{ub} @{b}@{u}Commodities@{uu}@{ub} @{u}Commands:@{uu} @{" _cx Init " link "_cx Init"} @{" _cx Install " link "_cx Install"} @{" _cx Uninstall " link "_cx Uninstall"} @{" _cx Broker " link "_cx Broker"} @{" _cx Enable " link "_cx Enable"} @{" _cx Disable " link "_cx Disable"} @{" _cx Id Base " link "_cx Id Base"} @{" _cx Id Create " link "_cx Id Create"} @{" _cx Id Delete " link "_cx Id Delete"} @{" _cx Msg Port " link "_cx Msg Port"} @{" _cx Id Type " link "_cx Id Type"} @{" _cx Id Error " link "_cx Id Error"} @{" _cx Id Clear Error " link "_cx Id Clear Error"} @{" _cx Id Activate " link "_cx Id Activate"} @{" _cx Id Inactivate " link "_cx Id Inactivate"} @{" _cx Id Attach " link "_cx Id Attach"} @{" _cx Id Remove " link "_cx Id Remove"} @{" _cx Id Wait Event " link "_cx Id Wait Event"} @{" _cx Id Next Event " link "_cx Id Next Event"} @{" _cx Id Event Type " link "_cx Id Event Type"} @{" _cx Id Event Id " link "_cx Id Event Id"} @{" _cx Id Event Data " link "_cx Id Event Data"} @endnode @node "_cx Init" @toc "COMO" BASE=@{b}_cx Init@{ub} @endnode @node "_cx Install" @toc "COMO" ERROR=@{b}_cx Install@{ub}(NAME$,TITLE$,DESCR$,UNIQUE,FLAGS,PRI) @endnode @node "_cx Uninstall" @toc "COMO" @{b}_cx Uninstall@{ub} @endnode @node "_cx Broker" @toc "COMO" BROKER=@{b}_cx Broker@{ub} @endnode @node "_cx Enable" @toc "COMO" @{b}_cx Enable@{ub} @endnode @node "_cx Disable" @toc "COMO" @{b}_cx Disable@{ub} @endnode @node "_cx Id Base" @toc "COMO" CXOBJ=@{b}_cx Id Base@{ub}(CXOBJ_ID) @endnode @node "_cx Id Create" @toc "COMO" @{b}_cx Id Create@{ub}CXOBJ_ID,TYPE,ARG1,ARG2 @endnode @node "_cx Id Delete" @toc "COMO" @{b}_cx Id Delete@{ub} CXOBJ_ID @endnode @node "_cx Msg Port" @toc "COMO" MSGPRT=@{b}_cx Msg Port@{ub} @endnode @node "_cx Id Type" @toc "COMO" TYPE=@{b}_cx Id Type@{ub}(CXOBJ_ID) @endnode @node "_cx Id Error" @toc "COMO" ERROR=@{b}_cx Id Error@{ub}(CXOBJ_ID) @endnode @node "_cx Id Clear Error" @toc "COMO" @{b}_cx Id Clear Error@{ub} CXOBJ_ID @endnode @node "_cx Id Activate" @toc "COMO" @{b}_cx Id Activate@{ub} CXOBJ_ID @endnode @node "_cx Id Inactivate" @toc "COMO" @{b}_cx Id Inactivate@{ub} CXOBJ_ID @endnode @node "_cx Id Attach" @toc "COMO" @{b}_cx Id Attach@{ub} CXOBJ_ID To CXOBJ_ID @endnode @node "_cx Id Remove" @toc "COMO" @{b}_cx Id Remove@{ub} CXOBJ_ID @endnode @node "_cx Id Wait Event" @toc "COMO" TYPE=@{b}_cx Id Wait Event@{ub} @endnode @node "_cx Id Next Event" @toc "COMO" TYPE=@{b}_cx Id Next Event@{ub} @endnode @node "_cx Id Event Type" @toc "COMO" TYPE=@{b}_cx Id Event Type@{ub} @endnode @node "_cx Id Event Id" @toc "COMO" ID=@{b}_cx Id Event Id@{ub} @endnode @node "_cx Id Event Data" @toc "COMO" DATA=@{b}_cx Id Event Data@{ub} @endnode @node LOCA "OS_DevKit, other libraries" @toc "MAIN" ___________ ___________ / /\ / /\ OS-DevKit Extension / ___ / // _______/ / Additional power for AMOS Pro V2.00+ / /\_/ / // /\_____ \/ / / // / // /\ Written by: / / // / //______ / / Fromentin BRICE / /_// / /_\_____/ / / / / // / / /__________/ //__________/ / \__________\/ \__________\/ @{b}@{u}Support of other libraries@{uu}@{ub} @{b}@{u}Locale@{uu}@{ub} The concept of the Localization came with the version 38 of the system (2.1). So, by the intermediary of catalog, we could adjust the language in whose the application will express and it's with the preferences of the user. @{" Descriptions of TAGS " Link "loc_tags"} @{" Locale Structure " Link "loc_tags"} @{u}Commands:@{uu} @{" _loc Init " Link "_loc init" } @{" _loc Open " Link "_loc open" } @{" _loc Close " Link "_loc close"} @{" _loc Str " Link "_loc str" } @{" _cat Open " Link "_cat open" } @{" _cat Close " Link "_cat close"} @{" _cat Str " Link "_cat str" } @ENDNODE @NODE "_loc Init" @toc "LOCA" _loc Init This function initializes the locale.library, if failure, it sends back 0. OK=_loc Init @ENDNODE @NODE "_loc Open" @toc "LOCA" LOC=@{b}_loc Open@{ub}(PTXT) This function opens a local and sends back its pointer, or ZERO. A @{locale Link _loc_struct} describes the rules of the language. LOC -> Pointer of Locale PTXT -> Pointer of the language name, or 0 for the default. @ENDNODE @NODE "_loc Close" @toc "LOCA" _loc Close This function closes a previously opened locale.. _loc Close LOC LOC -> Pointer of Locale @ENDNODE @NODE "_loc Str" @toc "LOCA" _loc Str This function sends back the pointer of the required string in the locale PTXT=_loc Str(LOC,NB) LOC -> Pointer of Locale. NB -> Number of the string DAY_1 = $1 DAY_2 = $2 DAY_3 = $3 DAY_4 = $4 DAY_5 = $5 DAY_6 = $6 DAY_7 = $7 ABDAY_1 = $8 ABDAY_2 = $9 ABDAY_3 = $A ABDAY_4 = $B ABDAY_5 = $C ABDAY_6 = $D ABDAY_7 = $E MON_1 = $F MON_2 = $10 MON_3 = $11 MON_4 = $12 MON_5 = $13 MON_6 = $14 MON_7 = $15 MON_8 = $16 MON_9 = $17 MON_10 = $18 MON_11 = $19 MON_12 = $1A ABMON_1 = $1B ABMON_2 = $1C ABMON_3 = $1D ABMON_4 = $1E ABMON_5 = $1F ABMON_6 = $20 ABMON_7 = $21 ABMON_8 = $22 ABMON_9 = $23 ABMON_10 = $24 ABMON_11 = $25 ABMON_12 = $26 YESSTR = $27 NOSTR = $28 AM_STR = $29 PM_STR = $2A SOFTHYPHEN = $2B HARDHYPHEN = $2C OPENQUOTE = $2D CLOSEQUOTE = $2E YESTERDAYSTR = $2F TODAYSTR = $30 TOMORROWSTR = $31 FUTURESTR = $32 MAXSTRMSG = $33 @ENDNODE @NODE "_cat Open" @toc "LOCA" _cat Open This function opens a catalog and sends back its pointer. CAT_cat Open(LOC,PTXT,TAGLIST) LOC -> Pointer of Locale. PTXT -> Pointer of string name of catalog. TAGLIST -> Pointer of TAG List. @ENDNODE @NODE "_cat Close" @toc "LOCA" _cat Close This function closes a previously opened catalog. _cat Close CAT CAT -> Pointer of a catalog. @ENDNODE @NODE "_cat Str" @toc "LOCA" _cat Str" This function sends back the pointer on the asked string in the catalog. PTXT=_cat Str(CAT,NB,DEF) CAT -> Pointer of catalog. NB -> Number of string DEF -> Pointer returned if function failed. @ENDNODE @NODE "loc_tags" "Descriptions des TAGS" @toc "LOCA" Descriptions des TAGS OC_BuiltInLanguage Specify the language of the application, if this last ($80090001),(STR) answering to the language of catalogs, then it won't be opened. Default to "english". Putting this TAG to 0 means that the application doesn't have of language. OC_Language Specifie directly the language of catalogs. This TAG ($80090004),(STR) is opposite of the preferences of the user. OC_Version ($80090003),(NB) Number of the catalog version. Default to 0 means that all the versions are recognized. However, if a version is specified, alone this last will be taken in counts. @ENDNODE @NODE "_loc_struct" "Structure Locale" @toc "LOCA" Detail of the Local structure. $00a8 168 Taille de la structure $0000 0 4 loc_LocaleName $0004 4 4 loc_LanguageName $0008 8 4 loc_PrefLanguages[0] $0030 48 4 loc_Flags $0034 52 4 loc_CodeSet $0038 56 4 loc_CountryCode $003c 60 4 loc_TelephoneCode $0040 64 4 loc_GMTOffset $0044 68 1 loc_MeasuringSystem $0045 69 1 loc_CalendarType $0046 70 1 loc_Reserved0[0] $0048 72 4 loc_DateTimeFormat $004c 76 4 loc_DateFormat $0050 80 4 loc_TimeFormat $0054 84 4 loc_ShortDateTimeFormat $0058 88 4 loc_ShortDateFormat $005c 92 4 loc_ShortTimeFormat $0060 96 4 loc_DecimalPoint $0064 100 4 loc_GroupSeparator $0068 104 4 loc_FracGroupSeparator $006c 108 4 loc_Grouping $0070 112 4 loc_FracGrouping $0074 116 4 loc_MonDecimalPoint $0078 120 4 loc_MonGroupSeparator $007c 124 4 loc_MonFracGroupSeparator $0080 128 4 loc_MonGrouping $0084 132 4 loc_MonFracGrouping $0088 136 1 loc_MonFracDigits $0089 137 1 loc_MonIntFracDigits $008a 138 1 loc_Reserved1[0] $008c 140 4 loc_MonCS $0090 144 4 loc_MonSmallCS $0094 148 4 loc_MonIntCS $0098 152 4 loc_MonPositiveSign $009c 156 1 loc_MonPositiveSpaceSep $009d 157 1 loc_MonPositiveSignPos $009e 158 1 loc_MonPositiveCSPos $009f 159 1 loc_Reserved2 $00a0 160 4 loc_MonNegativeSign $00a4 164 1 loc_MonNegativeSpaceSep $00a5 165 1 loc_MonNegativeSignPos $00a6 166 1 loc_MonNegativeCSPos $00a7 167 1 loc_Reserved3 @ENDNODE @node ASLR "OS_DevKit, other libraries" @toc "MAIN" ___________ ___________ / /\ / /\ OS-DevKit Extension / ___ / // _______/ / Additional power for AMOS Pro V2.00+ / /\_/ / // /\_____ \/ / / // / // /\ Written by: / / // / //______ / / Fromentin BRICE / /_// / /_\_____/ / / / / // / / /__________/ //__________/ / \__________\/ \__________\/ @{b}@{u}Support of other libraries@{uu}@{ub} @{b}@{u}ASL Requesters@{uu}@{ub} @{" How to pull it off ? " Link "req_comment"} @{" Descriptions of TAGS " Link "req_tags"} @{" File requester structure " Link "_req_file"} @{" Font requester scructure " Link "_req_font"} @{" Screen Mode structure " Link "_req_scr"} (V38+) @{u}Easy2use Commands:@{uu} @{" _asl File$ " Link "_asl File$"} @{u}Advanced Commands:@{uu} @{" _asl Alloc " Link "_asl Alloc"} @{" _asl Do " Link "_asl Do"} @{" _asl Free " Link "_asl Free"} @{" _asl What File " Link "_asl What File"} @{" _asl What Drawer " Link "_asl What Drawer"} @{" _asl What Nb Args " Link "_asl What Nb Args"} @{" _asl What Font " Link "_asl What Font"} @ENDNODE @NODE "_asl File$" @toc "ASLR" F$=@{b}_asl File$@{ub}(WND,TITLE$,DRWER$,FILE$,PAT$) @ENDNODE @NODE "_asl Alloc" @toc "ASLR" _asl Alloc This function allocates and initializes a requester, then sends back its pointer. REQ=_asl Alloc(TYPE,TAG) TYPE -> Type of requester 0->FICHIER 1->FONTE 2->SCREEN MODE TAG -> Pointer of @{"TAG List" Link _tags} @ENDNODE @NODE "_asl Do" @toc "ASLR" _asl Do This function does the request and sends back FALSE if there is no selected file ('Cancel button') PTXT=_asl Do(REQ,TAG) REQ -> Pointer of ASL Requester TAG -> Pointer of @{"TAG List" Link _tags} @ENDNODE @NODE "_asl Free" @toc "ASLR" _asl Free This function liberates an ASL requester of the memory. _asl Free REQ REQ -> Pointer of ASL Requester. @ENDNODE @NODE "_asl What File" @toc "ASLR" _asl What File This function sends back the pointer of the string name of selected file. o PTXT=_asl What File(REQ) REQ -> Pointer of ASL Requester o PTXT=_asl What File(REQ,NB) REQ -> Pointer of ASL Requester NB -> Number of required string (Multiselection case) @ENDNODE @NODE "_asl What Drawer" @toc "ASLR" _asl What Drawer This function sends back the pointer of the string name of selected path. PTXT=_asl What Drawer(REQ) REQ -> Pointer of ASL Requester. @ENDNODE @NODE "_asl What Nb Args" @toc "ASLR" _asl What Nb Args This function sends back the number of selections done in case of multiselection. NB=_asl What Nb Args(REQ) REQ -> Pointer of ASL Requester. @ENDNODE @NODE "_asl What Font" @toc "ASLR" _asl What Font This function sends back the pointer of the TextAttr structure of the selected font. This pointer is valid so much that the requester doesn't have freed of the memory. So if one wants to work with, it is preferable of making a clone of it. TATTR=_asl What Text Attr(REQ) REQ -> Pointer of ASL Requester. @ENDNODE @NODE req_tags "Descriptions of TAGS" @toc "ASLR" Descriptions of TAGS Actually, there are 3 types of requesters: - ASLFR, the file requesters. - ASLFO, the font requesters. - ASLSM, the screen mode requesters. I/ TAG of the 3 types. ASLSM_Window ASLFO_Window ASLFR_Window : Specify the parent window of the requester. ($80080002),(WND) If ASLFR_Screen is not specify the screen of this window will be to use. (V36) ASLSM_PubScreenName ASLFO_PubScreenName ASLFR_PubScreenName : Specify the name of the public screen on which ($80080029),(STR) the requester will open. Overstep the screen uses by ASLFR_Window. (V38) ASLSM_Screen ASLFO_Screen ASLFR_Screen : Specify the screen on which the requester will open. ($80080028),(SCR) Overstep ASLFR_PubScreenName. (V38) ASLSM_PrivateIDCMP ASLFO_PrivateIDCMP ASLFR_PrivateIDCMP : Set to TRUE, the requester allocates its own IDCMP ($8008002A),(BOOL) port for its window. Otherwise, the requester shares with ASLFR_Window the IDCMP port. (V38) ASLSM_SleepWindow ASLFO_SleepWindow ASLFR_SleepWindow : Set to TRUE, the ASLFR_Window window is in sleep state. ($8008002B),(BOOL) In fact, the pointer is in wait state and no gadget or menu are not operable. (V38) ASLSM_TextAttr ASLFO_TextAttr ASLFR_TextAttr : Specify the font to use for the requester, a pointer on the ($80080033),(TEXTATTR) TextAttr structure is require if he are void or omitted, then the font of the screen is used. The font must be in memory because ASL does an 'OpenFont.' (V38) ASLSM_TitleText ASLFO_TitleText ASLFR_TitleText : Title of the requester, no by default. (V36) ($80080001),(STR) ASLSM_PositiveText ASLFO_PositiveText ASLFR_PositiveText : Text of 'OK' button of the requester. Before V38, it ($80080012),(STR) could not pass 6 characters. (V36) ASLSM_NegativeText ASLFO_NegativeText ASLFR_NegativeText : Text of 'CANCEL' button of the requester. Before V38, ($80080013),(STR) it could not pass 6 characters. (V36) ASLSM_InitialLeftEdge ASLFO_InitialLeftEdge ASLFR_InitialLeftEdge : Suggestion for the abscissa of the requester. (V36) ($80080003),(X) ASLSM_InitialTopEdge ASLFO_InitialTopEdge ASLFR_InitialTopEdge : Suggestion for the ordinate of the requester. (V36) ($80080004),(Y) ASLSM_InitialWidth ASLFO_InitialWidth ASLFR_InitialWidth : Suggestion for the width of the requester. (V36) ($80080005),(W) ASLSM_InitialHeight ASLFO_InitialHeight ASLFR_InitialHeight : Suggestion for the height of the requester. (V36) ($80080006),(H) II/ The file requester TAGs ASLFR_InitialFile : Start file of the requester. (V36) ($80080008),(STR) ASLFR_InitialDrawer : Start path of the requester. (V36) ($80080009),(STR) ASLFR_InitialPattern : Pattern of the requester, default to #?. (V36) ($8008000A),(STR) ASLFR_Flags1 : Specify the set 1 of some Flags of the requester. (V36) ($80080014),(FLAGS) Display Pattern Gadget $1 MultiSelection Mode $8 Own IDCMP port $10 Save Mode $20 ASLFR_Flags2 : Specify the set 2 of some Flags of the requester. (V36) ($80080016),(FLAGS) Only Drawers $1 Pattern on Drawers $2 No Icnons $4 ASLFR_DoSaveMode : Activate the Save Mode if TRUE. (V38) ($8008002C),(BOOL) ASLFR_DoMultiSelect : Activate the MultiSelection Mode if TRUE. ($8008002D),(BOOL) It withdraws the Save Mode. (V38) ASLFR_DoPatterns : Display the pattern gadget if TRUE. (V38) ($8008002E),(BOOL) ASLFR_DrawersOnly : Display only the drawers if TRUE. (V38) ($8008002F),(BOOL) ASLFR_RejectIcons : Don't display the icons if TRUE. (V38) ($8008003C),(BOOL) ASLFR_FilterDrawers : Apply the pattern to the drawers if TRUE. (V38) ($8008002F),(BOOL) III/ The font requester TAGs ASLFO_InitialName : Name of the default font of the requester. (V36) ($8008000A),(STR) ASLFO_InitialSize : Default size of the font of the requester. ($8008000B),(H) The default value is 8. (V36) ASLFO_InitialStyle : Default style of the font of the requester. ($8008000C),(STYLE) The default style is normal. (V36) ASLFO_InitialFlags : Default flags of the font of the requester. ($8008000D),(FLAGS) The flag indicates a font in ROM by default. (V36) ASLFO_InitialFrontPen : Color for the trace of the font, default 1. (V36) ($8008000E),(FPEN) ASLFO_InitialBackPen : Color for the trace of backgroud, default 0. (V36) ($8008000E),(FPEN) ASLFO_InitialDrawMode : Draw mode for the font, default 0.(V38) ($8008003B),(DRMD) ASLFO_Flags : Flags for the requester, default 0. (V36) ($80080014),(FLAGS) Display gadget FRONTPEN $1 Display gadget BACKPEN $2 Display gadget STYLE $4 Display gadget DRAWMODE $8 Only fixed width fonts $10 Own IDCMP Port $20 ASLFO_DoFrontPen : Display FRONTPEN gadget if TRUE. (V38) ($8008002C),(BOOL) ASLFO_DoBackPen : Display BACKPEN gadget if TRUE. (V38) ($8008002D),(BOOL) ASLFO_DoStyle : Display STYLE gadget if TRUE. (V38) ($8008002E),(BOOL) ASLFO_DoDrawMode : Display DRAWMODE gadget if TRUE. (V38) ($8008002F),(BOOL) ASLFO_FixedWidthOnly : Display fonts of stationary width. (V38) ($80080030),(BOOL) ASLFO_MinHeight : Specify the minimal height of the selectable fonts. ($80080010),(H) Default to 5. (V38) ASLFO_MaxHeight : Specify the maximal height of the selectable fonts. ($80080011),(H) Default to 24. (V38) ASLFO_MaxFrontPen : Specify the maximum number of colors for the ($ ),(PMAX) FRONTPEN gadget. Default to 255. (V40) ASLFO_MaxBackPen : Specify the maximum number of colors for the ($ ),(PMAX) BACKGROUND gadget. Default has 255. (V40) IV/ The screen mode requester TAGs ASLSM_InitialDisplayID : Initial screen mode. Default to 0 (Lores). (V38) ($800800C8),(RES) ASLSM_InitialDisplayWidth : Initial width of the screen. Default to 640. (V38) ($800800CA),(W) ASLSM_InitialDisplayHeight: Initial height of the screen. Default to 200. (V38) ($800800CC),(H) ASLSM_InitialDisplayDepth : Depth of the screen. Default to 2. (V38) ($800800CE),(D) ASLSM_InitialOverscanType : Type of overscan of the screen. Default to 0. (V38) ($800800D0),(OTYPE) Under V38: 0 --> "Regular Size" OSCAN_TEXT --> "Text Size" OSCAN_STANDARD --> "Graphics Size" OSCAN_MAXIMUM --> "Maximum Size" Under V39 & +: OSCAN_TEXT --> "Text Size" OSCAN_STANDARD --> "Graphics Size" OSCAN_MAXIMUM --> "Extreme Size" OSCAN_VIDEO --> "Maximum Size" ASLSM_InitialAutoScroll : Display AUTOSCROLL gadget if TRUE. (V38) ($800800D2),(BOOL) ASLSM_InitialInfoOpened : Display information window if TRUE. (V38) ($800800D4),(BOOL) ASLSM_InitialInfoLeftEdge : Initial abscissa of the information window. ($800800D6),(COORD) (V38) ASLSM_InitialInfoTopEdge : Initial ordinate of the information window. ($800800D8),(COORD) (V38) ASLSM_DoWidth : Display the gadget of width if TRUE. (V38) ($8008006D),(BOOL) ASLSM_DoHeight : Display the gadget of height if TRUE. (V38) ($8008006E),(BOOL) ASLSM_DoDepth : Display the gadget of depth if TRUE. (V38) ($8008006F),(BOOL) ASLSM_DoOverscanType : Display the gadget of overscan if TRUE. (V38) ($80080070),(BOOL) ASLSM_DoAutoScroll : Display the gadget of autoscroll if TRUE. (V38) ($80080071),(BOOL) ASLSM_PropertyFlags : A mode must possess some properties flags to ($80080072),(FLAGS) appear in the list. Alone the stationary bits in ASLSM_PropertyMask is taken in counts. Default to DIPF_IS_WB. (V38) ASLSM_PropertyMask : Specify a mask has to apply on the properties flags. ($80080073),(MASK) Default to DIPF_IS_WB. (V38) ASLSM_MinWidth : Specify the minimal width that the user could choose. ($80080074),(WIDTH) Default to 16. (V38) ASLSM_MaxWidth : Specify the maximal width that the user could choose. ($80080075),(WIDTH) Default to 16. (V38) ASLSM_MinHeight : Specify the minimal height that the user could choose. ($80080076),(HEIGHT) Default to 16. (V38) ASLSM_MaxHeight : Specify the maximal height that the user could choose. ($80080077),(HAIGHT) Default to 16384. (V38) ASLSM_MinDepth : Specify the minimal depth that the user could choose. ($80080078),(DEPTH) Default to 1. (V38) ASLSM_MaxDepth : Specify the maximal depth that the user could choose. ($80080079),(DEPTH) Default to 24. (V38) @ENDNODE @NODE req_comment "How to ?" @toc "ASLR" Comment Faire ? Pour utiliser une requête asl, il suffit simplement de respecter le squelette suivant : **************************** *Definition of the @{"TAGList" Link _tags}* **************************** **************************** * Requester Allocation * **************************** REQ=@{"_asl Alloc(TYPE,TAG)" Link _asl_alloc} **************************** * Do the request * **************************** OK=@{"_asl Do(REQ,TAG)" Link _asl_do} **************************** * Access Results * **************************** FIL=@{"_asl What File(REQ) " Link _asl_What_File} DRW=@{"_asl What Drawer(REQ) " Link _asl_What_Drawer} **************************** * Free Requester * **************************** OK=@{"_asl Free(REQ)" Link _asl_free} @ENDNODE @NODE _req_file "Structure FileRequester" @toc "ASLR" Detail of FileRequester structure. $0038 56 Size of Structure $0000 0 1 fr_Reserved0[0] $0004 4 4 fr_File $0008 8 4 fr_Drawer $000c 12 1 fr_Reserved1[0] $0016 22 2 fr_LeftEdge $0018 24 2 fr_TopEdge $001a 26 2 fr_Width $001c 28 2 fr_Height $001e 30 1 fr_Reserved2[0] $0020 32 4 fr_NumArgs $0024 36 4 fr_ArgList $0028 40 4 fr_UserData $002c 44 1 fr_Reserved3[0] $0034 52 4 fr_Pattern @ENDNODE @NODE _req_font "Structure FontRequester" @toc "ASLR" Detail of FontRequester structure. $002c 44 siae of structure $0000 0 1 fo_Reserved0[0] $0008 8 8 fo_Attr $0010 16 1 fo_FrontPen $0011 17 1 fo_BackPen $0012 18 1 fo_DrawMode $0013 19 1 fo_Reserved1 $0014 20 4 fo_UserData $0018 24 2 fo_LeftEdge $001a 26 2 fo_TopEdge $001c 28 2 fo_Width $001e 30 2 fo_Height $0020 32 12 fo_TAttr @ENDNODE @NODE _req_scr "Structure ScreenModeRequester" @toc "ASLR" Detail of ScreenModeRequester structure. $0030 48 size of structure $0000 0 4 sm_DisplayID $0004 4 4 sm_DisplayWidth $0008 8 4 sm_DisplayHeight $000c 12 2 sm_DisplayDepth $000e 14 2 sm_OverscanType $0010 16 2 sm_AutoScroll $0012 18 4 sm_BitMapWidth $0016 22 4 sm_BitMapHeight $001a 26 2 sm_LeftEdge $001c 28 2 sm_TopEdge $001e 30 2 sm_Width $0020 32 2 sm_Height $0022 34 2 sm_InfoOpened $0024 36 2 sm_InfoLeftEdge $0026 38 2 sm_InfoTopEdge $0028 40 2 sm_InfoWidth $002a 42 2 sm_InfoHeight $002c 44 4 sm_UserData @ENDNODE