mac-rom/Internal/Asm/LayerEqu.a

235 lines
5.4 KiB
Plaintext
Raw Normal View History

;
; File: LayerEqu.a
;
; Contains: Layer Manager equates.
;
; Written by: Ed Tecot
;
; Copyright: <09> 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 <20>already including this file<6C> 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