617 lines
30 KiB
Plaintext
617 lines
30 KiB
Plaintext
;
|
||
; Hacks to match MacOS (most recent first):
|
||
;
|
||
; <Sys7.1> 8/3/92 Recreated gestaltIconUtilities equate (no 'Attr') for compatibility
|
||
; 9/2/94 SuperMario ROM source dump (header preserved below)
|
||
;
|
||
|
||
;__________________________________________________________________________________________________
|
||
;
|
||
; File: GestaltEqu.a
|
||
;
|
||
; Contains: Equate file for Gestalt
|
||
;
|
||
; Written by: Carl C. Hewitt 12/15/88
|
||
;
|
||
; Copyright © 1988-1993 by Apple Computer, Inc. All rights reserved.
|
||
;
|
||
; Change History (most recent first):
|
||
;
|
||
; <SM26> 12/2/93 JDR updated gestaltFinderAttr, added gestaltQuickTimeFeatures
|
||
; <SM25> 11/8/93 JRH Added gestaltPowerBookDuo250 and gestaltPowerBookDuo270C.
|
||
; <SM24> 10/28/93 SAM Roll in <MC4> from mc900ftjesus.
|
||
; <MC4> 10/28/93 SAM Changed gestaltNativeCPUtype equates (making each cpu type take
|
||
; a range of 256 per architecture).
|
||
; <SM23> 10/14/93 pdw Added 'scsi' selector and bits.
|
||
; <SM22> 09-24-93 jmp Rolled in various equates from the Excelsior sources.
|
||
; <SM21> 8/12/93 BG Updated the MachineType list to be somewhere closer to current.
|
||
; <SM20> 8/4/93 JDR synch with Sound Mgr project.
|
||
; <19> 8/4/93 IH #1101633,1098397,1101795,1101636,1102280 <KON>: Fix 1102280. Add
|
||
; CloseView and Display Manager gestalt selectors.
|
||
; <SM18> 6/23/93 CSS Update from Reality:
|
||
; <67> 6/9/93 DRF #1087472: Add gestaltFinderSupports4GBVolumes and
|
||
; gestaltFinderHandlesCFMFailures to gestaltFinderAttr.
|
||
; <66> 6/1/93 DTY Standardize Icon Utilities selector name.
|
||
; <65> 5/11/93 JMF Added equates for gestaltKeyboardType for the Apple
|
||
; Adjustable Keyboard (ISO & US) & Keypad
|
||
; <64> 4/27/93 KIP Add gestalt16BitSoundIO, gestaltStereoInput and
|
||
; gestaltLineLevelInput selectors.
|
||
; <63> 3/29/93 ash Added gestalt attribute/selectors for Macintosh PC Exchange as
|
||
; well as additional selector for Translation Manager.
|
||
; <62> 3/29/93 ngk Add GestaltValue macros
|
||
; <61> 3/19/93 mgl Add gestaltFinderAttr for Finder attributes.
|
||
; <60> 3/5/93 JDR Added gestalt16BitAudioSupport.
|
||
; <59> 2/26/93 hjcr Add the gestaltBgndMouseDownSupport bit
|
||
; <58> 1/18/93 ash Add selectors for Macintosh Easy Open and Translation Manager
|
||
; <SM17> 6/14/93 kc Roll in Ludwig.
|
||
; <LW3> 4/29/93 fau Bug #1081636: Update from Reality: changed some of the
|
||
; gestaltSoundattr bit assignments and added some others.
|
||
; <SM16> 3/2/93 CSS Update from Horror. Comments follow:
|
||
; <H4> 12/15/92 RLE add more released machines
|
||
; <H3> 6/16/92 SWC Added gestaltAppleEventsAttr.
|
||
; <H2> 11/12/91 jmp Just brought this file slightly more up-to-date than it was;
|
||
; <SM15> 2/11/93 SAM Added EMMU emulated MMU type. (Hooray for change SM14 !!!)
|
||
; <SM14> 02/10/93 HY Remove change <SM13>.
|
||
; <SM13> 01/11/93 HY Added bit gestaltNoAtlkSupport in the gestaltMiscAttr selector.
|
||
; <SM12> 12/13/92 SAM Added gestaltNativeCPUtype and gestaltSysArchitecture. Cleaned
|
||
; up this file (what a mess!)
|
||
; <SM11> 10/27/92 fau Added a gestaltHasEnhancedLTtlk bit to gestaltHardwareAttr.
|
||
; <SM10> 7/29/92 CSS Update from Reality:
|
||
; <57> 7/28/92 JDR <DCL> Added Sound Mgr 3.0 flags.
|
||
; <SM9> 7/28/92 WS add realtime manager attribute for gestalt call
|
||
; <SM8) 7/20/92 CSS Remove information about soundhardware from this file
|
||
; as JDR has put the same information into GestaltEquPriv.a.
|
||
; <SM7> 7/15/92 RB Added the gestalt result for Classic hardware.
|
||
; <SM6> 7/14/92 RB Added the selector and types associated with sound hardware.
|
||
; <SM5> 6/10/92 CSS Roll-in Reality changes:
|
||
; <56> 6/5/92 DC Add the selector for checking for the presence of icon
|
||
; utilities.
|
||
; <55> 6/2/92 JSM #1031451 <csd>: Add gestaltPowerBook145.
|
||
; <54> 5/27/92 KIP #1030293,<JDR>: Add gestaltPlayAndRecord bit for sound
|
||
; attributes.
|
||
; <53> 5/27/92 DCL Moved gestaltQuadra950 into the public consciousness.
|
||
; <SM4> 5/20/92 KW Put in Pandora additions P2
|
||
; <SM3> 5/19/92 CS fix header
|
||
; <SM2> 5/19/92 CS Integrated changes from Reality:
|
||
; <52> 4/9/92 JSM #1026795,<DTY>: Add gestaltMacLCII.
|
||
; <51> 1/7/92 KST Added gestaltTSMgrVersion.
|
||
; <50> 12/3/91 SAM Moved 'hwdr' bits gestaltHasSCSI961 and gestaltHasSCSI962 here
|
||
; from the private Gestalt equates.
|
||
; <49> 12/2/91 SAM Added the fall 91 CPUs to the official list of GetaltMachine
|
||
; IDs.
|
||
; <48> 11/21/91 YK Removed selectors for input utilities.
|
||
; <47> 11/1/91 KSM Added gestaltHelpMgrExtensions.
|
||
; <46> 10/30/91 YK Added gestaltComponentMgr.
|
||
; <45> 10/23/91 YK Added gestaltInputUtilsAttr and gestaltInputUtilsPresent
|
||
; <44> 10/17/91 JH Added gestaltDictionaryMgrAttr and gestaltDictionaryMgrPresent.
|
||
; <43> 8/27/91 CH Updated copyright dates
|
||
; <42> 8/22/91 gbm (really csd) Added gestaltAliasMgrSupportsRemoteAppletalk
|
||
; <41> 6/26/91 BH gestaltFXfrMgrMultiFile
|
||
; <40> 6/26/91 BH added selectors for CTB11 stuff (errorstring for CM, TM, FT,
|
||
; CRMToolRsrcCalls)
|
||
; <39> 6/26/91 BH added gestaltCRMPersistentFix constant
|
||
; <38> 2/7/91 KON CEL: BRC# Gang of 5: Remove equate for gestaltOriginalQD1.
|
||
; <37> 2/4/91 gbm JDR, #gbm-0003: Add the gestaltQuickdrawFeatures selector
|
||
; <36> 1/30/91 gbm sab, #38: Change the ‘already including this file’ variable to
|
||
; all uppercase (for security reasons)
|
||
; <35> 1/15/91 gbm (bbm) Add new hardware attribute, gestaltHasSoftPowerOff
|
||
; <34> 12/14/90 JDR (KIP) adding Gestalt selector gestaltHasSoundInputDevice and
|
||
; renaming gestaltSoundInputPresent.
|
||
; <33> 12/5/90 gbm <dba> Add two file system selectors: one for FSSpec calls
|
||
; existing, and another for file system manager existing
|
||
; <32> 11/16/90 KON Add equates for QuickDraw versions 1.1, 1.2, 1.3, and
|
||
; OriginalQD1 [smc]
|
||
; <31> 11/16/90 KON Add equates for QuickDraw versions 1.1, 1.2, 1.3, and
|
||
; OriginalQD1 [smc]
|
||
; <30> 11/15/90 SMB Added another TextEdit version, gestaltTE5, for the new
|
||
; TextWidthHook.
|
||
; <29> 9/12/90 SAM Added final machine names for IIsi LC and Classic
|
||
; <28> 9/10/90 gbm add file system attribute selector
|
||
; <27> 8/30/90 PP gestaltFolderMgrAttr is gestaltFindFolderAttr.
|
||
; gestaltFolderMgrPresent is gestaltFindFolderPresent.
|
||
; <26> 8/13/90 JWK NEEDED FOR SIXPACK: Added NuBus and Serial Gestalt selectors.
|
||
; <25> 8/13/90 gbm add selectors for trap table bases
|
||
; <24> 8/6/90 kaz Removed CommToolbox refs to xxErrorString and cmMultiAsyncIO;
|
||
; renumbered cmSearchFix.
|
||
; <23> 7/25/90 RLC Add gestaltEasyAccessAttr and its result codes.
|
||
; <22> 6/25/90 kaz Removed 'ctbm', 'ctbu'. Added 'ditl'.
|
||
; <21> 6/23/90 kaz Fixed typo for 'term', and 'fxfr'.
|
||
; <20> 6/18/90 NC Add gestault selector for sound I/O manager
|
||
; <19> 5/20/90 ngk Add gestault selector for standard file
|
||
; <18> 5/1/90 CCH Added gestaltSquareMenuBar response bit to gestaltMiscAttr.
|
||
; <15> 4/11/90 BBH added gestaltConnMgrCMSearchFix
|
||
; <14> 4/11/90 BBH fix typo in "gestaltConnMgrErrorString"
|
||
; <13> 4/11/90 BBH added new gestalt selectors for CommToolbox managers and
|
||
; utilities
|
||
; <12> 4/11/90 dba add machineicon selector
|
||
; <11> 4/9/90 S Included PPC Gestalt Selectors.
|
||
; <10> 3/26/90 CCH Added gestaltMacIIfx equate.
|
||
; <9> 3/17/90 BBH added CommToolbox version selector (more to come later for
|
||
; specific functions)
|
||
; <8> 3/5/90 CCH Fixed tabs.
|
||
; <5> 1/22/90 CCH Added gestaltPPCToolbox and gestaltNotificationMgrAttr
|
||
; selectors. Also moved private information to
|
||
; GestaltPrivateEqu.a.
|
||
; <4> 1/21/90 ngk Changed gestaltEditionMgr to gestaltEditionMgrAttr
|
||
; <3> 1/8/90 CCH Added gestaltMisc selector.
|
||
; <2> 1/5/90 CCH NEEDED FOR 6.0.5: Added RPU and Orwell bits to hardware
|
||
; selector, added slot selectors back in temporarily, and added
|
||
; equate for 68040 FPU.
|
||
; <3.5> 12/15/89 CCH Updated Gestalt Equates, added some new 7.0 selectors.
|
||
; <3.4> 11/1/89 CCH Changed gestaltVMInstalled to gestaltVMExists.
|
||
; <3.3> 9/29/89 CCH NEEDED FOR 6.0.5: Added gestalt32BitCapable attribute to
|
||
; gestaltAddressingModeAttr selector.
|
||
; <3.2> 8/9/89 CCH NEEDED FOR 6.0.4: Changed return values for gestaltQuickdrawType
|
||
; to be version based, and changed the selector name to
|
||
; gestaltQuickdrawVersion.
|
||
; <3.1> 8/8/89 SMB NEEDED FOR 6.0.4: added definitions for gestaltTextEditVersion.
|
||
; <3.0> 8/5/89 PKE NEEDED FOR 6.0.4: - Added gestaltScriptMgrVersion,
|
||
; gestaltScriptCount selectors (for Script Manager) - Added
|
||
; gestaltTextEditVersion selector (for TextEdit)
|
||
; <2.9> 7/16/89 CCH NEEDED FOR AURORA AND 6.0.4: - Added gestaltFirstSlotNumber
|
||
; selector. - Added additional information to gestaltHardwareAttr
|
||
; selector. - Added gestaltAMU to gestaltMMUType selector. - Added
|
||
; gestaltParityAttr selector.
|
||
; <2.8> 7/10/89 CCH NEEDED FOR AURORA: - Removed gestaltFirstSlotNumber selector.
|
||
; <2.7> 6/30/89 CCH Added gestaltLowMemorySize selector.
|
||
; <2.6> 6/26/89 CCH Added gestaltFirstSlotNumber selector.
|
||
; <2.5> 6/9/89 CCH Changes: - Changed a/ux selector to be version-based. - Added
|
||
; gestaltAddressingModeAttr, gestaltAUXVersion, gestaltSlotAttr,
|
||
; gestaltSoundAttr, gestaltTimeMgrVersion, GestaltRBVAddr,
|
||
; gestaltHardwareAttr, gestaltNuBusSlotCount selectors. - Made
|
||
; result equates for attribute selectors bit numbers instead of
|
||
; masks.
|
||
; <2.4> 5/25/89 CCH Revised equates to be more consistent.
|
||
; <2.3> 5/23/89 CCH Added several new Gestalt function definitions.
|
||
; <2.2> 5/18/89 CCH Changed equate prefixes and error codes.
|
||
; <2.1> 4/20/89 CCH Added new equate for virtual RAM size.
|
||
; <2.0> 4/16/89 CCH Changed equate prefix from "G" to "z".
|
||
; <1.9> 4/3/89 CCH Added equates for international keyboards, changed names of some
|
||
; other equates.
|
||
; <1.8> 3/30/89 CCH Took out GROMSize and GInitErr equates.
|
||
; <1.7> 3/16/89 CCH Changed G24BitQD to G8BitQD.
|
||
; <1.6> 3/16/89 CCH Moved global data structure definition to Gestalt.a.
|
||
; <1.5> 3/6/89 CCH Changed unknown values to $7FFFFFFF
|
||
; <1.4> 3/6/89 CCH Changed MAXINT from $7FFF to $7FFFFFFF
|
||
; <1.3> 3/2/89 CCH Changed zNoMMU equate to zero, and similarly bumped down related
|
||
; equates.
|
||
; <1.2> 2/23/89 CCH Added Updated Gestalt Function Code and result code equates.
|
||
; <1.1> 2/22/89 CCH Started using global ptr in ExpandMem.
|
||
; <1.0> 2/21/89 CCH Adding to EASE for the first time.
|
||
************************************************************************
|
||
|
||
IF &TYPE('__INCLUDINGGESTALTEQU__') = 'UNDEFINED' THEN
|
||
__INCLUDINGGESTALTEQU__ SET 1
|
||
|
||
|
||
**************************
|
||
* Gestalt error codes
|
||
**************************
|
||
gestaltUnknownErr EQU -5550 ; gestalt doesn't know the answer
|
||
gestaltUndefSelectorErr EQU -5551 ; undefined code was passed to Gestalt
|
||
gestaltDupSelectorErr EQU -5552 ; tried to add an entry that already existed
|
||
gestaltLocationErr EQU -5553 ; gestalt function ptr wasn't in sysheap
|
||
|
||
**************************
|
||
* Environment Selectors
|
||
**************************
|
||
gestaltVersion EQU 'vers' ; gestalt version
|
||
|
||
gestaltAddressingModeAttr EQU 'addr' ; addressing mode attributes
|
||
gestalt32BitAddressing EQU 0 ; using 32-bit addressing mode
|
||
gestalt32BitSysZone EQU 1 ; 32-bit compatible system zone
|
||
gestalt32BitCapable EQU 2 ; machine is 32-bit mode capable
|
||
|
||
gestaltAliasMgrAttr EQU 'alis' ; Alias Mgr Attributes
|
||
gestaltAliasMgrPresent EQU 0 ; True if the Alias Mgr is present
|
||
gestaltAliasMgrSupportsRemoteAppletalk EQU 1 ; True if the Alias Mgr knows about Remote Appletalk
|
||
gestaltAppleTalkVersion EQU 'atlk' ; AppleTalk version
|
||
|
||
gestaltAUXVersion EQU 'a/ux' ; a/ux version, if present
|
||
gestaltAUXNotPresent EQU 0
|
||
|
||
gestaltCloseViewAttr EQU 'BSDa' ; CloseView attributes
|
||
|
||
gestaltCloseViewEnabled EQU 0 ; Closeview enabled (dynamic bit - returns current state)
|
||
gestaltCloseViewDisplayMgrFriendly EQU 1 ; Closeview compatible with Display Manager (FUTURE)
|
||
|
||
gestaltComponentMgr EQU 'cpnt' ; Component Mgr version
|
||
|
||
gestaltTSMgrVersion EQU 'tsmv' ; Text Services Mgr version, if present
|
||
|
||
gestaltConnMgrAttr EQU 'conn' ; connection mgr attributes
|
||
gestaltConnMgrPresent EQU 0
|
||
gestaltConnMgrCMSearchFix EQU 1 ; do we have fix to CMAddSearch?
|
||
gestaltConnMgrErrorString EQU 2
|
||
gestaltConnMgrMultiAsyncIO EQU 3
|
||
|
||
gestaltNativeCPUtype EQU 'cput' ; The native CPU type <SM12><MC4>
|
||
; 68000 Architecture
|
||
gestaltCPU68000 EQU $000
|
||
gestaltCPU68010 EQU $001
|
||
gestaltCPU68020 EQU $002
|
||
gestaltCPU68030 EQU $003
|
||
gestaltCPU68040 EQU $004
|
||
; PowerPC Architecture
|
||
gestaltCPU601 EQU $101 ; IBM 601
|
||
gestaltCPU603 EQU $103
|
||
gestaltCPU604 EQU $104
|
||
|
||
|
||
gestaltCRMAttr EQU 'crm ' ; comm resource mgr attributes
|
||
gestaltCRMPresent EQU 0
|
||
gestaltCRMPersistentFix EQU 1 ; fix for persistent connections present
|
||
gestaltCRMToolRsrcCalls EQU 2
|
||
|
||
gestaltCTBVersion EQU 'ctbv' ; CommToolbox version if present
|
||
|
||
gestaltDBAccessMgrAttr EQU 'dbac' ; Database Access Mgr attributes
|
||
gestaltDBAccessMgrPresent EQU 0 ; True if the Database Access Mgr present
|
||
|
||
gestaltDictionaryMgrAttr EQU 'dict' ; Dictionary Manager attributes
|
||
gestaltDictionaryMgrPresent EQU 0 ; Dictionary Manager attributes
|
||
|
||
gestaltDITLExtAttr EQU 'ditl' ; AppenDITL, etc. calls from CTB
|
||
gestaltDITLExtPresent EQU 0 ; True if calls are present
|
||
|
||
gestaltDisplayMgrAttr EQU 'dply' ; Display Manager attributes
|
||
gestaltDisplayMgrPresent EQU 0 ; True if Display Mgr is present
|
||
|
||
gestaltDisplayMgrVers EQU 'dplv' ; Display Manager version
|
||
|
||
gestaltEasyAccessAttr EQU 'easy' ; Easy Access attributes
|
||
gestaltEasyAccessOff EQU 0 ; if Easy Access present, but off (no icon)
|
||
gestaltEasyAccessOn EQU 1 ; if Easy Access "On"
|
||
gestaltEasyAccessSticky EQU 2 ; if Easy Access "Sticky"
|
||
gestaltEasyAccessLocked EQU 3 ; if Easy Access "Locked"
|
||
|
||
gestaltEditionMgrAttr EQU 'edtn' ; Edition Mgr attributes
|
||
gestaltEditionMgrPresent EQU 0 ; True if Edition Mgr present
|
||
gestaltEditionMgrTranslationAware EQU 1 ; True if edition manager is translation manager aware
|
||
gestaltTranslationMgrHintOrder EQU 1 ; True if hint order reversal in effect
|
||
|
||
gestaltAppleEventsAttr EQU 'evnt' ; Apple Events attributes
|
||
gestaltAppleEventsPresent EQU 0 ; True if Apple Events present
|
||
|
||
gestaltFinderAttr EQU 'fndr' ; Finder attributes
|
||
gestaltFinderDropEvent EQU 0 ; Finder recognizes drop event
|
||
gestaltFinderMagicPlacement EQU 1 ; Finder supports magic icon placement
|
||
gestaltFinderCallsAEProcess EQU 2 ; Finder calls AEProcessAppleEvent
|
||
gestaltOSLCompliantFinder EQU 3 ; Finder is scriptable and recordable
|
||
gestaltFinderSupports4GBVolumes EQU 4 ; Finder correctly handles 4GB volumes
|
||
gestaltFinderHandlesCFMFailures EQU 5 ; Finder handles Code Fragment Manager errors
|
||
gestaltFinderHasClippings EQU 6 ; Finder supports Drag Manager clipping files
|
||
|
||
gestaltFindFolderAttr EQU 'fold' ; FindFolder attributes
|
||
gestaltFindFolderPresent EQU 0 ; True if FindFolder present
|
||
|
||
gestaltFontMgrAttr EQU 'font' ; Font Mgr attributes
|
||
gestaltOutlineFonts EQU 0 ; True if OutLine Fonts are supported
|
||
|
||
gestaltFPUType EQU 'fpu ' ; FPU type
|
||
gestaltNoFPU EQU 0 ; no FPU
|
||
gestalt68881 EQU 1 ; 68881 FPU
|
||
gestalt68882 EQU 2 ; 68882 FPU
|
||
gestalt68040FPU EQU 3 ; 68040 built-in FPU
|
||
|
||
gestaltFSAttr EQU 'fs ' ; file system attributes
|
||
gestaltFullExtFSDispatching EQU 0 ; has really cool new HFSDispatch dispatcher
|
||
gestaltHasFSSpecCalls EQU 1 ; has FSSpec calls
|
||
gestaltHasFileSystemManager EQU 2 ; has a file system manager
|
||
|
||
gestaltFXfrMgrAttr EQU 'fxfr' ; file transfer manager attributes
|
||
gestaltFXfrMgrPresent EQU 0
|
||
gestaltFXfrMgrMultiFile EQU 1 ; supports FTSend and FTReceive
|
||
gestaltFXfrMgrErrorString EQU 2
|
||
|
||
gestaltHardwareAttr EQU 'hdwr' ; hardware attributes
|
||
gestaltHasVIA1 EQU 0 ; VIA1 exists
|
||
gestaltHasVIA2 EQU 1 ; VIA2 exists
|
||
gestaltHasASC EQU 3 ; Apple Sound chip exists
|
||
gestaltHasSCC EQU 4 ; SCC exists
|
||
gestaltHasSCSI EQU 7 ; SCSI exists
|
||
gestaltHasSoftPowerOff EQU 19 ; Capable of software power off
|
||
gestaltHasSCSI961 EQU 21 ; 53C96 SCSI controller on internal bus <50>
|
||
gestaltHasSCSI962 EQU 22 ; 53C96 SCSI controller on external bus <50>
|
||
gestaltHasUniversalROM EQU 24 ; Do we gots a Universal ROM? <49>
|
||
gestaltHasEnhancedLtalk EQU 30 ; Do we have Enhanced LocalTalk
|
||
|
||
gestaltHelpMgrAttr EQU 'help' ; Help Mgr Attributes
|
||
gestaltHelpMgrPresent EQU 0 ; true if help mgr is present
|
||
gestaltHelpMgrExtensions EQU 1 ; true if help mgr extensions are installed
|
||
|
||
gestaltKeyboardType EQU 'kbd ' ; keyboard type
|
||
gestaltMacKbd EQU 1
|
||
gestaltMacAndPad EQU 2
|
||
gestaltMacPlusKbd EQU 3
|
||
gestaltExtADBKbd EQU 4
|
||
gestaltStdADBKbd EQU 5
|
||
gestaltPrtblADBKbd EQU 6
|
||
gestaltPrtblISOKbd EQU 7
|
||
gestaltStdISOADBKbd EQU 8
|
||
gestaltExtISOADBKbd EQU 9
|
||
gestaltADBKbdII EQU 10
|
||
gestaltADBISOKbdII EQU 11
|
||
gestaltPwrBookADBKbd EQU 12 ; <49>
|
||
gestaltPwrBookISOADBKbd EQU 13 ; <49>
|
||
gestaltAppleAdjustKeypad EQU 14 ; <65>
|
||
gestaltAppleAdjustADBKbd EQU 15 ; <65>
|
||
gestaltAppleAdjustISOKbd EQU 16 ; <65>
|
||
|
||
|
||
gestaltLowMemorySize EQU 'lmem' ; size of low-memory area
|
||
|
||
gestaltLogicalRAMSize EQU 'lram' ; logical RAM size
|
||
|
||
gestaltMiscAttr EQU 'misc' ; miscellaneous information
|
||
gestaltScrollingThrottle EQU 0 ; true if scrolling throttle on
|
||
gestaltSquareMenuBar EQU 2 ; true if menu bar is square
|
||
|
||
gestaltMMUType EQU 'mmu ' ; MMU type
|
||
gestaltNoMMU EQU 0 ; no MMU
|
||
gestaltAMU EQU 1 ; address management unit
|
||
gestalt68851 EQU 2 ; 68851 PMMU
|
||
gestalt68030MMU EQU 3 ; 68030 built-in MMU
|
||
gestalt68040MMU EQU 4 ; 68040 built-in MMU
|
||
gestaltEMMU1 EQU 5 ; Emulated MMU type 1 (Power PC systems)
|
||
|
||
gestaltNotificationMgrAttr EQU 'nmgr' ; notification manager attributes
|
||
gestaltNotificationPresent EQU 0 ; notification manager exists
|
||
|
||
gestaltSerialAttr EQU 'ser ' ; serial attributes <26>
|
||
gestaltHasGPIaToDCDa EQU 0 ; GPIa connected to DCDa <26>
|
||
gestaltHasGPIaToRTxCa EQU 1 ; GPIa connected to RTxCa clock input <26>
|
||
gestaltHasGPIbToDCDb EQU 2 ; GPIb connected to DCDb <26>
|
||
|
||
gestaltOSAttr EQU 'os ' ; O/S attributes
|
||
gestaltSysZoneGrowable EQU 0 ; system heap is growable
|
||
gestaltLaunchCanReturn EQU 1 ; can return from launch
|
||
gestaltLaunchFullFileSpec EQU 2 ; can launch from full file spec
|
||
gestaltLaunchControl EQU 3 ; launch control support available
|
||
gestaltTempMemSupport EQU 4 ; temp memory support
|
||
gestaltRealTempMemory EQU 5 ; temp memory handles are real
|
||
gestaltTempMemTracked EQU 6 ; temporary memory handles are tracked
|
||
gestaltIPCSupport EQU 7 ; IPC support is present
|
||
gestaltSysDebuggerSupport EQU 8 ; system debugger support is present
|
||
; gestaltSkiaGlobalsSwitched is #9. I don't know why it is not here
|
||
gestaltBgndMouseDownSupport EQU 10 ; Background mouse down support is present
|
||
|
||
|
||
gestaltOSTable EQU 'ostt' ; OS trap table base
|
||
gestaltToolboxTable EQU 'tbtt' ; Toolbox trap table base
|
||
gestaltExtToolboxTable EQU 'xttt' ; Extended Toolbox trap table base
|
||
|
||
gestaltPCXAttr EQU 'pcxg' ; PC Exchange attributes
|
||
gestaltPCXHas8and16BitFAT EQU 0 ; PC Exchange supports both 8 and 16 bit FATs
|
||
gestaltPCXHasProDOS EQU 1 ; PC Exchange supports ProDOS
|
||
|
||
gestaltLogicalPageSize EQU 'pgsz' ; logical page size
|
||
|
||
gestaltPowerMgrAttr EQU 'powr' ; power manager attributes
|
||
gestaltPMgrExists EQU 0
|
||
gestaltPMgrCPUIdle EQU 1
|
||
gestaltPMgrSCC EQU 2
|
||
gestaltPMgrSound EQU 3
|
||
gestaltPMgrDispatchExists EQU 4
|
||
|
||
gestaltPPCToolboxAttr EQU 'ppc ' ; PPC toolbox attributes
|
||
;
|
||
; PPC will return the combination of following bit fields.
|
||
; e.g. gestaltPPCSupportsRealTime +gestaltPPCSupportsIncomming + gestaltPPCSupportsOutGoing
|
||
; indicates PPC is cuurently is only supports real time delivery
|
||
; and both icoming and outgoing network sessions are allowed.
|
||
; By default local real time delivery is supported as long as PPCInit has been called.
|
||
;
|
||
gestaltPPCToolboxPresent EQU $0000 ; PPC Toolbox is present Requires PPCInit to be called
|
||
gestaltPPCSupportsRealTime EQU $1000 ; PPC Supports real-time deliveryy
|
||
gestaltPPCSupportsStoreAndForward EQU $2000 ; PPC Store and Forward delivery
|
||
gestaltPPCSupportsDontCare EQU $4000 ; PPC Supports Specification of Don't care
|
||
gestaltPPCSupportsIncomming EQU $0001 ; PPC will deny incomming network requests
|
||
gestaltPPCSupportsOutGoing EQU $0002 ; PPC will deny outgoing network requests
|
||
|
||
gestaltProcessorType EQU 'proc' ; processor type
|
||
gestalt68000 EQU 1
|
||
gestalt68010 EQU 2
|
||
gestalt68020 EQU 3
|
||
gestalt68030 EQU 4
|
||
gestalt68040 EQU 5
|
||
|
||
gestaltParityAttr EQU 'prty' ; parity attributes
|
||
gestaltHasParityCapability EQU 0 ; has ability to check parity
|
||
gestaltParityEnabled EQU 1 ; parity checking enabled
|
||
|
||
gestaltQuickdrawVersion EQU 'qd ' ; quickdraw version
|
||
gestaltOriginalQD EQU $000 ; original 1-bit QD <3.2>
|
||
gestalt8BitQD EQU $100 ; 8-bit color QD <3.2>
|
||
gestalt32BitQD EQU $200 ; 32-bit color QD <3.2>
|
||
gestalt32BitQD11 EQU $210 ; 32-bit color QDv1.1 <31>
|
||
gestalt32BitQD12 EQU $220 ; 32-bit color QDv1.2 <31>
|
||
gestalt32BitQD13 EQU $230 ; 32-bit color QDv1.3 <31>
|
||
|
||
gestaltQuickdrawFeatures EQU 'qdrw' ; quickdraw features <37>
|
||
gestaltHasColor EQU 0 ; color quickdraw present <37>
|
||
gestaltHasDeepGWorlds EQU 1 ; GWorlds can be deeper than 1-bit <37>
|
||
gestaltHasDirectPixMaps EQU 2 ; PixMaps can be direct (16 or 32 bit) <37>
|
||
gestaltHasGrayishTextOr EQU 3 ; supports text mode grayishTextOr <37>
|
||
gestaltSupportsMirroring Equ 4 ; Supports video mirroring via the Display Manager.
|
||
|
||
gestaltPhysicalRAMSize EQU 'ram ' ; physical RAM size
|
||
gestaltRBVAddr EQU 'rbv ' ; RBV base address <SM4>
|
||
gestaltSCCReadAddr EQU 'sccr' ; SCC read base address <SM4>
|
||
gestaltSCCWriteAddr EQU 'sccw' ; SCC write base address <SM4>
|
||
|
||
gestaltPopupAttr EQU 'pop!' ; popup cdef attributes
|
||
gestaltPopupPresent EQU 0
|
||
|
||
gestaltResourceMgrAttr EQU 'rsrc' ; Resource Mgr attributes
|
||
gestaltPartialRsrcs EQU 0 ; True if partial resources exist
|
||
|
||
gestaltRealtimeMgrAttr EQU 'rtmr' ; Realtime manager attributes <SM9> WS
|
||
gestaltRealtimeMgrPresent EQU 0 ; true if Realtime manager is present <SM9> WS
|
||
|
||
gestaltScrapMgrAttr EQU 'scra' ; Scrap manager attributes
|
||
gestaltScrapMgrTranslationAware EQU 0 ; True if scrap manager is translation manager aware
|
||
|
||
gestaltScriptMgrVersion EQU 'scri' ; Script Manager version number <08/05/89 pke>
|
||
gestaltScriptCount EQU 'scr#' ; number of active script systems <08/05/89 pke>
|
||
|
||
gestaltSlotAttr EQU 'slot' ; slot manager attributes <SM4>
|
||
gestaltSlotMgrExists EQU 0 ; true if slot mgr exists <SM4>
|
||
gestaltNuBusPresent EQU 1 ; NuBus slots are present <SM4>
|
||
gestaltSESlotPresent EQU 2 ; SE PDS slot present <SM4>
|
||
gestaltSE30SlotPresent EQU 3 ; SE/30 slot present <SM4>
|
||
gestaltPortableSlotPresent EQU 4 ; Portable's slot present <SM4>
|
||
|
||
gestaltNuBusConnectors EQU 'sltc' ; bitmap of slots with NuBus connectors <26>
|
||
|
||
gestaltFirstSlotNumber EQU 'slt1' ; returns first physical slot <SM4>
|
||
|
||
gestaltSoundAttr EQU 'snd ' ; sound attributes
|
||
gestaltStereoCapability EQU 0 ; sound hardware has stereo capability
|
||
gestaltStereoMixing EQU 1 ; stereo mixing on external speaker
|
||
gestaltSoundIOMgrPresent EQU 3 ; The Sound I/O Manager is present
|
||
gestaltBuiltInSoundInput EQU 4 ; built-in Sound Input hardware is present
|
||
gestaltHasSoundInputDevice EQU 5 ; Sound Input device available
|
||
gestaltPlayAndRecord EQU 6 ; built-in hardware can play and record simultaneously
|
||
gestalt16BitSoundIO EQU 7 ; sound hardware can play and record 16-bit samples
|
||
gestaltStereoInput EQU 8 ; sound hardware can record stereo
|
||
gestaltLineLevelInput EQU 9 ; sound input port requires line level
|
||
; the following bits are not defined prior to Sound Mgr 3.0
|
||
gestaltSndPlayDoubleBuffer EQU 10 ; SndPlayDoubleBuffer available, set by Sound Mgr 3.0 and later
|
||
gestaltMultiChannels EQU 11 ; multiple channel support, set by Sound Mgr 3.0 and later
|
||
gestalt16BitAudioSupport EQU 12 ; 16 bit audio data supported, set by Sound Mgr 3.0 and later
|
||
|
||
gestaltSpeechAttr EQU 'ttsc' ; Speech Manager attributes
|
||
gestaltSpeechMgrPresent EQU 0 ; bit set indicates that Speech Manager exists
|
||
|
||
gestaltSysArchitecture EQU 'sysa' ; System architecture <SM12>
|
||
gestalt68k EQU 1 ; Motorola MC68k architecture
|
||
gestaltPowerPC EQU 2 ; IBM PowerPC architecture
|
||
|
||
gestaltStdNBPAttr EQU 'nlup' ; standard nbp attributes
|
||
gestaltStdNBPPresent EQU 0
|
||
|
||
gestaltStandardFileAttr EQU 'stdf' ; Standard File attributes
|
||
gestaltStandardFile58 EQU 0 ; True if selectors 5-8 (StandardPutFile-CustomGetFile) are supported
|
||
gestaltStandardFileTranslationAware EQU 1 ; True if standard file is translation manager aware
|
||
gestaltStandardFileHasColorIcons EQU 2 ; True if standard file has 16x16 color icons
|
||
|
||
gestaltTextEditVersion EQU 'te ' ; TextEdit version number
|
||
gestaltTE1 EQU 1 ; TextEdit in MacIIci ROM
|
||
gestaltTE2 EQU 2 ; TextEdit with 6.0.4 Script Systems on MacIIci (Script bug fixes for MacIIci) <8Aug89smb>
|
||
gestaltTE3 EQU 3 ; TextEdit with 6.0.4 Script Systems all but MacIIci
|
||
gestaltTE4 EQU 4 ; TextEdit in Big Bang
|
||
gestaltTE5 EQU 5 ; TextWidthHook available in TextEdit
|
||
|
||
gestaltTermMgrAttr EQU 'term' ; terminal mgr attributes
|
||
gestaltTermMgrPresent EQU 0
|
||
gestaltTermMgrErrorString EQU 2
|
||
|
||
gestaltTimeMgrVersion EQU 'tmgr' ; time manager attributes
|
||
gestaltStandardTimeMgr EQU 1 ; standard time mgr is present
|
||
gestaltRevisedTimeMgr EQU 2 ; revised time mgr is present
|
||
gestaltExtendedTimeMgr EQU 3 ; extended time mgr is present
|
||
|
||
gestaltVIA1Addr EQU 'via1' ; VIA 1 base address <SM4>
|
||
gestaltVIA2Addr EQU 'via2' ; VIA 2 base address <SM4>
|
||
|
||
gestaltVMAttr EQU 'vm ' ; virtual memory attributes
|
||
gestaltVMPresent EQU 0 ; virtual memory is present
|
||
|
||
gestaltTranslationAttr EQU 'xlat' ; Translation manager attributes
|
||
gestaltTranslationMgrExists EQU 0 ; TRUE if translation manager exists
|
||
|
||
gestaltIconUtilitiesAttr EQU 'icon' ; Icon Utilities attributes
|
||
gestaltIconUtilities EQU 'icon' ; Recreated for old code <Sys7.1>
|
||
gestaltIconUtilitiesPresent EQU 0 ; true if icon utilities are present
|
||
|
||
gestaltCompressionMgr EQU 'icmp' ; returns version of the Image Compression Manager
|
||
gestaltQuickTime EQU 'qtim' ; returns version of QuickTime
|
||
gestaltQuickTimeFeatures EQU 'qtrs' ; return QuickTime features
|
||
gestaltPPCQuickTimeLibPresent EQU 0
|
||
|
||
gestaltSCSI EQU 'scsi' ; SCSI Manager attributes
|
||
gestaltAsyncSCSI EQU 0 ; Supports Asynchronous SCSI
|
||
gestaltAsyncSCSIInROM EQU 1 ; Async scsi is in ROM (available for booting)
|
||
gestaltSCSISlotBoot EQU 2 ; This ROM supports Slot-style SCSI boots
|
||
|
||
|
||
**************************
|
||
* Info-only Selectors
|
||
**************************
|
||
gestaltMachineType EQU 'mach' ; machine type
|
||
gestaltClassic EQU 1
|
||
gestaltMacXL EQU 2
|
||
gestaltMac512KE EQU 3
|
||
gestaltMacPlus EQU 4
|
||
gestaltMacSE EQU 5
|
||
gestaltMacII EQU 6
|
||
gestaltMacIIx EQU 7
|
||
gestaltMacIIcx EQU 8
|
||
gestaltMacSE30 EQU 9
|
||
gestaltPortable EQU 10
|
||
gestaltMacIIci EQU 11
|
||
gestaltMacIIfx EQU 13
|
||
gestaltMacClassic EQU 17 ; <29>
|
||
gestaltMacIIsi EQU 18 ; <29>
|
||
gestaltMacLC EQU 19 ; <29>
|
||
gestaltQuadra900 EQU 20 ; <49>
|
||
gestaltPowerBook170 EQU 21 ; <49>
|
||
gestaltQuadra700 EQU 22 ; <49>
|
||
gestaltClassicII EQU 23 ; <49>
|
||
gestaltPowerBook100 EQU 24 ; <49>
|
||
gestaltPowerBook140 EQU 25 ; <49>
|
||
gestaltQuadra950 EQU 26 ; <53>
|
||
gestaltMacLCIII EQU 27 ; <SM21>
|
||
gestaltPowerBookDuo210 EQU 29 ; <H4>
|
||
gestaltCentris650 EQU 30 ; <SM21>
|
||
gestaltPowerBookDuo230 EQU 32 ; <H4>
|
||
gestaltPowerBook180 EQU 33 ; <H4>
|
||
gestaltPowerBook160 EQU 34 ; <H4>
|
||
gestaltQuadra800 EQU 35 ; <SM21>
|
||
gestaltMacLCII EQU 37 ; <52>
|
||
gestaltPowerBookDuo250 EQU 38 ;
|
||
gestaltMacIIvx EQU 45 ; <SM21>
|
||
gestaltColorClassic EQU 49 ; <SM21>
|
||
gestaltPowerbook180c EQU 50 ; <SM21>
|
||
gestaltCentris610 EQU 52 ; <SM21>
|
||
gestaltPowerBook145 EQU 54 ; <55>
|
||
gestaltLC520 EQU 56 ; <SM21>
|
||
gestaltCentris660AV EQU 60 ; <SM21>
|
||
gestaltQuadra660AV EQU gestaltCentris660AV; thank you, Ian Diery
|
||
gestaltPowerBookDuo270C EQU 77 ;
|
||
gestaltQuadra840AV EQU 78 ; <SM21>
|
||
|
||
gestaltMachineIcon EQU 'micn' ; machine icon
|
||
|
||
gestaltROMSize EQU 'rom ' ; ROM size
|
||
gestaltROMVersion EQU 'romv' ; ROM version
|
||
gestaltSystemVersion EQU 'sysv' ; system version
|
||
|
||
gestaltInternalDisplay EQU 'idsp' ; slot number of internal display location
|
||
|
||
IF &TYPE('_NewGestaltValue') = 'UNDEFINED' THEN
|
||
|
||
MACRO
|
||
_NewGestaltValue
|
||
move.w #$0401,d0
|
||
dc.w $ABF1
|
||
ENDM
|
||
|
||
MACRO
|
||
_ReplaceGestaltValue
|
||
move.w #$0402,d0
|
||
dc.w $ABF1
|
||
ENDM
|
||
|
||
MACRO
|
||
_DeleteGestaltValue
|
||
move.w #$0203,d0
|
||
dc.w $ABF1
|
||
ENDM
|
||
|
||
ENDIF ; _NewGestaltValue
|
||
|
||
|
||
|
||
ENDIF ; ...already included |