sys7.1-doc-wip/Internal/Asm/LayerEqu.a

;
;	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