sys7.1-doc-wip/Interfaces/AIncludes/Terminals.a
2019-07-27 22:37:48 +08:00

448 lines
6.7 KiB
Plaintext
Raw Permalink Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

;_____________________________________________
; File: Terminals.a
;
; Contains: Assembler interface to Terminal Manager
;
; Written by: Byron Han
;
; Copyright: © 1988-1991 by Apple Computer, Inc.
; All rights reserved.
;
; Change History (most recent first):
;
; <12> 8/27/91 CH Cleaned up my own bad check-in.
; <11> 8/27/91 CH Updated interface headers for consistency.
; <10> 8/20/91 BH remove TMSetupCleanup from public interfaces
; <9> 8/16/91 MH remove outer parens from conditional assembly predicates to
; match other files
; <8> 8/16/91 MH remove commentless ";"
; <7> 6/25/91 JNG Add tmConfigChanged
; <6> 6/24/91 BH fix assembler wrapper to conform to standards
; <5> 6/24/91 BH change equate of TMPSetXCleanup to TMSetupXCleanup; also fixed
; declaration of TMSelection record
; <4> 6/18/91 BH remove TMPChoose
; <3> 1/30/91 gbm sab, #38: Change the already including this file variable to
; all uppercase (for security reasons)
; <2> 11/12/90 JL Changed org SelRect to org selRect to stay consistent.
; <1> 3/14/90 BBH first checked in
;
; To Do:
;_____________________________________________
IF &TYPE('__INCLUDINGTERMINALS__') = 'UNDEFINED' THEN
__INCLUDINGTERMINALS__ SET 1
IF &TYPE('__INCLUDINGCTBUTILITIES__') = 'UNDEFINED' THEN
INCLUDE 'CTBUtilities.a'
ENDIF
; current Terminal Manager version
curTMVersion EQU 2
; current Terminal Manager Environment Record version
curTermEnvRecVers EQU 0
; TMErr
tmGenericError EQU -1
tmNoErr EQU 0
tmNotSent EQU 1
tmEnvironsChanged EQU 2
tmNotSupported EQU 7
tmNoTools EQU 8
tmUnknownError EQU 11
; TMFlags
tmInvisible EQU $00000001
tmSaveBeforeClear EQU $00000002
tmNoMenus EQU $00000004
tmAutoScroll EQU $00000008
tmConfigChanged EQU $00000010
; TMSelTypes & TMSearchTypes
selTextNormal EQU $0001
selTextBoxed EQU $0002
selGraphicsMarquee EQU $0004
selGraphicsLasso EQU $0008
tmSearchNoDiacrit EQU $0100 ;These are only for TMSearchTypes
tmSearchNoCase EQU $0200
; TMCursorTypes
cursorText EQU 1
cursorGraphics EQU 2
; TMTermTypes
tmTextTerminal EQU $0001
tmGraphicsTerminal EQU $0002
TermDataBlock Record 0
flags ds.w 1
theData ds.l 1
auxData ds.l 1
reserved ds.l 1
TermDataBlockSize EQU *
EndR
TermEnvironRec Record 0
version ds.w 1
termType ds.w 1
textRows ds.w 1
textCols ds.w 1
cellSize ds.l 1
graphicSize ds.l 2
slop ds.l 1
auxSpace ds.l 2
TermEnvironRecSize EQU *
EndR
TMSelection Record 0
selRect ds.l 2
org selRect
selRgnHandle ds.l 1
filler ds.l 1
TMSelectionSize EQU *
EndR
TermRecord Record 0
procID ds.w 1
flags ds.l 1
errCode ds.w 1
refCon ds.l 1
userData ds.l 1
defProc ds.l 1
config ds.l 1
oldConfig ds.l 1
environsProc ds.l 1
reserved1 ds.l 1
reserved2 ds.l 1
tmPrivate ds.l 1
sendProc ds.l 1
breakProc ds.l 1
cacheProc ds.l 1
clikLoop ds.l 1
owner ds.l 1
termRect ds.l 2
viewRect ds.l 2
visRect ds.l 2
lastIdle ds.l 1
selection ds TMSelection
selType ds.w 1
mluField ds.l 1
TermRecordSize EQU *
EndR
InitTM EQU $301
TMNew EQU $302
TMDispose EQU $303
TMKey EQU $304
TMUpdate EQU $305
TMPaint EQU $306
TMActivate EQU $307
TMResume EQU $308
TMClick EQU $309
TMStream EQU $30A
TMMenu EQU $30B
TMReset EQU $30C
TMClear EQU $30D
TMResize EQU $30E
TMGetSelect EQU $30F
TMGetLine EQU $310
TMSetSelection EQU $311
TMScroll EQU $312
TMIdle EQU $313
TMValidate EQU $314
TMDefault EQU $315
TMSetupPreflight EQU $316
TMSetupSetup EQU $317
TMSetupFilter EQU $318
TMSetupItem EQU $319
TMGetConfig EQU $31B
TMSetConfig EQU $31C
TMIntlToEnglish EQU $31D
TMEnglishToIntl EQU $31E
TMGetProcID EQU $31F
TMGetToolName EQU $320
TMSetRefCon EQU $321
TMGetRefCon EQU $322
TMSetUserData EQU $323
TMGetUserData EQU $324
TMGetVersion EQU $325
TMGetTMVersion EQU $326
TMAddSearch EQU $327
TMRemoveSearch EQU $328
TMClearSearch EQU $329
TMGetCursor EQU $32A
TMGetTermEnvirons EQU $32B
TMChoose EQU $32C
TMEvent EQU $32D
TMDoTermKey EQU $32E
TMCountTermKeys EQU $32F
TMGetIndTermKey EQU $330
TMSetupPostflight EQU $331
TMSetupXCleanup EQU $334
TMGetErrorString EQU $335
MACRO
_InitTM
_CTBCall #InitTM
ENDM
MACRO
_TMNew
_CTBCall #TMNew
ENDM
MACRO
_TMDispose
_CTBCall #TMDispose
ENDM
MACRO
_TMKey
_CTBCall #TMKey
ENDM
MACRO
_TMUpdate
_CTBCall #TMUpdate
ENDM
MACRO
_TMPaint
_CTBCall #TMPaint
ENDM
MACRO
_TMActivate
_CTBCall #TMActivate
ENDM
MACRO
_TMResume
_CTBCall #TMResume
ENDM
MACRO
_TMClick
_CTBCall #TMClick
ENDM
MACRO
_TMStream
_CTBCall #TMStream
ENDM
MACRO
_TMMenu
_CTBCall #TMMenu
ENDM
MACRO
_TMReset
_CTBCall #TMReset
ENDM
MACRO
_TMClear
_CTBCall #TMClear
ENDM
MACRO
_TMResize
_CTBCall #TMResize
ENDM
MACRO
_TMGetSelect
_CTBCall #TMGetSelect
ENDM
MACRO
_TMGetLine
_CTBCall #TMGetLine
ENDM
MACRO
_TMSetSelection
_CTBCall #TMSetSelection
ENDM
MACRO
_TMScroll
_CTBCall #TMScroll
ENDM
MACRO
_TMIdle
_CTBCall #TMIdle
ENDM
MACRO
_TMValidate
_CTBCall #TMValidate
ENDM
MACRO
_TMDefault
_CTBCall #TMDefault
ENDM
MACRO
_TMSetupPreflight
_CTBCall #TMSetupPreflight
ENDM
MACRO
_TMSetupSetup
_CTBCall #TMSetupSetup
ENDM
MACRO
_TMSetupFilter
_CTBCall #TMSetupFilter
ENDM
MACRO
_TMSetupItem
_CTBCall #TMSetupItem
ENDM
MACRO
_TMGetConfig
_CTBCall #TMGetConfig
ENDM
MACRO
_TMSetConfig
_CTBCall #TMSetConfig
ENDM
MACRO
_TMIntlToEnglish
_CTBCall #TMIntlToEnglish
ENDM
MACRO
_TMEnglishToIntl
_CTBCall #TMEnglishToIntl
ENDM
MACRO
_TMGetProcID
_CTBCall #TMGetProcID
ENDM
MACRO
_TMGetToolName
_CTBCall #TMGetToolName
ENDM
MACRO
_TMSetRefCon
_CTBCall #TMSetRefCon
ENDM
MACRO
_TMGetRefCon
_CTBCall #TMGetRefCon
ENDM
MACRO
_TMSetUserData
_CTBCall #TMSetUserData
ENDM
MACRO
_TMGetUserData
_CTBCall #TMGetUserData
ENDM
MACRO
_TMGetVersion
_CTBCall #TMGetVersion
ENDM
MACRO
_TMGetTMVersion
_CTBCall #TMGetTMVersion
ENDM
MACRO
_TMAddSearch
_CTBCall #TMAddSearch
ENDM
MACRO
_TMRemoveSearch
_CTBCall #TMRemoveSearch
ENDM
MACRO
_TMClearSearch
_CTBCall #TMClearSearch
ENDM
MACRO
_TMGetCursor
_CTBCall #TMGetCursor
ENDM
MACRO
_TMGetTermEnvirons
_CTBCall #TMGetTermEnvirons
ENDM
MACRO
_TMChoose
_CTBCall #TMChoose
ENDM
MACRO
_TMEvent
_CTBCall #TMEvent
ENDM
MACRO
_TMDoTermKey
_CTBCall #TMDoTermKey
ENDM
MACRO
_TMCountTermKeys
_CTBCall #TMCountTermKeys
ENDM
MACRO
_TMGetIndTermKey
_CTBCall #TMGetIndTermKey
ENDM
MACRO
_TMSetupPostflight
_CTBCall #TMSetupPostflight
ENDM
MACRO
_TMSetupXCleanup
_CTBCall #TMSetupXCleanup
ENDM
MACRO
_TMGetErrorString
_CTBCall #TMGetErrorString
ENDM
ENDIF ; already included