mirror of
https://github.com/elliotnunn/mac-rom.git
synced 2025-01-14 06:29:46 +00:00
4325cdcc78
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.
235 lines
5.4 KiB
Plaintext
235 lines
5.4 KiB
Plaintext
;
|
|
; File: LayerEqu.a
|
|
;
|
|
; Contains: Layer Manager equates.
|
|
;
|
|
; Written by: Ed Tecot
|
|
;
|
|
; Copyright: © 1990-1992 by Apple Computer, Inc., all rights reserved.
|
|
;
|
|
; Change History (most recent first):
|
|
;
|
|
; <12> 7/28/92 DCL Moved applicationFloatKind & systemFloatKind constants out of
|
|
; the public eye and into the private Layers header file. At the
|
|
; request of TechPubs, and with moral support from Dean, Greg and
|
|
; Kenny.
|
|
; <11> 2/22/92 DTY Why is there no underscore in front of the NewLayers macro?
|
|
; <10> 8/22/91 JSM Clean up header.
|
|
; <9> 1/30/91 gbm sab, #38: Change the Ôalready including this fileÕ variable to
|
|
; all uppercase (for security reasons)
|
|
; <8> 1/3/91 VL (RLC) Added a new private call RedrawAll.
|
|
; <7> 9/7/90 dba get rid of warning for the good of all mankind
|
|
; <6> 9/7/90 DFH Changed SetLayerLock to GetDeskPort
|
|
; <5> 7/23/90 EMT Changed IsLayerLocked to WindowType.
|
|
; <4> 5/30/90 DC Merge with layers.a - add interface for GlobalPortRect
|
|
; <3> 5/30/90 EMT Converted to use DoDispatch and added macros for newer routines.
|
|
; <1> 4/2/90 EMT first checked in.
|
|
;___________________________________________________________________________________________________
|
|
|
|
IF &TYPE('__INCLUDINGLAYEREQU__') = 'UNDEFINED' THEN
|
|
__INCLUDINGLAYEREQU__ SET 1
|
|
|
|
|
|
applicationFloatKind EQU 6 ; floating window created by applications
|
|
systemFloatKind EQU 7 ; floating window belongs to text services
|
|
|
|
|
|
|
|
; values for byte sized enumerated type LocationControlValues
|
|
lcMainScreen EQU 0
|
|
lcParentWindowScreen EQU 1
|
|
lcParentWindow EQU 2
|
|
|
|
; values for byte sized enumerated type HorizontalControlValues
|
|
hcNoHorizontalControl EQU 0
|
|
hcCenter EQU 1
|
|
|
|
; values for byte sized enumerated type VerticalControlValues
|
|
vcNoVerticalControl EQU 0
|
|
vcDocumentCenter EQU 1
|
|
vcAlertCenter EQU 2
|
|
vcStagger EQU 3
|
|
|
|
; values for byte sized enumerated type CheckControlValues
|
|
ccFrame EQU 0
|
|
ccDragBar EQU 1
|
|
ccContent EQU 2
|
|
|
|
LayerRecord RECORD 0
|
|
port DS.B $6C ; GrafPort
|
|
windowKind DS.W 1
|
|
visible DS.B 1
|
|
reserved1 DS.B 1
|
|
neverActive DS.B 1
|
|
reserved2 DS.B 1
|
|
strucRgn DS.L 1
|
|
contRgn DS.L 1
|
|
updateRgn DS.L 1
|
|
reserved3 DS.L 1
|
|
parent DS.L 1
|
|
auxWinHead DS.L 1
|
|
reserved4 DS.W 1
|
|
auxCtlHead DS.L 1
|
|
nextWindow DS.L 1
|
|
subWindows DS.L 1
|
|
refCon DS.L 1
|
|
ENDR
|
|
|
|
firstWindow EQU -1 ; Used in NewWindow, GetNewWindow, EachWindow.
|
|
afterLastWindow EQU 0 ; Used in NewWindow, GetNewWindow, EachWindow.
|
|
afterLastLayer EQU -1 ; Used as stop parameter in EachWindow.
|
|
|
|
; Window "types"
|
|
isWindow EQU 1
|
|
isLayer EQU 0
|
|
isLockedLayer EQU -1
|
|
|
|
; "Private" routines - to be only used by the system
|
|
selectInitLayers EQU 0
|
|
selectGetRootLayer EQU -1
|
|
selectActiveWindow EQU -2
|
|
selectFrontWindowIn EQU -3
|
|
selectCheckUpdateIn EQU -4
|
|
selectGetDeskPortX EQU -5
|
|
selectWindowType EQU -6
|
|
selectGetParent EQU -7
|
|
selectEachWindow EQU -8
|
|
selectPaintOnePal EQU -9
|
|
selectGlobalPortRect EQU -10
|
|
|
|
MACRO
|
|
_InitLayers
|
|
DoDispatch _LayerDispatch,selectInitLayers
|
|
ENDM
|
|
|
|
MACRO
|
|
_GetRootLayer
|
|
DoDispatch _LayerDispatch,selectGetRootLayer
|
|
ENDM
|
|
|
|
MACRO
|
|
_ActiveWindow
|
|
DoDispatch _LayerDispatch,selectActiveWindow
|
|
ENDM
|
|
|
|
MACRO
|
|
_FrontWindowIn
|
|
DoDispatch _LayerDispatch,selectFrontWindowIn
|
|
ENDM
|
|
|
|
MACRO
|
|
_CheckUpdateIn
|
|
DoDispatch _LayerDispatch,selectCheckUpdateIn
|
|
ENDM
|
|
|
|
MACRO
|
|
_GetDeskPort
|
|
DoDispatch _LayerDispatch,selectGetDeskPortX
|
|
ENDM
|
|
|
|
MACRO
|
|
_WindowType
|
|
DoDispatch _LayerDispatch,selectWindowType
|
|
ENDM
|
|
|
|
MACRO
|
|
_GetParent
|
|
DoDispatch _LayerDispatch,selectGetParent
|
|
ENDM
|
|
|
|
MACRO
|
|
_EachWindow
|
|
DoDispatch _LayerDispatch,selectEachWindow
|
|
ENDM
|
|
|
|
MACRO
|
|
_PaintOnePal
|
|
DoDispatch _LayerDispatch,selectPaintOnePal
|
|
ENDM
|
|
|
|
MACRO
|
|
_GlobalPortRect
|
|
DoDispatch _LayerDispatch,selectGlobalPortRect
|
|
ENDM
|
|
|
|
; "Public" routines
|
|
selectNewLayer EQU 1
|
|
selectIsLayer EQU 2
|
|
selectGetCurLayer EQU 3
|
|
selectSetCurLayer EQU 4
|
|
selectSwapCurLayer EQU 5
|
|
selectGetSubWindows EQU 6
|
|
selectFindLayer EQU 7
|
|
selectPositionWindow EQU 8
|
|
selectAutoPositionWindow EQU 9
|
|
selectGetWindowState EQU 10
|
|
selectSetWindowState EQU 11
|
|
selectCheckWindow EQU 12
|
|
selectRedrawAll EQU 13
|
|
|
|
MACRO
|
|
_NewLayer
|
|
DoDispatch _LayerDispatch,selectNewLayer
|
|
ENDM
|
|
|
|
MACRO
|
|
_IsLayer
|
|
DoDispatch _LayerDispatch,selectIsLayer
|
|
ENDM
|
|
|
|
MACRO
|
|
_GetCurLayer
|
|
DoDispatch _LayerDispatch,selectGetCurLayer
|
|
ENDM
|
|
|
|
MACRO
|
|
_SetCurLayer
|
|
DoDispatch _LayerDispatch,selectSetCurLayer
|
|
ENDM
|
|
|
|
MACRO
|
|
_SwapCurLayer
|
|
DoDispatch _LayerDispatch,selectSwapCurLayer
|
|
ENDM
|
|
|
|
MACRO
|
|
_GetSubWindows
|
|
DoDispatch _LayerDispatch,selectGetSubWindows
|
|
ENDM
|
|
|
|
MACRO
|
|
_FindLayer
|
|
DoDispatch _LayerDispatch,selectFindLayer
|
|
ENDM
|
|
|
|
MACRO
|
|
_PositionWindow
|
|
DoDispatch _LayerDispatch,selectPositionWindow
|
|
ENDM
|
|
|
|
MACRO
|
|
_AutoPositionWindow
|
|
DoDispatch _LayerDispatch,selectAutoPositionWindow
|
|
ENDM
|
|
|
|
MACRO
|
|
_GetWindowState
|
|
DoDispatch _LayerDispatch,selectGetWindowState
|
|
ENDM
|
|
|
|
MACRO
|
|
_SetWindowState
|
|
DoDispatch _LayerDispatch,selectSetWindowState
|
|
ENDM
|
|
|
|
MACRO
|
|
_CheckWindow
|
|
DoDispatch _LayerDispatch,selectCheckWindow
|
|
ENDM
|
|
|
|
MACRO
|
|
_RedrawAll
|
|
DoDispatch _LayerDispatch,selectRedrawAll
|
|
ENDM
|
|
|
|
ENDIF ; ...already included |