mirror of
https://github.com/elliotnunn/supermario.git
synced 2024-09-13 15:55:29 +00:00
149 lines
2.2 KiB
Plaintext
149 lines
2.2 KiB
Plaintext
;
|
|
; File: CTBUtilities.a
|
|
;
|
|
; Contains: Assembler interface to the Comm Toolbox Utilities manager
|
|
;
|
|
;
|
|
; Copyright: © 1988-1990 by Apple Computer, Inc.
|
|
; All rights reserved.
|
|
;
|
|
;
|
|
IF (&TYPE('CTBUTILITIES') = 'UNDEFINED') THEN
|
|
CTBUTILITIES EQU 1
|
|
|
|
MACRO
|
|
_CTBCall &selector
|
|
move.w &selector,-(sp)
|
|
move.l sp,a0
|
|
_CommToolboxDispatch
|
|
adda.w #$2,sp ; Pop the selector back off
|
|
ENDM
|
|
|
|
; version of CommToolbox Utilities
|
|
curCTBUVersion EQU 2
|
|
|
|
; CTBUErr
|
|
ctbuGenericError EQU -1
|
|
ctbuNoErr EQU 0
|
|
|
|
; DITLMethod
|
|
overlayDITL EQU 0
|
|
appendDITLRight EQU 1
|
|
appendDITLBottom EQU 2
|
|
|
|
; Choose responses
|
|
chooseDisaster EQU -2
|
|
chooseFailed EQU -1
|
|
chooseAborted EQU 0
|
|
chooseOKMinor EQU 1
|
|
chooseOKMajor EQU 2
|
|
chooseCancel EQU 3
|
|
|
|
; NuLookup responses
|
|
nlOk EQU 0
|
|
nlCancel EQU 1
|
|
nlEject EQU 2
|
|
|
|
; Name FilterProc responses
|
|
nameInclude EQU 1
|
|
nameDisable EQU 2
|
|
nameReject EQU 3
|
|
|
|
; Zone FilterProc responses
|
|
zoneInclude EQU 1
|
|
zoneDisable EQU 2
|
|
zoneReject EQU 3
|
|
|
|
; Dialog items for hook procedure
|
|
hookOK EQU 1
|
|
hookCancel EQU 2
|
|
hookOutline EQU 3
|
|
hookTitle EQU 4
|
|
hookItemlist EQU 5
|
|
hookZonetitle EQU 6
|
|
hookZonelist EQU 7
|
|
hookLine EQU 8
|
|
hookVersion EQU 9
|
|
hookReserved1 EQU 10
|
|
hookReserved2 EQU 11
|
|
hookReserved3 EQU 12
|
|
hookReserved4 EQU 13
|
|
; Virtual items in the dialog item list
|
|
hookNull EQU 100
|
|
hookItemRefresh EQU 101
|
|
hookZoneRefresh EQU 102
|
|
hookEject EQU 103
|
|
hookPreflight EQU 104
|
|
hookPostflight EQU 105
|
|
hookKeyBase EQU 1000
|
|
|
|
; NuLookup data structures
|
|
NLTypeEntry Record 0
|
|
ICON ds.l 1
|
|
typeStr ds.b 34
|
|
EndR
|
|
|
|
NBPReply Record 0
|
|
theEntity ds.b 102
|
|
theAddr ds.l 1
|
|
EndR
|
|
|
|
|
|
InitCTBUtilities EQU $401
|
|
AppendDITL EQU $402
|
|
CountDITL EQU $403
|
|
ShortenDITL EQU $404
|
|
CTBGetCTBVersion EQU $405
|
|
NuLookup EQU $406
|
|
NuPLookup EQU $407
|
|
StandardNBP EQU $406
|
|
CustomNBP EQU $407
|
|
|
|
MACRO
|
|
_InitCTBUtilities
|
|
_CTBCall #InitCTBUtilities
|
|
ENDM
|
|
|
|
MACRO
|
|
_AppendDITL
|
|
_CTBCall #AppendDITL
|
|
ENDM
|
|
|
|
MACRO
|
|
_CountDITL
|
|
_CTBCall #CountDITL
|
|
ENDM
|
|
|
|
MACRO
|
|
_ShortenDITL
|
|
_CTBCall #ShortenDITL
|
|
ENDM
|
|
|
|
MACRO
|
|
_CTBGetCTBVersion
|
|
_CTBCall #CTBGetCTBVersion
|
|
ENDM
|
|
|
|
MACRO
|
|
_NuLookup
|
|
_CTBCall #NuLookup
|
|
ENDM
|
|
|
|
MACRO
|
|
_NuPLookup
|
|
_CTBCall #NuPLookup
|
|
ENDM
|
|
|
|
MACRO
|
|
_StandardNBP
|
|
_CTBCall #StandardNBP
|
|
ENDM
|
|
|
|
MACRO
|
|
_CustomNBP
|
|
_CTBCall #CustomNBP
|
|
ENDM
|
|
|
|
|
|
ENDIF ; CTBUTILITIES
|