mirror of
https://github.com/elliotnunn/supermario.git
synced 2024-10-30 08:24:38 +00:00
70 lines
1.8 KiB
Plaintext
70 lines
1.8 KiB
Plaintext
; Version: 3.06
|
|
; Created: Friday, October 20, 1989 at 9:34:33 PM
|
|
;
|
|
; File: PaletteEqu.a
|
|
;
|
|
; Assembler Interface to the Macintosh Libraries
|
|
; Copyright Apple Computer, Inc. 1987-1990
|
|
; All Rights Reserved
|
|
;
|
|
;___________________________________________________________________________
|
|
|
|
IF &TYPE('__IncludingPaletteEqu__') = 'UNDEFINED' THEN
|
|
__IncludingPaletteEqu__ 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 |