mirror of
https://github.com/elliotnunn/sys7.1-doc-wip.git
synced 2024-12-12 04:29:09 +00:00
109 lines
2.4 KiB
Plaintext
109 lines
2.4 KiB
Plaintext
|
;
|
|||
|
; 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
|