mirror of
https://github.com/elliotnunn/sys7.1-doc-wip.git
synced 2024-05-31 13:41:30 +00:00
59 lines
2.7 KiB
Plaintext
59 lines
2.7 KiB
Plaintext
;
|
|
; File: MenuMgr.a
|
|
;
|
|
; Contains: Public equates and macros for using menu manager public calls
|
|
;
|
|
; Written by: Kevin S. MacDonell
|
|
;
|
|
; Copyright: © 1991-1992 by Apple Computer, Inc., all rights reserved.
|
|
;
|
|
; This file is used in these builds: System
|
|
;
|
|
; Change History (most recent first):
|
|
;
|
|
; <3> 3/27/92 DC number unknown <KSM> - added InsertIntlResMenu and reintroduced
|
|
; InsertFontResMenu
|
|
; <2> 8/22/91 KSM
|
|
; <0> 8/19/91 KSM New today.
|
|
;
|
|
; To Do:
|
|
;
|
|
|
|
|
|
|
|
;————————————————————————————————————————————————————————————————————————————————————————————————————
|
|
IF &TYPE('__INCLUDINGMENUS__') = 'UNDEFINED' THEN
|
|
__INCLUDINGMENUS__ SET 1
|
|
|
|
IF &TYPE('__INCLUDINGTRAPS__') = 'UNDEFINED' THEN
|
|
INCLUDE 'Traps.a'
|
|
ENDIF
|
|
;————————————————————————————————————————————————————————————————————————————————————————————————————
|
|
; Define the Menu Manager Dispatch trap opword
|
|
_MenuDispatch OPWORD $A825
|
|
|
|
;————————————————————————————————————————————————————————————————————————————————————————————————————
|
|
; Define the new selectors for the Menu Manager
|
|
selectInsertFontResMenu EQU 0
|
|
selectInsertIntlResMenu EQU 1
|
|
|
|
;————————————————————————————————————————————————————————————————————————————————————————————————————
|
|
; Define the parameter size passed for each call
|
|
paramWordsInsertFontResMenu EQU 4
|
|
paramWordsInsertIntlResMenu EQU 6
|
|
|
|
;————————————————————————————————————————————————————————————————————————————————————————————————————
|
|
; Define the dispatch macros to get to the calls
|
|
|
|
MACRO
|
|
_InsertFontResMenu
|
|
DoDispatch _MenuDispatch,selectInsertFontResMenu,paramWordsInsertFontResMenu
|
|
ENDM
|
|
|
|
MACRO
|
|
_InsertIntlResMenu
|
|
DoDispatch _MenuDispatch,selectInsertIntlResMenu,paramWordsInsertIntlResMenu
|
|
ENDM
|
|
|
|
ENDIF ; Already included
|