sys7.1-doc-wip/Interfaces/AIncludes/PictUtil.a

109 lines
2.4 KiB
Plaintext
Raw Normal View History

2019-07-27 14:37:48 +00:00
;
; File: PictUtil.a
;
; Contains: The assembly interfaces file for picture utilities.
;
; Written by: Dave Good
;
; Copyright: © 1990 by Apple Computer, Inc., all rights reserved.
;
; Change History (most recent first):
;
; <4> 1/30/91 gbm sab, #38: Change the already including this file variable to
; all uppercase (for security reasons)
; <3> 1/16/91 JDR (dba) Renamed METHOD_SYSTEM to systemMethod, METHOD_POPULAR to
; popularMethod, and METHOD_MEDIAN to medianMethod
; <2> 9/19/90 DDG Fixed the header.
; <1> 9/19/90 DDG first checked in
;
; To Do:
;
IF &TYPE('__INCLUDINGPICTUTIL__') = 'UNDEFINED' THEN
__INCLUDINGPICTUTIL__ SET 1
;----------------------------------------------------------------------------------------------------
; verbs for the GetPictInfo, GetPixMapInfo, and NewPictInfo calls
returnColorTable EQU $0001
returnPalette EQU $0002
recordComments EQU $0004
recordFontInfo EQU $0008
suppressBlackAndWhite EQU $0010
; color pick methods
systemMethod EQU 0
popularMethod EQU 1
medianMethod EQU 2
; color bank types
ColorBankIsCustom EQU -1
ColorBankIsExactAnd555 EQU 0
ColorBankIs555 EQU 1
;----------------------------------------------------------------------------------------------------
CommentSpec RECORD 0
count ds.w 1
ID ds.w 1
ENDR
;----------------------------------------------------------------------------------------------------
FontSpec RECORD 0
pictFontID ds.w 1
sysFontID ds.w 1
size ds.l 4
style ds.w 1
nameOffset ds.l 1
ENDR
;----------------------------------------------------------------------------------------------------
PictInfoRecord RECORD 0
version ds.w 1
uniqueColors ds.l 1
thePalette ds.l 1
theColorTable ds.l 1
hRes ds.l 1
vRes ds.l 1
depth ds.w 1
sourceRect ds.w 4
textCount ds.l 1
lineCount ds.l 1
rectCount ds.l 1
rRectCount ds.l 1
ovalCount ds.l 1
arcCount ds.l 1
polyCount ds.l 1
regionCount ds.l 1
bitMapCount ds.l 1
pixMapCount ds.l 1
commentCount ds.l 1
uniqueComments ds.l 1
commentHandle ds.l 1
uniqueFonts ds.l 1
fontHandle ds.l 1
fontNamesHandle ds.l 1
reserved1 ds.l 1
reserved2 ds.l 1
ENDR
;----------------------------------------------------------------------------------------------------
ENDIF ; ...already included