mirror of
https://github.com/elliotnunn/mac-rom.git
synced 2024-12-29 07:29:15 +00:00
5b0f0cc134
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.
163 lines
4.4 KiB
Plaintext
163 lines
4.4 KiB
Plaintext
;
|
|
; File: DialogsPriv.a
|
|
;
|
|
; Contains: Assembly Interface for private dialog manager routines
|
|
;
|
|
; Written by: Nick Kledzik
|
|
;
|
|
; Copyright: © 1990-1992 by Apple Computer, Inc., all rights reserved.
|
|
;
|
|
; Change History (most recent first):
|
|
;
|
|
; <10> 11/7/92 JDR Removed the now publicly defined routines, StdFilterProc,
|
|
; GetStdFilterProc, SetDialogDefaultItem, SetDialogCancelItem,
|
|
; SetDialogTracksCursor.
|
|
; <9> 6/10/92 JSM Add DialogMgrGlobals record for ROM builds and future System
|
|
; builds.
|
|
; <8> 3/31/92 KSM #1021993,<DTY>: DTY: #1021993: Added new selectors for
|
|
; CitationsCH, CitationsSH, and Cite4.
|
|
; <7> 8/21/91 JSM Clean up header.
|
|
; <6> 1/30/91 gbm sab, #38: Change the Ôalready including this fileÕ variable to
|
|
; all uppercase (for security reasons)
|
|
; <5> 1/14/91 dba (ksm) add IsUserCancelEvent and GetNextUserCancelEvent
|
|
; <4> 12/14/90 dba <JDR> change DialogMgrDispatch to DialogDispatch
|
|
; <3> 12/3/90 RLC <ksm> Change the IsFrontWindowModal and IsWindowModal routines
|
|
; to GetFrontWindowModalClass and GetWindowModalClass.
|
|
; <2> 10/30/90 KSM <ngk>Add emulateOrigFilterBit equate.
|
|
; <1> 10/29/90 ngk first checked in
|
|
; <0> 8/26/90 ngk First checked in
|
|
;
|
|
|
|
IF &TYPE('__INCLUDINGDIALOGSPRIV__') = 'UNDEFINED' THEN
|
|
__INCLUDINGDIALOGSPRIV__ SET 1
|
|
|
|
IF forROM OR TheFuture THEN
|
|
|
|
; format of globals in emDialogGlobals
|
|
|
|
DialogMgrGlobals record 0
|
|
AnalyzedWindowState ds.w 1
|
|
IsDialogState ds.w 1
|
|
AnalyzedWindow ds.l 1
|
|
SavedMenuState ds.l 1
|
|
DialogMgrGlobalsSize equ *
|
|
endr
|
|
|
|
ENDIF ; forROM OR TheFuture
|
|
|
|
; bits for flag byte
|
|
cannotTwitchOutOfDialogBit EQU 7
|
|
systemHandlesMenusBit EQU 6
|
|
systemHandlesDefaultButtonBit EQU 5
|
|
systemHandlesCancelButtonBit EQU 4
|
|
systemTracksCursorBit EQU 3
|
|
emulateOrigFilterBit EQU 2
|
|
|
|
cannotTwitchOutOfDialogMask EQU $80
|
|
systemHandlesMenusMask EQU $40
|
|
systemHandlesDefaultButtonMask EQU $20
|
|
systemHandlesCancelButtonMask EQU $10
|
|
systemTracksCursorMask EQU $08
|
|
emulateOrigFilterMask EQU $04
|
|
|
|
|
|
; constants for dialog dispatch macro
|
|
|
|
selectDMgrCite4 EQU -5
|
|
paramWordsDMgrCite4 EQU 10
|
|
|
|
selectDMgrCitationsSH EQU -4
|
|
paramWordsDMgrCitationsSH EQU 7
|
|
|
|
selectDMgrCitationsCH EQU -3
|
|
paramWordsDMgrCitationsCH EQU 5
|
|
|
|
selectDMgrPopMenuState EQU -2
|
|
paramWordsDMgrPopMenuState EQU 0
|
|
|
|
selectDMgrPushMenuState EQU -1
|
|
paramWordsDMgrPushMenuState EQU 0
|
|
|
|
selectGetFrontWindowModalClass EQU 1
|
|
paramWordsGetFrontWindowModalClass EQU 2
|
|
|
|
selectGetWindowModalClass EQU 2
|
|
paramWordsGetWindowModalClass EQU 4
|
|
|
|
selectIsUserCancelEvent EQU 7
|
|
paramWordsIsUserCancelEvent EQU 2
|
|
|
|
selectGetNextUserCancelEvent EQU 8
|
|
paramWordsGetNextUserCancelEvent EQU 2
|
|
|
|
|
|
MACRO
|
|
DoDialogMgrDispatch &routineName
|
|
DoDispatch _DialogDispatch,select&routineName,paramWords&routineName
|
|
ENDM
|
|
|
|
;-----------------------------------------------------------------------------------------
|
|
; Private calls (negative selectors)
|
|
;-----------------------------------------------------------------------------------------
|
|
|
|
; DMgrPushMenuState
|
|
MACRO
|
|
_DMgrPushMenuState
|
|
DoDialogMgrDispatch DMgrPushMenuState
|
|
ENDM
|
|
|
|
; DMgrPopMenuState
|
|
MACRO
|
|
_DMgrPopMenuState
|
|
DoDialogMgrDispatch DMgrPopMenuState
|
|
ENDM
|
|
|
|
; DMgrCitationsCH <8>
|
|
MACRO
|
|
_CitationsCH
|
|
DoDialogMgrDispatch DMgrCitationsCH
|
|
ENDM
|
|
|
|
; DMgrCitationsSH <8>
|
|
MACRO
|
|
_CitationsSH
|
|
DoDialogMgrDispatch DMgrStdCite
|
|
ENDM
|
|
|
|
; DMgrCite4 <8>
|
|
MACRO
|
|
_Do4Citations
|
|
DoDialogMgrDispatch DMgrCite4
|
|
ENDM
|
|
|
|
;-----------------------------------------------------------------------------------------
|
|
; Public calls (positive selectors)
|
|
;-----------------------------------------------------------------------------------------
|
|
|
|
; FUNCTION GetFrontWindowModalClass(VAR modalClass: INTEGER): OSErr;
|
|
MACRO
|
|
_GetFrontWindowModalClass
|
|
DoDialogMgrDispatch GetFrontWindowModalClass
|
|
ENDM
|
|
|
|
; FUNCTION GetWindowModalClass(theWindow: WindowPtr; VAR modalClass: INTEGER): OSErr;
|
|
MACRO
|
|
_GetWindowModalClass
|
|
DoDialogMgrDispatch GetWindowModalClass
|
|
ENDM
|
|
|
|
; FUNCTION IsUserCancelEvent(event: EventRecord): Boolean;
|
|
MACRO
|
|
_IsUserCancelEvent
|
|
DoDialogMgrDispatch IsUserCancelEvent
|
|
ENDM
|
|
|
|
; FUNCTION GetNextUserCancelEvent(event: EventRecord): OSErr;
|
|
MACRO
|
|
_GetNextUserCancelEvent
|
|
DoDialogMgrDispatch GetNextUserCancelEvent
|
|
ENDM
|
|
|
|
|
|
ENDIF ; ...already included DialogsPriv.a
|