mirror of
https://github.com/elliotnunn/sys7.1-doc-wip.git
synced 2024-12-12 20:29:12 +00:00
3350 lines
80 KiB
Plaintext
3350 lines
80 KiB
Plaintext
;
|
||
; Hacks to match MacOS (most recent first):
|
||
;
|
||
; <Sys7.1> 8/3/92 Restored SwapMMUMode/StripAddress/Translate24To32 to OPWORDs, as they
|
||
; were before <SM9>.
|
||
; 9/2/94 SuperMario ROM source dump (header preserved below)
|
||
;
|
||
|
||
; 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,¶mWords
|
||
lcla &selectorNum
|
||
lcla ¶mCount
|
||
|
||
&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 (¶mWords = '') then
|
||
¶mCount: seta 0 ; Procedure call if ¶mWords was not specified
|
||
else
|
||
¶mCount: seta &eval(¶mWords)
|
||
endif
|
||
if (¶mCount < 0) OR (¶mCount > 255) then
|
||
aerror &CONCAT('Parameter words for ', &trapRef, ' “',¶mWords, '” is outside the range 0-255')
|
||
exitm
|
||
endif
|
||
|
||
if ¶mCount = 0 then
|
||
moveq #&selectorNum, D0 ; move the selector into D0 quickly
|
||
else
|
||
¶mCount: seta (¶mCount << 8) + (&selectorNum AND $ff)
|
||
move.w #¶mCount, 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 ¶m1,¶m2,¶m3
|
||
lclc &OLDMACH
|
||
lcla &TRAPADD
|
||
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
|
||
MACHINE MC68020
|
||
&TRAPADD SETA 0
|
||
IF &UPCASE(¶m1)='SYS' OR &UPCASE(¶m2)='SYS' OR &UPCASE(¶m3)='SYS' THEN
|
||
&TRAPADD SETA &TRAPADD+$400
|
||
ENDIF
|
||
IF &UPCASE(¶m1)='CLEAR' OR &UPCASE(¶m2)='CLEAR' OR &UPCASE(¶m3)='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 ¶m1,¶m2,¶m3
|
||
lclc &OLDMACH
|
||
lcla &TRAPADD
|
||
&OLDMACH SETC &Setting('MACHINE') ; save the current Machine setting
|
||
MACHINE MC68020
|
||
&TRAPADD SETA 0
|
||
IF &UPCASE(¶m1)='SYS' OR &UPCASE(¶m2)='SYS' OR &UPCASE(¶m3)='SYS' THEN
|
||
&TRAPADD SETA &TRAPADD+$400
|
||
ENDIF
|
||
IF &UPCASE(¶m1)='CLEAR' OR &UPCASE(¶m2)='CLEAR' OR &UPCASE(¶m3)='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
|
||
_SwapMMUMode OPWORD $A05D ; ex<SM9> <Sys7.1>
|
||
_StripAddress OPWORD $A055 ; ex<SM9> <Sys7.1>
|
||
_Translate24To32 OPWORD $A091 ; ex<SM9> <Sys7.1>
|
||
_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...
|