supermario/base/SuperMarioProj.1994-02-09/Interfaces/AIncludes/Palettes.a

87 lines
2.8 KiB
Plaintext
Raw Normal View History

2019-06-29 15:17:50 +00:00
; Created: Friday, October 20, 1989 at 9:34:33 PM
;
; File: Palettes.a
;
; Assembler Interface to the Macintosh Libraries
; Copyright Apple Computer, Inc. 1987-1992
; All Rights Reserved
;
; Change History (most recent first):
;
; <11> 7/1/92 DCL This file is the replacement for PaletteEqu.a.
; <10> 1/30/91 gbm sab, #38: Change the already including this file variable to
; all uppercase (for security reasons)
; <9> 12/13/90 dvb Make .h and .p and .a files consistent.
; <8> 6/19/90 DVB Add Update constants, pmWhite/Black
; <3> 1/18/90 DVB Clean up, and make private parts private
; <2> 1/11/90 DVB Move trap macros to Traps.a
; <1.8> 11/28/89 dvb Added qd32pmgr conditional for 605 patching ROMs with that pmgr.
; <1.7> 9/25/89 CCH Added conditional to set ROMPaletteMgr for ROM if it is
; undefined.
; <1.6> 9/25/89 BAL Changed conditionals to use 32-Bit QD PaletteMgr for system 7.0
; <1.5> 4/14/89 CCH Combined v1.2 and v1.4 of this file using "ForROM" conditionals
; <•1.4> 4/12/89 BAL Blasting in 32-Bit QuickDraw 1.0B1
; <•1.3> 4/12/89 BAL Blasting in 32-Bit QuickDraw 1.0B1
; <1.1> 11/17/88 CCH Added GrayRgnPrep and DeskRgn equates for system build.
; <1.0> 11/9/88 CCH Adding to EASE.
;___________________________________________________________________________
IF &TYPE('__INCLUDINGPALETTES__') = 'UNDEFINED' THEN
__INCLUDINGPALETTES__ SET 1
; Palette Manager equates
; Usage constants
pmCourteous EQU $0000
pmDithered EQU $0001
pmTolerant EQU $0002
pmAnimated EQU $0004
pmExplicit EQU $0008
pmWhite EQU $0010
pmBlack EQU $0020
pmInhibitG2 EQU $0100
pmInhibitC2 EQU $0200
pmInhibitG4 EQU $0400
pmInhibitC4 EQU $0800
pmInhibitG8 EQU $1000
pmInhibitC8 EQU $2000
; bit numbers for above
inhibitG2Bit EQU 8
inhibitC2Bit EQU 9
inhibitG4Bit EQU 10
inhibitC4Bit EQU 11
inhibitG8Bit EQU 12
inhibitC8Bit EQU 13
; palette update types
noPaletteUpdates EQU 0
allBackPaletteUpdates EQU 1
allForePaletteUpdates EQU 2
allPaletteUpdates EQU 3
; ColorInfo structure ; Always access these fields through Palette manager calls!
ciRGB EQU $0000 ; RGBColor [short] * 3
ciUsage EQU $0006 ; usage [short]
ciTolerance EQU $0008 ; tolerance value [short]
ciDataFields EQU $000A ; three words of private data
ciSize EQU $0010 ; size of the ColorInfo data structure
; Palette structure ; Always access these fields through Palette manager calls!
pmEntries EQU $0000 ; entries in pmInfo [short]
pmDataFields EQU $0002 ; seven words of private data
pmInfo EQU $0010 ; ColorInfo's [ciSize] * pmEntries
pmHdrSize EQU $0010 ; size of Palette header
; Palette resource structure
plttEntries EQU $0000 ; entries in palette resource [short]
plltUpdates EQU $0002 ; value passed to SetPalette [short]
ENDIF ; ...already included