Macintosh-SW/supermario
1
0
Fork 0
mirror of https://github.com/elliotnunn/supermario.git synced 2024-12-01 18:50:30 +00:00
Code Issues Projects Releases Wiki Activity
5122302da6
supermario/base/SuperMarioProj.1994-02-09/Interfaces/AIncludes/Traps.a
Elliot Nunn 2e16381318 Bring in sources, and document
2019-06-29 23:17:50 +08:00

3350 lines
80 KiB
Plaintext
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

; Version: 3.29
; Created: Friday, October 20, 1989 at 10:06:13 PM
;
; File: Traps.a
;
; Assembler Interface to the Macintosh Libraries
; Copyright Apple Computer, Inc. 1984-1992
; All Rights Reserved.
;
; Change History (most recent first):
;
; <SM18> 9/13/93 SAM Removed the 24bit conds around the removate of SwapMMUMode,
; StripAddress, and Translate24to32. I also removed all the
; redefinitions of Translate24to32 throughout the sources.
; <SMG2> 9/1/93 chp Took out _DMAIntInstall again. No one needs it now.
; <SM16> 7/21/93 RC back out <sm 15>
; <SM14> 6/14/93 kc Roll in Ludwig. (leave behind _DMAIntInstall for SAM)
; <LW5> 4/26/93 KW SM and Reality already use selector #11 that Ludwig was using
; for SlotBlockXferCtl...so bump SlotBlockXferCtl's selector to 12
; <LW4> 3/24/93 mal Added _SlotBlockXferCtl trap.
; <LW3> 3/16/93 chp Remove obsolete DMAMgr macros to _HwPriv.
; <SM14> 4/7/93 CSS Re-disable StripAddress and SwapMMUMode when
; Supports24Bit is off.
; <SM13> 3/30/93 IH Add Display Manager Trap
; <SM12> 11/16/92 CSS Rollins from Reality:
; <80> 11/7/92 JDR Added _GetStdFilterProc, _SetDialogDefaultItem,
; _SetDialogCancelItem, _SetDialogTracksCursor which are now
; public.
; <SM11> 11/10/92 CSS Rollins from Reality:
; <79> 10/17/92 PKE For New IM: Add OPWORDs for new names for old routines TextBox,
; TESetJust, Secs2Date, Date2Secs, KeyTrans, UprString.
; <78> 10/16/92 DTY Add BlockMoveData.
; <77> 5/27/92 hsK #1030902,<YK>: Remove the Dictionary manager dispatch macros and
; put them into the new DictionaryEqu.a file.
; <76> 5/13/92 hsK #1029463: Changed the paramWordsInitializeDictionary to 5.
; <75> 4/21/92 DTY #1018901,<gbm>: Add GetNextFOND routine. This routine will
; return the next 'FOND' resource in the resource chain after the
; one that was passed in. This routine was needed because font
; families can now be split across several files.
; <SM10> 11/9/92 RB Re-enable StripAddress and SwapMMUMode for non-24 bit mode,
; since the slot manager requires this for the PrimaryInit of
; video cards. PrimaryInit executes in 24 bit mode.
; <SM9> 10/22/92 CSS Added a check for Supports24Bit which if not defined means
; that the calls StripAddress and SwapMMUMode should be nops.
; Also, added ROMFastTraps to do direct trap calling rather than
; use the atrap mechanism. The call still goes through the trap table,
; however. Don't forget to turn the flag ROMFastTraps on in StandardEqu.a
; when you wish to enable this feature.
; <SM8> 6/19/92 RB Updated the DMADispatch macros to use a HWPriv selector.
; DMADispatch was a temporary trap previously.
; <SM7> 6/10/92 CSS Roll-in changes from Reality:
; <77> 5/27/92 hsK #1030902,<YK>: Remove the Dictionary manager dispatch macros and
; put them into the new DictionaryEqu.a file.
; <76> 5/13/92 hsK #1029463: Changed the paramWordsInitializeDictionary to 5.
; <74> 3/30/92 DCL Removed _SndGetBufferStufferLoad and _SndGetMixerLoad. They are
; not public.
; <73> 3/10/92 DCL For New Improved Inside Mac: Added Call names without Abbrevs.:
; SecsToDate (Secs2Date) and DateToSecs (Date2Secs). Affected
; Files: OSUtils.[ph], Traps.[aph].
; <72> 3/9/92 DCL For New Improved Inside Mac: Added Call names without Abbrevs.:
; AppendResMenu (AddResMenu), DeleteMCEntries (DelMCEntries),
; DeleteMenuItem (DelMenuItem), DisposeMCInfo (DispMCInfo),
; GetMenuHandle (GetMHandle), InsertMenuItem (InsMenuItem),
; SetMenuItemText (SetItem), GetMenuItemText (GetItem). Affected
; Files: Menus.[ph], Traps.[aph].
; <71> 2/18/92 MH Add defs, alternate spellings, and corrected Casing of some
; labels to bring into concordance with the ETO 6 versions of
; traps.a, traps.h and traps.p. _Translate24To32 is temporarily
; commented out until conflicts with other defintitions in the BBS
; private sources can be resolved. Please make sure that the
; definition continues to be available in public releases of this
; file.
; <SM6> 5/20/92 KW Rolled in P4,P5 from Cyclone
; <SM5> 5/17/92 kc Roll in Horror Changes. Comments follow:
; <H4> 3/11/92 SWC Added _CursorADBDispatch OPWORD ($AADB) for new cursor code.
; Note Brian McGhie's sense of humor...
; <H3> 2/14/92 SWC Added _DockingDispatch OPWORD for docking code.
; <H2> 01/27/92 jmp (BG,Z6) Added _SoundDispatch OPWORD and a macro,
; _SndSoundManagerVersion that makes use of it.
; <SM1> 4/24/92 CS Integrate change <75> from reality for resource manager changes:
; <75> 4/21/92 DTY #1018901,<gbm>: Add GetNextFOND routine. This routine will
; return the next 'FOND' resource in the resource chain after the
; one that was passed in. This routine was needed because font
; families can now be split across several files.
;----------------------------------------------------
; Pre SuperMario Comments below
;----------------------------------------------------
; <70> 1/23/92 hsK Changed the paramWordsInitializeDictionary to 4.
; <69> 12/26/91 RB Added _PowerDispatch trap
; <68> 11/21/91 YK InputUtils were gone. I'm happy to be able to do this.
; <67> 10/30/91 YK Corrected previous change.
; <66> 10/30/91 YK Added _ComponentDispatch trap number and its dispatch entries.
; <65> 10/24/91 JH Changed paramWordsInitializeDictionary from 6 to 5.
; <64> 10/23/91 YK Adding trap number for InputUtilsDispatch ($AA54) along with the
; pack like dispatch routines.
; <63> 10/17/91 JH Adding trap number for DictionaryDispatch ($AA53) along with the
; pack like dispatch routines.
; <62> 8/14/91 JL Fixed DoDispatch macro for case sensitive assembling. Added
; &upCase to determine if trap value is truly an opword or not.
; <61> 2/5/91 stb dnf,dnf003: set the HFS bit (10 in the trap word) for all HFS
; calls which have a dirID (CatSearch, Get|SetForeignPrivs) and
; whose macros are currently wrong; privatize SaveRestoreBits.
; <60> 1/30/91 gbm sab, #38: Change the ‘already including this file’ variable to
; all uppercase (for security reasons)
; <59> 1/23/91 JL fixed DebugUtil macros. They weren't using the correct name for
; the selector.
; <58> 1/16/91 dnf (DFH) Move SetupWDCB, SetupDef and ReadWDCB back in here.
; <57> 1/15/91 KON Change capitalization on Pixmap32Bit to read PixMap32Bit. [csd]
; <56> 1/9/91 KON GWorld trap macros need to set the high word of the selector to
; the size of the parameter list. [CEL]
; <55> 12/14/90 dba <JDR> add MemoryDispatch calls, low-level debugging calls,
; outline font calls, and made more use of the standard dispatcher
; macro
; <54> 12/11/90 JDR KIP Adding the Sound Manager trap macros for the dispatched
; routines.
; <53> 12/7/90 dba <bbm/gbm> Add ResourceDispatch, ReadPartialResource,
; WritePartialResource, and SetResourceSize.
; <52> 12/3/90 RLC <ksm> Remove the dialog mgr private macros.
; <51> 11/12/90 JL Changed lower case equ to uppercase EQU to match MPW interfaces.
; <50> 11/2/90 DFH Added new names for temp memory calls.
; <49> 9/25/90 JDR Updating the Sound Manager traps and selectors.
; <48> 9/22/90 dnf Add hfs selectors from AppleShare-land (dispatch values for
; GetXCatInfo and volume mount calls)
; <47> 9/21/90 gbm (Actually DDG) Fixed the picture utilities routine selectors to
; use ProcHelper.
; <46> 9/19/90 DDG Added the picture utilities routines.
; <45> 9/15/90 DC Added interface for GetGray
; <44> 9/15/90 KON Add CopyDeepMask and OpenCPicture traps.
; <43> 9/14/90 csd Added _DeviceLoop
; <42> 8/30/90 KSM Fix param words for Dialog Dispatcher.
; <41> 8/29/90 dnf Add FSpExchangeFiles
; <40> 8/20/90 dvb Remove "DrawGrayishString"
; <39> 8/6/90 dnf Renumber selectors for _FSp traps
; <38> 8/6/90 dnf Add macros for _MakeFSSpec and _FSp traps
; <37> 8/1/90 SAM Added GetGestaltProcPtr definition.
; <36> 7/25/90 DFH Removed InitApplication and CleanupApplication for good.
; <35> 7/24/90 DFH Temporarily put InitApplication and CleanupApplication back in
; <34> 7/24/90 DFH Removed _InitApplication and _CleanupApplication, since these
; are private traps.
; <33> 7/14/90 DVB Add DeltaRGB, CheckColors, and DrawGrayishString
; <32> 7/2/90 KSM Add _GetStdFilterProc.
; <31> 6/28/90 DTY Change _ScrollDelay to use DoDispatch macro.
; <30> 6/19/90 DVB Add Get/SetPaletteUpdates
; <29> 6/8/90 KSM Selectors for DialogDispatch should be public.
; <28> 6/7/90 KSM Add DialogMgr dispatcher and IsFrontWindowModal.
; <27> 6/2/90 dnf Change MakeFSSpec to A260 (i.e. hfsBit on) from A060.
; <26> 5/31/90 CL Adding parameter count into the QDDone macro.
; <25> 5/30/90 DC Added IconDispatch
; <24> 5/30/90 EMT Added LayerDispatch trap.
; <23> 5/29/90 CL Added QDDone macro and selector.
; <22> 5/24/90 KSM Add ModalDialogMenuSetup trap.
; <21> 5/16/90 KON Add OpenCPicture trap.
; <20> 5/4/90 dnf Add MakeFSSpec dispatch macro
; <18> 4/29/90 KSM Update the DoDispatch macro to remove assumptions about
; assembler optimizations and put in significant error checking.
; <17> 4/20/90 KSM Add InvalMenuBar trap, SaveRestoreBits dispatcher and its
; macros, updated QDOffscreen macros.
; <16> 4/10/90 BBH added Process Mgr traps _InitApplication and _CleanupApplication
; <15> 3/29/90 DVB Add WhatPal pmgrdispatch
; <14> 3/16/90 dnf Change DTOpen to DTGetPath; DTShutDown to DTCloseDown,
; DTResetComment to DTClearComment, DTDeleteAPPL to DTRemoveAPPL
; Moved _SetPMSP back in (from FIleMgrPrivate.a) Added
; CommToolboxDispatch trap for Byron B. Han
; <13> 3/4/90 PKE Changed LwrText, UprText, StripUprText opwords to LowerText,
; UpperText, StripUpperText.
; <12> 2/26/90 Official MPW Version
; <11> 2/5/90 ngk Change FileID traps from $A060 back to $A260
; <10> 2/4/90 GA Added Trap Macro definition for "EgretDispatch" $A092
; <9> 2/4/90 DNF For some reason the scripts didn't pick up the right comment.
; This change is really 7+
; <8>
; <7+> 1/30/90 DNF (with dba) renamed FSDispatch selectors and some traps. dba
; also replaced constants with symbols in the Palette Manager,
; QDDispatch, and MFPrivate dispatch traps, as well as adding
; a few synonyms with better spelling, adjusting formatting,
; comments and generally making the file to his liking.
; <7> 1/29/90 DVB Add argument-counts to PaletteDispatchs, add PMgrVersion trap
; <6> 1/18/90 DNF (with dba) temporarily rename _GetIcon in the Desktop Database
; Mgr. to avoid conflict with _GetIcon from the Toolbox Utilities;
; also changed _HFSDispatch back to $A260 and used _FSDispatch for
; $A060
; <5> 1/14/90 DNF Fix fsControl macro
; <4> 1/11/90 DVB Move the Palette Manager dispatches from PaletteEqu.a to here.
; <3> 1/9/90 DNF Fix syntax errors in calls to DoHFSDispatch
; <2> 1/9/90 DNF Replace constants with equates in HFS dispatch macros. New
; macro also allows new _HFSDispatch traps with the newHFS bit as
; an input (i.e. not always on)
; <2.2> 12/8/89 dnf Added new hfs traps (CatSearch, File ID's)
; <2.3> 12/8/89 dnf Fix _FSCleanup macro
; <2.1> 11/20/89 EMT NEEDED FOR 6.0.5: Added _UserDelay trap for humane scrolling.
; <2.0> 11/3/89 MSH Rolled new HcMac traps in from Reality sources:IdleUpdate,
; IdleState,
; <1.9> 9/19/89 PKE Added _StripText, _UprText, _StripUprText as names for new
; flavors of _LwrString trap, and _LwrText as synonym for plain
; old _LwrString.
; <1.8> 8/30/89 dba added newHFS flag equate; made more similar to MPW 3.1b1
; <1.7> 8/7/89 CCH Added _NewGestalt and _ReplaceGestalt traps.
; <1.6> 5/20/89 GGD Moved the IOP manager trap definitions into Traps.a
; <1.5> 5/18/89 CCH Changed _Gestalt trap to $A1AD.
; <1.4> 4/23/89 PKE Moved _LwrString definition here (from ScriptEqu.a) to match
; MPW.
; <1.3> 2/24/89 rwh added HwPriv traps
; <1.2> 2/21/89 CCH Added _Gestalt, _NewGestalt, _AlterGestalt, and _RemoveGestalt
; traps.
; <1.1> 1/28/89 GGD Added _InsXTime extended variant of _InsTime trap.
; <1.0> 11/9/88 CCH Adding to EASE.
; <1.3> 10/18/88 MSH Added _NMInstall and _NMRemove traps..
; <1.2> 10/12/88 BBM added poweroff trap.
; <•1.1> 9/14/88 CCH Updated EASE with the current rev of this file.
; 10/15/87 KLH Corrected _SetCPortPix to _SetPortPix.
; 8/24/87 KLH Corrected _GetTimeout & _SetTimeout macros to have data in D0.
; 6/11/87 KLH Removed PBSetPEOF per Bill Bruffey.
; 6/4/87 KLH added _DebugStr.
; 5/23/87 KLH added _WaitNextEvent, _ShutDown & _Unimplemented.
; 4/28/87 KLH moved _SysEnvirons trap here from EnvironsEqu.a
; 3/25/87 KLH _OpenCPicture removed because not needed (per DAF).
; 3/23/87 KLH _CloseCPort trap # changed back to $A87D.
; 2/26/87 KLH moved _SlotManager trap here from SlotTraps.a library.
; <C669> 1/22/87 bbm fixed new resource manager trap ($A80C, not $A08C).
; <C666> 1/22/87 DAF added DelSearch and DelComp traps
; <C628> 1/14/87 bbm added new resource manager trap.
; <C637> 1/14/87 EHB Added device/dispose traps
; <C544> 12/18/86 DAF Changed the name of SetEntry to SetEntries
; <C531> 12/15/86 FJL Tear off menu support, etc.
; <C532> 12/15/86 FJL Background notification manager support
; <C506> 12/11/86 GWN Added _GetOSDefault and _SETOSDefault. Enabled A345.
; <C496> 12/9/86 DAF Added _GetWVariant,_GetCVariant,_SaveEntries,_RestoreEntries,
; <C489> 12/8/86 RDC Added new DTInstall trap definition
; <C335> 12/3/86 JSP Changed the three MMU traps to one (SwapMMUMode)
; <A296> 10/29/86 WRL Added traps for Get and Set DefaultStartup
; <A231> 10/16/86 MBK added traps for TextEdit
; <Cxxx> 10/14/86 EHB added traps for cursor routines
; <C212> 10/13/86 CSL changed name of ADBReset to ADBReInit
; <C147> 10/11/86 RDC added new OS traps for NuMac VBL handling
; <C172> 9/24/86 BBM added macro for stripaddress
; 9/23/86 NSJ new this date
;
;___________________________________________________________________________
IF &TYPE('__INCLUDINGTRAPS__') = 'UNDEFINED' THEN
__INCLUDINGTRAPS__ SET 1
IF (&TYPE('ROMFastTraps') = 'UNDEFINED') THEN
IF (&TYPE('StandardEquROMFastTraps') = 'UNDEFINED') THEN
DoROMFastTraps SET 0
ELSE
DoROMFastTraps SET StandardEquROMFastTraps
ENDIF
ELSE
DoROMFastTraps SET ROMFastTraps
ENDIF
IF (&TYPE('Supports24Bit') = 'UNDEFINED') THEN
IF (&TYPE('StandardEquSupports24Bit') = 'UNDEFINED') THEN
DoSupports24Bit SET 0
ELSE
DoSupports24Bit SET StandardEquSupports24Bit
ENDIF
ELSE
DoSupports24Bit SET Supports24Bit
ENDIF
; Equates for setting trap option bits
; for Device and File Manager routines
immed EQU $200 ; execute immediately, bypass I/O queue
async EQU $400 ; asynchronous, don't wait for completion
; for Memory Manager routines
clear EQU $200
sys EQU $400
; for string routines
marks EQU $200 ; set to ignore/strip diacriticals
case EQU $400 ; set for case sensitivity
; for all Toolbox routines
autoPop EQU $400 ; set to pop an extra return address
; for Get/Set & NGet/NSet TrapAddress
newTool EQU $600 ; Toolbox trap, under new ordering
newOS EQU $200 ; OS trap, under new ordering
; for HFS routines
newHFS EQU $200
; Dispatch Macros (compatible with DispatchHelper macro)
;
; DoDispatch TrapRef,Selector[,ParamWords]
; Purpose: Sets up for a call to a trap that is a dispatching trap.
;
; Inputs: TrapRef - the dispatching trap number (i.e. $A8xx or _MyTrap)
; Selector - the trap selector number (-128 thru 127 only!)
; [,ParamWords] - (optional) number of WORDS of parameters this call takes
;
; Outputs: The output of this macro depends on its input, however, in general it produces:
; MOVEQ #Selector, D0
; _MyTrap
; or
; MOVEQ #Selector, D0
; DC.W $AFFF ; No opword is defined for $AFFF yet
;
; WARNING:
; Note: If you do not specify “ParamWords”, it assumes that:
; The routine you are dispatching to is a procedure
; --- AND ---
; If you are using the DispatchHelper macro, you must insure
; that this routine __NEVER__ goes away.
; (The helper will assume that this “procedure” returns an OSErr
; and will mess up your stack for you, free of charge).
MACRO
DoDispatch &trapRef,&selector,&paramWords
lcla &selectorNum
lcla &paramCount
&selectorNum: seta &eval(&selector)
if (&selectorNum > 127) OR (&selectorNum < -128) then
aerror &CONCAT('Selector number for ', &TrapRef, ' “',&selector, '” is outside the range -128 to 127')
exitm
endif
if (&paramWords = '') then
&paramCount: seta 0 ; Procedure call if &paramWords was not specified
else
&paramCount: seta &eval(&paramWords)
endif
if (&paramCount < 0) OR (&paramCount > 255) then
aerror &CONCAT('Parameter words for ', &trapRef, ' “',&paramWords, '” is outside the range 0-255')
exitm
endif
if &paramCount = 0 then
moveq #&selectorNum, D0 ; move the selector into D0 quickly
else
&paramCount: seta (&paramCount << 8) + (&selectorNum AND $ff)
move.w #&paramCount, D0 ; move the selector into D0
endif
if &type(&upcase(&trapRef)) ≠ 'OPWORD' then
dc.w &trapRef
exitm
endif
&trapRef
ENDM
; QuickDraw
IF NOT (DoROMFastTraps) THEN
_CopyMask OPWORD $A817
ELSE
MACRO
_CopyMask
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
JSR ([$E00+$17*4])
MACHINE &OLDMACH
ENDM
ENDIF
_MeasureText OPWORD $A837
_GetMaskTable OPWORD $A836
_CalcMask OPWORD $A838
_SeedFill OPWORD $A839
_InitCursor OPWORD $A850
_SetCursor OPWORD $A851
_HideCursor OPWORD $A852
_ShowCursor OPWORD $A853
_ShieldCursor OPWORD $A855
_ObscureCursor OPWORD $A856
_BitAnd OPWORD $A858
_BitXOr OPWORD $A859
_BitNot OPWORD $A85A
_BitOr OPWORD $A85B
_BitShift OPWORD $A85C
_BitTst OPWORD $A85D
_BitSet OPWORD $A85E
_BitClr OPWORD $A85F
_Random OPWORD $A861
_ForeColor OPWORD $A862
_BackColor OPWORD $A863
_ColorBit OPWORD $A864
_GetPixel OPWORD $A865
_StuffHex OPWORD $A866
_LongMul OPWORD $A867
_FixMul OPWORD $A868
_FixRatio OPWORD $A869
_HiWord OPWORD $A86A
_LoWord OPWORD $A86B
_FixRound OPWORD $A86C
_InitPort OPWORD $A86D
_InitGraf OPWORD $A86E
_OpenPort OPWORD $A86F
_LocalToGlobal OPWORD $A870
_GlobalToLocal OPWORD $A871
_GrafDevice OPWORD $A872
_SetPort OPWORD $A873
_GetPort OPWORD $A874
_SetPBits OPWORD $A875
_PortSize OPWORD $A876
_MovePortTo OPWORD $A877
_SetOrigin OPWORD $A878
_SetClip OPWORD $A879
_GetClip OPWORD $A87A
_ClipRect OPWORD $A87B
_BackPat OPWORD $A87C
_ClosePort OPWORD $A87D
_AddPt OPWORD $A87E
_SubPt OPWORD $A87F
_SetPt OPWORD $A880
_EqualPt OPWORD $A881
_StdText OPWORD $A882
_DrawChar OPWORD $A883
_DrawString OPWORD $A884
_DrawText OPWORD $A885
_TextWidth OPWORD $A886
_TextFont OPWORD $A887
_TextFace OPWORD $A888
_TextMode OPWORD $A889
_TextSize OPWORD $A88A
_GetFontInfo OPWORD $A88B
_StringWidth OPWORD $A88C
_CharWidth OPWORD $A88D
_SpaceExtra OPWORD $A88E
_StdLine OPWORD $A890
_LineTo OPWORD $A891
_Line OPWORD $A892
_MoveTo OPWORD $A893
_Move OPWORD $A894
_ShutDown OPWORD $A895
_HidePen OPWORD $A896
_ShowPen OPWORD $A897
_GetPenState OPWORD $A898
_SetPenState OPWORD $A899
_GetPen OPWORD $A89A
_PenSize OPWORD $A89B
_PenMode OPWORD $A89C
_PenPat OPWORD $A89D
_PenNormal OPWORD $A89E
_Unimplemented OPWORD $A89F
_StdRect OPWORD $A8A0
_FrameRect OPWORD $A8A1
IF NOT (DoROMFastTraps) THEN
_PaintRect OPWORD $A8A2
_EraseRect OPWORD $A8A3
_InverRect OPWORD $A8A4
_FillRect OPWORD $A8A5
ELSE
MACRO
_PaintRect
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
JSR ([$E00+$A2*4])
MACHINE &OLDMACH
ENDM
MACRO
_EraseRect
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
JSR ([$E00+$A3*4])
MACHINE &OLDMACH
ENDM
MACRO
_InverRect
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
JSR ([$E00+$A4*4])
MACHINE &OLDMACH
ENDM
MACRO
_FillRect
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
JSR ([$E00+$A5*4])
MACHINE &OLDMACH
ENDM
ENDIF
_EqualRect OPWORD $A8A6
_SetRect OPWORD $A8A7
_OffsetRect OPWORD $A8A8
_InsetRect OPWORD $A8A9
_SectRect OPWORD $A8AA
_UnionRect OPWORD $A8AB
_Pt2Rect OPWORD $A8AC
_PtInRect OPWORD $A8AD
_EmptyRect OPWORD $A8AE
_StdRRect OPWORD $A8AF
_FrameRoundRect OPWORD $A8B0
_PaintRoundRect OPWORD $A8B1
_EraseRoundRect OPWORD $A8B2
_InverRoundRect OPWORD $A8B3
_FillRoundRect OPWORD $A8B4
_StdOval OPWORD $A8B6
_FrameOval OPWORD $A8B7
_PaintOval OPWORD $A8B8
_EraseOval OPWORD $A8B9
_InvertOval OPWORD $A8BA
_FillOval OPWORD $A8BB
_SlopeFromAngle OPWORD $A8BC
_StdArc OPWORD $A8BD
_FrameArc OPWORD $A8BE
_PaintArc OPWORD $A8BF
_EraseArc OPWORD $A8C0
_InvertArc OPWORD $A8C1
_FillArc OPWORD $A8C2
_PtToAngle OPWORD $A8C3
_AngleFromSlope OPWORD $A8C4
_StdPoly OPWORD $A8C5
_FramePoly OPWORD $A8C6
_PaintPoly OPWORD $A8C7
_ErasePoly OPWORD $A8C8
_InvertPoly OPWORD $A8C9
_FillPoly OPWORD $A8CA
_OpenPoly OPWORD $A8CB
_ClosePgon OPWORD $A8CC
_ClosePoly OPWORD $A8CC
_KillPoly OPWORD $A8CD
_OffsetPoly OPWORD $A8CE
_PackBits OPWORD $A8CF
_UnpackBits OPWORD $A8D0
_StdRgn OPWORD $A8D1
_FrameRgn OPWORD $A8D2
_PaintRgn OPWORD $A8D3
_EraseRgn OPWORD $A8D4
_InverRgn OPWORD $A8D5
_FillRgn OPWORD $A8D6
_BitMapRgn OPWORD $A8D7
_BitMapToRegion OPWORD $A8D7
_NewRgn OPWORD $A8D8
_DisposRgn OPWORD $A8D9
_DisposeRgn OPWORD $A8D9
_OpenRgn OPWORD $A8DA
_CloseRgn OPWORD $A8DB
_CopyRgn OPWORD $A8DC
_SetEmptyRgn OPWORD $A8DD
_SetRecRgn OPWORD $A8DE
_RectRgn OPWORD $A8DF
_OfsetRgn OPWORD $A8E0
_OffsetRgn OPWORD $A8E0
_InsetRgn OPWORD $A8E1
_EmptyRgn OPWORD $A8E2
_EqualRgn OPWORD $A8E3
_SectRgn OPWORD $A8E4
_UnionRgn OPWORD $A8E5
_DiffRgn OPWORD $A8E6
_XOrRgn OPWORD $A8E7
_PtInRgn OPWORD $A8E8
_RectInRgn OPWORD $A8E9
_SetStdProcs OPWORD $A8EA
_StdBits OPWORD $A8EB
IF NOT (DoROMFastTraps) THEN
_CopyBits OPWORD $A8EC
ELSE
MACRO
_CopyBits
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
JSR ([$E00+$EC*4])
MACHINE &OLDMACH
ENDM
ENDIF
_StdTxMeas OPWORD $A8ED
_StdGetPic OPWORD $A8EE
_ScrollRect OPWORD $A8EF
_StdPutPic OPWORD $A8F0
_StdComment OPWORD $A8F1
_PicComment OPWORD $A8F2
_OpenPicture OPWORD $A8F3
_ClosePicture OPWORD $A8F4
_KillPicture OPWORD $A8F5
_DrawPicture OPWORD $A8F6
_Layout OPWORD $A8F7 ; <71>
_ScalePt OPWORD $A8F8
_MapPt OPWORD $A8F9
_MapRect OPWORD $A8FA
_MapRgn OPWORD $A8FB
_MapPoly OPWORD $A8FC
; Toolbox
_Count1Resources OPWORD $A80D
_Get1IxResource OPWORD $A80E
_Get1IxType OPWORD $A80F
_Unique1ID OPWORD $A810
_TESelView OPWORD $A811
_TEPinScroll OPWORD $A812
_TEAutoView OPWORD $A813
_Pack8 OPWORD $A816
_FixATan2 OPWORD $A818
_XMunger OPWORD $A819
_HOpenResFile OPWORD $A81A
_HCreateResFile OPWORD $A81B
_Count1Types OPWORD $A81C
_Get1Resource OPWORD $A81F
_Get1NamedResource OPWORD $A820
_MaxSizeRsrc OPWORD $A821
_InsMenuItem OPWORD $A826
_InsertMenuItem OPWORD $A826 ;<72>
_HideDItem OPWORD $A827
_ShowDItem OPWORD $A828
_LayerDispatch OPWORD $A829
_Pack9 OPWORD $A82B
_Pack10 OPWORD $A82C
_Pack11 OPWORD $A82D
_Pack12 OPWORD $A82E
_Pack13 OPWORD $A82F
_Pack14 OPWORD $A830
_Pack15 OPWORD $A831
_ScrnBitMap OPWORD $A833
_SetFScaleDisable OPWORD $A834
_FontMetrics OPWORD $A835
_ZoomWindow OPWORD $A83A
_TrackBox OPWORD $A83B
_PrGlue OPWORD $A8FD ; <71>
_InitFonts OPWORD $A8FE
_GetFName OPWORD $A8FF
_GetFNum OPWORD $A900
_FMSwapFont OPWORD $A901
_RealFont OPWORD $A902
_SetFontLock OPWORD $A903
_DrawGrowIcon OPWORD $A904
_DragGrayRgn OPWORD $A905
_NewString OPWORD $A906
_SetString OPWORD $A907
_ShowHide OPWORD $A908
_CalcVis OPWORD $A909
_CalcVBehind OPWORD $A90A
_ClipAbove OPWORD $A90B
_PaintOne OPWORD $A90C
IF NOT (DoROMFastTraps) THEN
_PaintBehind OPWORD $A90D
ELSE
MACRO
_PaintBehind
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
JSR ([$E00+$10D*4])
MACHINE &OLDMACH
ENDM
ENDIF
_SaveOld OPWORD $A90E
_DrawNew OPWORD $A90F
_GetWMgrPort OPWORD $A910
_CheckUpDate OPWORD $A911
_InitWindows OPWORD $A912
_NewWindow OPWORD $A913
_DisposWindow OPWORD $A914
_DisposeWindow OPWORD $A914
_ShowWindow OPWORD $A915
_HideWindow OPWORD $A916
_GetWRefCon OPWORD $A917
_SetWRefCon OPWORD $A918
_GetWTitle OPWORD $A919
_SetWTitle OPWORD $A91A
_MoveWindow OPWORD $A91B
_HiliteWindow OPWORD $A91C
_SizeWindow OPWORD $A91D
_TrackGoAway OPWORD $A91E
_SelectWindow OPWORD $A91F
_BringToFront OPWORD $A920
_SendBehind OPWORD $A921
_BeginUpDate OPWORD $A922
_EndUpDate OPWORD $A923
_FrontWindow OPWORD $A924
_DragWindow OPWORD $A925
_DragTheRgn OPWORD $A926
_InvalRgn OPWORD $A927
_InvalRect OPWORD $A928
_ValidRgn OPWORD $A929
_ValidRect OPWORD $A92A
_GrowWindow OPWORD $A92B
_FindWindow OPWORD $A92C
_CloseWindow OPWORD $A92D
_SetWindowPic OPWORD $A92E
_GetWindowPic OPWORD $A92F
_InitMenus OPWORD $A930
_NewMenu OPWORD $A931
_DisposMenu OPWORD $A932
_DisposeMenu OPWORD $A932
_AppendMenu OPWORD $A933
_ClearMenuBar OPWORD $A934
_InsertMenu OPWORD $A935
_DeleteMenu OPWORD $A936
_DrawMenuBar OPWORD $A937
_InvalMenuBar OPWORD $A81D
_HiliteMenu OPWORD $A938
_EnableItem OPWORD $A939
_DisableItem OPWORD $A93A
_GetMenuBar OPWORD $A93B
_SetMenuBar OPWORD $A93C
_MenuSelect OPWORD $A93D
_MenuKey OPWORD $A93E
_GetItmIcon OPWORD $A93F
_SetItmIcon OPWORD $A940
_GetItmStyle OPWORD $A941
_SetItmStyle OPWORD $A942
_GetItmMark OPWORD $A943
_SetItmMark OPWORD $A944
_CheckItem OPWORD $A945
_GetItem OPWORD $A946
_GetMenuItemText OPWORD $A946 ;<72>
_SetItem OPWORD $A947
_SetMenuItemText OPWORD $A947 ;<72>
_CalcMenuSize OPWORD $A948
_GetMHandle OPWORD $A949
_GetMenuHandle OPWORD $A949 ;<72>
_SetMFlash OPWORD $A94A
_PlotIcon OPWORD $A94B
_FlashMenuBar OPWORD $A94C
_AddResMenu OPWORD $A94D
_AppendResMenu OPWORD $A94D ;<72>
_PinRect OPWORD $A94E
_DeltaPoint OPWORD $A94F
_CountMItems OPWORD $A950
_InsertResMenu OPWORD $A951
_DelMenuItem OPWORD $A952
_DeleteMenuItem OPWORD $A952 ;<72>
_UpdtControl OPWORD $A953
_NewControl OPWORD $A954
_DisposControl OPWORD $A955
_DisposeControl OPWORD $A955
_KillControls OPWORD $A956
_ShowControl OPWORD $A957
_HideControl OPWORD $A958
_MoveControl OPWORD $A959
_GetCRefCon OPWORD $A95A
_SetCRefCon OPWORD $A95B
_SizeControl OPWORD $A95C
_HiliteControl OPWORD $A95D
_GetCTitle OPWORD $A95E
_SetCTitle OPWORD $A95F
_GetCtlValue OPWORD $A960
_GetMinCtl OPWORD $A961
_GetMaxCtl OPWORD $A962
_SetCtlValue OPWORD $A963
_SetMinCtl OPWORD $A964
_SetMaxCtl OPWORD $A965
_TestControl OPWORD $A966
_DragControl OPWORD $A967
_TrackControl OPWORD $A968
_DrawControls OPWORD $A969
_GetCtlAction OPWORD $A96A
_SetCtlAction OPWORD $A96B
_FindControl OPWORD $A96C
_Draw1Control OPWORD $A96D
_Dequeue OPWORD $A96E ; <71>
_Enqueue OPWORD $A96F ; <71>
_WaitNextEvent OPWORD $A860
_GetNextEvent OPWORD $A970
IF NOT (DoROMFastTraps) THEN
_EventAvail OPWORD $A971
_GetMouse OPWORD $A972
_StillDown OPWORD $A973
_Button OPWORD $A974
_TickCount OPWORD $A975
_GetKeys OPWORD $A976
_WaitMouseUp OPWORD $A977
ELSE
MACRO
_EventAvail
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
JSR ([$E00+$171*4])
MACHINE &OLDMACH
ENDM
MACRO
_GetMouse
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
JSR ([$E00+$172*4])
MACHINE &OLDMACH
ENDM
MACRO
_StillDown
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
JSR ([$E00+$173*4])
MACHINE &OLDMACH
ENDM
MACRO
_Button
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
JSR ([$E00+$174*4])
MACHINE &OLDMACH
ENDM
MACRO
_TickCount
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
JSR ([$E00+$175*4])
MACHINE &OLDMACH
ENDM
MACRO
_GetKeys
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
JSR ([$E00+$176*4])
MACHINE &OLDMACH
ENDM
MACRO
_WaitMouseUp
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
JSR ([$E00+$177*4])
MACHINE &OLDMACH
ENDM
ENDIF
_UpdtDialog OPWORD $A978
_CouldDialog OPWORD $A979
_FreeDialog OPWORD $A97A
_InitDialogs OPWORD $A97B
_GetNewDialog OPWORD $A97C
_NewDialog OPWORD $A97D
_SelIText OPWORD $A97E
_IsDialogEvent OPWORD $A97F
_DialogSelect OPWORD $A980
_DrawDialog OPWORD $A981
_CloseDialog OPWORD $A982
_DisposDialog OPWORD $A983
_DisposeDialog OPWORD $A983
_FindDItem OPWORD $A984
_Alert OPWORD $A985
_StopAlert OPWORD $A986
_NoteAlert OPWORD $A987
_CautionAlert OPWORD $A988
_CouldAlert OPWORD $A989
_FreeAlert OPWORD $A98A
_ParamText OPWORD $A98B
_ErrorSound OPWORD $A98C
_GetDItem OPWORD $A98D
_SetDItem OPWORD $A98E
_SetIText OPWORD $A98F
_GetIText OPWORD $A990
_ModalDialog OPWORD $A991
_DetachResource OPWORD $A992
_SetResPurge OPWORD $A993
_CurResFile OPWORD $A994
_InitResources OPWORD $A995
_RsrcZoneInit OPWORD $A996
_OpenResFile OPWORD $A997
_UseResFile OPWORD $A998
_UpdateResFile OPWORD $A999
_CloseResFile OPWORD $A99A
_SetResLoad OPWORD $A99B
_CountResources OPWORD $A99C
_GetIndResource OPWORD $A99D
_CountTypes OPWORD $A99E
_GetIndType OPWORD $A99F
IF NOT (DoROMFastTraps) THEN
_GetResource OPWORD $A9A0
ELSE
MACRO
_GetResource
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
JSR ([$E00+$1A0*4])
MACHINE &OLDMACH
ENDM
ENDIF
_GetNamedResource OPWORD $A9A1
IF NOT (DoROMFastTraps) THEN
_LoadResource OPWORD $A9A2
ELSE
MACRO
_LoadResource
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
JSR ([$E00+$1A2*4])
MACHINE &OLDMACH
ENDM
ENDIF
_ReleaseResource OPWORD $A9A3
_HomeResFile OPWORD $A9A4
_SizeRsrc OPWORD $A9A5
_GetResAttrs OPWORD $A9A6
_SetResAttrs OPWORD $A9A7
_GetResInfo OPWORD $A9A8
_SetResInfo OPWORD $A9A9
_ChangedResource OPWORD $A9AA
_AddResource OPWORD $A9AB
_AddReference OPWORD $A9AC
_RmveResource OPWORD $A9AD
_RmveReference OPWORD $A9AE
_ResError OPWORD $A9AF
_WriteResource OPWORD $A9B0
_CreateResFile OPWORD $A9B1
_SystemEvent OPWORD $A9B2
_SystemClick OPWORD $A9B3
_SystemTask OPWORD $A9B4
_SystemMenu OPWORD $A9B5
_OpenDeskAcc OPWORD $A9B6
_CloseDeskAcc OPWORD $A9B7
_GetPattern OPWORD $A9B8
_GetCursor OPWORD $A9B9
_GetString OPWORD $A9BA
_GetIcon OPWORD $A9BB
_GetPicture OPWORD $A9BC
_GetNewWindow OPWORD $A9BD
_GetNewControl OPWORD $A9BE
_GetRMenu OPWORD $A9BF
_GetNewMBar OPWORD $A9C0
_UniqueID OPWORD $A9C1
_SysEdit OPWORD $A9C2
_OpenRFPerm OPWORD $A9C4
_RsrcMapEntry OPWORD $A9C5
_Secs2Date OPWORD $A9C6
_SecsToDate OPWORD $A9C6
_SecondsToDate OPWORD $A9C6 ; <79>
_Date2Secs OPWORD $A9C7
_DateToSecs OPWORD $A9C7
_DateToSeconds OPWORD $A9C7 ; <79>
_SysBeep OPWORD $A9C8
_SysError OPWORD $A9C9
_PutIcon OPWORD $A9CA
_Munger OPWORD $A9E0
_HandToHand OPWORD $A9E1
_PtrToXHand OPWORD $A9E2
_PtrToHand OPWORD $A9E3
_HandAndHand OPWORD $A9E4
_InitPack OPWORD $A9E5
_InitAllPacks OPWORD $A9E6
_Pack0 OPWORD $A9E7
_Pack1 OPWORD $A9E8
_Pack2 OPWORD $A9E9
_Pack3 OPWORD $A9EA
_FP68K OPWORD $A9EB
_Pack4 OPWORD $A9EB
_Elems68K OPWORD $A9EC
_Pack5 OPWORD $A9EC
_Pack6 OPWORD $A9ED
_DECSTR68K OPWORD $A9EE
_Pack7 OPWORD $A9EE
_PtrAndHand OPWORD $A9EF
_LoadSeg OPWORD $A9F0
_UnLoadSeg OPWORD $A9F1
_Launch OPWORD $A9F2
_Chain OPWORD $A9F3
_ExitToShell OPWORD $A9F4
_GetAppParms OPWORD $A9F5
_GetResFileAttrs OPWORD $A9F6
_SetResFileAttrs OPWORD $A9F7
_MethodDispatch OPWORD $A9F8
_InfoScrap OPWORD $A9F9
_UnlodeScrap OPWORD $A9FA
_UnloadScrap OPWORD $A9FA
_LodeScrap OPWORD $A9FB
_LoadScrap OPWORD $A9FB
_ZeroScrap OPWORD $A9FC
_GetScrap OPWORD $A9FD
_PutScrap OPWORD $A9FE
_Debugger OPWORD $A9FF
_IconDispatch OPWORD $ABC9
_DisplayDispatch OPWORD $ABEB
_DebugStr OPWORD $ABFF
; Resource Manager
_ResourceDispatch OPWORD $A822
; PPCToolbox
_PPC OPWORD $A0DD ; <71>
; Alias Manager
_AliasDispatch OPWORD $A823 ; <71>
selectReadPartialResource EQU 1
selectWritePartialResource EQU 2
selectSetResourceSize EQU 3
selectGetNextFOND equ 10
MACRO
_ReadPartialResource
DoDispatch _ResourceDispatch,selectReadPartialResource
ENDM
MACRO
_WritePartialResource
DoDispatch _ResourceDispatch,selectWritePartialResource
ENDM
MACRO
_SetResourceSize
DoDispatch _ResourceDispatch,selectSetResourceSize
ENDM
Macro
_GetNextFOND
DoDispatch _ResourceDispatch,selectGetNextFOND
EndM
; Device Manager (some shared by the File Manager)
_Open OPWORD $A000
_Close OPWORD $A001
_Read OPWORD $A002
_Write OPWORD $A003
_Control OPWORD $A004
_Status OPWORD $A005
_KillIO OPWORD $A006
; File Manager
_GetVolInfo OPWORD $A007
_Create OPWORD $A008
_Delete OPWORD $A009
_OpenRF OPWORD $A00A
_Rename OPWORD $A00B
_GetFileInfo OPWORD $A00C
_SetFileInfo OPWORD $A00D
_UnmountVol OPWORD $A00E
_HUnmountVol OPWORD $A20E ; unconditional (ignores open files)
_MountVol OPWORD $A00F
_Allocate OPWORD $A010
_GetEOF OPWORD $A011
_SetEOF OPWORD $A012
_FlushVol OPWORD $A013
_GetVol OPWORD $A014
_SetVol OPWORD $A015
_FInitQueue OPWORD $A016
_Eject OPWORD $A017
_GetFPos OPWORD $A018
_SetFilLock OPWORD $A041
_RstFilLock OPWORD $A042
_SetFilType OPWORD $A043
_SetFPos OPWORD $A044
_FlushFile OPWORD $A045
_HOpen OPWORD $A200
_HGetVInfo OPWORD $A207
_HCreate OPWORD $A208
_HDelete OPWORD $A209
_HOpenRF OPWORD $A20A
_HRename OPWORD $A20B
_HGetFileInfo OPWORD $A20C
_HSetFileInfo OPWORD $A20D
_AllocContig OPWORD $A210
_HSetVol OPWORD $A215
_HGetVol OPWORD $A214
_HSetFLock OPWORD $A241
_HRstFLock OPWORD $A242
; dispatch trap for remaining File Manager (and Desktop Manager) calls
_FSDispatch OPWORD $A060
_HFSDispatch OPWORD $A260
; HFSDispatch selectors
selectFSControl EQU $0
selectOpenWD EQU $1
selectCloseWD EQU $2
selectCatMove EQU $5
selectDirCreate EQU $6
selectGetWDInfo EQU $7
selectGetFCBInfo EQU $8
selectGetCatInfo EQU $9
selectSetCatInfo EQU $A
selectSetVolInfo EQU $B
selectSetPMSP EQU $C
selectSetupWDCB EQU $D
selectSetupDef EQU $E
selectReadWDCB EQU $F
selectLockRng EQU $10
selectUnlockRng EQU $11
selectCreateFileIDRef EQU $14
selectDeleteFileIDRef EQU $15
selectResolveFileIDRef EQU $16
selectExchangeFiles EQU $17
selectCatSearch EQU $18
selectOpenDF EQU $1A
selectMakeFSSpec EQU $1B
selectDTGetPath EQU $20
selectDTCloseDown EQU $21
selectDTAddIcon EQU $22
selectDTGetIcon EQU $23
selectDTGetIconInfo EQU $24
selectDTAddAPPL EQU $25
selectDTRemoveAPPL EQU $26
selectDTGetAPPL EQU $27
selectDTSetComment EQU $28
selectDTRemoveComment EQU $29
selectDTGetComment EQU $2A
selectDTFlush EQU $2B
selectDTReset EQU $2C
selectDTGetInfo EQU $2D
selectDTOpenInform EQU $2E
selectDTDelete EQU $2F
selectGetVolParms EQU $30
selectGetLogInInfo EQU $31
selectGetDirAccess EQU $32
selectSetDirAccess EQU $33
selectMapID EQU $34
selectMapName EQU $35
selectCopyFile EQU $36
selectMoveRename EQU $37
selectOpenDeny EQU $38
selectOpenRFDeny EQU $39
selectGetXCatInfo EQU $3A
selectGetVolMountInfoSize EQU $3F
selectGetVolMountInfo EQU $40
selectVolumeMount EQU $41
selectGetForeignPrivs EQU $60
selectSetForeignPrivs EQU $61
; DoHFSDispatch supports both the "_trap async" and old-style "_trap ,async" call formats
; by using two parameters. hfsBit defaults to 1 (i.e. A260) but can be set zero (A060)
macro
DoHFSDispatch &selector,&async1,&async2,&hfsBit==newHFS
moveq.l #&selector,d0
_FSDispatch &hfsBit,&async1,&async2
endm
macro
_FSControl &async1,&async2
DoHFSDispatch selectFSControl,&async1,&async2
endm
macro
_OpenWD &async1,&async2
DoHFSDispatch selectOpenWD,&async1,&async2
endm
macro
_CloseWD &async1,&async2
DoHFSDispatch selectCloseWD,&async1,&async2
endm
macro
_CatMove &async1,&async2
DoHFSDispatch selectCatMove,&async1,&async2
endm
macro
_DirCreate &async1,&async2
DoHFSDispatch selectDirCreate,&async1,&async2
endm
macro
_GetWDInfo &async1,&async2
DoHFSDispatch selectGetWDInfo,&async1,&async2
endm
macro
_GetFCBInfo &async1,&async2
DoHFSDispatch selectGetFCBInfo,&async1,&async2
endm
macro
_GetCatInfo &async1,&async2
DoHFSDispatch selectGetCatInfo,&async1,&async2
endm
macro
_SetCatInfo &async1,&async2
DoHFSDispatch selectSetCatInfo,&async1,&async2
endm
macro
_SetVolInfo &async1,&async2
DoHFSDispatch selectSetVolInfo,&async1,&async2
endm
macro
_SetPMSP &async1,&async2
DoHFSDispatch selectSetPMSP,&async1,&async2
endm
macro
_SetupWDCB &async1,&async2
DoHFSDispatch selectSetupWDCB,&async1,&async2
endm
macro
_SetupDef &async1,&async2
DoHFSDispatch selectSetupDef,&async1,&async2
endm
macro
_ReadWDCB &async1,&async2
DoHFSDispatch selectReadWDCB,&async1,&async2
endm
macro
_LockRng &async1,&async2
DoHFSDispatch selectLockRng,&async1,&async2
endm
macro
_UnlockRng &async1,&async2
DoHFSDispatch selectUnlockRng,&async1,&async2
endm
macro
_CreateFileIDRef &async1,&async2
DoHFSDispatch selectCreateFileIDRef,&async1,&async2
endm
macro
_DeleteFileIDRef &async1,&async2
DoHFSDispatch selectDeleteFileIDRef,&async1,&async2
endm
macro
_ResolveFileIDRef &async1,&async2
DoHFSDispatch selectResolveFileIDRef,&async1,&async2
endm
macro
_ExchangeFiles &async1,&async2
DoHFSDispatch selectExchangeFiles,&async1,&async2
endm
macro
_CatSearch &async1,&async2
DoHFSDispatch selectCatSearch,&async1,&async2
endm
macro
_OpenDF &async1,&async2
DoHFSDispatch selectOpenDF,&async1,&async2,hfsBit=0
endm
macro
_HOpenDF &async1,&async2
DoHFSDispatch selectOpenDF,&async1,&async2
endm
macro
_MakeFSSpec &async1,&async2
DoHFSDispatch selectMakeFSSpec,&async1,&async2
endm
macro
_GetVolParms &async1,&async2
DoHFSDispatch selectGetVolParms,&async1,&async2
endm
macro
_GetLogInInfo &async1,&async2
DoHFSDispatch selectGetLogInInfo,&async1,&async2
endm
macro
_GetDirAccess &async1,&async2
DoHFSDispatch selectGetDirAccess,&async1,&async2
endm
macro
_SetDirAccess &async1,&async2
DoHFSDispatch selectSetDirAccess,&async1,&async2
endm
macro
_MapID &async1,&async2
DoHFSDispatch selectMapID,&async1,&async2
endm
macro
_MapName &async1,&async2
DoHFSDispatch selectMapName,&async1,&async2
endm
macro
_CopyFile &async1,&async2
DoHFSDispatch selectCopyFile,&async1,&async2
endm
macro
_MoveRename &async1,&async2
DoHFSDispatch selectMoveRename,&async1,&async2
endm
macro
_OpenDeny &async1,&async2
DoHFSDispatch selectOpenDeny,&async1,&async2
endm
macro
_OpenRFDeny &async1,&async2
DoHFSDispatch selectOpenRFDeny,&async1,&async2
endm
macro
_GetXCatInfo &async1,&async2
DoHFSDispatch selectGetXCatInfo,&async1,&async2
endm
macro
_GetVolMountInfoSize &async1,&async2
DoHFSDispatch selectGetVolMountInfoSize,&async1,&async2
endm
macro
_GetVolMountInfo &async1,&async2
DoHFSDispatch selectGetVolMountInfo,&async1,&async2
endm
macro
_VolumeMount &async1,&async2
DoHFSDispatch selectVolumeMount,&async1,&async2
endm
macro
_GetForeignPrivs &async1,&async2
DoHFSDispatch selectGetForeignPrivs,&async1,&async2
endm
macro
_SetForeignPrivs &async1,&async2
DoHFSDispatch selectSetForeignPrivs,&async1,&async2
endm
; Desktop Manager calls
macro
_DTGetPath &async1,&async2
DoHFSDispatch selectDTGetPath,&async1,&async2
endm
macro
_DTCloseDown &async1,&async2
DoHFSDispatch selectDTCloseDown,&async1,&async2
endm
macro
_DTAddIcon &async1,&async2
DoHFSDispatch selectDTAddIcon,&async1,&async2
endm
macro
_DTGetIcon &async1,&async2
DoHFSDispatch selectDTGetIcon,&async1,&async2
endm
macro
_DTGetIconInfo &async1,&async2
DoHFSDispatch selectDTGetIconInfo,&async1,&async2
endm
macro
_DTAddAPPL &async1,&async2
DoHFSDispatch selectDTAddAPPL,&async1,&async2
endm
macro
_DTRemoveAPPL &async1,&async2
DoHFSDispatch selectDTRemoveAPPL,&async1,&async2
endm
macro
_DTGetAPPL &async1,&async2
DoHFSDispatch selectDTGetAPPL,&async1,&async2
endm
macro
_DTSetComment &async1,&async2
DoHFSDispatch selectDTSetComment,&async1,&async2
endm
macro
_DTRemoveComment &async1,&async2
DoHFSDispatch selectDTRemoveComment,&async1,&async2
endm
macro
_DTGetComment &async1,&async2
DoHFSDispatch selectDTGetComment,&async1,&async2
endm
macro
_DTFlush &async1,&async2
DoHFSDispatch selectDTFlush,&async1,&async2
endm
macro
_DTReset &async1,&async2
DoHFSDispatch selectDTReset,&async1,&async2
endm
macro
_DTGetInfo &async1,&async2
DoHFSDispatch selectDTGetInfo,&async1,&async2
endm
macro
_DTOpenInform &async1,&async2
DoHFSDispatch selectDTOpenInform,&async1,&async2,hfsBit=0
endm
macro
_DTDelete &async1,&async2
DoHFSDispatch selectDTDelete,&async1,&async2,hfsBit=0
endm
; High level FSSpec calls
_HighLevelFSDispatch OPWORD $AA52
selectFSMakeFSSpec EQU $1
selectFSpOpenDF EQU $2
selectFSpOpenRF EQU $3
selectFSpCreate EQU $4
selectFSpDirCreate EQU $5
selectFSpDelete EQU $6
selectFSpGetFInfo EQU $7
selectFSpSetFInfo EQU $8
selectFSpSetFLock EQU $9
selectFSpRstFLock EQU $A
selectFSpRename EQU $B
selectFSpCatMove EQU $C
selectFSpOpenResFile EQU $D
selectFSpCreateResFile EQU $E
selectFSpExchangeFiles EQU $F
macro
_FSMakeFSSpec
DoDispatch _HighLevelFSDispatch,selectFSMakeFSSpec
endm
macro
_FSpOpenDF
DoDispatch _HighLevelFSDispatch,selectFSpOpenDF
endm
macro
_FSpOpenRF
DoDispatch _HighLevelFSDispatch,selectFSpOpenRF
endm
macro
_FSpCreate
DoDispatch _HighLevelFSDispatch,selectFSpCreate
endm
macro
_FSpDirCreate
DoDispatch _HighLevelFSDispatch,selectFSpDirCreate
endm
macro
_FSpDelete
DoDispatch _HighLevelFSDispatch,selectFSpDelete
endm
macro
_FSpGetFInfo
DoDispatch _HighLevelFSDispatch,selectFSpGetFInfo
endm
macro
_FSpSetFInfo
DoDispatch _HighLevelFSDispatch,selectFSpSetFInfo
endm
macro
_FSpSetFLock
DoDispatch _HighLevelFSDispatch,selectFSpSetFLock
endm
macro
_FSpRstFLock
DoDispatch _HighLevelFSDispatch,selectFSpRstFLock
endm
macro
_FSpRename
DoDispatch _HighLevelFSDispatch,selectFSpRename
endm
macro
_FSpCatMove
DoDispatch _HighLevelFSDispatch,selectFSpCatMove
endm
macro
_FSpOpenResFile
DoDispatch _HighLevelFSDispatch,selectFSpOpenResFile
endm
macro
_FSpCreateResFile
DoDispatch _HighLevelFSDispatch,selectFSpCreateResFile
endm
macro
_FSpExchangeFiles
DoDispatch _HighLevelFSDispatch,selectFSpExchangeFiles
endm
; Memory Manager
_InitZone OPWORD $A019
_GetZone OPWORD $A11A
_SetZone OPWORD $A01B
_FreeMem OPWORD $A01C
_MaxMem OPWORD $A11D
IF NOT (DoROMFastTraps) THEN
_NewPtr OPWORD $A11E
_NewPtrSys OPWORD $A51E ; <71>
_NewPtrClear OPWORD $A31E ; <71>
_NewPtrSysClear OPWORD $A71E ; <71>
_DisposePtr OPWORD $A01F
_DisposPtr OPWORD $A01F
_SetPtrSize OPWORD $A020
_GetPtrSize OPWORD $A021
ELSE
Macro
_NewPtr &param1,&param2,&param3
lclc &OLDMACH
lcla &TRAPADD
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
&TRAPADD SETA 0
IF &UPCASE(&param1)='SYS' OR &UPCASE(&param2)='SYS' OR &UPCASE(&param3)='SYS' THEN
&TRAPADD SETA &TRAPADD+$400
ENDIF
IF &UPCASE(&param1)='CLEAR' OR &UPCASE(&param2)='CLEAR' OR &UPCASE(&param3)='CLEAR' THEN
&TRAPADD SETA &TRAPADD+$200
ENDIF
movem.l d1-d2/a1,-(sp)
move.w #$A11E+&TRAPADD,d1
jsr ([$400+$1E*4])
movem.l (sp)+,d1-d2/a1
tst.w d0
MACHINE &OLDMACH
ENDM
Macro
_NewPtrSys
_NewPtr Sys
ENDM
Macro
_NewPtrClear
_NewPtr Clear
ENDM
Macro
_NewPtrSysClear
_NewPtr Clear,Sys
ENDM
Macro
_DisposePtr
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
movem.l d1-d2/a0-a1,-(sp)
jsr ([$400+$1F*4])
movem.l (sp)+,d1-d2/a0-a1
tst.w d0
MACHINE &OLDMACH
ENDM
Macro
_DisposPtr
_DisposePtr
ENDM
Macro
_SetPtrSize
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
movem.l d1-d2/a0-a1,-(sp)
jsr ([$400+$20*4])
movem.l (sp)+,d1-d2/a0-a1
tst.w d0
MACHINE &OLDMACH
ENDM
Macro
_GetPtrSize
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
movem.l d1-d2/a0-a1,-(sp)
jsr ([$400+$21*4])
movem.l (sp)+,d1-d2/a0-a1
tst.w d0
MACHINE &OLDMACH
ENDM
ENDIF
IF NOT (DoROMFastTraps) THEN
_NewHandle OPWORD $A122
_NewHandleClear OPWORD $A322 ; <71>
_DisposHandle OPWORD $A023
_DisposeHandle OPWORD $A023
_SetHandleSize OPWORD $A024
_GetHandleSize OPWORD $A025
ELSE
Macro
_NewHandle &param1,&param2,&param3
lclc &OLDMACH
lcla &TRAPADD
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
&TRAPADD SETA 0
IF &UPCASE(&param1)='SYS' OR &UPCASE(&param2)='SYS' OR &UPCASE(&param3)='SYS' THEN
&TRAPADD SETA &TRAPADD+$400
ENDIF
IF &UPCASE(&param1)='CLEAR' OR &UPCASE(&param2)='CLEAR' OR &UPCASE(&param3)='CLEAR' THEN
&TRAPADD SETA &TRAPADD+$200
ENDIF
movem.l d1-d2/a1,-(sp)
move.w #$A122+&TRAPADD,d1
jsr ([$400+$22*4])
movem.l (sp)+,d1-d2/a1
tst.w d0
MACHINE &OLDMACH
ENDM
Macro
_NewHandleClear
_NewHandle Clear
ENDM
Macro
_DisposeHandle
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
movem.l d1-d2/a0-a1,-(sp)
jsr ([$400+$23*4])
movem.l (sp)+,d1-d2/a0-a1
tst.w d0
MACHINE &OLDMACH
ENDM
Macro
_DisposHandle
_DisposeHandle
ENDM
Macro
_SetHandleSize
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
movem.l d1-d2/a0-a1,-(sp)
jsr ([$400+$24*4])
movem.l (sp)+,d1-d2/a0-a1
tst.w d0
MACHINE &OLDMACH
ENDM
Macro
_GetHandleSize
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
movem.l d1-d2/a0-a1,-(sp)
jsr ([$400+$25*4])
movem.l (sp)+,d1-d2/a0-a1
tst.w d0
MACHINE &OLDMACH
ENDM
ENDIF
_HandleZone OPWORD $A126
_ReallocHandle OPWORD $A027
_RecoverHandle OPWORD $A128
IF NOT (DoROMFastTraps) THEN
_HLock OPWORD $A029
ELSE
Macro
_HLock
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
movem.l d1-d2/a0-a1,-(sp)
jsr ([$400+$29*4])
movem.l (sp)+,d1-d2/a0-a1
tst.w d0
MACHINE &OLDMACH
Endm
ENDIF
IF NOT (DoROMFastTraps) THEN
_HUnlock OPWORD $A02A
ELSE
Macro
_HUnlock
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
movem.l d1-d2/a0-a1,-(sp)
jsr ([$400+$2a*4])
movem.l (sp)+,d1-d2/a0-a1
tst.w d0
MACHINE &OLDMACH
Endm
ENDIF
_EmptyHandle OPWORD $A02B
_InitApplZone OPWORD $A02C
_SetApplLimit OPWORD $A02D
IF NOT (DoROMFastTraps) THEN
_BlockMove OPWORD $A02E
_BlockMoveData OPWORD $A22E
ELSE
Macro
_BlockMove
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
movem.l d1-d2/a0-a1,-(sp)
move.w #$A02E,d1
jsr ([$400+$2E*4])
movem.l (sp)+,d1-d2/a0-a1
tst.w d0
MACHINE &OLDMACH
Endm
Macro
_BlockMoveData
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
movem.l d1-d2/a0-a1,-(sp)
move.w #$A22E,d1
jsr ([$400+$2E*4])
movem.l (sp)+,d1-d2/a0-a1
tst.w d0
MACHINE &OLDMACH
Endm
ENDIF
_MemoryDispatch OPWORD $A05C
_MemoryDispatchA0Result OPWORD $A15C
_DeferUserFn OPWORD $A08F
_DebugUtil OPWORD $A08D
; Event Manager
_PostEvent OPWORD $A02F
_PPostEvent OPWORD $A12F ;preserves A0 on return
IF NOT (DoROMFastTraps) THEN
_OSEventAvail OPWORD $A030
_GetOSEvent OPWORD $A031
ELSE
Macro
_OSEventAvail
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
movem.l d1-d2/a0-a1,-(sp)
jsr ([$400+$30*4])
movem.l (sp)+,d1-d2/a0-a1
tst.w d0
MACHINE &OLDMACH
ENDM
Macro
_GetOSEvent
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
movem.l d1-d2/a0-a1,-(sp)
jsr ([$400+$31*4])
movem.l (sp)+,d1-d2/a0-a1
tst.w d0
MACHINE &OLDMACH
ENDM
ENDIF
_FlushEvents OPWORD $A032
_VInstall OPWORD $A033
_VRemove OPWORD $A034
_OffLine OPWORD $A035
_MoreMasters OPWORD $A036
_WriteParam OPWORD $A038
_ReadDateTime OPWORD $A039
_SetDateTime OPWORD $A03A
_Delay OPWORD $A03B
_CmpString OPWORD $A03C
_DrvrInstall OPWORD $A03D
_DrvrRemove OPWORD $A03E
_InitUtil OPWORD $A03F
_ResrvMem OPWORD $A040
_GetTrapAddress OPWORD $A146
_SetTrapAddress OPWORD $A047
_GetOSTrapAddress OPWORD $A346 ; <71>
_SetOSTrapAddress OPWORD $A247 ; <71>
_GetToolTrapAddress OPWORD $A746 ; <71>
_SetToolTrapAddress OPWORD $A647 ; <71>
_GetToolBoxTrapAddress OPWORD $A746 ; <71>
_SetToolBoxTrapAddress OPWORD $A647 ; <71>
_PtrZone OPWORD $A148
_HPurge OPWORD $A049
_HNoPurge OPWORD $A04A
_SetGrowZone OPWORD $A04B
_CompactMem OPWORD $A04C
_PurgeMem OPWORD $A04D
_AddDrive OPWORD $A04E
_RDrvrInstall OPWORD $A04F
_LwrString OPWORD $A056
_UprString OPWORD $A054
_UpperString OPWORD $A054 ; <79>
_SetApplBase OPWORD $A057
IF NOT (DoROMFastTraps) THEN
_HWPriv OPWORD $A198 ; <71>
ELSE
Macro
_HWPriv
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
movem.l d1-d2/a1,-(sp)
jsr ([$400+$98*4])
movem.l (sp)+,d1-d2/a1
tst.w d0
MACHINE &OLDMACH
ENDM
ENDIF
; New names for (mostly) new flavors of old LwrString trap (redone <13>)
_LowerText OPWORD $A056 ;changed from _LwrText <13>
_StripText OPWORD $A256
_UpperText OPWORD $A456 ;changed from _UprText <13>
_StripUpperText OPWORD $A656 ;changed from _StripUprText <13>
; Temporary Memory routines
_OSDispatch OPWORD $A88F ;Process Manager trap
selectTempMaxMem EQU $15
selectTempFreeMem EQU $18
selectTempNewHandle EQU $1D
selectTempHLock EQU $1E
selectTempHUnlock EQU $1F
selectTempDisposeHandle EQU $20
selectTempTopMem EQU $16
MACRO
_TempMaxMem
MOVE.W #selectTempMaxMem,-(SP)
_OSDispatch
ENDM
MACRO
_TempFreeMem
MOVE.W #selectTempFreeMem,-(SP)
_OSDispatch
ENDM
MACRO
_TempNewHandle
MOVE.W #selectTempNewHandle,-(SP)
_OSDispatch
ENDM
MACRO
_TempHLock
MOVE.W #selectTempHLock,-(SP)
_OSDispatch
ENDM
MACRO
_TempHUnlock
MOVE.W #selectTempHUnlock,-(SP)
_OSDispatch
ENDM
MACRO
_TempDisposeHandle
MOVE.W #selectTempDisposeHandle,-(SP)
_OSDispatch
ENDM
MACRO
_TempTopMem
MOVE.W #selectTempTopMem,-(SP)
_OSDispatch
ENDM
; Temporary Memory routines as they used to be named (before System 7.0)
selectMFMaxMem EQU 21
selectMFFreeMem EQU 24
selectMFTempNewHandle EQU 29
selectMFTempHLock EQU 30
selectMFTempHUnlock EQU 31
selectMFTempDisposeHandle EQU 32
MACRO
_MFMaxMem
MOVE.W #selectMFMaxMem,-(SP)
_OSDispatch
ENDM
MACRO
_MFFreeMem
MOVE.W #selectMFFreeMem,-(SP)
_OSDispatch
ENDM
MACRO
_MFTempNewHandle
MOVE.W #selectMFTempNewHandle,-(SP)
_OSDispatch
ENDM
MACRO
_MFTempHLock
MOVE.W #selectMFTempHLock,-(SP)
_OSDispatch
ENDM
MACRO
_MFTempHUnlock
MOVE.W #selectMFTempHUnlock,-(SP)
_OSDispatch
ENDM
MACRO
_MFTempDisposHandle
MOVE.W #selectMFTempDisposeHandle,-(SP)
_OSDispatch
ENDM
MACRO
_MFTempDisposeHandle
MOVE.W #selectMFTempDisposeHandle,-(SP)
_OSDispatch
ENDM
; low-level memory control calls
selectHoldMemory EQU 0
selectUnholdMemory EQU 1
selectLockMemory EQU 2
selectLockMemoryContiguous EQU 4
selectUnlockMemory EQU 3
selectGetPhysical EQU 5
selectDebuggerGetMax EQU 0
selectDebuggerEnter EQU 1
selectDebuggerExit EQU 2
selectDebuggerPoll EQU 3
selectGetPageState EQU 4
selectPageFaultFatal EQU 5
selectDebuggerLockMemory EQU 6
selectDebuggerUnlockMemory EQU 7
selectEnterSupervisorMode EQU 8
MACRO
_HoldMemory
DoDispatch _MemoryDispatch,selectHoldMemory
ENDM
MACRO
_UnholdMemory
DoDispatch _MemoryDispatch,selectUnholdMemory
ENDM
MACRO
_LockMemory
DoDispatch _MemoryDispatch,selectLockMemory
ENDM
MACRO
_LockMemoryContiguous
DoDispatch _MemoryDispatch,selectLockMemoryContiguous
ENDM
MACRO
_UnlockMemory
DoDispatch _MemoryDispatch,selectUnlockMemory
ENDM
MACRO
_GetPhysical
DoDispatch _MemoryDispatchA0Result,selectGetPhysical
ENDM
; DebugUtil calls
MACRO
_DebuggerGetMax
DoDispatch _DebugUtil,selectDebuggerGetMax
ENDM
MACRO
_DebuggerEnter
DoDispatch _DebugUtil,selectDebuggerEnter
ENDM
MACRO
_DebuggerExit
DoDispatch _DebugUtil,selectDebuggerExit
ENDM
MACRO
_DebuggerPoll
DoDispatch _DebugUtil,selectDebuggerPoll
ENDM
MACRO
_GetPageState
DoDispatch _DebugUtil,selectGetPageState
ENDM
MACRO
_PageFaultFatal
DoDispatch _DebugUtil,selectPageFaultFatal
ENDM
MACRO
_DebuggerLockMemory
DoDispatch _DebugUtil,selectDebuggerLockMemory
ENDM
MACRO
_DebuggerUnlockMemory
DoDispatch _DebugUtil,selectDebuggerUnlockMemory
ENDM
MACRO
_EnterSupervisorMode
DoDispatch _DebugUtil,selectEnterSupervisorMode
ENDM
_RelString OPWORD $A050
_ReadXPRam OPWORD $A051
_WriteXPRam OPWORD $A052
_InsTime OPWORD $A058
_InsXTime OPWORD $A458
_RmvTime OPWORD $A059
_PrimeTime OPWORD $A05A
_PowerOff OPWORD $A05B
_MaxBlock OPWORD $A061
_PurgeSpace OPWORD $A162
_MaxApplZone OPWORD $A063
_MoveHHi OPWORD $A064
_StackSpace OPWORD $A065
_NewEmptyHandle OPWORD $A166
_HSetRBit OPWORD $A067
_HClrRBit OPWORD $A068
_HGetState OPWORD $A069
_HSetState OPWORD $A06A
_InitFS OPWORD $A06C
_InitEvents OPWORD $A06D
Macro ; SuperMario is a 32-bit only ROM
_SwapMMUMode
EndM
Macro ; SuperMario is a 32-bit only ROM
_StripAddress
EndM
Macro ; SuperMario is a 32-bit only ROM
_Translate24To32
EndM
_SetAppBase OPWORD $A057
_SlotVInstall OPWORD $A06F
_SlotVRemove OPWORD $A070
_AttachVBL OPWORD $A071
_DoVBLTask OPWORD $A072
_SIntInstall OPWORD $A075
_SIntRemove OPWORD $A076
_CountADBs OPWORD $A077
_GetIndADB OPWORD $A078
_GetADBInfo OPWORD $A079
_SetADBInfo OPWORD $A07A
_ADBReInit OPWORD $A07B
_ADBOp OPWORD $A07C
_GetDefaultStartup OPWORD $A07D
_SetDefaultStartup OPWORD $A07E
_InternalWait OPWORD $A07F
_RGetResource OPWORD $A80C
_GetVideoDefault OPWORD $A080
_SetVideoDefault OPWORD $A081
_DTInstall OPWORD $A082
_SetOSDefault OPWORD $A083
_GetOSDefault OPWORD $A084
_IOPInfoAccess OPWORD $A086
_IOPMsgRequest OPWORD $A087
_IOPMoveData OPWORD $A088
; Power Manager
_PowerDispatch OPWORD $A09F
_PMgrOp OPWORD $A085
_IdleUpdate OPWORD $A285
_IdleState OPWORD $A485
_SerialPower OPWORD $A685
_Sleep OPWORD $A08A
_SleepQInstall OPWORD $A28A ; <71>
_SlpQInstall OPWORD $A28A
_SleepQRemove OPWORD $A48A ; <71>
_SlpQRemove OPWORD $A48A
; Docking
_DockingDispatch OPWORD $AA57
; New cursor stuff
_CursorADBDispatch OPWORD $AADB
; Comm. Toolbox
_CommToolboxDispatch OPWORD $A08B
_SysEnvirons OPWORD $A090
; Egret Manager
_EgretDispatch OPWORD $A092 ; <10>
_Gestalt OPWORD $A1AD
_NewGestalt OPWORD $A3AD ; <1.7>
_ReplaceGestalt OPWORD $A5AD ; <1.7>
_GetGestaltProcPtr OPWORD $A7AD ; <37>
_InitProcMenu OPWORD $A808
_GetItemCmd OPWORD $A84E
_SetItemCmd OPWORD $A84F
_PopUpMenuSelect OPWORD $A80B
_KeyTrans OPWORD $A9C3
_KeyTranslate OPWORD $A9C3 ; <79>
MACRO
_GetTimeOut
suba.l a0,a0
_InternalWait
ENDM
MACRO
_SetTimeOut
MOVEA.W #1,A0
_InternalWait
ENDM
; TextEdit
_TEGetText OPWORD $A9CB
_TEInit OPWORD $A9CC
_TEDispose OPWORD $A9CD
_TextBox OPWORD $A9CE
_TETextBox OPWORD $A9CE ; New name for TextBox <79>
_TESetText OPWORD $A9CF
_TECalText OPWORD $A9D0
_TESetSelect OPWORD $A9D1
_TENew OPWORD $A9D2
_TEUpdate OPWORD $A9D3
_TEClick OPWORD $A9D4
_TECopy OPWORD $A9D5
_TECut OPWORD $A9D6
_TEDelete OPWORD $A9D7
_TEActivate OPWORD $A9D8
_TEDeactivate OPWORD $A9D9
_TEIdle OPWORD $A9DA
_TEPaste OPWORD $A9DB
_TEKey OPWORD $A9DC
_TEScroll OPWORD $A9DD
_TEInsert OPWORD $A9DE
_TESetJust OPWORD $A9DF
_TESetAlignment OPWORD $A9DF ; New name for TESetJust <79>
_TEGetOffset OPWORD $A83C
_TEDispatch OPWORD $A83D
_TEStyleNew OPWORD $A83E
; Color Quickdraw
_OpenCPort OPWORD $AA00
_InitCPort OPWORD $AA01
_CloseCPort OPWORD $A87D ; CloseCPort is actually $AA02, but should never be used
_NewPixMap OPWORD $AA03
_DisposPixMap OPWORD $AA04
_DisposePixMap OPWORD $AA04
_CopyPixMap OPWORD $AA05
_SetPortPix OPWORD $AA06
_NewPixPat OPWORD $AA07
_DisposPixPat OPWORD $AA08
_DisposePixPat OPWORD $AA08
_CopyPixPat OPWORD $AA09
_PenPixPat OPWORD $AA0A
_BackPixPat OPWORD $AA0B
_GetPixPat OPWORD $AA0C
_MakeRGBPat OPWORD $AA0D
_FillCRect OPWORD $AA0E
_FillCOval OPWORD $AA0F
_FillCRoundRect OPWORD $AA10
_FillCArc OPWORD $AA11
_FillCRgn OPWORD $AA12
_FillCPoly OPWORD $AA13
_RGBForeColor OPWORD $AA14
_RGBBackColor OPWORD $AA15
_SetCPixel OPWORD $AA16
_GetCPixel OPWORD $AA17
_GetCTable OPWORD $AA18
_GetForeColor OPWORD $AA19
_GetBackColor OPWORD $AA1A
_GetCCursor OPWORD $AA1B
_SetCCursor OPWORD $AA1C
_AllocCursor OPWORD $AA1D
_GetCIcon OPWORD $AA1E
_PlotCIcon OPWORD $AA1F
_OpenCPicture OPWORD $AA20
_OpColor OPWORD $AA21
_HiliteColor OPWORD $AA22
_CharExtra OPWORD $AA23
_DisposCTable OPWORD $AA24
_DisposeCTable OPWORD $AA24
_DisposCIcon OPWORD $AA25
_DisposeCIcon OPWORD $AA25
_DisposCCursor OPWORD $AA26
_DisposeCCursor OPWORD $AA26
_SeedCFill OPWORD $AA50
_CalcCMask OPWORD $AA4F
_CopyDeepMask OPWORD $AA51
; Routines for video devices
_GetMaxDevice OPWORD $AA27
_GetCTSeed OPWORD $AA28
_GetDeviceList OPWORD $AA29
_GetMainDevice OPWORD $AA2A
_GetNextDevice OPWORD $AA2B
_TestDeviceAttribute OPWORD $AA2C
_SetDeviceAttribute OPWORD $AA2D
_InitGDevice OPWORD $AA2E
_NewGDevice OPWORD $AA2F
_DisposGDevice OPWORD $AA30
_DisposeGDevice OPWORD $AA30
_SetGDevice OPWORD $AA31
_GetGDevice OPWORD $AA32
_DeviceLoop OPWORD $ABCA
; Color Manager
_Color2Index OPWORD $AA33
_Index2Color OPWORD $AA34
_InvertColor OPWORD $AA35
_RealColor OPWORD $AA36
_GetSubTable OPWORD $AA37
_UpdatePixMap OPWORD $AA38
; Dialog Manager
_NewCDialog OPWORD $AA4B
_MakeITable OPWORD $AA39
_AddSearch OPWORD $AA3A
_AddComp OPWORD $AA3B
_SetClientID OPWORD $AA3C
_ProtectEntry OPWORD $AA3D
_ReserveEntry OPWORD $AA3E
_SetEntries OPWORD $AA3F
_QDError OPWORD $AA40
_SaveEntries OPWORD $AA49
_RestoreEntries OPWORD $AA4A
_DelSearch OPWORD $AA4C
_DelComp OPWORD $AA4D
_SetStdCProcs OPWORD $AA4E
_StdOpcodeProc OPWORD $ABF8
; added to Toolbox for color
_SetWinColor OPWORD $AA41
_GetAuxWin OPWORD $AA42
_SetCtlColor OPWORD $AA43
_GetAuxCtl OPWORD $AA44
_NewCWindow OPWORD $AA45
_GetNewCWindow OPWORD $AA46
_SetDeskCPat OPWORD $AA47
_GetCWMgrPort OPWORD $AA48
_GetCVariant OPWORD $A809
_GetWVariant OPWORD $A80A
; added to Menu Manager for color
_DelMCEntries OPWORD $AA60
_DeleteMCEntries OPWORD $AA60 ;<72>
_GetMCInfo OPWORD $AA61
_SetMCInfo OPWORD $AA62
_DispMCInfo OPWORD $AA63
_DisposeMCInfo OPWORD $AA63 ;<72>
_GetMCEntry OPWORD $AA64
_SetMCEntries OPWORD $AA65
; Menu Manager
_MenuChoice OPWORD $AA66
; Dialog Manager?
_ModalDialogMenuSetup OPWORD $AA67
_DialogDispatch OPWORD $AA68
selectGetStdFilterProc EQU 3
paramWordsGetStdFilterProc EQU 2
selectSetDialogDefaultItem EQU 4
paramWordsSetDialogDefaultItem EQU 3
selectSetDialogCancelItem EQU 5
paramWordsSetDialogCancelItem EQU 3
selectSetDialogTracksCursor EQU 6
paramWordsSetDialogTracksCursor EQU 3
MACRO
_GetStdFilterProc
DoDispatch _DialogDispatch,selectGetStdFilterProc,paramWordsGetStdFilterProc
ENDM
MACRO
_SetDialogDefaultItem
DoDispatch _DialogDispatch,selectSetDialogDefaultItem,paramWordsSetDialogDefaultItem
ENDM
MACRO
_SetDialogCancelItem
DoDispatch _DialogDispatch,selectSetDialogCancelItem,paramWordsSetDialogCancelItem
ENDM
MACRO
_SetDialogTracksCursor
DoDispatch _DialogDispatch,selectSetDialogTracksCursor,paramWordsSetDialogTracksCursor
ENDM
; Font Manager
_SetFractEnable OPWORD $A814
_FontDispatch OPWORD $A854
selectIsOutline EQU 0
selectSetOutlinePreferred EQU 1
selectGetOutlinePreferred EQU 9
selectOutlineMetrics EQU 8
selectSetPreserveGlyph EQU $A
selectGetPreserveGlyph EQU $B
selectFlushFonts EQU $C
MACRO
_IsOutline
DoDispatch _FontDispatch,selectIsOutline
ENDM
MACRO
_SetOutlinePreferred
DoDispatch _FontDispatch,selectSetOutlinePreferred
ENDM
MACRO
_GetOutlinePreferred
DoDispatch _FontDispatch,selectGetOutlinePreferred
ENDM
MACRO
_OutlineMetrics
DoDispatch _FontDispatch,selectOutlineMetrics
ENDM
MACRO
_SetPreserveGlyph
DoDispatch _FontDispatch,selectSetPreserveGlyph
ENDM
MACRO
_GetPreserveGlyph
DoDispatch _FontDispatch,selectGetPreserveGlyph
ENDM
MACRO
_FlushFonts
DoDispatch _FontDispatch,selectFlushFonts
ENDM
; Palette Manager
_InitPalettes OPWORD $AA90
_NewPalette OPWORD $AA91
_GetNewPalette OPWORD $AA92
_DisposePalette OPWORD $AA93
_ActivatePalette OPWORD $AA94
_SetPalette OPWORD $AA95
_GetPalette OPWORD $AA96
_PmForeColor OPWORD $AA97
_PmBackColor OPWORD $AA98
_AnimateEntry OPWORD $AA99
_AnimatePalette OPWORD $AA9A
_GetEntryColor OPWORD $AA9B
_SetEntryColor OPWORD $AA9C
_GetEntryUsage OPWORD $AA9D
_SetEntryUsage OPWORD $AA9E
_CTab2Palette OPWORD $AA9F
_Palette2CTab OPWORD $AAA0
_CopyPalette OPWORD $AAA1
_PaletteDispatch OPWORD $AAA2
; PaletteDispatch selectors
selectEntry2Index EQU 0
selectRestoreDeviceClut EQU 2
selectResizePalette EQU 3
selectZapLinks EQU 4
selectWhatPal EQU 5
selectDeltaRGB EQU 10
selectNewHiliteColor EQU 11
selectPMgrExit EQU 12
selectSaveFore EQU 13
selectSaveBack EQU 14
selectRestoreFore EQU 15
selectRestoreBack EQU 16
selectReleaseList EQU 18
selectSetDepth EQU 19
selectHasDepth EQU 20
selectPMgrVersion EQU 21
selectSetPaletteUpdates EQU 22
selectGetPaletteUpdates EQU 23
selectCheckColors EQU 24
selectGetGray EQU 25
MACRO
_Entry2Index
DoDispatch _PaletteDispatch,selectEntry2Index,0
ENDM
MACRO
_RestoreDeviceClut
DoDispatch _PaletteDispatch,selectRestoreDeviceClut,0
ENDM
MACRO
_ResizePalette
DoDispatch _PaletteDispatch,selectResizePalette,0
ENDM
MACRO
_ZapLinks
DoDispatch _PaletteDispatch,selectZapLinks,0
ENDM
MACRO
_WhatPal
DoDispatch _PaletteDispatch,selectWhatPal,4
ENDM
MACRO
_DeltaRGB
DoDispatch _PaletteDispatch,selectDeltaRGB,8
ENDM
MACRO
_NewHiliteColor
DoDispatch _PaletteDispatch,selectNewHiliteColor,0
ENDM
MACRO
_PMgrExit
DoDispatch _PaletteDispatch,selectPMgrExit,0
ENDM
MACRO
_SaveFore
DoDispatch _PaletteDispatch,selectSaveFore,4
ENDM
MACRO
_SaveBack
DoDispatch _PaletteDispatch,selectSaveBack,4
ENDM
MACRO
_RestoreFore
DoDispatch _PaletteDispatch,selectRestoreFore,4
ENDM
MACRO
_RestoreBack
DoDispatch _PaletteDispatch,selectRestoreBack,4
ENDM
MACRO
_ReleaseList
DoDispatch _PaletteDispatch,selectReleaseList,4
ENDM
MACRO
_SetDepth
DoDispatch _PaletteDispatch,selectSetDepth,10
ENDM
MACRO
_HasDepth
DoDispatch _PaletteDispatch,selectHasDepth,10
ENDM
MACRO
_PMgrVersion
DoDispatch _PaletteDispatch,selectPMgrVersion,0
ENDM
MACRO
_SetPaletteUpdates
DoDispatch _PaletteDispatch,selectSetPaletteUpdates,6
ENDM
MACRO
_CheckColors
DoDispatch _PaletteDispatch,selectCheckColors,12
ENDM
MACRO
_GetGray
DoDispatch _PaletteDispatch,selectGetGray,12
ENDM
; Sound Manager
_SoundDispatch OPWORD $A800
_SndDisposeChannel OPWORD $A801
_SndAddModifier OPWORD $A802
_SndDoCommand OPWORD $A803
_SndDoImmediate OPWORD $A804
_SndPlay OPWORD $A805
_SndControl OPWORD $A806
_SndNewChannel OPWORD $A807
MACRO
_SndSoundManagerVersion
MOVE.L #$000C0008,D0
_SoundDispatch
ENDM
MACRO
_SndStartFilePlay
MOVE.L #$0D000008,D0
_SoundDispatch
ENDM
MACRO
_SndPauseFilePlay
MOVE.L #$02040008,D0
_SoundDispatch
ENDM
MACRO
_SndStopFilePlay
MOVE.L #$03080008,D0
_SoundDispatch
ENDM
MACRO
_SndChannelStatus
MOVE.L #$00100008,D0
_SoundDispatch
ENDM
MACRO
_SndManagerStatus
MOVE.L #$00140008,D0
_SoundDispatch
ENDM
MACRO
_SndGetSysBeepState
MOVE.L #$00180008,D0
_SoundDispatch
ENDM
MACRO
_SndSetSysBeepState
MOVE.L #$001C0008,D0
_SoundDispatch
ENDM
MACRO
_SndPlayDoubleBuffer
MOVE.L #$00200008,D0
_SoundDispatch
ENDM
MACRO
_MACEVersion
MOVE.L #$00000010,D0
_SoundDispatch
ENDM
MACRO
_Comp3to1
MOVE.L #$00040010,D0
_SoundDispatch
ENDM
MACRO
_Exp1to3
MOVE.L #$00080010,D0
_SoundDispatch
ENDM
MACRO
_Comp6to1
MOVE.L #$000C0010,D0
_SoundDispatch
ENDM
MACRO
_Exp1to6
MOVE.L #$00100010,D0
_SoundDispatch
ENDM
MACRO
_SPBVersion
MOVE.L #$00000014,D0
_SoundDispatch
ENDM
MACRO
_SndRecord
MOVE.L #$08040014,D0
_SoundDispatch
ENDM
MACRO
_SndRecordToFile
MOVE.L #$07080014,D0
_SoundDispatch
ENDM
MACRO
_SPBSignInDevice
MOVE.L #$030C0014,D0
_SoundDispatch
ENDM
MACRO
_SPBSignOutDevice
MOVE.L #$01100014,D0
_SoundDispatch
ENDM
MACRO
_SPBGetIndexedDevice
MOVE.L #$05140014,D0
_SoundDispatch
ENDM
MACRO
_SPBOpenDevice
MOVE.L #$05180014,D0
_SoundDispatch
ENDM
MACRO
_SPBCloseDevice
MOVE.L #$021C0014,D0
_SoundDispatch
ENDM
MACRO
_SPBRecord
MOVE.L #$03200014,D0
_SoundDispatch
ENDM
MACRO
_SPBRecordToFile
MOVE.L #$04240014,D0
_SoundDispatch
ENDM
MACRO
_SPBPauseRecording
MOVE.L #$02280014,D0
_SoundDispatch
ENDM
MACRO
_SPBResumeRecording
MOVE.L #$022C0014,D0
_SoundDispatch
ENDM
MACRO
_SPBStopRecording
MOVE.L #$02300014,D0
_SoundDispatch
ENDM
MACRO
_SPBGetRecordingStatus
MOVE.L #$0E340014,D0
_SoundDispatch
ENDM
MACRO
_SPBGetDeviceInfo
MOVE.L #$06380014,D0
_SoundDispatch
ENDM
MACRO
_SPBSetDeviceInfo
MOVE.L #$063C0014,D0
_SoundDispatch
ENDM
MACRO
_SPBMilliSecondsToBytes
MOVE.L #$04400014,D0
_SoundDispatch
ENDM
MACRO
_SPBBytesToMilliSeconds
MOVE.L #$04440014,D0
_SoundDispatch
ENDM
MACRO
_SetupSndHeader
MOVE.L #$0D480014,D0
_SoundDispatch
ENDM
MACRO
_SetupAIFFHeader
MOVE.L #$0B4C0014,D0
_SoundDispatch
ENDM
_SlotManager OPWORD $A06E
_ScriptUtil OPWORD $A8B5
IF NOT (DoROMFastTraps) THEN
_SCSIDispatch OPWORD $A815
ELSE
Macro
_SCSIDispatch
lclc &OLDMACH
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
MACHINE MC68020
JSR ([$E00+$15*4])
MACHINE &OLDMACH
ENDM
ENDIF
_Long2Fix OPWORD $A83F
_Fix2Long OPWORD $A840
_Fix2Frac OPWORD $A841
_Frac2Fix OPWORD $A842
_Fix2X OPWORD $A843
_X2Fix OPWORD $A844
_Frac2X OPWORD $A845
_X2Frac OPWORD $A846
_NMInstall OPWORD $A05E
_NMRemove OPWORD $A05F
; All QDOffscreen Routines go through one trap with a selector
_QDExtensions OPWORD $AB1D
selectNewGWorld EQU $00160000
selectLockPixels EQU $00040001
selectUnlockPixels EQU $00040002
selectUpdateGWorld EQU $00160003
selectDisposeGWorld EQU $00040004
selectGetGWorld EQU $00080005
selectSetGWorld EQU $00080006
selectCTabChanged EQU $00040007
selectPixPatChanged EQU $00040008
selectPortChanged EQU $00040009
selectGDeviceChanged EQU $0004000a
selectAllowPurgePixels EQU $0004000b
selectNoPurgePixels EQU $0004000c
selectGetPixelsState EQU $0004000d
selectSetPixelsState EQU $0008000e
selectGetPixBaseAddr EQU $0004000f
selectNewScreenBuffer EQU $000e0010
selectDisposeScreenBuffer EQU $00040011
selectGetGWorldDevice EQU $00040012
selectQDDone EQU $00040013
selectOffscreenVersion EQU $00000014
selectNewTempScreenBuffer EQU $000e0015
selectPixMap32Bit EQU $00040016
selectGetGWorldPixMap EQU $00040017
MACRO
DoQDExtensionsDispatch &selector
lcla &value
&value: seta &eval(&selector)
move.l #&value,d0
_QDExtensions
ENDM
MACRO
_NewGWorld
DoQDExtensionsDispatch selectNewGWorld
ENDM
MACRO
_LockPixels
DoQDExtensionsDispatch selectLockPixels
ENDM
MACRO
_UnlockPixels
DoQDExtensionsDispatch selectUnlockPixels
ENDM
MACRO
_UpdateGWorld
DoQDExtensionsDispatch selectUpdateGWorld
ENDM
MACRO
_DisposeGWorld
DoQDExtensionsDispatch selectDisposeGWorld
ENDM
MACRO
_GetGWorld
DoQDExtensionsDispatch selectGetGWorld
ENDM
MACRO
_SetGWorld
DoQDExtensionsDispatch selectSetGWorld
ENDM
MACRO
_CTabChanged
DoQDExtensionsDispatch selectCTabChanged
ENDM
MACRO
_PixPatChanged
DoQDExtensionsDispatch selectPixPatChanged
ENDM
MACRO
_PortChanged
DoQDExtensionsDispatch selectPortChanged
ENDM
MACRO
_GDeviceChanged
DoQDExtensionsDispatch selectGDeviceChanged
ENDM
MACRO
_AllowPurgePixels
DoQDExtensionsDispatch selectAllowPurgePixels
ENDM
MACRO
_NoPurgePixels
DoQDExtensionsDispatch selectNoPurgePixels
ENDM
MACRO
_GetPixelsState
DoQDExtensionsDispatch selectGetPixelsState
ENDM
MACRO
_SetPixelsState
DoQDExtensionsDispatch selectSetPixelsState
ENDM
MACRO
_GetPixBaseAddr
DoQDExtensionsDispatch selectGetPixBaseAddr
ENDM
MACRO
_NewScreenBuffer
DoQDExtensionsDispatch selectNewScreenBuffer
ENDM
MACRO
_DisposeScreenBuffer
DoQDExtensionsDispatch selectDisposeScreenBuffer
ENDM
MACRO
_GetGWorldDevice
DoQDExtensionsDispatch selectGetGWorldDevice
ENDM
MACRO
_QDDone
DoQDExtensionsDispatch selectQDDone
ENDM
MACRO
_OffscreenVersion
moveq #selectOffscreenVersion,d0
_QDExtensions
ENDM
MACRO
_NewTempScreenBuffer
DoQDExtensionsDispatch selectNewTempScreenBuffer
ENDM
MACRO
_PixMap32Bit
DoQDExtensionsDispatch selectPixMap32Bit
ENDM
MACRO
_GetGWorldPixMap
DoQDExtensionsDispatch selectGetGWorldPixMap
ENDM
; Calls to symbolic debugger or MacsBug
MACRO
_SysBreak
MOVE.W #-490, D0
_SysError
ENDM
MACRO
_SysBreakStr
MOVE.W #-491, D0
_SysError
ENDM
MACRO
_SysBreakFunc
MOVE.W #-492, D0
_SysError
ENDM
; HwPriv macros
MACRO
_DisableInstructionCache
moveq #0,d0
movea.l d0,a0
_HwPriv
ENDM
MACRO
_EnableInstructionCache
moveq #0,d0
movea.w #1,a0
_HwPriv
ENDM
MACRO
_FlushInstructionCache
moveq #1,d0
_HwPriv
ENDM
MACRO
_DisableDataCache
moveq #2,d0
suba.l a0,a0
_HwPriv
ENDM
MACRO
_EnableDataCache
moveq #2,d0
movea.l d0,a0
_HwPriv
ENDM
MACRO
_FlushDataCache
moveq #3,d0
_HwPriv
ENDM
MACRO
_FlushCacheRange
moveq #9,d0
_HWPriv
ENDM
MACRO
_SlotBlockXferCtl ; user must setup A0
moveq #$C,d0
_HWPriv
ENDM
; UserDelay
_UserDelay OPWORD $A84C
selectScrollDelay EQU 0
paramWordsScrollDelay EQU 5
MACRO
_ScrollDelay
DoDispatch _UserDelay,selectScrollDelay,paramWordsScrollDelay
ENDM
; Picture Utilities
selectGetPictInfo EQU 0
paramWordsGetPictInfo EQU 8
selectGetPixMapInfo EQU 1
paramWordsGetPixMapInfo EQU 8
selectNewPictInfo EQU 2
paramWordsNewPictInfo EQU 6
selectRecordPictInfo EQU 3
paramWordsRecordPictInfo EQU 4
selectRecordPixMapInfo EQU 4
paramWordsRecordPixMapInfo EQU 4
selectRetrievePictInfo EQU 5
paramWordsRetrievePictInfo EQU 5
selectDisposePictInfo EQU 6
paramWordsDisposePictInfo EQU 2
MACRO
_GetPictInfo
DoDispatch _Pack15,selectGetPictInfo,paramWordsGetPictInfo
ENDM
MACRO
_GetPixMapInfo
DoDispatch _Pack15,selectGetPixMapInfo,paramWordsGetPixMapInfo
ENDM
MACRO
_NewPictInfo
DoDispatch _Pack15,selectNewPictInfo,paramWordsNewPictInfo
ENDM
MACRO
_RecordPictInfo
DoDispatch _Pack15,selectRecordPictInfo,paramWordsRecordPictInfo
ENDM
MACRO
_RecordPixMapInfo
DoDispatch _Pack15,selectRecordPixMapInfo,paramWordsRecordPixMapInfo
ENDM
MACRO
_RetrievePictInfo
DoDispatch _Pack15,selectRetrievePictInfo,paramWordsRetrievePictInfo
ENDM
MACRO
_DisposPictInfo
DoDispatch _Pack15,selectDisposePictInfo,paramWordsDisposePictInfo
ENDM
MACRO
_DisposePictInfo
DoDispatch _Pack15,selectDisposePictInfo,paramWordsDisposePictInfo
ENDM
; Dictionary Manager <77> put them into the DictionaryEqu.a file.
; Component Manager
_ComponentDispatch OPWORD $A82A
selectCallComponentFunction EQU 0
selectRegisterComponent EQU 1
selectUnregisterComponent EQU 2
selectCountComponents EQU 3
selectFindNextComponent EQU 4
selectGetComponentInfo EQU 5
selectGetComponentListModSeed EQU 6
selectOpenComponent EQU 7
selectCloseComponent EQU 8
selectDestroyComponent EQU 9
selectGetComponentInstanceError EQU 10
selectSetComponentInstanceError EQU 11
selectGetComponentInstanceStorage EQU 12
selectSetComponentInstanceStorage EQU 13
selectGetComponentInstanceA5 EQU 14
selectSetComponentInstanceA5 EQU 15
selectGetComponentRefcon EQU 16
selectSetComponentRefcon EQU 17
selectRegisterComponentResource EQU 18
selectCountComponentInstances EQU 19
selectRegisterComponentResourceFile EQU 20
selectOpenComponentResFile EQU 21
selectCleanUpApplicationComponents EQU 22
selectInitComponentManager EQU 23
selectCloseComponentResFile EQU 24
selectComponentManagerVersion EQU 25
selectxGetComponentParent EQU -26
selectxSetComponentParent EQU -27
selectCaptureComponent EQU 28
selectUncaptureComponent EQU 29
selectSetDefaultComponent EQU 30
selectLoadComponent EQU 31
selectUnloadComponent EQU 32
selectOpenDefaultComponent EQU 33
selectDelegateComponentCall EQU 36
MACRO
_CallComponent
DoDispatch _ComponentDispatch,selectCallComponentFunction
ENDM
MACRO
_RegisterComponent
DoDispatch _ComponentDispatch,selectRegisterComponent
ENDM
MACRO
_UnregisterComponent
DoDispatch _ComponentDispatch,selectUnregisterComponent
ENDM
MACRO
_CountComponents
DoDispatch _ComponentDispatch,selectCountComponents
ENDM
MACRO
_FindNextComponent
DoDispatch _ComponentDispatch,selectFindNextComponent
ENDM
MACRO
_GetComponentInfo
DoDispatch _ComponentDispatch,selectGetComponentInfo
ENDM
MACRO
_GetComponentListModSeed
DoDispatch _ComponentDispatch,selectGetComponentListModSeed
ENDM
MACRO
_OpenComponent
DoDispatch _ComponentDispatch,selectOpenComponent
ENDM
MACRO
_CloseComponent
DoDispatch _ComponentDispatch,selectCloseComponent
ENDM
MACRO
_DestroyComponent
DoDispatch _ComponentDispatch,selectDestroyComponent
ENDM
MACRO
_GetComponentInstanceError
DoDispatch _ComponentDispatch,selectGetComponentInstanceError
ENDM
MACRO
_SetComponentInstanceError
DoDispatch _ComponentDispatch,selectSetComponentInstanceError
ENDM
MACRO
_GetComponentInstanceStorage
DoDispatch _ComponentDispatch,selectGetComponentInstanceStorage
ENDM
MACRO
_SetComponentInstanceStorage
DoDispatch _ComponentDispatch,selectSetComponentInstanceStorage
ENDM
MACRO
_GetComponentInstanceA5
DoDispatch _ComponentDispatch,selectGetComponentInstanceA5
ENDM
MACRO
_SetComponentInstanceA5
DoDispatch _ComponentDispatch,selectSetComponentInstanceA5
ENDM
MACRO
_GetComponentRefcon
DoDispatch _ComponentDispatch,selectGetComponentRefcon
ENDM
MACRO
_SetComponentRefcon
DoDispatch _ComponentDispatch,selectSetComponentRefcon
ENDM
MACRO
_RegisterComponentResource
DoDispatch _ComponentDispatch,selectRegisterComponentResource
ENDM
MACRO
_CountComponentInstances
DoDispatch _ComponentDispatch,selectCountComponentInstances
ENDM
MACRO
_RegisterComponentResourceFile
DoDispatch _ComponentDispatch,selectRegisterComponentResourceFile
ENDM
MACRO
_OpenComponentResFile
DoDispatch _ComponentDispatch,selectOpenComponentResFile
ENDM
MACRO
_CleanUpApplicationComponents
DoDispatch _ComponentDispatch,selectCleanUpApplicationComponents
ENDM
MACRO
_InitComponentManager
DoDispatch _ComponentDispatch,selectInitComponentManager
ENDM
MACRO
_CloseComponentResFile
DoDispatch _ComponentDispatch,selectCloseComponentResFile
ENDM
MACRO
_ComponentManagerVersion
DoDispatch _ComponentDispatch,selectComponentManagerVersion
ENDM
MACRO
_CaptureComponent
DoDispatch _ComponentDispatch,selectCaptureComponent
ENDM
MACRO
_UncaptureComponent
DoDispatch _ComponentDispatch,selectUncaptureComponent
ENDM
MACRO
_SetDefaultComponent
DoDispatch _ComponentDispatch,selectSetDefaultComponent
ENDM
MACRO
_LoadComponent
DoDispatch _ComponentDispatch,selectLoadComponent
ENDM
MACRO
_UnloadComponent
DoDispatch _ComponentDispatch,selectUnloadComponent
ENDM
MACRO
_OpenDefaultComponent
DoDispatch _ComponentDispatch,selectOpenDefaultComponent
ENDM
MACRO
_DelegateComponentCall
DoDispatch _ComponentDispatch,selectDelegateComponentCall
ENDM
_InitDogCow OPWORD $A89F ; <71>
_EnableDogCow OPWORD $A89F ; <71>
_DisableDogCow OPWORD $A89F ; <71>
_Moof OPWORD $A89F ; <71>
_HFSPinaforeDispatch OPWORD $AA52 ; <71>
ENDIF ; already included...
Reference in New Issue View Git Blame Copy Permalink