mac-rom/Interfaces/AIncludes/Palettes.a
Elliot Nunn 4325cdcc78 Bring in CubeE sources
Resource forks are included only for .rsrc files. These are DeRezzed into their data fork. 'ckid' resources, from the Projector VCS, are not included.

The Tools directory, containing mostly junk, is also excluded.
2017-12-26 09:52:23 +08:00

87 lines
2.8 KiB
Plaintext

; 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