lots of learning the last 24h
trying to now figure out how to modeset properly for video buffer
This commit is contained in:
parent
38e1cc10d4
commit
71df806253
12
README.md
12
README.md
|
@ -29,8 +29,18 @@ There are a lot of good materials out there: here is what I used to make this ga
|
||||||
- [IIgs Hardware Architecture](http://www.goldstarsoftware.com/applesite/Documentation/AppleIIgsHardwareReferenceManual.PDF)
|
- [IIgs Hardware Architecture](http://www.goldstarsoftware.com/applesite/Documentation/AppleIIgsHardwareReferenceManual.PDF)
|
||||||
- p. 74 has a memory map
|
- p. 74 has a memory map
|
||||||
- [Scanlon's IIgs Assembly Programming](ftp://ftp.apple.asimov.net/pub/apple_II/documentation/programming/65816_gs/Apple%20IIGS%20Assembly%20Language%20Programming.pdf)
|
- [Scanlon's IIgs Assembly Programming](ftp://ftp.apple.asimov.net/pub/apple_II/documentation/programming/65816_gs/Apple%20IIGS%20Assembly%20Language%20Programming.pdf)
|
||||||
|
- Tremendously useful reference for QuickDraw and some tools
|
||||||
- [Programming the 65816 and 65xx family](https://apple2.gs/downloads/Programmanual.pdf)
|
- [Programming the 65816 and 65xx family](https://apple2.gs/downloads/Programmanual.pdf)
|
||||||
|
- Official WDC manual.
|
||||||
- ["PEI Slam" fast SHR rendering](https://retrocomputing.stackexchange.com/questions/52/how-do-i-use-shadowed-memory-to-render-super-hi-res-quickly)
|
- ["PEI Slam" fast SHR rendering](https://retrocomputing.stackexchange.com/questions/52/how-do-i-use-shadowed-memory-to-render-super-hi-res-quickly)
|
||||||
- [Changing ProDOS file types with Cadius](https://groups.google.com/forum/#!topic/comp.sys.apple2/dqcTdS9epdQ)
|
- [Changing ProDOS file types with Cadius](https://groups.google.com/forum/#!topic/comp.sys.apple2/dqcTdS9epdQ)
|
||||||
- [6502 opcode list](http://www.defence-force.org/computing/oric/coding/annexe_2/)
|
- [6502 opcode list](http://www.defence-force.org/computing/oric/coding/annexe_2/)
|
||||||
- [BrutalDeluxe GS/OS internals (VERY USEFUL)](http://brutaldeluxe.fr/documentation/gsos/Apple_IIgs_GSOS_internals_v1.pdf)
|
- [65816 opcode list](http://www.intel-assembler.it/portale/5/65816_guide/opcode_reference.asp)
|
||||||
|
- [BrutalDeluxe GS/OS internals (VERY USEFUL)](http://brutaldeluxe.fr/documentation/gsos/Apple_IIgs_GSOS_internals_v1.pdf)
|
||||||
|
- [Apple II 6502 for beginners](http://www.appleoldies.ca/anix/Using-6502-Assembly-Language-by-Randy-Hyde.pdf)
|
||||||
|
- Has practical examples for reading user input, etc.
|
||||||
|
- [System monitor reference](http://apple2.info/wiki/index.php?title=System_Monitor)
|
||||||
|
- This is the humbling moment I take back every bad thing I ever said about GDB in my life ever.
|
||||||
|
- [SNES CPU overview, same CPU, nice insights](https://github.com/michielvoo/SNES/wiki/CPU)
|
||||||
|
- [SNES opcode list](http://wiki.metroidconstruction.com/doku.php?id=super:technical_information:asm_mnemonics)
|
||||||
|
- [65816 primer](http://softpixel.com/~cwright/sianse/docs/65816NFO.HTM)
|
Binary file not shown.
|
@ -0,0 +1,55 @@
|
||||||
|
* ACE tool macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
|
||||||
|
_ACEBootInit MAC
|
||||||
|
Tool $11D
|
||||||
|
<<<
|
||||||
|
~ACEStartUp MAC
|
||||||
|
PHW ]1
|
||||||
|
_ACEStartUp MAC
|
||||||
|
Tool $21D
|
||||||
|
<<<
|
||||||
|
_ACEShutDown MAC
|
||||||
|
Tool $31D
|
||||||
|
<<<
|
||||||
|
~ACEVersion MAC
|
||||||
|
PHA
|
||||||
|
_ACEVersion MAC
|
||||||
|
Tool $41D
|
||||||
|
<<<
|
||||||
|
_ACEReset MAC
|
||||||
|
Tool $51D
|
||||||
|
<<<
|
||||||
|
~ACEStatus MAC
|
||||||
|
PHA
|
||||||
|
_ACEStatus MAC
|
||||||
|
Tool $61D
|
||||||
|
<<<
|
||||||
|
~ACEInfo MAC
|
||||||
|
P2SW ]1
|
||||||
|
_ACEInfo MAC
|
||||||
|
Tool $71D
|
||||||
|
<<<
|
||||||
|
~ACECompress MAC
|
||||||
|
PxL ]1;]2;]3;]4
|
||||||
|
PxW ]5;]6
|
||||||
|
_ACECompress MAC
|
||||||
|
Tool $91D
|
||||||
|
<<<
|
||||||
|
~ACEExpand MAC
|
||||||
|
PxL ]1;]2;]3;]4
|
||||||
|
PxW ]5;]6
|
||||||
|
_ACEExpand MAC
|
||||||
|
Tool $A1D
|
||||||
|
<<<
|
||||||
|
_ACECompBegin MAC
|
||||||
|
Tool $B1D
|
||||||
|
<<<
|
||||||
|
_ACEExpBegin MAC
|
||||||
|
Tool $C1D
|
||||||
|
<<<
|
|
@ -0,0 +1,90 @@
|
||||||
|
* Desktop Bus tool macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_ADBBootInit MAC
|
||||||
|
Tool $109
|
||||||
|
<<<
|
||||||
|
_ADBStartUp MAC
|
||||||
|
Tool $209
|
||||||
|
<<<
|
||||||
|
_ADBShutDown MAC
|
||||||
|
Tool $309
|
||||||
|
<<<
|
||||||
|
_ADBVersion MAC
|
||||||
|
Tool $409
|
||||||
|
<<<
|
||||||
|
_ADBReset MAC
|
||||||
|
Tool $509
|
||||||
|
<<<
|
||||||
|
~ADBStatus MAC
|
||||||
|
PHA
|
||||||
|
_ADBStatus MAC
|
||||||
|
Tool $609
|
||||||
|
<<<
|
||||||
|
~SendInfo MAC
|
||||||
|
PHW ]1
|
||||||
|
PHLW ]2;]3
|
||||||
|
_SendInfo MAC
|
||||||
|
Tool $909
|
||||||
|
<<<
|
||||||
|
~ReadKeyMicroData MAC
|
||||||
|
PHW ]1
|
||||||
|
PHLW ]2;]3
|
||||||
|
_ReadKeyMicroData MAC
|
||||||
|
Tool $A09
|
||||||
|
<<<
|
||||||
|
~ReadKeyMicroMem MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
PHW ]3
|
||||||
|
_ReadKeyMicroMem MAC
|
||||||
|
Tool $B09
|
||||||
|
<<<
|
||||||
|
~AsyncADBReceive MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_AsyncADBReceive MAC
|
||||||
|
Tool $D09
|
||||||
|
<<<
|
||||||
|
~SyncADBReceive MAC
|
||||||
|
PHW ]1
|
||||||
|
PHLW ]2;]3
|
||||||
|
_SyncADBReceive MAC
|
||||||
|
Tool $E09
|
||||||
|
<<<
|
||||||
|
_AbsOn MAC
|
||||||
|
Tool $F09
|
||||||
|
<<<
|
||||||
|
_AbsOff MAC
|
||||||
|
Tool $1009
|
||||||
|
<<<
|
||||||
|
~ReadAbs MAC
|
||||||
|
PHA
|
||||||
|
_ReadAbs MAC
|
||||||
|
Tool $1109
|
||||||
|
<<<
|
||||||
|
~GetAbsScale MAC
|
||||||
|
PHL ]1
|
||||||
|
_GetAbsScale MAC
|
||||||
|
Tool $1209
|
||||||
|
<<<
|
||||||
|
~SetAbsScale MAC
|
||||||
|
PHL ]1
|
||||||
|
_SetAbsScale MAC
|
||||||
|
Tool $1309
|
||||||
|
<<<
|
||||||
|
~SRQPoll MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_SRQPoll MAC
|
||||||
|
Tool $1409
|
||||||
|
<<<
|
||||||
|
~SRQRemove MAC
|
||||||
|
PHW ]1
|
||||||
|
_SRQRemove MAC
|
||||||
|
Tool $1509
|
||||||
|
<<<
|
||||||
|
_ClearSRQTable MAC
|
||||||
|
Tool $1609
|
||||||
|
<<<
|
|
@ -0,0 +1,283 @@
|
||||||
|
* Control Manager macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_CtlBootInit MAC
|
||||||
|
Tool $110
|
||||||
|
<<<
|
||||||
|
~CtlStartUp MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_CtlStartUp MAC
|
||||||
|
_InitCtrlMgr MAC
|
||||||
|
Tool $210
|
||||||
|
<<<
|
||||||
|
_CtlShutDown MAC
|
||||||
|
_CtrlShutDown MAC
|
||||||
|
Tool $310
|
||||||
|
<<<
|
||||||
|
~CtlVersion MAC
|
||||||
|
PHA
|
||||||
|
_CtlVersion MAC
|
||||||
|
Tool $410
|
||||||
|
<<<
|
||||||
|
_CtlReset MAC
|
||||||
|
Tool $510
|
||||||
|
<<<
|
||||||
|
~CtlStatus MAC
|
||||||
|
PHA
|
||||||
|
_CtlStatus MAC
|
||||||
|
Tool $610
|
||||||
|
<<<
|
||||||
|
_NewControl MAC
|
||||||
|
Tool $910
|
||||||
|
<<<
|
||||||
|
~DisposeControl MAC
|
||||||
|
PHL ]1
|
||||||
|
_DisposeControl MAC
|
||||||
|
Tool $A10
|
||||||
|
<<<
|
||||||
|
~KillControls MAC
|
||||||
|
PHL ]1
|
||||||
|
_KillControls MAC
|
||||||
|
Tool $B10
|
||||||
|
<<<
|
||||||
|
~SetCtlTitle MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SetCtlTitle MAC
|
||||||
|
Tool $C10
|
||||||
|
<<<
|
||||||
|
~GetCtlTitle MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetCtlTitle MAC
|
||||||
|
Tool $D10
|
||||||
|
<<<
|
||||||
|
~HideControl MAC
|
||||||
|
PHL ]1
|
||||||
|
_HideControl MAC
|
||||||
|
Tool $E10
|
||||||
|
<<<
|
||||||
|
~ShowControl MAC
|
||||||
|
PHL ]1
|
||||||
|
_ShowControl MAC
|
||||||
|
Tool $F10
|
||||||
|
<<<
|
||||||
|
~DrawControls MAC
|
||||||
|
PHL ]1
|
||||||
|
_DrawControls MAC
|
||||||
|
Tool $1010
|
||||||
|
<<<
|
||||||
|
~HiliteControl MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_HiliteControl MAC
|
||||||
|
Tool $1110
|
||||||
|
<<<
|
||||||
|
_CtlNewRes MAC
|
||||||
|
Tool $1210
|
||||||
|
<<<
|
||||||
|
~FindControl MAC
|
||||||
|
PHA
|
||||||
|
PHLW ]1;]2
|
||||||
|
PHWL ]3;]4
|
||||||
|
_FindControl MAC
|
||||||
|
Tool $1310
|
||||||
|
<<<
|
||||||
|
~TestControl MAC
|
||||||
|
P1SW ]1
|
||||||
|
PHWL ]2;]3
|
||||||
|
_TestControl MAC
|
||||||
|
Tool $1410
|
||||||
|
<<<
|
||||||
|
~TrackControl MAC
|
||||||
|
PHA
|
||||||
|
PxW ]1;]2
|
||||||
|
PxL ]3;]4
|
||||||
|
_TrackControl MAC
|
||||||
|
Tool $1510
|
||||||
|
<<<
|
||||||
|
~MoveControl MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_MoveControl MAC
|
||||||
|
Tool $1610
|
||||||
|
<<<
|
||||||
|
~DragControl MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PxL ]3;]4
|
||||||
|
PHWL ]5;]6
|
||||||
|
_DragControl MAC
|
||||||
|
Tool $1710
|
||||||
|
<<<
|
||||||
|
~SetCtlIcons MAC
|
||||||
|
P2SL ]1
|
||||||
|
_SetCtlIcons MAC
|
||||||
|
Tool $1810
|
||||||
|
<<<
|
||||||
|
~SetCtlValue MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_SetCtlValue MAC
|
||||||
|
Tool $1910
|
||||||
|
<<<
|
||||||
|
~GetCtlValue MAC
|
||||||
|
P1SL ]1
|
||||||
|
_GetCtlValue MAC
|
||||||
|
Tool $1A10
|
||||||
|
<<<
|
||||||
|
~SetCtlParams MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_SetCtlParams MAC
|
||||||
|
Tool $1B10
|
||||||
|
<<<
|
||||||
|
~GetCtlParams MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetCtlParams MAC
|
||||||
|
Tool $1C10
|
||||||
|
<<<
|
||||||
|
~DragRect MAC
|
||||||
|
P2SL ]1
|
||||||
|
PHLW ]2;]3
|
||||||
|
PHWL ]4;]5
|
||||||
|
PxL ]6;]7
|
||||||
|
PHW ]8
|
||||||
|
_DragRect MAC
|
||||||
|
Tool $1D10
|
||||||
|
<<<
|
||||||
|
~GrowSize MAC
|
||||||
|
PHS 2
|
||||||
|
_GrowSize MAC
|
||||||
|
Tool $1E10
|
||||||
|
<<<
|
||||||
|
~GetCtlDpage MAC
|
||||||
|
PHA
|
||||||
|
_GetCtlDpage MAC
|
||||||
|
Tool $1F10
|
||||||
|
<<<
|
||||||
|
~SetCtlAction MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SetCtlAction MAC
|
||||||
|
Tool $2010
|
||||||
|
<<<
|
||||||
|
~GetCtlAction MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetCtlAction MAC
|
||||||
|
Tool $2110
|
||||||
|
<<<
|
||||||
|
~SetCtlRefCon MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SetCtlRefCon MAC
|
||||||
|
Tool $2210
|
||||||
|
<<<
|
||||||
|
~GetCtlRefCon MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetCtlRefCon MAC
|
||||||
|
Tool $2310
|
||||||
|
<<<
|
||||||
|
~EraseControl MAC
|
||||||
|
PHL ]1
|
||||||
|
_EraseControl MAC
|
||||||
|
Tool $2410
|
||||||
|
<<<
|
||||||
|
~DrawOneCtl MAC
|
||||||
|
PHL ]1
|
||||||
|
_DrawOneCtl MAC
|
||||||
|
Tool $2510
|
||||||
|
<<<
|
||||||
|
~FindTargetCtl MAC
|
||||||
|
PHS 2
|
||||||
|
_FindTargetCtl MAC
|
||||||
|
Tool $2610
|
||||||
|
<<<
|
||||||
|
~MakeNextCtlTarget MAC
|
||||||
|
PHS 2
|
||||||
|
_MakeNextCtlTarget MAC
|
||||||
|
Tool $2710
|
||||||
|
<<<
|
||||||
|
~MakeThisCtlTarget MAC
|
||||||
|
PHL ]1
|
||||||
|
_MakeThisCtlTarget MAC
|
||||||
|
Tool $2810
|
||||||
|
<<<
|
||||||
|
~SendEventToCtl MAC
|
||||||
|
P1SW ]1
|
||||||
|
PxL ]2;]3
|
||||||
|
_SendEventToCtl MAC
|
||||||
|
Tool $2910
|
||||||
|
<<<
|
||||||
|
~GetCtlID MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetCtlID MAC
|
||||||
|
Tool $2A10
|
||||||
|
<<<
|
||||||
|
~SetCtlID MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SetCtlID MAC
|
||||||
|
Tool $2B10
|
||||||
|
<<<
|
||||||
|
~CallCtlDefProc MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_CallCtlDefProc MAC
|
||||||
|
Tool $2C10
|
||||||
|
<<<
|
||||||
|
~NotifyCtls MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PxL ]3;]4
|
||||||
|
_NotifyCtls MAC
|
||||||
|
Tool $2D10
|
||||||
|
<<<
|
||||||
|
~GetCtlMoreFlags MAC
|
||||||
|
P1SL ]1
|
||||||
|
_GetCtlMoreFlags MAC
|
||||||
|
Tool $2E10
|
||||||
|
<<<
|
||||||
|
~SetCtlMoreFlags MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_SetCtlMoreFlags MAC
|
||||||
|
Tool $2F10
|
||||||
|
<<<
|
||||||
|
~GetCtlHandleFromID MAC
|
||||||
|
PHS 2
|
||||||
|
PxL ]1;]2
|
||||||
|
_GetCtlHandleFromID MAC
|
||||||
|
Tool $3010
|
||||||
|
<<<
|
||||||
|
~NewControl2 MAC
|
||||||
|
P2SL ]1
|
||||||
|
PHWL ]2;]3
|
||||||
|
_NewControl2 MAC
|
||||||
|
Tool $3110
|
||||||
|
<<<
|
||||||
|
~CMLoadResource MAC
|
||||||
|
P2SW ]1
|
||||||
|
PHL ]2
|
||||||
|
_CMLoadResource MAC
|
||||||
|
Tool $3210
|
||||||
|
<<<
|
||||||
|
~CMReleaseResource MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_CMReleaseResource MAC
|
||||||
|
Tool $3310
|
||||||
|
<<<
|
||||||
|
~SetCtlParamPtr MAC
|
||||||
|
PHL ]1
|
||||||
|
_SetCtlParamPtr MAC
|
||||||
|
Tool $3410
|
||||||
|
<<<
|
||||||
|
~GetCtlParamPtr MAC
|
||||||
|
PHS 2
|
||||||
|
_GetCtlParamPtr MAC
|
||||||
|
Tool $3510
|
||||||
|
<<<
|
||||||
|
~InvalCtls MAC
|
||||||
|
PHL ]1
|
||||||
|
_InvalCtls MAC
|
||||||
|
Tool $3710
|
||||||
|
<<<
|
||||||
|
~qCtlStartUp MAC
|
||||||
|
PHW ]1
|
||||||
|
NextDP ]2;$100
|
||||||
|
Tool $210
|
||||||
|
<<<
|
|
@ -0,0 +1,130 @@
|
||||||
|
* Desk Manager macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_DeskBootInit MAC
|
||||||
|
Tool $105
|
||||||
|
<<<
|
||||||
|
_DeskStartUp MAC
|
||||||
|
Tool $205
|
||||||
|
<<<
|
||||||
|
_DeskShutDown MAC
|
||||||
|
Tool $305
|
||||||
|
<<<
|
||||||
|
~DeskVersion MAC
|
||||||
|
PHA
|
||||||
|
_DeskVersion MAC
|
||||||
|
Tool $405
|
||||||
|
<<<
|
||||||
|
~DeskStatus MAC
|
||||||
|
PHA
|
||||||
|
_DeskStatus MAC
|
||||||
|
Tool $605
|
||||||
|
<<<
|
||||||
|
_SaveScrn MAC
|
||||||
|
Tool $905
|
||||||
|
<<<
|
||||||
|
_RestScrn MAC
|
||||||
|
Tool $A05
|
||||||
|
<<<
|
||||||
|
_SaveAll MAC
|
||||||
|
Tool $B05
|
||||||
|
<<<
|
||||||
|
_RestAll MAC
|
||||||
|
Tool $C05
|
||||||
|
<<<
|
||||||
|
~InstallNDA MAC
|
||||||
|
PHL ]1
|
||||||
|
_InstallNDA MAC
|
||||||
|
Tool $E05
|
||||||
|
<<<
|
||||||
|
~InstallCDA MAC
|
||||||
|
PHL ]1
|
||||||
|
_InstallCDA MAC
|
||||||
|
Tool $F05
|
||||||
|
<<<
|
||||||
|
_ChooseCDA MAC
|
||||||
|
Tool $1105
|
||||||
|
<<<
|
||||||
|
~SetDAStrPtr MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SetDAStrPtr MAC
|
||||||
|
Tool $1305
|
||||||
|
<<<
|
||||||
|
~GetDAStrPtr MAC
|
||||||
|
PHS 2
|
||||||
|
_GetDAStrPtr MAC
|
||||||
|
Tool $1405
|
||||||
|
<<<
|
||||||
|
~OpenNDA MAC
|
||||||
|
P1SW ]1
|
||||||
|
_OpenNDA MAC
|
||||||
|
Tool $1505
|
||||||
|
<<<
|
||||||
|
~CloseNDA MAC
|
||||||
|
PHW ]1
|
||||||
|
_CloseNDA MAC
|
||||||
|
Tool $1605
|
||||||
|
<<<
|
||||||
|
~SystemClick MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
PHW ]3
|
||||||
|
_SystemClick MAC
|
||||||
|
Tool $1705
|
||||||
|
<<<
|
||||||
|
~SystemEdit MAC
|
||||||
|
P1SW ]1
|
||||||
|
_SystemEdit MAC
|
||||||
|
Tool $1805
|
||||||
|
<<<
|
||||||
|
_SystemTask MAC
|
||||||
|
Tool $1905
|
||||||
|
<<<
|
||||||
|
~SystemEvent MAC
|
||||||
|
P1SW ]1
|
||||||
|
PxL ]2;]3;]4
|
||||||
|
PHW ]5
|
||||||
|
_SystemEvent MAC
|
||||||
|
Tool $1A05
|
||||||
|
<<<
|
||||||
|
~GetNumNDAs MAC
|
||||||
|
PHA
|
||||||
|
_GetNumNDAs MAC
|
||||||
|
Tool $1B05
|
||||||
|
<<<
|
||||||
|
~CloseNDAByWinPtr MAC
|
||||||
|
PHL ]1
|
||||||
|
_CloseNDAByWinPtr MAC
|
||||||
|
Tool $1C05
|
||||||
|
<<<
|
||||||
|
_CloseAllNDAs MAC
|
||||||
|
Tool $1D05
|
||||||
|
<<<
|
||||||
|
~FixAppleMenu MAC
|
||||||
|
PHW ]1
|
||||||
|
_FixAppleMenu MAC
|
||||||
|
Tool $1E05
|
||||||
|
<<<
|
||||||
|
~AddToRunQ MAC
|
||||||
|
PHL ]1
|
||||||
|
_AddToRunQ MAC
|
||||||
|
Tool $1F05
|
||||||
|
<<<
|
||||||
|
~RemoveFromRunQ MAC
|
||||||
|
PHL ]1
|
||||||
|
_RemoveFromRunQ MAC
|
||||||
|
Tool $2005
|
||||||
|
<<<
|
||||||
|
~RemoveCDA MAC
|
||||||
|
PHL ]1
|
||||||
|
_RemoveCDA MAC
|
||||||
|
Tool $2105
|
||||||
|
<<<
|
||||||
|
~RemoveNDA MAC
|
||||||
|
PHL ]1
|
||||||
|
_RemoveNDA MAC
|
||||||
|
Tool $2205
|
||||||
|
<<<
|
|
@ -0,0 +1,284 @@
|
||||||
|
* Dialog Manager macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_DialogBootInit MAC
|
||||||
|
Tool $115
|
||||||
|
<<<
|
||||||
|
~DialogStartUp MAC
|
||||||
|
PHW ]1
|
||||||
|
_DialogStartUp MAC
|
||||||
|
Tool $215
|
||||||
|
<<<
|
||||||
|
_DialogShutDown MAC
|
||||||
|
Tool $315
|
||||||
|
<<<
|
||||||
|
~DialogVersion MAC
|
||||||
|
PHA
|
||||||
|
_DialogVersion MAC
|
||||||
|
Tool $415
|
||||||
|
<<<
|
||||||
|
_DialogReset MAC
|
||||||
|
Tool $515
|
||||||
|
<<<
|
||||||
|
~DialogStatus MAC
|
||||||
|
PHA
|
||||||
|
_DialogStatus MAC
|
||||||
|
Tool $615
|
||||||
|
<<<
|
||||||
|
~ErrorSound MAC
|
||||||
|
PHL ]1
|
||||||
|
_ErrorSound MAC
|
||||||
|
Tool $915
|
||||||
|
<<<
|
||||||
|
~NewModalDialog MAC
|
||||||
|
P2SL ]1
|
||||||
|
PHWL ]2;]3
|
||||||
|
_NewModalDialog MAC
|
||||||
|
Tool $A15
|
||||||
|
<<<
|
||||||
|
~NewModelessDialog MAC
|
||||||
|
P2SL ]1
|
||||||
|
PxL ]2;]3
|
||||||
|
PHWL ]4;]5
|
||||||
|
PHL ]6
|
||||||
|
_NewModelessDialog MAC
|
||||||
|
Tool $B15
|
||||||
|
<<<
|
||||||
|
~CloseDialog MAC
|
||||||
|
PHL ]1
|
||||||
|
_CloseDialog MAC
|
||||||
|
Tool $C15
|
||||||
|
<<<
|
||||||
|
~NewDItem MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
PHLW ]3;]4
|
||||||
|
PHLW ]5;]6
|
||||||
|
PHWL ]7;]8
|
||||||
|
_NewDItem MAC
|
||||||
|
Tool $D15
|
||||||
|
<<<
|
||||||
|
~RemoveDItem MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_RemoveDItem MAC
|
||||||
|
Tool $E15
|
||||||
|
<<<
|
||||||
|
~ModalDialog MAC
|
||||||
|
P1SL ]1
|
||||||
|
_ModalDialog MAC
|
||||||
|
Tool $F15
|
||||||
|
<<<
|
||||||
|
~IsDialogEvent MAC
|
||||||
|
P1SL ]1
|
||||||
|
_IsDialogEvent MAC
|
||||||
|
Tool $1015
|
||||||
|
<<<
|
||||||
|
~DialogSelect MAC
|
||||||
|
P1SL ]1
|
||||||
|
PxL ]2;]3
|
||||||
|
_DialogSelect MAC
|
||||||
|
Tool $1115
|
||||||
|
<<<
|
||||||
|
~DlgCut MAC
|
||||||
|
PHL ]1
|
||||||
|
_DlgCut MAC
|
||||||
|
Tool $1215
|
||||||
|
<<<
|
||||||
|
~DlgCopy MAC
|
||||||
|
PHL ]1
|
||||||
|
_DlgCopy MAC
|
||||||
|
Tool $1315
|
||||||
|
<<<
|
||||||
|
~DlgPaste MAC
|
||||||
|
PHL ]1
|
||||||
|
_DlgPaste MAC
|
||||||
|
Tool $1415
|
||||||
|
<<<
|
||||||
|
~DlgDelete MAC
|
||||||
|
PHL ]1
|
||||||
|
_DlgDelete MAC
|
||||||
|
Tool $1515
|
||||||
|
<<<
|
||||||
|
~DrawDialog MAC
|
||||||
|
PHL ]1
|
||||||
|
_DrawDialog MAC
|
||||||
|
Tool $1615
|
||||||
|
<<<
|
||||||
|
~Alert MAC
|
||||||
|
PHA
|
||||||
|
PxL ]1;]2
|
||||||
|
_Alert MAC
|
||||||
|
Tool $1715
|
||||||
|
<<<
|
||||||
|
~StopAlert MAC
|
||||||
|
PHA
|
||||||
|
PxL ]1;]2
|
||||||
|
_StopAlert MAC
|
||||||
|
Tool $1815
|
||||||
|
<<<
|
||||||
|
~NoteAlert MAC
|
||||||
|
PHA
|
||||||
|
PxL ]1;]2
|
||||||
|
_NoteAlert MAC
|
||||||
|
Tool $1915
|
||||||
|
<<<
|
||||||
|
~CautionAlert MAC
|
||||||
|
PHA
|
||||||
|
PxL ]1;]2
|
||||||
|
_CautionAlert MAC
|
||||||
|
Tool $1A15
|
||||||
|
<<<
|
||||||
|
~ParamText MAC
|
||||||
|
PxL ]1;]2;]3;]4
|
||||||
|
_ParamText MAC
|
||||||
|
Tool $1B15
|
||||||
|
<<<
|
||||||
|
~SetDAFont MAC
|
||||||
|
PHL ]1
|
||||||
|
_SetDAFont MAC
|
||||||
|
Tool $1C15
|
||||||
|
<<<
|
||||||
|
~GetControlDItem MAC
|
||||||
|
PHS 2
|
||||||
|
PHLW ]1;]2
|
||||||
|
_GetControlDItem MAC
|
||||||
|
Tool $1E15
|
||||||
|
<<<
|
||||||
|
~GetIText MAC
|
||||||
|
PHL ]1
|
||||||
|
PHWL ]2;]3
|
||||||
|
_GetIText MAC
|
||||||
|
Tool $1F15
|
||||||
|
<<<
|
||||||
|
~SetIText MAC
|
||||||
|
PHL ]1
|
||||||
|
PHWL ]2;]3
|
||||||
|
_SetIText MAC
|
||||||
|
Tool $2015
|
||||||
|
<<<
|
||||||
|
~SelectIText MAC
|
||||||
|
PHL ]1
|
||||||
|
PxW ]2;]3;]4
|
||||||
|
_SelectIText MAC
|
||||||
|
Tool $2115
|
||||||
|
<<<
|
||||||
|
~HideDItem MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_HideDItem MAC
|
||||||
|
Tool $2215
|
||||||
|
<<<
|
||||||
|
~ShowDItem MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_ShowDItem MAC
|
||||||
|
Tool $2315
|
||||||
|
<<<
|
||||||
|
~FindDItem MAC
|
||||||
|
PHA
|
||||||
|
PxL ]1;]2
|
||||||
|
_FindDItem MAC
|
||||||
|
Tool $2415
|
||||||
|
<<<
|
||||||
|
~UpdateDialog MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_UpdateDialog MAC
|
||||||
|
Tool $2515
|
||||||
|
<<<
|
||||||
|
~GetDItemType MAC
|
||||||
|
PHA
|
||||||
|
PHLW ]1;]2
|
||||||
|
_GetDItemType MAC
|
||||||
|
Tool $2615
|
||||||
|
<<<
|
||||||
|
~SetDItemType MAC
|
||||||
|
PHW ]1
|
||||||
|
PHLW ]2;]3
|
||||||
|
_SetDItemType MAC
|
||||||
|
Tool $2715
|
||||||
|
<<<
|
||||||
|
~GetDItemBox MAC
|
||||||
|
PHL ]1
|
||||||
|
PHWL ]2;]3
|
||||||
|
_GetDItemBox MAC
|
||||||
|
Tool $2815
|
||||||
|
<<<
|
||||||
|
~SetDItemBox MAC
|
||||||
|
PHL ]1
|
||||||
|
PHWL ]2;]3
|
||||||
|
_SetDItemBox MAC
|
||||||
|
Tool $2915
|
||||||
|
<<<
|
||||||
|
~GetFirstDItem MAC
|
||||||
|
P1SL ]1
|
||||||
|
_GetFirstDItem MAC
|
||||||
|
Tool $2A15
|
||||||
|
<<<
|
||||||
|
~GetNextDItem MAC
|
||||||
|
PHA
|
||||||
|
PHLW ]1;]2
|
||||||
|
_GetNextDItem MAC
|
||||||
|
Tool $2B15
|
||||||
|
<<<
|
||||||
|
~ModalDialog2 MAC
|
||||||
|
P2SL ]1
|
||||||
|
_ModalDialog2 MAC
|
||||||
|
Tool $2C15
|
||||||
|
<<<
|
||||||
|
~GetDItemValue MAC
|
||||||
|
PHA
|
||||||
|
PHLW ]1;]2
|
||||||
|
_GetDItemValue MAC
|
||||||
|
Tool $2E15
|
||||||
|
<<<
|
||||||
|
~SetDItemValue MAC
|
||||||
|
PHW ]1
|
||||||
|
PHLW ]2;]3
|
||||||
|
_SetDItemValue MAC
|
||||||
|
Tool $2F15
|
||||||
|
<<<
|
||||||
|
~GetNewModalDialog MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetNewModalDialog MAC
|
||||||
|
Tool $3215
|
||||||
|
<<<
|
||||||
|
~GetNewDItem MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_GetNewDItem MAC
|
||||||
|
Tool $3315
|
||||||
|
<<<
|
||||||
|
~GetAlertStage MAC
|
||||||
|
PHA
|
||||||
|
_GetAlertStage MAC
|
||||||
|
Tool $3415
|
||||||
|
<<<
|
||||||
|
_ResetAlertStage MAC
|
||||||
|
Tool $3515
|
||||||
|
<<<
|
||||||
|
~DefaultFilter MAC
|
||||||
|
PHA
|
||||||
|
PxL ]1;]2;]3
|
||||||
|
_DefaultFilter MAC
|
||||||
|
Tool $3615
|
||||||
|
<<<
|
||||||
|
~GetDefButton MAC
|
||||||
|
P1SL ]1
|
||||||
|
_GetDefButton MAC
|
||||||
|
Tool $3715
|
||||||
|
<<<
|
||||||
|
~SetDefButton MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_SetDefButton MAC
|
||||||
|
Tool $3815
|
||||||
|
<<<
|
||||||
|
~DisableDItem MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_DisableDItem MAC
|
||||||
|
Tool $3915
|
||||||
|
<<<
|
||||||
|
~EnableDItem MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_EnableDItem MAC
|
||||||
|
Tool $3A15
|
||||||
|
<<<
|
|
@ -0,0 +1,176 @@
|
||||||
|
*===============================
|
||||||
|
* ProDOS-16 macro and equates
|
||||||
|
*
|
||||||
|
* Use with syntax:
|
||||||
|
*
|
||||||
|
* _CMDNAME PARMADR
|
||||||
|
*
|
||||||
|
* where "CMDNAME" is one of the
|
||||||
|
* following labels and "PARMADR"
|
||||||
|
* is the label of the parameters
|
||||||
|
* table to use.
|
||||||
|
*
|
||||||
|
*-------------------------------
|
||||||
|
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
open = $10
|
||||||
|
read = $12
|
||||||
|
write = $13
|
||||||
|
close = $14
|
||||||
|
|
||||||
|
_CREATE MAC
|
||||||
|
DOS16 $01;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_DESTROY MAC
|
||||||
|
DOS16 $02;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_CHANGE_PATH MAC
|
||||||
|
DOS16 $04;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_SET_FILE_INFO MAC
|
||||||
|
DOS16 $05;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_GET_FILE_INFO MAC
|
||||||
|
DOS16 $06;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_VOLUME MAC
|
||||||
|
DOS16 $08;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_SET_PREFIX MAC
|
||||||
|
DOS16 $09;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_SETPREFIX MAC ; alternate name
|
||||||
|
DOS16 $09;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_GET_PREFIX MAC
|
||||||
|
DOS16 $0A;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_GETPREFIX MAC ; alternate name
|
||||||
|
DOS16 $0A;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_CLEAR_BACKUP_BIT MAC
|
||||||
|
DOS16 $0B;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_OPEN MAC
|
||||||
|
DOS16 $10;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_NEWLINE MAC
|
||||||
|
DOS16 $11;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_READ MAC
|
||||||
|
DOS16 $12;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_WRITE MAC
|
||||||
|
DOS16 $13;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_CLOSE MAC
|
||||||
|
DOS16 $14;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_FLUSH MAC
|
||||||
|
DOS16 $15;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_SET_MARK MAC
|
||||||
|
DOS16 $16;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_GET_MARK MAC
|
||||||
|
DOS16 $17;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_SET_EOF MAC
|
||||||
|
DOS16 $18;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_GET_EOF MAC
|
||||||
|
DOS16 $19;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_SET_LEVEL MAC
|
||||||
|
DOS16 $1A;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_GET_LEVEL MAC
|
||||||
|
DOS16 $1B;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_GET_DIR_ENTRY MAC
|
||||||
|
DOS16 $1C;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_GET_DEV_NUM MAC
|
||||||
|
DOS16 $20;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_GET_LAST_DEV MAC
|
||||||
|
DOS16 $21;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_READ_BLOCK MAC
|
||||||
|
DOS16 $22;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_WRITE_BLOCK MAC
|
||||||
|
DOS16 $23;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_FORMAT MAC
|
||||||
|
DOS16 $24;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_ERASE_DISK MAC
|
||||||
|
DOS16 $25;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_GET_PATH_NAME MAC
|
||||||
|
DOS16 $27;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_GET_BOOT_VOL MAC
|
||||||
|
DOS16 $28;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_QUIT MAC
|
||||||
|
DOS16 $29;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_GET_VERSION MAC
|
||||||
|
DOS16 $2A;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_D_INFO MAC
|
||||||
|
DOS16 $2C;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_ALLOC_INTERRUPT MAC
|
||||||
|
DOS16 $31;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
_DEALLOC_INTERRUPT MAC
|
||||||
|
DOS16 $32;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
DOS16 MAC
|
||||||
|
JSL $E100A8
|
||||||
|
DA ]1 ; Change to ]1.$2000 for Class 1 P16 calls.
|
||||||
|
ADRL ]2
|
||||||
|
<<<
|
|
@ -0,0 +1,129 @@
|
||||||
|
*===============================
|
||||||
|
* ProDOS-8 macro and equates
|
||||||
|
*
|
||||||
|
* Use with syntax:
|
||||||
|
*
|
||||||
|
* command PARMADR
|
||||||
|
*
|
||||||
|
* where "command" is one of the
|
||||||
|
* following labels and "PARMADR"
|
||||||
|
* is the label of the parameters
|
||||||
|
* table to use.
|
||||||
|
*
|
||||||
|
*-------------------------------
|
||||||
|
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
* MLI call codes:
|
||||||
|
|
||||||
|
ALLOC_INTERRUPT MAC
|
||||||
|
DOS8 $40;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
DEALLOC_INTERRUPT MAC
|
||||||
|
DOS8 $41;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
QUIT MAC
|
||||||
|
DOS8 $65;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
READ_BLOCK MAC
|
||||||
|
DOS8 $80;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
WRITE_BLOCK MAC
|
||||||
|
DOS8 $81;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
GET_TIME MAC
|
||||||
|
DOS8 $82;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
CREATE MAC
|
||||||
|
DOS8 $C0;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
DESTROY MAC
|
||||||
|
DOS8 $C1;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
RENAME MAC
|
||||||
|
DOS8 $C2;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
SET_FILE_INFO MAC
|
||||||
|
DOS8 $C3;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
GET_FILE_INFO MAC
|
||||||
|
DOS8 $C4;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
ON_LINE MAC
|
||||||
|
DOS8 $C5;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
SET_PREFIX MAC
|
||||||
|
DOS8 $C6;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
GET_PREFIX MAC
|
||||||
|
DOS8 $C7;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
OPEN MAC
|
||||||
|
DOS8 $C8;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
NEWLINE MAC
|
||||||
|
DOS8 $C9;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
READ MAC
|
||||||
|
DOS8 $CA;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
WRITE MAC
|
||||||
|
DOS8 $CB;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
CLOSE MAC
|
||||||
|
DOS8 $CC;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
FLUSH MAC
|
||||||
|
DOS8 $CD;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
SET_MARK MAC
|
||||||
|
DOS8 $CE;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
GET_MARK MAC
|
||||||
|
DOS8 $CF;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
SET_EOF MAC
|
||||||
|
DOS8 $D0;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
GET_EOF MAC
|
||||||
|
DOS8 $D1;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
SET_BUF MAC
|
||||||
|
DOS8 $D2;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
GET_BUF MAC
|
||||||
|
DOS8 $D3;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
DOS8 MAC
|
||||||
|
JSR $BF00
|
||||||
|
DFB ]1
|
||||||
|
DA ]2
|
||||||
|
<<<
|
|
@ -0,0 +1,19 @@
|
||||||
|
|
||||||
|
; File: E16.ACE
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple computer, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
;
|
||||||
|
|
||||||
|
aceNoError equ $0 ; Error -
|
||||||
|
aceIsActive equ $1D01 ; Error -
|
||||||
|
aceBadDP equ $1D02 ; Error -
|
||||||
|
aceNotActive equ $1D03 ; Error -
|
||||||
|
aceNoSuchParam equ $1D04 ; Error -
|
||||||
|
aceBadMethod equ $1D05 ; Error -
|
||||||
|
aceBadSrc equ $1D06 ; Error -
|
||||||
|
aceBadDest equ $1D07 ; Error -
|
||||||
|
aceDatatOverlap equ $1D08 ; Error -
|
||||||
|
aceNotImplemented equ $1DFF ; Error -
|
|
@ -0,0 +1,65 @@
|
||||||
|
|
||||||
|
; File: E16.ADB
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
|
||||||
|
cmndIncomplete equ $0910 ; ADB error - Command not completed.
|
||||||
|
cantSync equ $0911 ; ADB error - Can't synchronize
|
||||||
|
adbBusy equ $0982 ; ADB error - Busy (command pending)
|
||||||
|
devNotAtAddr equ $0983 ; ADB error - Device not present at address
|
||||||
|
|
||||||
|
srqListFull equ $0984 ; ADB error - List full
|
||||||
|
|
||||||
|
orcRepeatDelay equ $0000 ; Byte - ReadConfigRec - Output byte:
|
||||||
|
;Repeat Delay/Rate
|
||||||
|
orcLayoutOrLang equ $0001 ; Byte - ReadConfigRec - Output byte:
|
||||||
|
;Layout/Lang
|
||||||
|
orcADBAddr equ $0002 ; Byte - ReadConfigRec - Output byte: ADB
|
||||||
|
;address - keyboard and mouse.
|
||||||
|
|
||||||
|
oxDivide equ $0000 ; Word - ScaleRec -
|
||||||
|
oyDivide equ $0002 ; Word - ScaleRec -
|
||||||
|
oxOffset equ $0004 ; Word - ScaleRec -
|
||||||
|
oyOffset equ $0006 ; Word - ScaleRec -
|
||||||
|
oxMultiply equ $0008 ; Word - ScaleRec -
|
||||||
|
oyMultiply equ $000A ; Word - ScaleRec -
|
||||||
|
|
||||||
|
oscADBAddr equ $0000 ; Byte - SetConfigRec - keyboard and mouse
|
||||||
|
oscLayoutOrLang equ $0001 ; Byte - SetConfigRec -
|
||||||
|
oscRepeatDelay equ $0002 ; Byte - SetConfigRec -
|
||||||
|
|
||||||
|
osynchMode equ $0000 ; Byte - SynchRec -
|
||||||
|
osynchKybdMouseAddr equ $0001 ; Byte - SynchRec -
|
||||||
|
osynchLayoutOrLang equ $0002 ; Byte - SynchRec -
|
||||||
|
osynchRepeatDelay equ $0003 ; Byte - SynchRec -
|
||||||
|
|
||||||
|
readModes equ $000A ; ReadKeyMicroData -
|
||||||
|
readConfig equ $000B ; ReadKeyMicroData -
|
||||||
|
readADBError equ $000C ; ReadKeyMicroData -
|
||||||
|
readVersionNum equ $000D ; ReadKeyMicroData -
|
||||||
|
|
||||||
|
readMicroMem equ $0009 ; ReadKeyMicroMem -
|
||||||
|
|
||||||
|
abort equ $0001 ; SendInfo - command
|
||||||
|
resetKbd equ $0002 ; SendInfo - command
|
||||||
|
flushKbd equ $0003 ; SendInfo - command
|
||||||
|
setModes equ $0004 ; SendInfo - 2nd param is pointer to mode byte
|
||||||
|
clearModes equ $0005 ; SendInfo - 2nd param is pointer to mode Byte
|
||||||
|
setConfig equ $0006 ; SendInfo - 2nd param is pointer to SetConfigRec
|
||||||
|
synch equ $0007 ; SendInfo - 2nd param is pointer to SynchRec
|
||||||
|
writeMicroMem equ $0008 ; SendInfo - 2nd param is pointer to MicroControlMemRec
|
||||||
|
resetSys equ $0010 ; SendInfo - command
|
||||||
|
keyCode equ $0011 ; SendInfo - 2nd param is pointer to key code byte.
|
||||||
|
resetADB equ $0040 ; SendInfo - command
|
||||||
|
transmitADBBytes equ $0047 ; SendInfo - add number of bytes to this
|
||||||
|
enableSRQ equ $0050 ; SendInfo - command - ADB address in low nibble
|
||||||
|
flushADBDevBuf equ $0060 ; SendInfo - command - ADB address in low nibble
|
||||||
|
disableSRQ equ $0070 ; SendInfo - command - ADB address in low nibble
|
||||||
|
transmit2ADBBytes equ $0080 ; SendInfo - add ADB address to this
|
||||||
|
listen equ $0080 ; SendInfo - adbCommand = listen + ( 16 * reg) +
|
||||||
|
; (adb address)
|
||||||
|
talk equ $00C0 ; SendInfo - adbCommand = talk + ( 16 * reg) +
|
||||||
|
; (adb address)
|
|
@ -0,0 +1,128 @@
|
||||||
|
|
||||||
|
; File: E16.Control
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
|
||||||
|
obarOutline equ $00 ; Word - BarColors - color for outlining bar
|
||||||
|
;, arrows, and thumb
|
||||||
|
obarNorArrow equ $02 ; Word - BarColors - color of arrows when n
|
||||||
|
;ot highlighted
|
||||||
|
obarSelArrow equ $04 ; Word - BarColors - color of arrows when h
|
||||||
|
;ighlighted
|
||||||
|
obarArrowBack equ $06 ; Word - BarColors - color of arrow box's
|
||||||
|
;background
|
||||||
|
obarNorThumb equ $08 ; Word - BarColors - color of thumb's backg
|
||||||
|
;round when not highlighted
|
||||||
|
obarSelThumb equ $0A ; Word - BarColors - color of thumb's backg
|
||||||
|
;round when highlighted
|
||||||
|
obarPageRgn equ $0C ; Word - BarColors - color and pattern page
|
||||||
|
;region: high byte - 1= dither, 0 = solid
|
||||||
|
obarInactive equ $0E ; Word - BarColors - color of scroll bar's
|
||||||
|
;interior when inactive
|
||||||
|
|
||||||
|
oboxReserved equ $00 ; Word - BoxColors - reserved
|
||||||
|
oboxNor equ $02 ; Word - BoxColors - color of box when not check
|
||||||
|
;ed
|
||||||
|
oboxSel equ $04 ; Word - BoxColors - color of box when checked
|
||||||
|
oboxTitle equ $06 ; Word - BoxColors - color of check box's titl
|
||||||
|
;e
|
||||||
|
|
||||||
|
obttnOutline equ $00 ; Word - BttnColors - color of outline
|
||||||
|
obttnNorBack equ $02 ; Word - BttnColors - color of background w
|
||||||
|
;hen not selected
|
||||||
|
obttnSelBack equ $04 ; Word - BttnColors - color of background w
|
||||||
|
;hen selected
|
||||||
|
obttnNorText equ $06 ; Word - BttnColors - color of title's text
|
||||||
|
; when not selected
|
||||||
|
obttnSelText equ $08 ; Word - BttnColors - color of title's text
|
||||||
|
; when selected
|
||||||
|
|
||||||
|
oradReserved equ $00 ; Word - RadioColors - reserved
|
||||||
|
oradNor equ $02 ; Word - RadioColors - color of radio button whe
|
||||||
|
;n off
|
||||||
|
oradSel equ $04 ; Word - RadioColors - color of radio button whe
|
||||||
|
;n on
|
||||||
|
oradTitle equ $06 ; Word - RadioColors - color of radio button's
|
||||||
|
; title text
|
||||||
|
|
||||||
|
octlNext equ $00 ; CtlRecHndl - CtlRec - Handle of next control.
|
||||||
|
octlOwner equ $04 ; GrafPortPtr - CtlRec - Pointer to control's
|
||||||
|
;window.
|
||||||
|
octlRect equ $08 ; Rect - CtlRec - Enclosing rectangle.
|
||||||
|
octlFlag equ $10 ; Byte - CtlRec - Bit flags.
|
||||||
|
octlHilite equ $11 ; Byte - CtlRec - Highlighted part.
|
||||||
|
octlValue equ $12 ; Integer - CtlRec - Control's value.
|
||||||
|
octlProc equ $14 ; Pointer - CtlRec - Control's definition proce
|
||||||
|
;dure.
|
||||||
|
octlAction equ $18 ; Pointer - CtlRec - Control's action procedu
|
||||||
|
;re.
|
||||||
|
octlData equ $1C ; Longint - CtlRec - Reserved for CtrlProc's us
|
||||||
|
;e.
|
||||||
|
octlRefCon equ $20 ; Longint - CtlRec - Reserved for application
|
||||||
|
;'s use.
|
||||||
|
octlColor equ $24 ; Pointer - CtlRec - Pointer to appropriate co
|
||||||
|
;lor table.
|
||||||
|
|
||||||
|
oboundRect equ $00 ; Rect - LimitBlk - Drag bounds.
|
||||||
|
oslopRect equ $08 ; Rect - LimitBlk - Cursor bounds.
|
||||||
|
oaxisParam equ $10 ; Word - LimitBlk - Movement constrains.
|
||||||
|
odragPatt equ $12 ; Pointer - LimitBlk - Pointer to 32 byte Patt
|
||||||
|
;ern for drag outline.
|
||||||
|
|
||||||
|
noConstraint equ $0000 ; Axis Parameter - No constraint on movem
|
||||||
|
;ent.
|
||||||
|
hAxisOnly equ $0001 ; Axis Parameter - Horizontal axis only.
|
||||||
|
vAxisOnly equ $0002 ; Axis Parameter - Vertical axis only.
|
||||||
|
|
||||||
|
simpRound equ $0000 ; CtlFlag - Simple button flag
|
||||||
|
upFlag equ $0001 ; CtlFlag - Scroll bar flag.
|
||||||
|
boldButton equ $0001 ; CtlFlag - Bold round cornered outlined bu
|
||||||
|
;tton.
|
||||||
|
simpBRound equ $0001 ; CtlFlag - Simple button flag
|
||||||
|
downFlag equ $0002 ; CtlFlag - Scroll bar flag.
|
||||||
|
simpSquare equ $0002 ; CtlFlag - Simple button flag
|
||||||
|
simpDropSquare equ $0003 ; CtlFlag - Simple button flag
|
||||||
|
leftFlag equ $0004 ; CtlFlag - Scroll bar flag.
|
||||||
|
rightFlag equ $0008 ; CtlFlag - Scroll bar flag.
|
||||||
|
dirScroll equ $0010 ; CtlFlag - Scroll bar flag.
|
||||||
|
horScroll equ $0010 ; CtlFlag - Scroll bar flag.
|
||||||
|
family equ $007F ; CtlFlag - Mask for radio button family number
|
||||||
|
ctlInVis equ $0080 ; CtlFlag - invisible mask for any type of co
|
||||||
|
;ntrol
|
||||||
|
|
||||||
|
simpleProc equ $00000000 ; CtlProc -
|
||||||
|
checkProc equ $02000000 ; CtlProc -
|
||||||
|
radioProc equ $04000000 ; CtlProc -
|
||||||
|
scrollProc equ $06000000 ; CtlProc -
|
||||||
|
growProc equ $08000000 ; CtlProc -
|
||||||
|
|
||||||
|
drawCtl equ $0000 ; DefProc - Draw control command.
|
||||||
|
calcCRect equ $0001 ; DefProc - Compute drag RECT command.
|
||||||
|
testCtl equ $0002 ; DefProc - Hit test command.
|
||||||
|
initCtl equ $0003 ; DefProc - Initialize command.
|
||||||
|
dispCtl equ $0004 ; DefProc - Dispose command.
|
||||||
|
posCtl equ $0005 ; DefProc - Move indicator command.
|
||||||
|
thumbCtl equ $0006 ; DefProc - Compute drag parameters command.
|
||||||
|
dragCtl equ $0007 ; DefProc - Drag command.
|
||||||
|
autoTrack equ $0008 ; DefProc - Action command.
|
||||||
|
newValue equ $0009 ; DefProc - Set new value command.
|
||||||
|
setParams equ $000A ; DefProc - Set new parameters command.
|
||||||
|
moveCtl equ $000B ; DefProc - Move command.
|
||||||
|
recSize equ $000C ; DefProc - Return record size command.
|
||||||
|
|
||||||
|
noHilite equ $0000 ; hiliteState - Param to HiliteControl
|
||||||
|
inactiveHilite equ $00FF ; hiliteState - Param to HiliteControl
|
||||||
|
|
||||||
|
noPart equ $0000 ; PartCode -
|
||||||
|
simpleButton equ $0002 ; PartCode -
|
||||||
|
checkBox equ $0003 ; PartCode -
|
||||||
|
radioButton equ $0004 ; PartCode -
|
||||||
|
upArrow equ $0005 ; PartCode -
|
||||||
|
downArrow equ $0006 ; PartCode -
|
||||||
|
pageUp equ $0007 ; PartCode -
|
||||||
|
pageDown equ $0008 ; PartCode -
|
||||||
|
growBox equ $000A ; PartCode -
|
||||||
|
thumb equ $0081 ; PartCode -
|
|
@ -0,0 +1,25 @@
|
||||||
|
|
||||||
|
; File: E16.Desk
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
|
||||||
|
daNotFound equ $0510 ; Desk error - desk accessory not found
|
||||||
|
notSysWindow equ $0511 ; Desk error - not the system window
|
||||||
|
|
||||||
|
eventAction equ $0001 ; NDA action code -
|
||||||
|
runAction equ $0002 ; NDA action code -
|
||||||
|
undoAction equ $0005 ; NDA action code -
|
||||||
|
cutAction equ $0006 ; NDA action code -
|
||||||
|
copyAction equ $0007 ; NDA action code -
|
||||||
|
pasteAction equ $0008 ; NDA action code -
|
||||||
|
clearAction equ $0009 ; NDA action code -
|
||||||
|
cursorAction equ $0003 ; NDAaction code -
|
||||||
|
|
||||||
|
undo equ $0001 ; System Edit - edit type
|
||||||
|
cut equ $0002 ; System Edit - edit type
|
||||||
|
copy equ $0003 ; System Edit - edit type
|
||||||
|
paste equ $0004 ; System Edit - edit type
|
||||||
|
clear equ $0005 ; System Edit - edit type
|
|
@ -0,0 +1,93 @@
|
||||||
|
|
||||||
|
; File: E16.Dialog
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
|
||||||
|
badItemType equ $150A ; Dialog error -
|
||||||
|
newItemFailed equ $150B ; Dialog error -
|
||||||
|
itemNotFound equ $150C ; Dialog error -
|
||||||
|
notModalDialog equ $150D ; Dialog error -
|
||||||
|
|
||||||
|
oatBoundsRect equ $00 ; Rect - AlertTemplate -
|
||||||
|
oatAlertID equ $08 ; Word - AlertTemplate -
|
||||||
|
oatStage1 equ $0A ; Byte - AlertTemplate -
|
||||||
|
oatStage2 equ $0B ; Byte - AlertTemplate -
|
||||||
|
oatStage3 equ $0C ; Byte - AlertTemplate -
|
||||||
|
oatStage4 equ $0D ; Byte - AlertTemplate -
|
||||||
|
oatItemList equ $0E ; ItemTempPtr - AlertTemplate - Null termina
|
||||||
|
;ted array
|
||||||
|
|
||||||
|
odtBoundsRect equ $00 ; Rect - DialogTemplate -
|
||||||
|
odtVisible equ $08 ; Boolean - DialogTemplate -
|
||||||
|
odtRefCon equ $0A ; Long - DialogTemplate -
|
||||||
|
odtItemList equ $0E ; ItemTempPtr - DialogTemplate - Null termin
|
||||||
|
;ated array
|
||||||
|
|
||||||
|
oiconRect equ $00 ; Rect - IconRecord -
|
||||||
|
oiconImage equ $08 ; Byte - IconRecord -
|
||||||
|
|
||||||
|
oitemID equ $00 ; Word - ItemTemplate -
|
||||||
|
oitemRect equ $02 ; Rect - ItemTemplate -
|
||||||
|
oitemType equ $0A ; Word - ItemTemplate -
|
||||||
|
oitemDescr equ $0C ; Pointer - ItemTemplate -
|
||||||
|
oitemValue equ $10 ; Word - ItemTemplate -
|
||||||
|
oitemFlag equ $12 ; Word - ItemTemplate -
|
||||||
|
oitemColor equ $14 ; CtlColorTablePtr - ItemTemplate -
|
||||||
|
|
||||||
|
odefProcParm equ $00 ; Longint - UserCtlItemPB -
|
||||||
|
otitleParm equ $04 ; Pointer - UserCtlItemPB -
|
||||||
|
oparam2 equ $08 ; Word - UserCtlItemPB -
|
||||||
|
oparam1 equ $0A ; Word - UserCtlItemPB -
|
||||||
|
|
||||||
|
getInitView equ $0001 ; Command -
|
||||||
|
getInitTotal equ $0002 ; Command -
|
||||||
|
getInitValue equ $0003 ; Command -
|
||||||
|
scrollLineUp equ $0004 ; Command -
|
||||||
|
scrollLineDown equ $0005 ; Command -
|
||||||
|
scrollPageUp equ $0006 ; Command -
|
||||||
|
scrollPageDown equ $0007 ; Command -
|
||||||
|
scrollThumb equ $0008 ; Command -
|
||||||
|
|
||||||
|
buttonItem equ $000A ; Item Type -
|
||||||
|
checkItem equ $000B ; Item Type -
|
||||||
|
radioItem equ $000C ; Item Type -
|
||||||
|
scrollBarItem equ $000D ; Item Type -
|
||||||
|
userCtlItem equ $000E ; Item Type -
|
||||||
|
statText equ $000F ; Item Type -
|
||||||
|
longStatText equ $0010 ; Item Type -
|
||||||
|
editLine equ $0011 ; Item Type -
|
||||||
|
iconItem equ $0012 ; Item Type -
|
||||||
|
picItem equ $0013 ; Item Type -
|
||||||
|
userItem equ $0014 ; Item Type -
|
||||||
|
userCtlItem2 equ $0015 ; Item Type -
|
||||||
|
longStatText2 equ $0016 ; Item Type -
|
||||||
|
itemDisable equ $8000 ; Item Type -
|
||||||
|
|
||||||
|
minItemType equ $000A ; Item Type Range -
|
||||||
|
maxItemType equ $0016 ; Item Type Range -
|
||||||
|
|
||||||
|
ok equ $0001 ; ItemID -
|
||||||
|
cancel equ $0002 ; ItemID -
|
||||||
|
|
||||||
|
inButton equ $0002 ; ModalDialog2 - Part code
|
||||||
|
inCheckBox equ $0003 ; ModalDialog2 - Part code
|
||||||
|
inRadioButton equ $0004 ; ModalDialog2 - Part code
|
||||||
|
inUpArrow equ $0005 ; ModalDialog2 - Part code
|
||||||
|
inDownArrow equ $0006 ; ModalDialog2 - Part code
|
||||||
|
inPageUp equ $0007 ; ModalDialog2 - Part code
|
||||||
|
inPageDown equ $0008 ; ModalDialog2 - Part code
|
||||||
|
inStatText equ $0009 ; ModalDialog2 - Part code
|
||||||
|
inGrow equ $000A ; ModalDialog2 - Part code
|
||||||
|
inEditLine equ $000B ; ModalDialog2 - Part code
|
||||||
|
inUserItem equ $000C ; ModalDialog2 - Part code
|
||||||
|
inLongStatText equ $000D ; ModalDialog2 - Part code
|
||||||
|
inIconItem equ $000E ; ModalDialog2 - Part code
|
||||||
|
inLongStatText2 equ $000F ; ModalDialog2 -
|
||||||
|
inThumb equ $0081 ; ModalDialog2 - Part code
|
||||||
|
|
||||||
|
okDefault equ $0000 ; Stage Bit Vector -
|
||||||
|
cancelDefault equ $0040 ; Stage Bit Vector -
|
||||||
|
alertDrawn equ $0080 ; Stage Bit Vector -
|
|
@ -0,0 +1,75 @@
|
||||||
|
|
||||||
|
; File: E16.Event
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
|
||||||
|
emDupStrtUpErr equ $0601 ; error - duplicate EMStartup Call
|
||||||
|
emResetErr equ $0602 ; error - can't reset error the Event Manag
|
||||||
|
;er
|
||||||
|
emNotActErr equ $0603 ; error - event manager not active
|
||||||
|
emBadEvtCodeErr equ $0604 ; error - illegal event code
|
||||||
|
emBadBttnNoErr equ $0605 ; error - illegal button number
|
||||||
|
emQSiz2LrgErr equ $0606 ; error - queue size too large
|
||||||
|
emNoMemQueueErr equ $0607 ; error - not enough memory for queue
|
||||||
|
emBadEvtQErr equ $0681 ; error - fatal sys error - event queue d
|
||||||
|
;amaged
|
||||||
|
emBadQHndlErr equ $0682 ; error - fatal sys error - queue handle
|
||||||
|
; damaged
|
||||||
|
|
||||||
|
owhat equ $00 ; Word - EventRecord - event code
|
||||||
|
omessage equ $02 ; Long - EventRecord - event message
|
||||||
|
owhen equ $06 ; Long - EventRecord - ticks since startup
|
||||||
|
owhere equ $0A ; Point - EventRecord - mouse location
|
||||||
|
omodifiers equ $0E ; Word - EventRecord - modifier flags
|
||||||
|
|
||||||
|
nullEvt equ $0000 ; Event Code -
|
||||||
|
mouseDownEvt equ $0001 ; Event Code -
|
||||||
|
mouseUpEvt equ $0002 ; Event Code -
|
||||||
|
keyDownEvt equ $0003 ; Event Code -
|
||||||
|
autoKeyEvt equ $0005 ; Event Code -
|
||||||
|
updateEvt equ $0006 ; Event Code -
|
||||||
|
activateEvt equ $0008 ; Event Code -
|
||||||
|
switchEvt equ $0009 ; Event Code -
|
||||||
|
deskAccEvt equ $000A ; Event Code -
|
||||||
|
driverEvt equ $000B ; Event Code -
|
||||||
|
app1Evt equ $000C ; Event Code -
|
||||||
|
app2Evt equ $000D ; Event Code -
|
||||||
|
app3Evt equ $000E ; Event Code -
|
||||||
|
app4Evt equ $000F ; Event Code -
|
||||||
|
|
||||||
|
mDownMask equ $0002 ; Event Masks -
|
||||||
|
mUpMask equ $0004 ; Event Masks -
|
||||||
|
keyDownMask equ $0008 ; Event Masks -
|
||||||
|
autoKeyMask equ $0020 ; Event Masks -
|
||||||
|
updateMask equ $0040 ; Event Masks -
|
||||||
|
activeMask equ $0100 ; Event Masks -
|
||||||
|
switchMask equ $0200 ; Event Masks -
|
||||||
|
deskAccMask equ $0400 ; Event Masks -
|
||||||
|
driverMask equ $0800 ; Event Masks -
|
||||||
|
app1Mask equ $1000 ; Event Masks -
|
||||||
|
app2Mask equ $2000 ; Event Masks -
|
||||||
|
app3Mask equ $4000 ; Event Masks -
|
||||||
|
app4Mask equ $8000 ; Event Masks -
|
||||||
|
everyEvent equ $FFFF ; Event Masks -
|
||||||
|
|
||||||
|
jcTickCount equ $00 ; Journal Code - TickCount call
|
||||||
|
jcGetMouse equ $01 ; Journal Code - GetMouse call
|
||||||
|
jcButton equ $02 ; Journal Code - Button call
|
||||||
|
jcEvent equ $04 ; Journal Code - GetNextEvent and EventAvail cal
|
||||||
|
;ls
|
||||||
|
|
||||||
|
activeFlag equ $0001 ; Modifier Flags - set if window being acti
|
||||||
|
;vated
|
||||||
|
changeFlag equ $0002 ; Modifier Flags - set if active wind. chan
|
||||||
|
;ged state
|
||||||
|
btn1State equ $0040 ; Modifier Flags - set if button 1 up
|
||||||
|
btn0State equ $0080 ; Modifier Flags - set if button 0 up
|
||||||
|
appleKey equ $0100 ; Modifier Flags - set if Apple key down
|
||||||
|
shiftKey equ $0200 ; Modifier Flags - set if shift key down
|
||||||
|
capsLock equ $0400 ; Modifier Flags - set if caps lock key down
|
||||||
|
optionKey equ $0800 ; Modifier Flags - set if option key down
|
||||||
|
controlKey equ $1000 ; Modifier Flags - set if Control key down
|
||||||
|
keyPad equ $2000 ; Modifier Flags - set if keypress from key pad
|
|
@ -0,0 +1,64 @@
|
||||||
|
|
||||||
|
; File: E16.Font
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
;
|
||||||
|
|
||||||
|
fmDupStartUpErr equ $1B01 ; Font error - duplicate FMStartUp cal
|
||||||
|
;l
|
||||||
|
fmResetErr equ $1B02 ; Font error - can't reset the Font Manager
|
||||||
|
fmNotActiveErr equ $1B03 ; Font error - Font Manager not active
|
||||||
|
fmFamNotFndErr equ $1B04 ; Font error - family not found
|
||||||
|
fmFontNtFndErr equ $1B05 ; Font error - font not found
|
||||||
|
fmFontMemErr equ $1B06 ; Font error - font not in memory
|
||||||
|
fmSysFontErr equ $1B07 ; Font error - system font cannot be purg
|
||||||
|
;eable
|
||||||
|
fmBadFamNumErr equ $1B08 ; Font error - illegal family number
|
||||||
|
fmBadSizeErr equ $1B09 ; Font error - illegal size
|
||||||
|
fmBadNameErr equ $1B0A ; Font error - illegal name length
|
||||||
|
fmMenuErr equ $1B0B ; Font error - fix font menu never called
|
||||||
|
fmScaleSizeErr equ $1B0C ; Font error - scaled size of font exee
|
||||||
|
;ds limits
|
||||||
|
|
||||||
|
ofamNum equ $00 ; Word - FontID -
|
||||||
|
ofontStyle equ $02 ; Byte - FontID -
|
||||||
|
ofontSize equ $03 ; Byte - FontID -
|
||||||
|
|
||||||
|
oresultID equ $00 ; FontID - FontStatRec -
|
||||||
|
oresultStats equ $04 ; Word - FontStatRec -
|
||||||
|
|
||||||
|
newYork equ $0002 ; Family Number -
|
||||||
|
geneva equ $0003 ; Family Number -
|
||||||
|
monaco equ $0004 ; Family Number -
|
||||||
|
venice equ $0005 ; Family Number -
|
||||||
|
london equ $0006 ; Family Number -
|
||||||
|
athens equ $0007 ; Family Number -
|
||||||
|
sanFran equ $0008 ; Family Number -
|
||||||
|
toronto equ $0009 ; Family Number -
|
||||||
|
cairo equ $000B ; Family Number -
|
||||||
|
losAngeles equ $000C ; Family Number -
|
||||||
|
times equ $0014 ; Family Number -
|
||||||
|
helvetica equ $0015 ; Family Number -
|
||||||
|
courier equ $0016 ; Family Number -
|
||||||
|
symbol equ $0017 ; Family Number -
|
||||||
|
taliesin equ $0018 ; Family Number -
|
||||||
|
shaston equ $FFFE ; Family Number -
|
||||||
|
|
||||||
|
baseOnlyBit equ $0020 ; FamSpecBits -
|
||||||
|
notBaseBit equ $0020 ; FamStatBits -
|
||||||
|
memOnlyBit equ $0001 ; FontSpecBits -
|
||||||
|
realOnlyBit equ $0002 ; FontSpecBits -
|
||||||
|
anyFamBit equ $0004 ; FontSpecBits -
|
||||||
|
anyStyleBit equ $0008 ; FontSpecBits -
|
||||||
|
anySizeBit equ $0010 ; FontSpecBits -
|
||||||
|
memBit equ $0001 ; FontStatBits -
|
||||||
|
unrealBit equ $0002 ; FontStatBits -
|
||||||
|
apFamBit equ $0004 ; FontStatBits -
|
||||||
|
apVarBit equ $0008 ; FontStatBits -
|
||||||
|
purgeBit equ $0010 ; FontStatBits -
|
||||||
|
notDiskBit equ $0020 ; FontStatBits -
|
||||||
|
notFoundBit equ $8000 ; FontStatBits -
|
||||||
|
dontScaleBit equ $0001 ; Scale Word -
|
|
@ -0,0 +1,405 @@
|
||||||
|
* File: E16.GSOS
|
||||||
|
*
|
||||||
|
* These equates can be used with the GSOS.MACS in the MACRO.LIBRARY
|
||||||
|
* directory. You can also copy the data structures at the end of this
|
||||||
|
* file directly into your own source files.
|
||||||
|
*
|
||||||
|
*-----------------------------------------------
|
||||||
|
* File access - CreateRec, OpenRec access and requestAccess fields
|
||||||
|
|
||||||
|
readEnable = $0001 ;read enable bit:
|
||||||
|
writeEnable = $0002 ;write enable bit:
|
||||||
|
backupNeeded = $0020 ;backup needed bit:must be '0' in requestAccess field )
|
||||||
|
renameEnable = $0040 ;rename enable bit:
|
||||||
|
destroyEnable = $0080 ;read enable bit:
|
||||||
|
|
||||||
|
* base - > setMark = ...
|
||||||
|
|
||||||
|
startPlus = $0000 ;base - setMark = displacement
|
||||||
|
eofMinus = $0001 ;base - setMark = eof - displacement
|
||||||
|
markPlus = $0002 ;base - setMark = mark + displacement
|
||||||
|
markMinus = $0003 ;base - setMark = mark - displacement
|
||||||
|
|
||||||
|
* cachePriority
|
||||||
|
|
||||||
|
noCache = $0000 ;cachePriority - do not cache blocks invloved in this read
|
||||||
|
cache = $0001 ;cachePriority - cache blocks invloved in this read if possible
|
||||||
|
|
||||||
|
*-----------------------------------------------
|
||||||
|
* GS/OS Error codes
|
||||||
|
|
||||||
|
badSystemCall = $0001 ;bad system call number
|
||||||
|
invalidPcount = $0004 ;invalid parameter count
|
||||||
|
gsosActive = $0007 ;GS/OS already active
|
||||||
|
devNotFound = $0010 ;device not found
|
||||||
|
invalidDevNum = $0011 ;invalid device number
|
||||||
|
drvrBadReq = $0020 ;bad request or command
|
||||||
|
drvrBadCode = $0021 ;bad control or status code
|
||||||
|
drvrBadParm = $0022 ;bad call parameter
|
||||||
|
drvrNotOpen = $0023 ;character device not open
|
||||||
|
drvrPriorOpen = $0024 ;character device already open
|
||||||
|
irqTableFull = $0025 ;interrupt table full
|
||||||
|
drvrNoResrc = $0026 ;resources not available
|
||||||
|
drvrIOError = $0027 ;I/O error
|
||||||
|
drvrNoDevice = $0028 ;device not connected
|
||||||
|
drvrBusy = $0029 ;call aborted, driver is busy
|
||||||
|
drvrWrtProt = $002B ;device is write protected
|
||||||
|
drvrBadCount = $002C ;invalid byte count
|
||||||
|
drvrBadBlock = $002D ;invalid block address
|
||||||
|
drvrDiskSwitch = $002E ;disk has been switched
|
||||||
|
drvrOffLine = $002F ;device off line/ no media present
|
||||||
|
badPathSyntax = $0040 ;invalid pathname syntax
|
||||||
|
invalidRefNum = $0043 ;invalid reference number
|
||||||
|
pathNotFound = $0044 ;subdirectory does not exist
|
||||||
|
volNotFound = $0045 ;volume not found
|
||||||
|
fileNotFound = $0046 ;file not found
|
||||||
|
dupPathname = $0047 ;create or rename with existing name
|
||||||
|
volumeFull = $0048 ;volume full error
|
||||||
|
volDirFull = $0049 ;volume directory full
|
||||||
|
badFileFormat = $004A ;version error (incompatible file format)
|
||||||
|
badStoreType = $004B ;unsupported (or incorrect) storage type
|
||||||
|
eofEncountered = $004C ;end-of-file encountered
|
||||||
|
outOfRange = $004D ;position out of range
|
||||||
|
invalidAccess = $004E ;access not allowed
|
||||||
|
buffTooSmall = $004F ;buffer too small
|
||||||
|
fileBusy = $0050 ;file is already open
|
||||||
|
dirError = $0051 ;directory error
|
||||||
|
unknownVol = $0052 ;unknown volume type
|
||||||
|
paramRangeErr = $0053 ;parameter out of range
|
||||||
|
outOfMem = $0054 ;out of memory
|
||||||
|
dupVolume = $0057 ;duplicate volume name
|
||||||
|
notBlockDev = $0058 ;not a block device
|
||||||
|
invalidLevel = $0059 ;specifield level outside legal range
|
||||||
|
damagedBitMap = $005A ;block number too large
|
||||||
|
badPathNames = $005B ;invalid pathnames for ChangePath
|
||||||
|
notSystemFile = $005C ;not an executable file
|
||||||
|
osUnsupported = $005D ;Operating System not supported
|
||||||
|
stackOverflow = $005F ;too many applications on stack
|
||||||
|
dataUnavail = $0060 ;Data unavailable
|
||||||
|
endOfDir = $0061 ;end of directory has been reached
|
||||||
|
invalidClass = $0062 ;invalid FST call class
|
||||||
|
resNotFound = $0063 ;file does not contain required resource
|
||||||
|
|
||||||
|
*-----------------------------------------------
|
||||||
|
* FileSysID's
|
||||||
|
|
||||||
|
proDOS = $0001 ;ProDOS/SOS
|
||||||
|
dos33 = $0002 ;DOS 3.3
|
||||||
|
dos32 = $0003 ;DOS 3.2
|
||||||
|
dos31 = $0003 ;DOS 3.1
|
||||||
|
appleIIPascal = $0004 ;Apple II Pascal
|
||||||
|
mfs = $0005 ;Macintosh (flat file system)
|
||||||
|
hfs = $0006 ;Macintosh (hierarchical file system)
|
||||||
|
lisa = $0007 ;Lisa file system
|
||||||
|
appleCPM = $0008 ;Apple CP/M
|
||||||
|
charFST = $0009 ;Character FST
|
||||||
|
msDOS = $000A ;MS/DOS
|
||||||
|
highSierra = $000B ;High Sierra
|
||||||
|
|
||||||
|
* fileSysID (NEW FOR GSOS 5.0)
|
||||||
|
|
||||||
|
ProDOSFSID = $01 ;ProDOS/SOS
|
||||||
|
dos33FSID = $02 ;DOS 3.3
|
||||||
|
dos32FSID = $03 ;DOS 3.2
|
||||||
|
dos31FSID = $03 ;DOS 3.1
|
||||||
|
appleIIPascalFSID = $04 ;Apple II Pascal
|
||||||
|
mfsFSID = $05 ;Macintosh (flat file system)
|
||||||
|
hfsFSID = $06 ;Macintosh (hierarchical file system)
|
||||||
|
lisaFSID = $07 ;Lisa file system
|
||||||
|
appleCPMFSID = $08 ;Apple CP/M
|
||||||
|
charFSTFSID = $09 ;Character FST
|
||||||
|
msDOSFSID = $0A ;MS/DOS
|
||||||
|
highSierraFSID = $0B ;High Sierra
|
||||||
|
ISO9660FSID = $0C ;ISO 9660
|
||||||
|
AppleShare = $0D ;AppleShare
|
||||||
|
|
||||||
|
* FSTInfo.attributes
|
||||||
|
|
||||||
|
characterFST = $4000 ;character FST
|
||||||
|
ucFST = $8000 ;SCM should upper case pathnames before
|
||||||
|
; passing them to the FST
|
||||||
|
* QuitRec.flags
|
||||||
|
|
||||||
|
onStack = $8000 ;place state information about quitting
|
||||||
|
; program on the quit return stack
|
||||||
|
restartable = $4000 ;the quitting program is capable of being
|
||||||
|
; restarted from its dormant memory
|
||||||
|
* StorageType
|
||||||
|
|
||||||
|
seedling = $0001 ;standard file with seedling structure
|
||||||
|
standardFile = $01 ;standard file type (no resource fork)
|
||||||
|
sapling = $0002 ;standard file with sapling structure
|
||||||
|
tree = $0003 ;standard file with tree structure
|
||||||
|
pascalRegion = $0004 ;UCSD Pascal region on a partitioned disk
|
||||||
|
extendedFile = $0005 ;extended file type (with resource fork)
|
||||||
|
directoryFile = $000D ;volume directory or subdirectory file
|
||||||
|
|
||||||
|
* version
|
||||||
|
|
||||||
|
minorRelNum = $00FF ;version - minor release number
|
||||||
|
majorRelNum = $7F00 ;version - major release number
|
||||||
|
finalRel = $8000 ;version - final release
|
||||||
|
|
||||||
|
isFileExtended = $8000
|
||||||
|
|
||||||
|
*-----------------------------------------------
|
||||||
|
* GSOS Call ID numbers, as is for class '0'
|
||||||
|
*
|
||||||
|
* 'OR' these numbers with $2000 for class '1'
|
||||||
|
* See the macros iGSOS and sGSOS.
|
||||||
|
*
|
||||||
|
* NOTE: The v4.0 and v5.0 calls are identical with
|
||||||
|
* the exception that the APW v5.0 macros have
|
||||||
|
* 'GS' appended to the end of each call name.
|
||||||
|
|
||||||
|
_Create = $0001
|
||||||
|
_Destroy = $0002
|
||||||
|
_OSShutdown = $2003 ;class '1' only
|
||||||
|
_ChangePath = $0004
|
||||||
|
_SetFileInfo = $0005
|
||||||
|
_GetFileInfo = $0006
|
||||||
|
_Volume = $0008
|
||||||
|
_SetPrefix = $0009
|
||||||
|
_GetPrefix = $000A
|
||||||
|
_ClearBackupBit = $000B
|
||||||
|
_SetSysPrefs = $200C ;class '1' only
|
||||||
|
_Null = $200D ;class '1' only
|
||||||
|
_ExpandPath = $200E ;class '1' only
|
||||||
|
_GetSysPrefs = $200F ;class '1' only
|
||||||
|
_Open = $0010
|
||||||
|
_Newline = $0011
|
||||||
|
_Read = $0012
|
||||||
|
_Write = $0013
|
||||||
|
_Close = $0014
|
||||||
|
_Flush = $0015
|
||||||
|
_SetMark = $0016
|
||||||
|
_GetMark = $0017
|
||||||
|
_SetEOF = $0018
|
||||||
|
_GetEOF = $0019
|
||||||
|
_SetLevel = $001A
|
||||||
|
_GetLevel = $001B
|
||||||
|
_GetDirEntry = $001C
|
||||||
|
_BeginSession = $201D ;class '1' only
|
||||||
|
_EndSession = $201E ;class '1' only
|
||||||
|
_SessionStatus = $201F ;class '1' only
|
||||||
|
_GetDevNumber = $0020
|
||||||
|
_GetLastDev = $0021
|
||||||
|
_ReadBlock = $0022 ;class '0' only
|
||||||
|
_WriteBlock = $0023 ;class '0' only
|
||||||
|
_Format = $0024
|
||||||
|
_EraseDisk = $0025
|
||||||
|
_ResetCache = $2026 ;class '1' only
|
||||||
|
_GetName = $0027
|
||||||
|
_GetBootVol = $0028
|
||||||
|
_Quit = $0029
|
||||||
|
_GetVersion = $002A
|
||||||
|
_GetFSTInfo = $202B ;class '1' only
|
||||||
|
_DInfo = $002C
|
||||||
|
_DStatus = $202D ;class '1' only
|
||||||
|
_DControl = $202E ;class '1' only
|
||||||
|
_DRead = $202F ;class '1' only
|
||||||
|
_DWrite = $2030 ;class '1' only
|
||||||
|
_AllocInterrupt = $0031 ;P16 call
|
||||||
|
_BindInt = $2031 ;GS/OS call
|
||||||
|
_DeallocInterrupt = $0032 ;P16 call
|
||||||
|
_UnbindInt = $2032 'GS/OS call
|
||||||
|
_AddNotifyProc = $2034 ;class '1' only
|
||||||
|
_DelNotifyProc = $2035 ;class '1' only
|
||||||
|
_DRename = $2036 ;class '1' only
|
||||||
|
_GetStdRefNum = $2037 ;class '1' only
|
||||||
|
_GetRefNum = $2038 ;class '1' only
|
||||||
|
_GetRefInfo = $2039 ;class '1' only
|
||||||
|
|
||||||
|
|
||||||
|
*===============================================
|
||||||
|
* Class 1 parameter tables.
|
||||||
|
* (partial listing for reference only.)
|
||||||
|
* (also refer to the class_1 help file)
|
||||||
|
|
||||||
|
DUM 0 ; Currently set so the following doesn't
|
||||||
|
; generate any code if you include this
|
||||||
|
; entire file in your source file with
|
||||||
|
; a PUT or USE.
|
||||||
|
|
||||||
|
ChangePathRec DA 0 ;pCount
|
||||||
|
ADRL 0 ;pathname
|
||||||
|
ADRL 0 ;newPathname
|
||||||
|
|
||||||
|
CreateRec DA 0 ;pCount
|
||||||
|
ADRL 0 ;pathname
|
||||||
|
DA 0 ;access
|
||||||
|
DA 0 ;fileType
|
||||||
|
ADRL 0 ;auxType
|
||||||
|
DA 0 ;storageType
|
||||||
|
ADRL 0 ;eof
|
||||||
|
ADRL 0 ;resourceEOF
|
||||||
|
|
||||||
|
DAccessRec DA 0 ;pCount
|
||||||
|
DA 0 ;devNum
|
||||||
|
DA 0 ;code
|
||||||
|
ADRL 0 ;list
|
||||||
|
ADRL 0 ;requestCount
|
||||||
|
ADRL 0 ;transferCount
|
||||||
|
|
||||||
|
DevNumRec DA 0 ;pCount
|
||||||
|
ADRL 0 ;devName
|
||||||
|
DA 0 ;devNum
|
||||||
|
|
||||||
|
DInfoRec DA 0 ;pCount
|
||||||
|
DA 0 ;devNum
|
||||||
|
ADRL 0 ;devName
|
||||||
|
DA 0 ;characteristics
|
||||||
|
ADRL 0 ;totalBlocks
|
||||||
|
DA 0 ;slotNum
|
||||||
|
DA 0 ;unitNum
|
||||||
|
DA 0 ;version
|
||||||
|
DA 0 ;deviceID
|
||||||
|
DA 0 ;headLink
|
||||||
|
DA 0 ;forwardLink
|
||||||
|
|
||||||
|
DIORec DA 0 ;pCount
|
||||||
|
DA 0 ;devNum
|
||||||
|
ADRL 0 ;buffer
|
||||||
|
ADRL 0 ;requestCount
|
||||||
|
ADRL 0 ;startingBlock
|
||||||
|
DA 0 ;blockSize
|
||||||
|
ADRL 0 ;transferCount
|
||||||
|
|
||||||
|
DirEntryRec DA 0 ;pCount
|
||||||
|
DA 0 ;refNum
|
||||||
|
DA 0 ;flags
|
||||||
|
DA 0 ;base
|
||||||
|
DA 0 ;displacement
|
||||||
|
ADRL 0 ;name
|
||||||
|
DA 0 ;entryNum
|
||||||
|
DA 0 ;fileType
|
||||||
|
ADRL 0 ;eof
|
||||||
|
ADRL 0 ;blockCount
|
||||||
|
DS 8 ;createDateTime
|
||||||
|
DS 8 ;modDateTime
|
||||||
|
DA 0 ;access
|
||||||
|
ADRL 0 ;auxType
|
||||||
|
DA 0 ;fileSysID
|
||||||
|
ADRL 0 ;optionList
|
||||||
|
ADRL 0 ;resourceEof
|
||||||
|
ADRL 0 ;resourceBlocks
|
||||||
|
|
||||||
|
ExpandPathRec DA 0 ;pCount
|
||||||
|
ADRL 0 ;inputPath
|
||||||
|
ADRL 0 ;outputPath
|
||||||
|
DA 0 ;flags
|
||||||
|
|
||||||
|
FileInfoRec DA 0 ;pCount
|
||||||
|
ADRL 0 ;pathname
|
||||||
|
DA 0 ;access
|
||||||
|
DA 0 ;fileType
|
||||||
|
ADRL 0 ;auxType
|
||||||
|
DA 0 ;null/storageType
|
||||||
|
DS 8 ;createDateTime
|
||||||
|
DS 8 ;modDateTime
|
||||||
|
ADRL 0 ;optionList
|
||||||
|
ADRL 0 ;null/eof
|
||||||
|
ADRL 0 ;null/blocksUsed
|
||||||
|
ADRL 0 ;null/resourceEOF
|
||||||
|
ADRL 0 ;null/resourceBlocks
|
||||||
|
|
||||||
|
FormatRec DA 0 ;pCount
|
||||||
|
ADRL 0 ;devName
|
||||||
|
ADRL 0 ;volName
|
||||||
|
DA 0 ;fileSysID
|
||||||
|
|
||||||
|
FSTInfoRec DA 0 ;pCount
|
||||||
|
DA 0 ;fstNum
|
||||||
|
DA 0 ;fileSysId
|
||||||
|
ADRL 0 ;fstName
|
||||||
|
DA 0 ;version
|
||||||
|
DA 0 ;attributes
|
||||||
|
DA 0 ;blockSize
|
||||||
|
ADRL 0 ;maxVolSize
|
||||||
|
ADRL 0 ;maxFileSize
|
||||||
|
|
||||||
|
InterruptRec DA 0 ;pCount
|
||||||
|
DA 0 ;intNum
|
||||||
|
DA 0 ;vrn
|
||||||
|
ADRL 0 ;intCode
|
||||||
|
|
||||||
|
IORec DA 0 ;pCount
|
||||||
|
DA 0 ;refNum
|
||||||
|
ADRL 0 ;dataBuffer
|
||||||
|
ADRL 0 ;requestCount
|
||||||
|
ADRL 0 ;transferCount
|
||||||
|
DA 0 ;cachePriority
|
||||||
|
|
||||||
|
LevelRec DA 0 ;pCount
|
||||||
|
DA 0 ;level
|
||||||
|
|
||||||
|
NameRec DA 0 ;pCount
|
||||||
|
ADRL 0 ;pathname
|
||||||
|
|
||||||
|
NewlineRec DA 0 ;pCount
|
||||||
|
DA 0 ;refNum
|
||||||
|
DA 0 ;enableMask
|
||||||
|
DA 0 ;numChars
|
||||||
|
ADRL 0 ;newlineTable
|
||||||
|
|
||||||
|
OpenRec DA 0 ;pCount
|
||||||
|
DA 0 ;refNum
|
||||||
|
ADRL 0 ;pathname
|
||||||
|
DA 0 ;requestAccess
|
||||||
|
DA 0 ;resourceNumber
|
||||||
|
DA 0 ;access
|
||||||
|
DA 0 ;fileType
|
||||||
|
ADRL 0 ;auxType
|
||||||
|
DA 0 ;storageType
|
||||||
|
DS 8 ;createDateTime
|
||||||
|
DS 8 ;modDateTime
|
||||||
|
ADRL 0 ;optionList
|
||||||
|
ADRL 0 ;eof
|
||||||
|
ADRL 0 ;blocksUsed
|
||||||
|
ADRL 0 ;resourceEOF
|
||||||
|
ADRL 0 ;resourceBlocks
|
||||||
|
|
||||||
|
PositionRec DA 0 ;pCount
|
||||||
|
DA 0 ;refNum
|
||||||
|
ADRL 0 ;position
|
||||||
|
|
||||||
|
PrefixRec DA 0 ;pCount
|
||||||
|
DA 0 ;prefixNum
|
||||||
|
ADRL 0 ;prefix
|
||||||
|
|
||||||
|
QuitRec DA 0 ;pCount
|
||||||
|
ADRL 0 ;pathname
|
||||||
|
DA 0 ;flags
|
||||||
|
|
||||||
|
RefNumRec DA 0 ;pCount
|
||||||
|
DA 0 ;refNum
|
||||||
|
|
||||||
|
SetPositionRec DA 0 ;pCount
|
||||||
|
DA 0 ;refNum
|
||||||
|
DA 0 ;base
|
||||||
|
ADRL 0 ;displacement
|
||||||
|
|
||||||
|
ShutdownRec DA 0 ;pCount
|
||||||
|
DA 0 ;flag
|
||||||
|
|
||||||
|
TimeRec DB 0 ;second
|
||||||
|
DB 0 ;minute
|
||||||
|
DB 0 ;hour
|
||||||
|
DB 0 ;year
|
||||||
|
DB 0 ;day
|
||||||
|
DB 0 ;month
|
||||||
|
DB 0 ;extra
|
||||||
|
DB 0 ;weekDay
|
||||||
|
|
||||||
|
VersionRec DA 0 ;pCount
|
||||||
|
DA 0 ;version
|
||||||
|
|
||||||
|
VolumeRec DA 0 ;pCount
|
||||||
|
ADRL 0 ;devName
|
||||||
|
ADRL 0 ;volName
|
||||||
|
ADRL 0 ;totalBlocks
|
||||||
|
ADRL 0 ;freeBlocks
|
||||||
|
DA 0 ;fileSysID
|
||||||
|
DA 0 ;blockSize
|
||||||
|
|
||||||
|
DEND ; End of dummy section...
|
|
@ -0,0 +1,34 @@
|
||||||
|
|
||||||
|
; File: E16.IntMath
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
|
||||||
|
imBadInptParam equ $0B01 ; IntMath error - bad input parameter
|
||||||
|
imIllegalChar equ $0B02 ; IntMath error - Illegal character in s
|
||||||
|
;tring
|
||||||
|
imOverflow equ $0B03 ; IntMath error - integer or long integer o
|
||||||
|
;verflow
|
||||||
|
imStrOverflow equ $0B04 ; IntMath error - string overflow
|
||||||
|
|
||||||
|
minLongint equ $80000000 ; Limit - minimum negative signed long
|
||||||
|
;integer
|
||||||
|
minFrac equ $80000000 ; Limit - pinned value for negative Frac o
|
||||||
|
;verflow
|
||||||
|
minFixed equ $80000000 ; Limit - pinned value for negative Fixed
|
||||||
|
; overflow
|
||||||
|
minInt equ $8000 ; Limit - minimum negative signed integer
|
||||||
|
maxInt equ $7FFF ; Limit - maximum positive signed integer
|
||||||
|
maxUInt equ $FFFF ; Limit - maximum unsigned integer
|
||||||
|
maxLongint equ $7FFFFFFF ; Limit - maximum positive signed Longi
|
||||||
|
;nt
|
||||||
|
maxFrac equ $7FFFFFFF ; Limit - pinned value for positive Frac o
|
||||||
|
;verflow
|
||||||
|
maxFixed equ $7FFFFFFF ; Limit - pinned value for positive Fixed
|
||||||
|
; overflow
|
||||||
|
maxULong equ $FFFFFFFF ; Limit - maximum unsigned Long
|
||||||
|
|
||||||
|
unsignedFlag equ $0000 ; SignedFlag -
|
||||||
|
signedFlag equ $0001 ; SignedFlag -
|
|
@ -0,0 +1,36 @@
|
||||||
|
|
||||||
|
; File: E16.LineEdit
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
|
||||||
|
leDupStrtUpErr equ $1401 ; LineEdit error - duplicate LEStartup
|
||||||
|
;call
|
||||||
|
leResetErr equ $1402 ; LineEdit error - can't reset Line Edit
|
||||||
|
leNotActiveErr equ $1403 ; LineEdit error - Line Edit not active
|
||||||
|
leScrapErr equ $1404 ; LineEdit error - desk scrap too big to co
|
||||||
|
;py
|
||||||
|
|
||||||
|
oleLineHandle equ $00 ; Handle - LERec -
|
||||||
|
oleLength equ $04 ; Integer - LERec -
|
||||||
|
oleMaxLength equ $06 ; Integer - LERec -
|
||||||
|
oleDestRect equ $08 ; Rect - LERec -
|
||||||
|
oleViewRect equ $10 ; Rect - LERec -
|
||||||
|
olePort equ $18 ; GrafPortPtr - LERec -
|
||||||
|
oleLineHite equ $1C ; Integer - LERec -
|
||||||
|
oleBaseHite equ $1E ; Integer - LERec -
|
||||||
|
oleSelStart equ $20 ; Integer - LERec -
|
||||||
|
oleSelEnd equ $22 ; Integer - LERec -
|
||||||
|
oleActFlg equ $24 ; Word - LERec -
|
||||||
|
oleCarAct equ $26 ; Word - LERec -
|
||||||
|
oleCarOn equ $28 ; Word - LERec -
|
||||||
|
oleCarTime equ $2A ; Longint - LERec -
|
||||||
|
oleHiliteHook equ $2E ; Pointer - LERec -
|
||||||
|
oleCaretHook equ $32 ; Pointer - LERec -
|
||||||
|
|
||||||
|
leJustLeft equ $0000 ; Justification -
|
||||||
|
leJustCenter equ $0001 ; Justification -
|
||||||
|
leJustFill equ $0002 ; Justification -
|
||||||
|
leJustRight equ $FFFF ; Justification -
|
|
@ -0,0 +1,59 @@
|
||||||
|
|
||||||
|
; File: E16.List
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
|
||||||
|
omemPtr equ $0 ; Pointer - MemRec - Pointer to string, or custom
|
||||||
|
omemFlag equ $4 ; Byte - MemRec - Bit Flag
|
||||||
|
|
||||||
|
olistFrameClr equ $00 ; Word - LColorTable - Frame color
|
||||||
|
olistNorTextClr equ $2 ; Word - LColorTable - Unhighlighted text
|
||||||
|
; color
|
||||||
|
olistSelTextClr equ $4 ; Word - LColorTable - Highlighted text c
|
||||||
|
;olor
|
||||||
|
olistNorBackClr equ $6 ; Word - LColorTable - Unhighlighted back
|
||||||
|
;ground color
|
||||||
|
olistSelBackClr equ $8 ; Word - LColorTable - Highlighted backgr
|
||||||
|
;aound color
|
||||||
|
|
||||||
|
; Front of ListCtlRec matches CtlRec
|
||||||
|
octlMemDraw equ $28 ; Pointer - ListCtlRec - Address of routine
|
||||||
|
;to draw mem
|
||||||
|
octlMemHeight equ $2C ; Word - ListCtlRec - Member's Height in P
|
||||||
|
;ixels
|
||||||
|
octlMemSize equ $2E ; Word - ListCtlRec - Bytes in member record
|
||||||
|
octlList equ $30 ; MemRecPtr - ListCtlRec - Adress of first memb
|
||||||
|
;er record in array
|
||||||
|
octlListBar equ $34 ; CtlRecHndl - ListCtlRec - Handle of list c
|
||||||
|
;ontrlo's scroll bar control
|
||||||
|
|
||||||
|
olistRect equ $0 ; Rect - ListRec - Enclosing Rectangle
|
||||||
|
olistSize equ $8 ; Word - ListRec - Number of List Members
|
||||||
|
olistView equ $A ; Word - ListRec - Max Viewable members
|
||||||
|
olistType equ $C ; Word - ListRec - Bit Flag
|
||||||
|
olistStart equ $E ; Word - ListRec - First member in view
|
||||||
|
olistCtl equ $10 ; CtlRecHndl - ListRec - List control's handle
|
||||||
|
olistDraw equ $14 ; Pointer - ListRec - Adress of Custum drawing
|
||||||
|
; routine
|
||||||
|
olistMemHeight equ $18 ; Word - ListRec - Height of list members
|
||||||
|
olistMemSize equ $1A ; Word - ListRec - Size of Member Records
|
||||||
|
olistPointer equ $1C ; MemRecPtr - ListRec - Pointer to first el
|
||||||
|
;ement in MemRec[]
|
||||||
|
olistRefCon equ $20 ; Long - ListRec - becomes Control's refCon
|
||||||
|
olistScrollClr equ $24 ; BarColorsPtr - ListRec - Color table fo
|
||||||
|
;r list's scroll bar
|
||||||
|
|
||||||
|
cString equ $0001 ; ListType bit mask - null terminated string t
|
||||||
|
;ype
|
||||||
|
LIST_STRG equ $0001 ; ListType bit mask - null terminated string
|
||||||
|
; type
|
||||||
|
selectOnlyOne equ $0002 ; ListType bit mask - only one selection
|
||||||
|
; allowed
|
||||||
|
LIST_SELECT equ $0002 ; ListType bit mask - single selection onl
|
||||||
|
;y
|
||||||
|
|
||||||
|
memDisabled equ $40 ; memFlag - Sets member flag to disabled
|
||||||
|
memSelected equ $80 ; memFlag - Sets member flag to selected
|
|
@ -0,0 +1,31 @@
|
||||||
|
|
||||||
|
; File: E16.Loader
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
|
||||||
|
idNotFound equ $1101 ; Loader error - segment/application/entry
|
||||||
|
;not found
|
||||||
|
idNotLoadFile equ $1104 ; Loader error - file is not a load file
|
||||||
|
idBusyErr equ $1105 ; Loader error - system loader is busy
|
||||||
|
idFilVersErr equ $1107 ; Loader error - file version error
|
||||||
|
idUserIDErr equ $1108 ; Loader error - user ID error
|
||||||
|
idSequenceErr equ $1109 ; Loader error - segnum out of sequence
|
||||||
|
idBadRecordErr equ $110A ; Loader error - illegal load record fo
|
||||||
|
;und
|
||||||
|
idForeignSegErr equ $110B ; Loader error - segment is foreign
|
||||||
|
|
||||||
|
ouserID equ $00 ; Word - InitialLoadOutputRec/RestartRec -
|
||||||
|
ostartAddr equ $02 ; Pointer - InitialLoadOutputRec/RestartRec -
|
||||||
|
odPageAddr equ $06 ; Word - InitialLoadOutputRec/RestartRec -
|
||||||
|
obuffSize equ $08 ; Word - InitialLoadOutputRec/RestartRec -
|
||||||
|
|
||||||
|
osegAddr equ $00 ; Pointer - LoadSegNameOut -
|
||||||
|
ofileNum equ $04 ; Word - LoadSegNameOut -
|
||||||
|
osegNum equ $06 ; Word - LoadSegNameOut -
|
||||||
|
|
||||||
|
ousUserID equ $00 ; Word - UnloadSegOutRec -
|
||||||
|
ousFileNum equ $02 ; Word - UnloadSegOutRec -
|
||||||
|
ousSegNum equ $04 ; Word - UnloadSegOutRec -
|
|
@ -0,0 +1,39 @@
|
||||||
|
* This file is converted from the original source designed for
|
||||||
|
* APW by the Merlin-converter program, written by Brian Fox.
|
||||||
|
*
|
||||||
|
* Converter version 7.11
|
||||||
|
*
|
||||||
|
* Additional editing will be necessary, in addition to running
|
||||||
|
* the Merlin 16 MACGEN utility.
|
||||||
|
*
|
||||||
|
XC
|
||||||
|
XC
|
||||||
|
MX %00 ; Full 65816 mode for Merlin
|
||||||
|
**************************************************************
|
||||||
|
|
||||||
|
; File: E16.Locator
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
|
||||||
|
toolNotFoundErr equ $0001 ; Locator error -
|
||||||
|
funcNotFoundErr equ $0002 ; Locator error -
|
||||||
|
toolVersionErr equ $0010 ; Locator error -
|
||||||
|
sysStrtMtErr equ $0100 ; Locator error - can't mount system star
|
||||||
|
;tup volume
|
||||||
|
messNotFoundErr equ $0111 ; Locator error -
|
||||||
|
|
||||||
|
addMessage equ $0001 ; Message Center -
|
||||||
|
getMessage equ $0002 ; Message Center -
|
||||||
|
deleteMessage equ $0003 ; Message Center -
|
||||||
|
|
||||||
|
fileInfoType equ $0001 ; MessageCenter - Message type parameter
|
||||||
|
|
||||||
|
mvReturn equ $0001 ; TLMountVolume - like ok for dialogs
|
||||||
|
mvEscape equ $0002 ; TLMountVolume - like cancel for dialogs
|
||||||
|
|
||||||
|
sysTool equ $0000 ; Tool Set Spec -
|
||||||
|
userTool equ $8000 ; Tool Set Spec -
|
||||||
|
|
|
@ -0,0 +1,39 @@
|
||||||
|
|
||||||
|
; File: E16.Memory
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
;
|
||||||
|
|
||||||
|
memErr equ $0201 ; error - unable to allocate block
|
||||||
|
emptyErr equ $0202 ; error - illegal operation, empty handle
|
||||||
|
notEmptyErr equ $0203 ; error - an empty handle was expected for
|
||||||
|
; this operation
|
||||||
|
lockErr equ $0204 ; error - illegal operation on a locked block
|
||||||
|
purgeErr equ $0205 ; error - attempt to purge an unpurgable bloc
|
||||||
|
;k
|
||||||
|
handleErr equ $0206 ; error - an invalid handle was given
|
||||||
|
idErr equ $0207 ; error - an invalid owner ID was given
|
||||||
|
attrErr equ $0208 ; error - operation illegal on block with give
|
||||||
|
;n attributes
|
||||||
|
|
||||||
|
attrNoPurge equ $0000 ; Handle Attribute Bits - Not purgeable
|
||||||
|
attrBank equ $0001 ; Handle Attribute Bits - fixed bank
|
||||||
|
attrAddr equ $0002 ; Handle Attribute Bits - fixed address
|
||||||
|
attrPage equ $0004 ; Handle Attribute Bits - page aligned
|
||||||
|
attrNoSpec equ $0008 ; Handle Attribute Bits - may not use speci
|
||||||
|
;al memory
|
||||||
|
attrNoCross equ $0010 ; Handle Attribute Bits - may not cross ba
|
||||||
|
;nks
|
||||||
|
attrPurge1 equ $0100 ; Handle Attribute Bits - Purge level 1
|
||||||
|
attrPurge2 equ $0200 ; Handle Attribute Bits - Purge level 2
|
||||||
|
attrPurge3 equ $0300 ; Handle Attribute Bits - Purge level 3
|
||||||
|
attrPurge equ $0300 ; Handle Attribute Bits - test or set both p
|
||||||
|
;urge bits
|
||||||
|
attrHandle equ $1000 ; Handle Attribute Bits - block of master p
|
||||||
|
;ointers
|
||||||
|
attrSystem equ $2000 ; Handle Attribute Bits - system handle
|
||||||
|
attrFixed equ $4000 ; Handle Attribute Bits - not movable
|
||||||
|
attrLocked equ $8000 ; Handle Attribute Bits - locked
|
|
@ -0,0 +1,45 @@
|
||||||
|
|
||||||
|
; File: E16.Menu
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
;
|
||||||
|
|
||||||
|
omenuID equ $00 ; Word - MenuRec - Menu's ID number.
|
||||||
|
omenuWidth equ $02 ; Word - MenuRec - Width of menu.
|
||||||
|
omenuHeight equ $04 ; Word - MenuRec - Height of menu.
|
||||||
|
omenuProc equ $06 ; Pointer - MenuRec - Menu's definition proced
|
||||||
|
;ure.
|
||||||
|
omenuFlag equ $0A ; Byte - MenuRec - Bit flags.
|
||||||
|
omenuRes equ $0B ; Byte - MenuRec -
|
||||||
|
ofirstItem equ $0C ; Byte - MenuRec -
|
||||||
|
onumOfItems equ $0D ; Byte - MenuRec -
|
||||||
|
otitleWidth equ $0E ; Word - MenuRec - Width of menu's title.
|
||||||
|
otitleName equ $10 ; Pointer - MenuRec - Menu's title.
|
||||||
|
|
||||||
|
mDrawMsg equ $0000 ; MenuDefProcCodes -
|
||||||
|
mChooseMsg equ $0001 ; MenuDefProcCodes -
|
||||||
|
mSizeMsg equ $0002 ; MenuDefProcCodes -
|
||||||
|
mDrawTitle equ $0003 ; MenuDefProcCodes -
|
||||||
|
mDrawMItem equ $0004 ; MenuDefProcCodes -
|
||||||
|
mGetMItemID equ $0005 ; MenuDefProcCodes -
|
||||||
|
|
||||||
|
mInvis equ $0004 ; MenuFlag -
|
||||||
|
mCustom equ $0010 ; MenuFlag -
|
||||||
|
mXor equ $0020 ; MenuFlag -
|
||||||
|
mSelected equ $0040 ; MenuFlag -
|
||||||
|
mDisabled equ $0080 ; MenuFlag -
|
||||||
|
|
||||||
|
customMenu equ $0010 ; MenuFlagMasks -
|
||||||
|
xorMItemHilite equ $0020 ; MenuFlagMasks -
|
||||||
|
xorTitleHilite equ $0020 ; MenuFlagMasks -
|
||||||
|
underMItem equ $0040 ; MenuFlagMasks -
|
||||||
|
disableMenu equ $0080 ; MenuFlagMasks -
|
||||||
|
enableMenu equ $FF7F ; MenuFlagMasks -
|
||||||
|
noUnderMItem equ $FFBF ; MenuFlagMasks -
|
||||||
|
colorMItemHilite equ $FFDF ; MenuFlagMasks -
|
||||||
|
colorTitleHilite equ $FFDF ; MenuFlagMasks -
|
||||||
|
colorReplace equ $FFDF ; MenuFlagMasks -
|
||||||
|
standardMenu equ $FFEF ; MenuFlagMasks -
|
|
@ -0,0 +1,309 @@
|
||||||
|
|
||||||
|
; File: E16.MiscTool
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
;
|
||||||
|
|
||||||
|
badInputErr equ $0301 ; MiscTool error - bad input parameter
|
||||||
|
noDevParamErr equ $0302 ; MiscTool error - no device for input p
|
||||||
|
;arameter
|
||||||
|
taskInstlErr equ $0303 ; MiscTool error - task already installed
|
||||||
|
; error
|
||||||
|
noSigTaskErr equ $0304 ; MiscTool error - no signature in task h
|
||||||
|
;eader
|
||||||
|
queueDmgdErr equ $0305 ; MiscTool error - queue has been damaged
|
||||||
|
; error
|
||||||
|
taskNtFdErr equ $0306 ; MiscTool error - task was not found erro
|
||||||
|
;r
|
||||||
|
firmTaskErr equ $0307 ; MiscTool error - firmware task was unsuc
|
||||||
|
;cessful
|
||||||
|
hbQueueBadErr equ $0308 ; MiscTool error - heartbeat queue damag
|
||||||
|
;ed
|
||||||
|
unCnctdDevErr equ $0309 ; MT error - attempted to dispatch to un
|
||||||
|
;connected device
|
||||||
|
idTagNtAvlErr equ $030B ; MiscTool error - ID tag not available
|
||||||
|
pdosUnClmdIntErr equ $0001 ;MT- error - ProDOS unclaimed interru
|
||||||
|
;pt error
|
||||||
|
divByZeroErr equ $0004 ; MiscTool error - divide by zero error
|
||||||
|
pdosVCBErr equ $000A ; MiscTool error - ProDOS VCB unusable
|
||||||
|
pdosFCBErr equ $000B ; MiscTool error - ProDOS FCB unusable
|
||||||
|
pdosBlk0Err equ $000C ; MT error - ProDOS block zero allocated i
|
||||||
|
;llegally
|
||||||
|
pdosIntShdwErr equ $000D ; MT error - ProDOS interrupt w/ shadow
|
||||||
|
;ing off
|
||||||
|
segLoader1Err equ $0015 ; MiscTool error - segment loader error
|
||||||
|
sPackage0Err equ $0017 ; MiscTool error - can't load a package
|
||||||
|
package1Err equ $0018 ; MiscTool error - can't load a package
|
||||||
|
package2Err equ $0019 ; MiscTool error - can't load a package
|
||||||
|
package3Err equ $001A ; MiscTool error - can't load a package
|
||||||
|
package4Err equ $001B ; MiscTool error - can't load a package
|
||||||
|
package5Err equ $001C ; MiscTool error - can't load a package
|
||||||
|
package6Err equ $001D ; MiscTool error - can't load a package
|
||||||
|
package7Err equ $001E ; MiscTool error - can't load a package
|
||||||
|
package8Err equ $0020 ; MiscTool error - can't load a package
|
||||||
|
package9Err equ $0021 ; MiscTool error - can't load a package
|
||||||
|
package10Err equ $0022 ; MiscTool error - can't load a package
|
||||||
|
package11Err equ $0023 ; MiscTool error - can't load a package
|
||||||
|
package12Err equ $0024 ; MiscTool error - can't load a package
|
||||||
|
outOfMemErr equ $0025 ; MiscTool error - out of memory error
|
||||||
|
segLoader2Err equ $0026 ; MiscTool error - segment loader error
|
||||||
|
fMapTrshdErr equ $0027 ; MiscTool error - file map trashed
|
||||||
|
stkOvrFlwErr equ $0028 ; MiscTool error - stack overflow error
|
||||||
|
psInstDiskErr equ $0030 ; error - Please Insert Disk (file manag
|
||||||
|
;er alert)
|
||||||
|
memMgr1Err equ $0032 ; MiscTool error - memory manager error
|
||||||
|
memMgr2Err equ $0033 ; MiscTool error - memory manager error
|
||||||
|
memMgr3Err equ $0034 ; MiscTool error - memory manager error
|
||||||
|
memMgr4Err equ $0035 ; MiscTool error - memory manager error
|
||||||
|
memMgr5Err equ $0036 ; MiscTool error - memory manager error
|
||||||
|
memMgr6Err equ $0037 ; MiscTool error - memory manager error
|
||||||
|
memMgr7Err equ $0038 ; MiscTool error - memory manager error
|
||||||
|
memMgr8Err equ $0039 ; MiscTool error - memory manager error
|
||||||
|
memMgr9Err equ $003A ; MiscTool error - memory manager error
|
||||||
|
memMgr10Err equ $003B ; MiscTool error - memory manager error
|
||||||
|
memMgr11Err equ $003C ; MiscTool error - memory manager error
|
||||||
|
memMgr12Err equ $003D ; MiscTool error - memory manager error
|
||||||
|
memMgr13Err equ $003E ; MiscTool error - memory manager error
|
||||||
|
memMgr14Err equ $003F ; MiscTool error - memory manager error
|
||||||
|
memMgr15Err equ $0040 ; MiscTool error - memory manager error
|
||||||
|
memMgr16Err equ $0041 ; MiscTool error - memory manager error
|
||||||
|
memMgr17Err equ $0042 ; MiscTool error - memory manager error
|
||||||
|
memMgr18Err equ $0043 ; MiscTool error - memory manager error
|
||||||
|
memMgr19Err equ $0044 ; MiscTool error - memory manager error
|
||||||
|
memMgr20Err equ $0045 ; MiscTool error - memory manager error
|
||||||
|
memMgr21Err equ $0046 ; MiscTool error - memory manager error
|
||||||
|
memMgr22Err equ $0047 ; MiscTool error - memory manager error
|
||||||
|
memMgr23Err equ $0048 ; MiscTool error - memory manager error
|
||||||
|
memMgr24Err equ $0049 ; MiscTool error - memory manager error
|
||||||
|
memMgr25Err equ $004A ; MiscTool error - memory manager error
|
||||||
|
memMgr26Err equ $004B ; MiscTool error - memory manager error
|
||||||
|
memMgr27Err equ $004C ; MiscTool error - memory manager error
|
||||||
|
memMgr28Err equ $004D ; MiscTool error - memory manager error
|
||||||
|
memMgr29Err equ $004E ; MiscTool error - memory manager error
|
||||||
|
memMgr30Err equ $004F ; MiscTool error - memory manager error
|
||||||
|
memMgr31Err equ $0050 ; MiscTool error - memory manager error
|
||||||
|
memMgr32Err equ $0051 ; MiscTool error - memory manager error
|
||||||
|
memMgr33Err equ $0052 ; MiscTool error - memory manager error
|
||||||
|
memMgr34Err equ $0053 ; MiscTool error - memory manager error
|
||||||
|
|
||||||
|
stupVolMntErr equ $0100 ; can't mount system start up vol.
|
||||||
|
|
||||||
|
osecond equ $00 ; byte - TimeRec
|
||||||
|
ominute equ $01 ; byte - TimeRec
|
||||||
|
ohour equ $02 ; byte - TimeRec
|
||||||
|
oyear equ $03 ; byte - TimeRec
|
||||||
|
oday equ $04 ; byte - TimeRec
|
||||||
|
omonth equ $05 ; byte - TimeRec
|
||||||
|
oextra equ $06 ; byte - TimeRec
|
||||||
|
oweekDay equ $07 ; byte - TimeRec
|
||||||
|
|
||||||
|
omouseMode equ $00 ; byte - MouseRec
|
||||||
|
omouseStatus equ $01 ; byte - MouseRec
|
||||||
|
oyPos equ $02 ; word - MouseRec
|
||||||
|
oxPos equ $04 ; word - MouseRec
|
||||||
|
|
||||||
|
oyMaxClamp equ $00 ; word - ClampRec
|
||||||
|
oyMinClamp equ $02 ; word - ClampRec
|
||||||
|
oxMaxClamp equ $04 ; word - ClampRec
|
||||||
|
oxMinClamp equ $06 ; word - ClampRec
|
||||||
|
|
||||||
|
oyRegExit equ $00 ; word - FWRec
|
||||||
|
oxRegExit equ $02 ; word - FWRec
|
||||||
|
oaRegExit equ $04 ; word - FWRec
|
||||||
|
ostatus equ $06 ; word - FWRec
|
||||||
|
|
||||||
|
p1PrntModem equ $0000 ; Battery Ram Parameter Ref Number -
|
||||||
|
p1LineLnth equ $0001 ; Battery Ram Parameter Ref Number -
|
||||||
|
p1DelLine equ $0002 ; Battery Ram Parameter Ref Number -
|
||||||
|
p1AddLine equ $0003 ; Battery Ram Parameter Ref Number -
|
||||||
|
p1Echo equ $0004 ; Battery Ram Parameter Ref Number -
|
||||||
|
p1Buffer equ $0005 ; Battery Ram Parameter Ref Number -
|
||||||
|
p1Baud equ $0006 ; Battery Ram Parameter Ref Number -
|
||||||
|
p1DtStpBits equ $0007 ; Battery Ram Parameter Ref Number -
|
||||||
|
p1Parity equ $0008 ; Battery Ram Parameter Ref Number -
|
||||||
|
p1DCDHndShk equ $0009 ; Battery Ram Parameter Ref Number -
|
||||||
|
p1DSRHndShk equ $000A ; Battery Ram Parameter Ref Number -
|
||||||
|
p1XnfHndShk equ $000B ; Battery Ram Parameter Ref Number -
|
||||||
|
p2PrntModem equ $000C ; Battery Ram Parameter Ref Number -
|
||||||
|
p2LineLnth equ $000D ; Battery Ram Parameter Ref Number -
|
||||||
|
p2DelLine equ $000E ; Battery Ram Parameter Ref Number -
|
||||||
|
p2AddLine equ $000F ; Battery Ram Parameter Ref Number -
|
||||||
|
p2Echo equ $0010 ; Battery Ram Parameter Ref Number -
|
||||||
|
p2Buffer equ $0011 ; Battery Ram Parameter Ref Number -
|
||||||
|
p2Baud equ $0012 ; Battery Ram Parameter Ref Number -
|
||||||
|
p2DtStpBits equ $0013 ; Battery Ram Parameter Ref Number -
|
||||||
|
p2Parity equ $0014 ; Battery Ram Parameter Ref Number -
|
||||||
|
p2DCDHndShk equ $0015 ; Battery Ram Parameter Ref Number -
|
||||||
|
p2DSRHndShk equ $0016 ; Battery Ram Parameter Ref Number -
|
||||||
|
p2XnfHndShk equ $0017 ; Battery Ram Parameter Ref Number -
|
||||||
|
dspColMono equ $0018 ; Battery Ram Parameter Ref Number -
|
||||||
|
dsp40or80 equ $0019 ; Battery Ram Parameter Ref Number -
|
||||||
|
dspTxtColor equ $001A ; Battery Ram Parameter Ref Number -
|
||||||
|
dspBckColor equ $001B ; Battery Ram Parameter Ref Number -
|
||||||
|
dspBrdColor equ $001C ; Battery Ram Parameter Ref Number -
|
||||||
|
hrtz50or60 equ $001D ; Battery Ram Parameter Ref Number -
|
||||||
|
userVolume equ $001E ; Battery Ram Parameter Ref Number -
|
||||||
|
bellVolume equ $001F ; Battery Ram Parameter Ref Number -
|
||||||
|
sysSpeed equ $0020 ; Battery Ram Parameter Ref Number -
|
||||||
|
slt1intExt equ $0021 ; Battery Ram Parameter Ref Number -
|
||||||
|
slt2intExt equ $0022 ; Battery Ram Parameter Ref Number -
|
||||||
|
slt3intExt equ $0023 ; Battery Ram Parameter Ref Number -
|
||||||
|
slt4intExt equ $0024 ; Battery Ram Parameter Ref Number -
|
||||||
|
slt5intExt equ $0025 ; Battery Ram Parameter Ref Number -
|
||||||
|
slt6intExt equ $0026 ; Battery Ram Parameter Ref Number -
|
||||||
|
slt7intExt equ $0027 ; Battery Ram Parameter Ref Number -
|
||||||
|
startupSlt equ $0028 ; Battery Ram Parameter Ref Number -
|
||||||
|
txtDspLang equ $0029 ; Battery Ram Parameter Ref Number -
|
||||||
|
kybdLang equ $002A ; Battery Ram Parameter Ref Number -
|
||||||
|
kyBdBuffer equ $002B ; Battery Ram Parameter Ref Number -
|
||||||
|
kyBdRepSpd equ $002C ; Battery Ram Parameter Ref Number -
|
||||||
|
kyBdRepDel equ $002D ; Battery Ram Parameter Ref Number -
|
||||||
|
dblClkTime equ $002E ; Battery Ram Parameter Ref Number -
|
||||||
|
flashRate equ $002F ; Battery Ram Parameter Ref Number -
|
||||||
|
shftCpsLCas equ $0030 ; Battery Ram Parameter Ref Number -
|
||||||
|
fstSpDelKey equ $0031 ; Battery Ram Parameter Ref Number -
|
||||||
|
dualSpeed equ $0032 ; Battery Ram Parameter Ref Number -
|
||||||
|
hiMouseRes equ $0033 ; Battery Ram Parameter Ref Number -
|
||||||
|
dateFormat equ $0034 ; Battery Ram Parameter Ref Number -
|
||||||
|
clockFormat equ $0035 ; Battery Ram Parameter Ref Number -
|
||||||
|
rdMinRam equ $0036 ; Battery Ram Parameter Ref Number -
|
||||||
|
rdMaxRam equ $0037 ; Battery Ram Parameter Ref Number -
|
||||||
|
langCount equ $0038 ; Battery Ram Parameter Ref Number -
|
||||||
|
lang1 equ $0039 ; Battery Ram Parameter Ref Number -
|
||||||
|
lang2 equ $003A ; Battery Ram Parameter Ref Number -
|
||||||
|
lang3 equ $003B ; Battery Ram Parameter Ref Number -
|
||||||
|
lang4 equ $003C ; Battery Ram Parameter Ref Number -
|
||||||
|
lang5 equ $003D ; Battery Ram Parameter Ref Number -
|
||||||
|
lang6 equ $003E ; Battery Ram Parameter Ref Number -
|
||||||
|
lang7 equ $003F ; Battery Ram Parameter Ref Number -
|
||||||
|
lang8 equ $0040 ; Battery Ram Parameter Ref Number -
|
||||||
|
layoutCount equ $0041 ; Battery Ram Parameter Ref Number -
|
||||||
|
layout1 equ $0042 ; Battery Ram Parameter Ref Number -
|
||||||
|
layout2 equ $0043 ; Battery Ram Parameter Ref Number -
|
||||||
|
layout3 equ $0044 ; Battery Ram Parameter Ref Number -
|
||||||
|
layout4 equ $0045 ; Battery Ram Parameter Ref Number -
|
||||||
|
layout5 equ $0046 ; Battery Ram Parameter Ref Number -
|
||||||
|
layout6 equ $0047 ; Battery Ram Parameter Ref Number -
|
||||||
|
layout7 equ $0048 ; Battery Ram Parameter Ref Number -
|
||||||
|
layout8 equ $0049 ; Battery Ram Parameter Ref Number -
|
||||||
|
layout9 equ $004A ; Battery Ram Parameter Ref Number -
|
||||||
|
layout10 equ $004B ; Battery Ram Parameter Ref Number -
|
||||||
|
layout11 equ $004C ; Battery Ram Parameter Ref Number -
|
||||||
|
layout12 equ $004D ; Battery Ram Parameter Ref Number -
|
||||||
|
layout13 equ $004E ; Battery Ram Parameter Ref Number -
|
||||||
|
layout14 equ $004F ; Battery Ram Parameter Ref Number -
|
||||||
|
layout15 equ $0050 ; Battery Ram Parameter Ref Number -
|
||||||
|
layout16 equ $0051 ; Battery Ram Parameter Ref Number -
|
||||||
|
aTalkNodeNo equ $0080 ; Battery Ram Parameter Ref Number -
|
||||||
|
|
||||||
|
irqIntFlag equ $0000 ; GetAddr Param Ref No -
|
||||||
|
irqDataReg equ $0001 ; GetAddr Param Ref No -
|
||||||
|
irqSerial1 equ $0002 ; GetAddr Param Ref No -
|
||||||
|
irqSerial2 equ $0003 ; GetAddr Param Ref No -
|
||||||
|
irqAplTlkHi equ $0004 ; GetAddr Param Ref No -
|
||||||
|
tickCnt equ $0005 ; GetAddr Param Ref No -
|
||||||
|
irqVolume equ $0006 ; GetAddr Param Ref No -
|
||||||
|
irqActive equ $0007 ; GetAddr Param Ref No -
|
||||||
|
irqSndData equ $0008 ; GetAddr Param Ref No -
|
||||||
|
brkVar equ $0009 ; GetAddr Param Ref No -
|
||||||
|
evMgrData equ $000A ; GetAddr Param Ref No -
|
||||||
|
mouseSlot equ $000B ; GetAddr Param Ref No -
|
||||||
|
mouseClamps equ $000C ; GetAddr Param Ref No -
|
||||||
|
absClamps equ $000D ; GetAddr Param Ref No -
|
||||||
|
sccIntFlag equ $000E ; GetAddr Param Ref No -
|
||||||
|
|
||||||
|
ExtVGCInt equ $01 ; Hardware Interrupt Status - Returned by GetI
|
||||||
|
;RQEnable
|
||||||
|
ScanLineInt equ $02 ; Hardware Interrupt Status - Returned by Ge
|
||||||
|
;tIRQEnable
|
||||||
|
ADTBDataInt equ $04 ; Hardware Interrupt Status - Returned by Ge
|
||||||
|
;tIRQEnable
|
||||||
|
OneSecInt equ $10 ; Hardware Interrupt Status - Returned by GetI
|
||||||
|
;RQEnable
|
||||||
|
QuartSecInt equ $20 ; Hardware Interrupt Status - Returned by Ge
|
||||||
|
;tIRQEnable
|
||||||
|
VBInt equ $40 ; Hardware Interrupt Status - Returned by GetIRQEn
|
||||||
|
;able
|
||||||
|
KbdInt equ $80 ; Hardware Interrupt Status - Returned by GetIRQE
|
||||||
|
;nable
|
||||||
|
|
||||||
|
kybdEnable equ $0000 ; Interrupt Ref Number - Parameter to IntSo
|
||||||
|
;urce
|
||||||
|
kybdDisable equ $0001 ; Interrupt Ref Number - Parameter to IntS
|
||||||
|
;ource
|
||||||
|
vblEnable equ $0002 ; Interrupt Ref Number - Parameter to IntSou
|
||||||
|
;rce
|
||||||
|
vblDisable equ $0003 ; Interrupt Ref Number - Parameter to IntSo
|
||||||
|
;urce
|
||||||
|
qSecEnable equ $0004 ; Interrupt Ref Number - Parameter to IntSo
|
||||||
|
;urce
|
||||||
|
qSecDisable equ $0005 ; Interrupt Ref Number - Parameter to IntS
|
||||||
|
;ource
|
||||||
|
oSecEnable equ $0006 ; Interrupt Ref Number - Parameter to IntSo
|
||||||
|
;urce
|
||||||
|
oSecDisable equ $0007 ; Interrupt Ref Number - Parameter to IntS
|
||||||
|
;ource
|
||||||
|
adbEnable equ $000A ; Interrupt Ref Number - Parameter to IntSou
|
||||||
|
;rce
|
||||||
|
adbDisable equ $000B ; Interrupt Ref Number - Parameter to IntSo
|
||||||
|
;urce
|
||||||
|
scLnEnable equ $000C ; Interrupt Ref Number - Parameter to IntSo
|
||||||
|
;urce
|
||||||
|
scLnDisable equ $000D ; Interrupt Ref Number - Parameter to IntS
|
||||||
|
;ource
|
||||||
|
exVCGEnable equ $000E ; Interrupt Ref Number - Parameter to IntS
|
||||||
|
;ource
|
||||||
|
exVCGDisable equ $000F ; Interrupt Ref Number - Parameter to Int
|
||||||
|
;Source
|
||||||
|
|
||||||
|
mouseOff equ $0000 ; Mouse Mode Value -
|
||||||
|
transparent equ $0001 ; Mouse Mode Value -
|
||||||
|
transParnt equ $0001 ; Mouse Mode Value - (old name)
|
||||||
|
moveIntrpt equ $0003 ; Mouse Mode Value -
|
||||||
|
bttnIntrpt equ $0005 ; Mouse Mode Value -
|
||||||
|
bttnOrMove equ $0007 ; Mouse Mode Value -
|
||||||
|
mouseOffVI equ $0008 ; Mouse Mode Value -
|
||||||
|
transParntVI equ $0009 ; Mouse Mode Value - (old name)
|
||||||
|
transparentVI equ $0009 ; Mouse Mode Value -
|
||||||
|
moveIntrptVI equ $000B ; Mouse Mode Value -
|
||||||
|
bttnIntrptVI equ $000D ; Mouse Mode Value -
|
||||||
|
bttnOrMoveVI equ $000F ; Mouse Mode Value -
|
||||||
|
|
||||||
|
toolLoc1 equ $0000 ; Vector Ref Number -
|
||||||
|
toolLoc2 equ $0001 ; Vector Ref Number -
|
||||||
|
usrTLoc1 equ $0002 ; Vector Ref Number -
|
||||||
|
usrTLoc2 equ $0003 ; Vector Ref Number -
|
||||||
|
intrptMgr equ $0004 ; Vector Ref Number -
|
||||||
|
copMgr equ $0005 ; Vector Ref Number -
|
||||||
|
abortMgr equ $0006 ; Vector Ref Number -
|
||||||
|
sysFailMgr equ $0007 ; Vector Ref Number -
|
||||||
|
aTalkIntHnd equ $0008 ; Vector Ref Number -
|
||||||
|
sccIntHnd equ $0009 ; Vector Ref Number -
|
||||||
|
scLnIntHnd equ $000A ; Vector Ref Number -
|
||||||
|
sndIntHnd equ $000B ; Vector Ref Number -
|
||||||
|
vblIntHnd equ $000C ; Vector Ref Number -
|
||||||
|
mouseIntHnd equ $000D ; Vector Ref Number -
|
||||||
|
qSecIntHnd equ $000E ; Vector Ref Number -
|
||||||
|
kybdIntHnd equ $000F ; Vector Ref Number -
|
||||||
|
adbRBIHnd equ $0010 ; Vector Ref Number -
|
||||||
|
adbSRQHnd equ $0011 ; Vector Ref Number -
|
||||||
|
deskAccHnd equ $0012 ; Vector Ref Number -
|
||||||
|
flshBufHnd equ $0013 ; Vector Ref Number -
|
||||||
|
kybdMicHnd equ $0014 ; Vector Ref Number -
|
||||||
|
oneSecHnd equ $0015 ; Vector Ref Number -
|
||||||
|
extVCGHnd equ $0016 ; Vector Ref Number -
|
||||||
|
otherIntHnd equ $0017 ; Vector Ref Number -
|
||||||
|
crsrUpdtHnd equ $0018 ; Vector Ref Number -
|
||||||
|
incBsyFlag equ $0019 ; Vector Ref Number -
|
||||||
|
decBsyFlag equ $001A ; Vector Ref Number -
|
||||||
|
bellVector equ $001B ; Vector Ref Number -
|
||||||
|
breakVector equ $001C ; Vector Ref Number -
|
||||||
|
traceVector equ $001D ; Vector Ref Number -
|
||||||
|
stepVector equ $001E ; Vector Ref Number -
|
||||||
|
ctlYVector equ $0028 ; Vector Ref Number -
|
||||||
|
proDOSVctr equ $002A ; Vector Ref Number -
|
||||||
|
osVector equ $002B ; Vector Ref Number -
|
||||||
|
msgPtrVctr equ $002C ; Vector Ref Number -
|
|
@ -0,0 +1,51 @@
|
||||||
|
|
||||||
|
; File: E16.NoteSyn
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
;
|
||||||
|
|
||||||
|
; Note Syn errors
|
||||||
|
nsAlreadyInit equ $1901 ; Note Syn error - Note Syn already init
|
||||||
|
;ialized
|
||||||
|
nsSndNotInit equ $1902 ; Note Syn error - Sound Tools not initia
|
||||||
|
;lized
|
||||||
|
nsNotAvail equ $1921 ; Note Syn error - generator not available
|
||||||
|
nsBadGenNum equ $1922 ; Note Syn error - bad generator number
|
||||||
|
nsNotInit equ $1923 ; Note Syn error - Note Syn not initialized
|
||||||
|
nsGenAlreadyOn equ $1924 ; Note Syn error - generator already on
|
||||||
|
|
||||||
|
ost1BkPt equ $00 ; Envelope - [Byte]
|
||||||
|
ost1Increment equ $01 ; Envelope - [Word]
|
||||||
|
ost2BkPt equ $03 ; Envelope - [Byte]
|
||||||
|
ost2Increment equ $04 ; Envelope - [Word]
|
||||||
|
ost3BkPt equ $06 ; Envelope - [Byte]
|
||||||
|
ost3Increment equ $07 ; Envelope - [Word]
|
||||||
|
ost4BkPt equ $09 ; Envelope - [Byte]
|
||||||
|
ost4Increment equ $0A ; Envelope - [Word]
|
||||||
|
ost5BkPt equ $0C ; Envelope - [Byte]
|
||||||
|
ost5Increment equ $0D ; Envelope - [Word]
|
||||||
|
ost6BkPt equ $0F ; Envelope - [Byte]
|
||||||
|
ost6Increment equ $10 ; Envelope - [Word]
|
||||||
|
ost7BkPt equ $12 ; Envelope - [Byte]
|
||||||
|
ost7Increment equ $13 ; Envelope - [Word]
|
||||||
|
ost8BkPt equ $15 ; Envelope - [Byte]
|
||||||
|
ost8Increment equ $16 ; Envelope - [Word]
|
||||||
|
|
||||||
|
otheEnvelope equ $00 ; Instrument - [Envelope]
|
||||||
|
oreleaseSegment equ $18 ; Instrument - [Byte]
|
||||||
|
opriorityIncrement equ $19 ; Instrument - [Byte]
|
||||||
|
opitchBendRange equ $1A ; Instrument - [Byte]
|
||||||
|
ovibratoDepth equ $1B ; Instrument - [Byte]
|
||||||
|
ovibratoSpeed equ $1C ; Instrument - [Byte]
|
||||||
|
oinSpare equ $1D ; Instrument - [Byte]
|
||||||
|
oaWaveCount equ $1E ; Instrument - [Byte]
|
||||||
|
obWaveCount equ $1F ; Instrument - [Byte]
|
||||||
|
|
||||||
|
owfTopKey equ $0 ; Waveform - [Byte]
|
||||||
|
owfWaveAddress equ $01 ; Waveform - [Byte]
|
||||||
|
owfWaveSize equ $02 ; Waveform - [Byte]
|
||||||
|
owfDOCMode equ $03 ; Waveform - [Byte]
|
||||||
|
owfRelPitch equ $04 ; Waveform - [Word]
|
|
@ -0,0 +1,90 @@
|
||||||
|
|
||||||
|
; File: E16.Print
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
|
||||||
|
MemFullErr equ $FF80 ; Print error -
|
||||||
|
IOAbort equ $FFE5 ; Print error -
|
||||||
|
PrAbort equ $80 ; Print error -
|
||||||
|
|
||||||
|
missingDriver equ $1301 ; specified driver not in system/drivers
|
||||||
|
portNotOn equ $1302 ; specified port not selected in ctl panel
|
||||||
|
noPrintRecord equ $1303 ; no print record was given
|
||||||
|
badLaserPrep equ $1304 ; laser prep in laser writer incompatible
|
||||||
|
badLPFile equ $1305 ; laser prep in system/drivers incompatible
|
||||||
|
papConnNotOpen equ $1306 ; cannot connect to laser writer
|
||||||
|
papReadWriteErr equ $1307 ; apple talk PAPRead or PAPWrite error
|
||||||
|
startUpAlreadyMade equ $1321 ; low level startup already made
|
||||||
|
invalidCtlVal equ $1322 ; invalid control value has been spec'd
|
||||||
|
|
||||||
|
oiDev equ $0 ; Word - PrInfoRec - reserved for internal use
|
||||||
|
oiVRes equ $2 ; Word - PrInfoRec - vertical resolution of printe
|
||||||
|
;r
|
||||||
|
oiHRes equ $4 ; Word - PrInfoRec - horizontal resolution of prin
|
||||||
|
;ter
|
||||||
|
orPage equ $6 ; Rect - PrInfoRec - defining page rectangle
|
||||||
|
|
||||||
|
oiFstPage equ $0 ; Word - PrJobRec - first page to print
|
||||||
|
oiLstPage equ $2 ; Word - PrJobRec - last page to print
|
||||||
|
oiCopies equ $4 ; Word - PrJobRec - number of copies
|
||||||
|
obJDocLoop equ $6 ; Byte - PrJobRec - printing method
|
||||||
|
ofFromUser equ $7 ; Byte - PrJobRec - used internally
|
||||||
|
opIdleProc equ $9 ; Word - PrJobRec - background procedure
|
||||||
|
opFileName equ $D ; Pointer - PrJobRec - spool file name
|
||||||
|
oiFileVol equ $11 ; Word - PrJobRec - spool file volume referenc
|
||||||
|
;e number
|
||||||
|
obFileVers equ $13 ; Byte - PrJobRec - spool file version number
|
||||||
|
obJobX equ $14 ; Byte - PrJobRec - used internally
|
||||||
|
|
||||||
|
oprVersion equ $0 ; Word - PrRec - print manager version
|
||||||
|
oprInfo equ $2 ; PrInfoRec - PrRec - printer infomation subrecor
|
||||||
|
;d
|
||||||
|
orPaper equ $10 ; Rect - PrRec - Defining paper rectangle
|
||||||
|
oprStl equ $18 ; PrStyleRec - PrRec - style subrecord
|
||||||
|
oprInfoPT equ $2A ; Byte[14] - PrRec - reserved for internal use
|
||||||
|
oprXInfo equ $38 ; Byte[24] - PrRec - reserved for internal use
|
||||||
|
oprJob equ $50 ; PrJobRec - PrRec - job subrecord
|
||||||
|
oprintX equ $64 ; Byte[38] - PrRec - reserved for future use
|
||||||
|
oiReserved equ $8A ; Word - PrRec - reserved for internal use
|
||||||
|
|
||||||
|
oiTotPages equ $0 ; Word - PrStatusRec - number of pages in spoo
|
||||||
|
;l file
|
||||||
|
oiCurPage equ $2 ; Word - PrStatusRec - page being printed
|
||||||
|
oiTotCopes equ $4 ; Word - PrStatusRec - number of copies reques
|
||||||
|
;ted
|
||||||
|
oiCurCopy equ $6 ; Word - PrStatusRec - copy being printed
|
||||||
|
oiTotBands equ $8 ; Word - PrStatusRec - reserved for internal u
|
||||||
|
;se
|
||||||
|
oiCurBand equ $A ; Word - PrStatusRec - reserved for internal us
|
||||||
|
;e
|
||||||
|
ofPgDirty equ $C ; Boolean - PrStatusRec - TRUE if started print
|
||||||
|
;ing page
|
||||||
|
ofImaging equ $E ; Word - PrStatusRec - reserved for internal us
|
||||||
|
;e
|
||||||
|
ohPrint equ $10 ; PrRecHndl - PrStatusRec - handle of print reco
|
||||||
|
;rd
|
||||||
|
opPrPort equ $14 ; GrafPortPtr - PrStatusRec - pointer to grafpo
|
||||||
|
;rt being use for printing
|
||||||
|
ohPic equ $18 ; Word - PrStatusRec - reserved for internal use
|
||||||
|
|
||||||
|
owDev equ $0 ; Word - PrStyleRec - output quality information
|
||||||
|
ointernA equ $2 ; Word[3] - PrStyleRec - for internal use
|
||||||
|
ofeed equ $8 ; Word - PrStyleRec - paper feed type
|
||||||
|
opaperType equ $A ; Word - PrStyleRec - paper type
|
||||||
|
ocrWidth equ $C ; Word - PrStyleRec - carriage Width for image w
|
||||||
|
;riter
|
||||||
|
ovSizing equ $C ; Word - PrStyleRec - vertical sizing for lazer
|
||||||
|
;writer
|
||||||
|
oreduction equ $E ; Word - PrStyleRec - % reduction, laser write
|
||||||
|
;r only
|
||||||
|
ointernB equ $10 ; Word - PrStyleRec - for internal use
|
||||||
|
|
||||||
|
reset equ $0001 ; LLDControl - Printer control value - reset pri
|
||||||
|
;nter
|
||||||
|
formFeed equ $0002 ; LLDControl - Printer control value - form f
|
||||||
|
;eed
|
||||||
|
lineFeed equ $0003 ; LLDControl - Printer control value - line f
|
||||||
|
;eed
|
|
@ -0,0 +1,145 @@
|
||||||
|
|
||||||
|
; File: E16.ProDOS
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
;
|
||||||
|
|
||||||
|
; ProDOS errors
|
||||||
|
invalidCallNum equ $01 ; ProDOS error - invalid call number
|
||||||
|
unclaimedIntErr equ $01 ; ProDOS error - fatal error - unclaimed
|
||||||
|
; interrupt
|
||||||
|
badPBlockPtr equ $05 ; ProDOS error - call pointer out of bounds
|
||||||
|
pdosActiveErr equ $06 ; ProDOS error - ProDOS is active
|
||||||
|
vcbUnusable equ $0A ; ProDOS error - fatal error - VCB unusable
|
||||||
|
fcbUnusable equ $0B ; ProDOS error - fatal error - FCB unusable
|
||||||
|
badBlockZero equ $0C ; ProDOS error - fatal error - block zero a
|
||||||
|
;llocated illegally
|
||||||
|
shdwInterruptErr equ $0D ; ProDOS error - fatal error - interrup
|
||||||
|
;t occured while I/O shadowing off
|
||||||
|
devNotFound equ $10 ; ProDOS error - device not found
|
||||||
|
badDevRefNum equ $11 ; ProDOS error - invalid device reference n
|
||||||
|
;umber
|
||||||
|
badReqCode equ $20 ; ProDOS error - invalid request code
|
||||||
|
intTableFull equ $25 ; ProDOS error - interrupt table full
|
||||||
|
invalidOperation equ $26 ; ProDOS error - invalid operation
|
||||||
|
ioError equ $27 ; ProDOS error - I/O error
|
||||||
|
noDevConnect equ $28 ; ProDOS error - no device connected
|
||||||
|
writeProtectErr equ $2B ; ProDOS error - write protect error
|
||||||
|
diskSwitchErr equ $2E ; ProDOS error - disk switched error
|
||||||
|
badPathname equ $40 ; ProDOS error - invalid pathname syntax
|
||||||
|
fcbFullErr equ $42 ; ProDOS error - FCB full error
|
||||||
|
badFileRefNum equ $43 ; ProDOS error - invalid file reference nu
|
||||||
|
;mber
|
||||||
|
pathNotFound equ $44 ; ProDOS error - path not found
|
||||||
|
volumeNotFound equ $45 ; ProDOS error - volume not found
|
||||||
|
fileNotFound equ $46 ; ProDOS error - file not found
|
||||||
|
dupFileName equ $47 ; ProDOS error - duplicate file name
|
||||||
|
volumeFullErr equ $48 ; ProDOS error - volume full error
|
||||||
|
dirFullErr equ $49 ; ProDOS error - directory full error
|
||||||
|
versionErr equ $4A ; ProDOS error - version error (incompatible
|
||||||
|
;file format)
|
||||||
|
badStoreType equ $4B ; ProDOS error - unsupported (or incorrect)
|
||||||
|
; storage type
|
||||||
|
eofEncountered equ $4C ; ProDOS error - end-of-file encountered
|
||||||
|
positionRangeErr equ $4D ; ProDOS error - position out of range
|
||||||
|
accessErr equ $4E ; ProDOS error - access not allowed
|
||||||
|
fileOpenErr equ $50 ; ProDOS error - file is open
|
||||||
|
dirDamaged equ $51 ; ProDOS error - directory structure is damag
|
||||||
|
;ed
|
||||||
|
badVolType equ $52 ; ProDOS error - unsupported volume type
|
||||||
|
paramRangeErr equ $53 ; ProDOS error - parameter out of range
|
||||||
|
memoryFullErr equ $54 ; ProDOS error - out of memory
|
||||||
|
vcbFullErr equ $55 ; ProDOS error - VCB full error
|
||||||
|
dupVolumeErr equ $57 ; ProDOS error - duplicate volume error
|
||||||
|
notBlkDevErr equ $58 ; ProDOS error - not a blocked device
|
||||||
|
invalidLevel equ $59 ; ProDOS error - invalid level
|
||||||
|
blkNumRangeErr equ $5A ; ProDOS error - block number out of rang
|
||||||
|
;e
|
||||||
|
notSameVolErr equ $5B ; ProDOS error - different volumes found o
|
||||||
|
;n ChangePath call
|
||||||
|
notExecSysFile equ $5C ; ProDOS error - not an executable system
|
||||||
|
; file
|
||||||
|
|
||||||
|
oblockDevNum equ $00 ; BlockRec - [Word]
|
||||||
|
oblockDataBuffer equ $02 ; BlockRec - [Ptr]
|
||||||
|
oblockNum equ $06 ; BlockRec - [Longint]
|
||||||
|
|
||||||
|
odevName equ $00 ; DevNumRec - [Ptr]
|
||||||
|
odevNum equ $04 ; DevNumRec - [Word]
|
||||||
|
|
||||||
|
oeofRefNum equ $00 ; EofRec - [Word]
|
||||||
|
oeofPosition equ $02 ; EofRec - [Longint]
|
||||||
|
|
||||||
|
ofileRefNum equ $00 ; FileIORec - [Word]
|
||||||
|
odataBuffer equ $02 ; FileIORec - [Ptr]
|
||||||
|
orequestCount equ $06 ; FileIORec - [Longint]
|
||||||
|
otransferCount equ $0A ; FileIORec - [Longint]
|
||||||
|
|
||||||
|
ofrPathname equ $00 ; FileRec - [Ptr]
|
||||||
|
ofrAccess equ $04 ; FileRec - [Word]
|
||||||
|
ofrFileType equ $06 ; FileRec - [Word]
|
||||||
|
ofrAuxType equ $08 ; FileRec - [Longint]
|
||||||
|
ofrStorageType equ $0A ; FileRec - [Word]
|
||||||
|
ofrCreateDate equ $0C ; FileRec - [Word]
|
||||||
|
ofrCreateTime equ $0E ; FileRec - [Word]
|
||||||
|
ofrModDate equ $10 ; FileRec - [Word]
|
||||||
|
ofrModTime equ $12 ; FileRec - [Word]
|
||||||
|
ofrBlocksUsed equ $14 ; FileRec - [Long]
|
||||||
|
|
||||||
|
;odevName GEQU $00 ; FormatRec/EraseDiskRec- device name
|
||||||
|
; pointer [pointer]
|
||||||
|
ovolName equ $04 ; FormatRec/EraseDiskRec - device name pointer
|
||||||
|
; [pointer]
|
||||||
|
ofileSysID equ $08 ; FormatRec/EraseDiskRec - file system ID [w
|
||||||
|
;ord]
|
||||||
|
|
||||||
|
ointNum equ $00 ; InterruptRec - [Word]
|
||||||
|
ointCode equ $02 ; InterruptRec - [Ptr]
|
||||||
|
|
||||||
|
olevel equ $00 ; LevelRec - [Word]
|
||||||
|
|
||||||
|
omarkRefNum equ $00 ; MarkRec - [Word]
|
||||||
|
oposition equ $02 ; MarkRec - [Long]
|
||||||
|
|
||||||
|
onewLRefNum equ $00 ; NewlineRec - [Word]
|
||||||
|
oenableMask equ $02 ; NewlineRec - [Word]
|
||||||
|
onewlineChar equ $04 ; NewlineRec - [Word]
|
||||||
|
|
||||||
|
oopenRefNum equ $00 ; OpenRec - [Word]
|
||||||
|
oopenPathname equ $02 ; OpenRec - [Ptr]
|
||||||
|
oioBuffer equ $06 ; OpenRec - [Handle]
|
||||||
|
|
||||||
|
;opathname GEQU $00 ; PathNameRec - [Ptr]
|
||||||
|
onewPathname equ $04 ; PathNameRec - [Ptr]
|
||||||
|
|
||||||
|
oprefixNum equ $00 ; PrefixRec - [Word]
|
||||||
|
oprefix equ $02 ; PrefixRec - [Ptr]
|
||||||
|
|
||||||
|
opdVersion equ $00 ; VersionRec - [Word]
|
||||||
|
|
||||||
|
ovrDeviceName equ $00 ; VolumeRec - [Ptr]
|
||||||
|
ovrVolName equ $04 ; VolumeRec - [Ptr]
|
||||||
|
ovrTotalBlocks equ $08 ; VolumeRec - [Long]
|
||||||
|
ovrFreeBlocks equ $0C ; VolumeRec - [Long]
|
||||||
|
ovrFileSysID equ $10 ; VolumeRec - [Word]
|
||||||
|
|
||||||
|
odiDevNum equ $00 ; DInfoRec - [Word]
|
||||||
|
odiDevName equ $02 ; DInfoRec - [Ptr]
|
||||||
|
|
||||||
|
odeRefNum equ $00 ; DirEntryRec - [Word]
|
||||||
|
odeReserved equ $02 ; DirEntryRec - [Word]
|
||||||
|
odeBase equ $04 ; DirEntryRec - [Word]
|
||||||
|
odeDisplacement equ $06 ; DirEntryRec - [Word]
|
||||||
|
odeNameBuffer equ $08 ; DirEntryRec - [Ptr]
|
||||||
|
odeEntryNum equ $0C ; DirEntryRec - [Word]
|
||||||
|
odeFileType equ $0E ; DirEntryRec - [Word]
|
||||||
|
odeEOF equ $10 ; DirEntryRec - [Long]
|
||||||
|
odeBlockCount equ $14 ; DirEntryRec - [Long]
|
||||||
|
odeCreateTime equ $18 ; DirEntryRec - [TimeRec]
|
||||||
|
odeModTime equ $20 ; DirEntryRec - [TimeRec]
|
||||||
|
odeAccess equ $28 ; DirEntryRec - [Word]
|
||||||
|
odeAuxType equ $2A ; DirEntryRec - [Long]
|
||||||
|
odeFileSysID equ $2E ; DirEntryRec - [Word]
|
|
@ -0,0 +1,196 @@
|
||||||
|
|
||||||
|
; File: E16.Quickdraw
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
;
|
||||||
|
|
||||||
|
alreadyInitialized equ $0401 ; Quickdraw error - Quickdraw alrea
|
||||||
|
;dy initialized
|
||||||
|
cannotReset equ $0402 ; Quickdraw error - never used
|
||||||
|
notInitialized equ $0403 ; Quickdraw error - Quickdraw not initi
|
||||||
|
;alized
|
||||||
|
screenReserved equ $0410 ; Quickdraw error - screen reserved
|
||||||
|
badRect equ $0411 ; Quickdraw error - bad rectangle
|
||||||
|
notEqualChunkiness equ $0420 ; Quickdraw error - Chunkiness is n
|
||||||
|
;ot equal
|
||||||
|
rgnAlreadyOpen equ $0430 ; Quickdraw error - region is already o
|
||||||
|
;pen
|
||||||
|
rgnNotOpen equ $0431 ; Quickdraw error - region is not open
|
||||||
|
rgnScanOverflow equ $0432 ; Quickdraw error - region scan overfl
|
||||||
|
;ow
|
||||||
|
rgnFull equ $0433 ; Quickdraw error - region is full
|
||||||
|
polyAlreadyOpen equ $0440 ; Quickdraw error - poly is already op
|
||||||
|
;en
|
||||||
|
polyNotOpen equ $0441 ; Quickdraw error - poly is not open
|
||||||
|
polyTooBig equ $0442 ; Quickdraw error - poly is too big
|
||||||
|
badTableNum equ $0450 ; Quickdraw error - bad table number
|
||||||
|
badColorNum equ $0451 ; Quickdraw error - bad color number
|
||||||
|
badScanLine equ $0452 ; Quickdraw error - bad scan line
|
||||||
|
notImplemented equ $04FF ; Quickdraw error - not implemented
|
||||||
|
|
||||||
|
omaxWidth equ $0 ; Word - BufDimRec -
|
||||||
|
otextBufHeight equ $2 ; Word - BufDimRec -
|
||||||
|
otextBufferWords equ $4 ; Word - BufDimRec -
|
||||||
|
ofontWidth equ $6 ; Word - BufDimRec -
|
||||||
|
|
||||||
|
ooffseToMF equ $00 ; Word - Font - fully defined front of the Fo
|
||||||
|
;nt record.
|
||||||
|
ofamily equ $02 ; Word - Font -
|
||||||
|
ostyle equ $04 ; TextStyle - Font -
|
||||||
|
osize equ $06 ; Word - Font -
|
||||||
|
oversion equ $08 ; Word - Font -
|
||||||
|
ofbrExtent equ $0A ; Word - Font -
|
||||||
|
|
||||||
|
ofgFontID equ $00 ; Word - FontGlobalsRecord - currently 12 byte
|
||||||
|
;s long, but may be expanded
|
||||||
|
ofgStyle equ $02 ; TextStyle - FontGlobalsRecord -
|
||||||
|
ofgSize equ $04 ; Word - FontGlobalsRecord -
|
||||||
|
ofgVersion equ $06 ; Word - FontGlobalsRecord -
|
||||||
|
ofgWidMax equ $08 ; Word - FontGlobalsRecord -
|
||||||
|
ofgFBRExtent equ $0A ; Word - FontGlobalsRecord -
|
||||||
|
|
||||||
|
oascent equ $00 ; Integer - FontInfoRecord -
|
||||||
|
odescent equ $02 ; Integer - FontInfoRecord -
|
||||||
|
owidMax equ $04 ; Integer - FontInfoRecord -
|
||||||
|
oleading equ $06 ; Integer - FontInfoRecord -
|
||||||
|
|
||||||
|
oportInfo equ $00 ; LocInfo - GrafPort -
|
||||||
|
oportRect equ $10 ; Rect - GrafPort - PortRect
|
||||||
|
oclipRgn equ $18 ; RgnHandle - GrafPort - Clip Rgn. Pointer
|
||||||
|
ovisRgn equ $1C ; RgnHandle - GrafPort - Vis. Rgn. Pointer
|
||||||
|
obkPat equ $20 ; Pattern - GrafPort - BackGround Pattern
|
||||||
|
opnLoc equ $40 ; Point - GrafPort - Pen Location
|
||||||
|
opnSize equ $44 ; Point - GrafPort - Pen Size
|
||||||
|
opnMode equ $48 ; Word - GrafPort - Pen Mode
|
||||||
|
opnPat equ $4A ; Pattern - GrafPort - Pen Pattern
|
||||||
|
opnMask equ $6A ; Mask - GrafPort - Pen Mask
|
||||||
|
opnVis equ $72 ; Word - GrafPort - Pen Visable
|
||||||
|
ofontHandle equ $74 ; FontHndl - GrafPort -
|
||||||
|
ofontID equ $78 ; FontID - GrafPort - Font ID
|
||||||
|
ofontFlags equ $7C ; Word - GrafPort - FontFlags
|
||||||
|
otxSize equ $7E ; Integer - GrafPort - Text Size
|
||||||
|
otxFace equ $80 ; TextStyle - GrafPort - Text Face
|
||||||
|
otxMode equ $82 ; Word - GrafPort - Text Mode
|
||||||
|
ospExtra equ $84 ; Fixed - GrafPort - Fixed Point Value
|
||||||
|
ochExtra equ $88 ; Fixed - GrafPort - Fixed Point Value
|
||||||
|
ofgColor equ $8C ; Word - GrafPort - ForeGround Color
|
||||||
|
obgColor equ $8E ; Word - GrafPort - BackGround Color
|
||||||
|
opicSave equ $90 ; Handle - GrafPort - PicSave
|
||||||
|
orgnSave equ $94 ; Handle - GrafPort - RgnSave
|
||||||
|
opolySave equ $98 ; Handle - GrafPort - PolySave
|
||||||
|
ografProcs equ $9C ; QdProcsPtr - GrafPort -
|
||||||
|
oarcRot equ $A0 ; Integer - GrafPort - ArcRot
|
||||||
|
ouserField equ $A2 ; Longint - GrafPort - UserField
|
||||||
|
osysField equ $A6 ; Longint - GrafPort - SysField
|
||||||
|
|
||||||
|
oportSCB equ $00 ; AnSCBByte - LocInfo -
|
||||||
|
oreserved equ $01 ; Byte - LocInfo -
|
||||||
|
optrToPixImage equ $02 ; Pointer - LocInfo - ImageRef
|
||||||
|
owidth equ $06 ; Word - LocInfo - Width
|
||||||
|
oboundsRect equ $08 ; Rect - LocInfo - BoundsRect
|
||||||
|
|
||||||
|
optrToSourceLocInfo equ $00 ; LocInfoPtr - PaintParam -
|
||||||
|
optrToDestLocInfo equ $04 ; LocInfoPtr - PaintParam -
|
||||||
|
optrToSourceRect equ $08 ; RectPtr - PaintParam -
|
||||||
|
optrToDestPoint equ $0C ; PointPtr - PaintParam -
|
||||||
|
omode equ $10 ; Word - PaintParam -
|
||||||
|
omaskHandle equ $12 ; Handle - PaintParam - clip region
|
||||||
|
|
||||||
|
opsPnLoc equ $00 ; Point - PenState -
|
||||||
|
opsPnSize equ $04 ; Point - PenState -
|
||||||
|
opsPnMode equ $08 ; Word - PenState -
|
||||||
|
opsPnPat equ $0A ; Pattern - PenState -
|
||||||
|
opsPnMask equ $2A ; Mask - PenState -
|
||||||
|
|
||||||
|
ostdText equ $00 ; Pointer - QDProcs -
|
||||||
|
ostdLine equ $04 ; Pointer - QDProcs -
|
||||||
|
ostdRect equ $08 ; Pointer - QDProcs -
|
||||||
|
ostdRRect equ $0C ; Pointer - QDProcs -
|
||||||
|
ostdOval equ $10 ; Pointer - QDProcs -
|
||||||
|
ostdArc equ $14 ; Pointer - QDProcs -
|
||||||
|
ostdPoly equ $18 ; Pointer - QDProcs -
|
||||||
|
ostdRgn equ $1C ; Pointer - QDProcs -
|
||||||
|
ostdPixels equ $20 ; Pointer - QDProcs -
|
||||||
|
ostdComment equ $24 ; Pointer - QDProcs -
|
||||||
|
ostdTxMeas equ $28 ; Pointer - QDProcs -
|
||||||
|
ostdTxBnds equ $2C ; Pointer - QDProcs -
|
||||||
|
ostdGetPic equ $30 ; Pointer - QDProcs -
|
||||||
|
ostdPutPic equ $34 ; Pointer - QDProcs -
|
||||||
|
|
||||||
|
orfFamNum equ $00 ; Word - RomFontRec -
|
||||||
|
orfFamStyle equ $02 ; Word - RomFontRec -
|
||||||
|
orfSize equ $04 ; Word - RomFontRec -
|
||||||
|
orfFontHandle equ $06 ; FontHndl - RomFontRec -
|
||||||
|
orfNamePtr equ $0A ; Pointer - RomFontRec -
|
||||||
|
orfFBRExtent equ $0E ; Word - RomFontRec -
|
||||||
|
|
||||||
|
colorTable equ $0F ; AnSCBByte - Mask for SCB color table
|
||||||
|
scbReserved equ $10 ; AnSCBByte - Mask for SCB reserved bit
|
||||||
|
scbFill equ $20 ; AnSCBByte - Mask for SCB fill bit
|
||||||
|
scbInterrupt equ $40 ; AnSCBByte - Mask for SCB interrupt bit
|
||||||
|
scbColorMode equ $80 ; AnSCBByte - Mask for SCB color mode bit
|
||||||
|
|
||||||
|
table320 equ $32 ; ColorData - (val=size)
|
||||||
|
table640 equ $32 ; ColorData - (val=size)
|
||||||
|
maskSize equ $08 ; GrafPort - Mask Size (val=size)
|
||||||
|
locSize equ $10 ; GrafPort - Loc Size (val=size)
|
||||||
|
patsize equ $20 ; GrafPort - Pattern Size (val=size)
|
||||||
|
pnStateSize equ $32 ; GrafPort - Pen State Size (Val=size)
|
||||||
|
portSize equ $AA ; GrafPort - Size of GrafPort
|
||||||
|
|
||||||
|
blueMask equ $000F ; ColorValue - Mask for Blue nibble
|
||||||
|
greenMask equ $00F0 ; ColorValue - Mask for green nibble
|
||||||
|
redMask equ $0F00 ; ColorValue - Mask for red nibble
|
||||||
|
|
||||||
|
widMaxSize equ $0001 ; FontFlags -
|
||||||
|
zeroSize equ $0002 ; FontFlags -
|
||||||
|
|
||||||
|
black equ $000 ; MasterColors - These work in 320 and 640 mode
|
||||||
|
blue equ $00F ; MasterColors - These work in 320 and 640 mode
|
||||||
|
darkGreen320 equ $080 ; MasterColors - These work in 320 mode
|
||||||
|
green320 equ $0E0 ; MasterColors - These work in 320 mode
|
||||||
|
green640 equ $0F0 ; MasterColors - These work in 640 mode
|
||||||
|
lightBlue320 equ $4DF ; MasterColors - These work in 320 mode
|
||||||
|
purple320 equ $72C ; MasterColors - These work in 320 mode
|
||||||
|
darkGray320 equ $777 ; MasterColors - These work in 320 mode
|
||||||
|
periwinkleBlue320 equ $78F ; MasterColors - These work in 320 mo
|
||||||
|
;de
|
||||||
|
brown320 equ $841 ; MasterColors - These work in 320 mode
|
||||||
|
lightGray320 equ $0CCC ; MasterColors - These work in 320 mode
|
||||||
|
red320 equ $0D00 ; MasterColors - These work in 320 mode
|
||||||
|
lilac320 equ $0DAF ; MasterColors - These work in 320 mode
|
||||||
|
red640 equ $0F00 ; MasterColors - These work in 640 mode
|
||||||
|
orange320 equ $0F70 ; MasterColors - These work in 320 mode
|
||||||
|
flesh320 equ $0FA9 ; MasterColors - These work in 320 mode
|
||||||
|
yellow equ $0FF0 ; MasterColors - These work in 320 and 640 mode
|
||||||
|
white equ $0FFF ; MasterColors - These work in 320 and 640 mode
|
||||||
|
|
||||||
|
modeCopy equ $0000 ; PenModeDATA -
|
||||||
|
modeOR equ $0001 ; PenModeDATA -
|
||||||
|
modeXOR equ $0002 ; PenModeDATA -
|
||||||
|
modeBIC equ $0003 ; PenModeDATA -
|
||||||
|
modeForeCopy equ $0004 ; PenModeDATA -
|
||||||
|
modeForeOR equ $0005 ; PenModeDATA -
|
||||||
|
modeForeXOR equ $0006 ; PenModeDATA -
|
||||||
|
modeForeBIC equ $0007 ; PenModeDATA -
|
||||||
|
modeNOT equ $8000 ; PenModeDATA -
|
||||||
|
notCopy equ $8000 ; PenModeDATA -
|
||||||
|
notOR equ $8001 ; PenModeDATA -
|
||||||
|
notXOR equ $8002 ; PenModeDATA -
|
||||||
|
notBIC equ $8003 ; PenModeDATA -
|
||||||
|
notForeCOPY equ $8004 ; PenModeDATA -
|
||||||
|
notForeOR equ $8005 ; PenModeDATA -
|
||||||
|
notForeXOR equ $8006 ; PenModeDATA -
|
||||||
|
notForeBIC equ $8007 ; PenModeDATA -
|
||||||
|
|
||||||
|
mode320 equ $0000 ; QDStartup - Argument to QDStartup
|
||||||
|
mode640 equ $0080 ; QDStartup - Argument to QDStartup
|
||||||
|
|
||||||
|
boldMask equ $0001 ; TextStyle - Mask for bold bit
|
||||||
|
italicMask equ $0002 ; TextStyle - Mask for italic bit
|
||||||
|
underlineMask equ $0004 ; TextStyle - Mask for underline bit
|
||||||
|
outlineMask equ $0008 ; TextStyle - Mask for outline bit
|
||||||
|
shadowMask equ $0010 ; TextStyle - Mask for shadow bit
|
|
@ -0,0 +1,130 @@
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
* FILE: E16.SANE
|
||||||
|
*
|
||||||
|
* Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
* All Rights Reserved
|
||||||
|
*
|
||||||
|
* These equates give assembly language access to 65816 SANE.
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
* Tool Set and Function Numbers.
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
SANEtsNum = $A ; SANE tool set number
|
||||||
|
|
||||||
|
FPNum = $9 ; Function number for Arithmetic
|
||||||
|
DecStrNum = $A ; Function number for Scanner/Formatter
|
||||||
|
ElemNum = $B ; Function no. for Elementary functions
|
||||||
|
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
* Operation code masks.
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
FOADD = $00 ; add
|
||||||
|
FOSUB = $02 ; subtract
|
||||||
|
FOMUL = $04 ; multiply
|
||||||
|
FODIV = $06 ; divide
|
||||||
|
FOCMP = $08 ; compare, no exception from unordered
|
||||||
|
FOCPX = $0A ; compare, signal invalid if unordered
|
||||||
|
FOREM = $0C ; remainder
|
||||||
|
FOZ2X = $0E ; convert to extended
|
||||||
|
FOX2Z = $10 ; convert from extended
|
||||||
|
FOSQRT = $12 ; square root
|
||||||
|
FORTI = $14 ; round to integral value
|
||||||
|
FOTTI = $16 ; truncate to integral value
|
||||||
|
FOSCALB = $18 ; binary scale
|
||||||
|
FOLOGB = $1A ; binary log
|
||||||
|
FOCLASS = $1C ; classify
|
||||||
|
FONEXT = $1E ; next-after
|
||||||
|
|
||||||
|
FOSETENV = $01 ; set environment
|
||||||
|
FOGETENV = $03 ; get environment
|
||||||
|
FOSETHV = $05 ; set halt vector
|
||||||
|
FOGETHV = $07 ; get halt vector
|
||||||
|
FOD2B = $09 ; convert decimal to binary
|
||||||
|
FOB2D = $0B ; convert binary to decimal
|
||||||
|
FONEG = $0D ; negate
|
||||||
|
FOABS = $0F ; absolute value
|
||||||
|
FOCPYSGN = $11 ; copy sign
|
||||||
|
; UNDEFINED = $13
|
||||||
|
FOSETXCP = $15 ; set exception
|
||||||
|
FOPROCENTRY = $17 ; procedure-entry
|
||||||
|
FOPROCEXIT = $19 ; procedure-exit
|
||||||
|
FOTESTXCP = $1B ; test exception
|
||||||
|
; UNDEFINED = $1D
|
||||||
|
; UNDEFINED = $1F
|
||||||
|
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
* Operand format masks.
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
FFEXT = $000 ; extended -- 80-bit float
|
||||||
|
FFDBL = $100 ; double -- 64-bit float
|
||||||
|
FFSGL = $200 ; single -- 32-bit float
|
||||||
|
FFLNG = $300 ; longint -- 32-bit integer
|
||||||
|
FFINT = $400 ; integer -- 16-bit integer
|
||||||
|
FFCOMP = $500 ; comp -- 64-bit integer
|
||||||
|
; UNDEFINED = $600
|
||||||
|
; UNDEFINED = $700
|
||||||
|
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
* Class and sign inquiries.
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
FCSNAN = $FC ; -4: signaling NAN
|
||||||
|
FCQNAN = $FD ; -3: quiet NAN
|
||||||
|
FCINF = $FE ; -2: infinite
|
||||||
|
FCZERO = $FF ; -1: zero
|
||||||
|
FCNORM = $00 ; 0: normal
|
||||||
|
FCDENORM = $01 ; 1: denormal
|
||||||
|
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
* Exceptions.
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
FBINVALID = $1
|
||||||
|
FBUFLOW = $2
|
||||||
|
FBOFLOW = $4
|
||||||
|
FBDIVZER = $8
|
||||||
|
FBINEXACT = $10
|
||||||
|
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
* Elementary function operation code masks.
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
FOLNX = $00 ; base-e log
|
||||||
|
FOLOG2X = $02 ; base-2 log
|
||||||
|
FOLN1X = $04 ; ln (1 + x)
|
||||||
|
FOLOG21X = $06 ; log2 (1 + x)
|
||||||
|
FOEXPX = $08 ; base-e exponential
|
||||||
|
FOEXP2X = $0A ; base-2 exponential
|
||||||
|
FOEXP1X = $0C ; exp (x) - 1
|
||||||
|
FOEXP21X = $0E ; exp2 (x) - 1
|
||||||
|
FOXPWRI = $10 ; integer exponentiation
|
||||||
|
FOXPWRY = $12 ; general exponentiation
|
||||||
|
FOCOMPOUND = $14 ; compound
|
||||||
|
FOANNUITY = $16 ; annuity
|
||||||
|
FOATANX = $18 ; arctangent
|
||||||
|
FOSINX = $1A ; sine
|
||||||
|
FOCOSX = $1C ; cosine
|
||||||
|
FOTANX = $1E ; tangent
|
||||||
|
FORANDX = $20 ; random
|
||||||
|
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
* Scanner and formatter operation code masks.
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
FOPSTR2DEC = 0 ; Pascal string to decimal record
|
||||||
|
FOCSTR2DEC = 2 ; C string (char stream) to dec. record
|
||||||
|
FODEC2STR = 1 ; decimal record to (Pascal) string
|
||||||
|
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
* NaN codes.
|
||||||
|
*-----------------------------------------------------------
|
||||||
|
NANSQRT = 1 ; Invalid square root such as sqrt(-1)
|
||||||
|
NANADD = 2 ; Invalid addition such as +INF - +INF
|
||||||
|
NANDIV = 4 ; Invalid division such as 0/0
|
||||||
|
NANMUL = 8 ; Invalid multiply such as 0 * INF
|
||||||
|
NANREM = 9 ; Invalid rem or mod such as x REM 0
|
||||||
|
NANASCBIN = 17 ; Conversion of invalid ASCII string
|
||||||
|
NANCOMP = 20 ; Comp NaN converted to floating
|
||||||
|
NANZERO = 21 ; Attempt to create a NaN with zero code
|
||||||
|
NANTRIG = 33 ; Invalid argument to trig routine
|
||||||
|
NANINVTRIG = 34 ; Invalid arg to inverse trig routine
|
||||||
|
NANLOG = 36 ; Invalid argument to log routine
|
||||||
|
NANPOWER = 37 ; Invalid argument to x^i or x^y routine
|
||||||
|
NANFINAN = 38 ; Invalid argument to financial function
|
|
@ -0,0 +1,17 @@
|
||||||
|
|
||||||
|
;-----------------------------------------------------------
|
||||||
|
; FILE: E16.SCRAP
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
;
|
||||||
|
;
|
||||||
|
;
|
||||||
|
;-----------------------------------------------------------
|
||||||
|
|
||||||
|
badScrapType equ $1610 ; Scrap error - No scrap of this type.
|
||||||
|
|
||||||
|
textScrap equ $0000 ; scrapType -
|
||||||
|
picScrap equ $0001 ; scrapType -
|
|
@ -0,0 +1,22 @@
|
||||||
|
|
||||||
|
; File: E16.SHELL
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
;
|
||||||
|
|
||||||
|
; GET/SET_ LINFO parameter block
|
||||||
|
|
||||||
|
osfile equ $00 ; address of source file name
|
||||||
|
odfile equ $04 ; address of output file name
|
||||||
|
oparms equ $08 ; address of paramter list
|
||||||
|
oistring equ $0C ; address of language specific input string
|
||||||
|
omerr equ $10 ; max error level allowed
|
||||||
|
omerrf equ $11 ; max error level found
|
||||||
|
olops equ $12 ; operations flag
|
||||||
|
okflag equ $13 ; KEEP flag
|
||||||
|
omflags equ $14 ; set of letters selected with '-'
|
||||||
|
opflags equ $18 ; set of letters selected with '+'
|
||||||
|
oorg equ $1C ; abs start address of non-relloc load file
|
|
@ -0,0 +1,76 @@
|
||||||
|
|
||||||
|
; File: E16.Sound
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
;
|
||||||
|
|
||||||
|
noDOCFndErr equ $0810 ; Sound error - no DOC chip found
|
||||||
|
docAddrRngErr equ $0811 ; Sound error - DOC address range error
|
||||||
|
noSAppInitErr equ $0812 ; Sound error - no SAppInit call made
|
||||||
|
invalGenNumErr equ $0813 ; Sound error - invalid generator numbe
|
||||||
|
;r
|
||||||
|
synthModeErr equ $0814 ; Sound error - synthesizer mode error
|
||||||
|
genBusyErr equ $0815 ; Sound error - generator busy error
|
||||||
|
mstrIRQNotAssgnErr equ $0817 ; Sound error - master IRQ not assi
|
||||||
|
;gned
|
||||||
|
sndAlreadyStrtErr equ $0818 ; Sound error - sound tools already
|
||||||
|
;started
|
||||||
|
|
||||||
|
owaveStart equ $00 ; Pointer - SoundParamBlock - starting addres
|
||||||
|
;s of wave
|
||||||
|
owaveSize equ $04 ; Word - SoundParamBlock - waveform size in pa
|
||||||
|
;ges
|
||||||
|
ofreqOffset equ $06 ; Word - SoundParamBlock -
|
||||||
|
odocBuffer equ $08 ; Word - SoundParamBlock - DOC buffer start a
|
||||||
|
;ddress, low byte = 0
|
||||||
|
obufferSize equ $0A ; Word - SoundParamBlock - DOC buffer start
|
||||||
|
;address, low byte = 0
|
||||||
|
onextWavePtr equ $0C ; SoundPBPtr - SoundParamBlock - Pointer to
|
||||||
|
; start of next wave's parameter block
|
||||||
|
ovolSetting equ $10 ; Word - SoundParamBlock - DOC volume settin
|
||||||
|
;g. High byte = 0
|
||||||
|
|
||||||
|
ffSynthMode equ $0001 ; channelGenMode - Free form synthesizer m
|
||||||
|
;ode
|
||||||
|
noteSynthMode equ $0002 ; channelGenMode - Note synthesizer mode
|
||||||
|
;.
|
||||||
|
|
||||||
|
gen0off equ $0001 ; genMask - param to FFStopSound
|
||||||
|
gen1off equ $0002 ; genMask - param to FFStopSound
|
||||||
|
gen2off equ $0004 ; genMask - param to FFStopSound
|
||||||
|
gen3off equ $0008 ; genMask - param to FFStopSound
|
||||||
|
gen4off equ $0010 ; genMask - param to FFStopSound
|
||||||
|
gen5off equ $0020 ; genMask - param to FFStopSound
|
||||||
|
gen6off equ $0040 ; genMask - param to FFStopSound
|
||||||
|
gen7off equ $0080 ; genMask - param to FFStopSound
|
||||||
|
gen8off equ $0100 ; genMask - param to FFStopSound
|
||||||
|
gen9off equ $0200 ; genMask - param to FFStopSound
|
||||||
|
gen10off equ $0400 ; genMask - param to FFStopSound
|
||||||
|
gen11off equ $0800 ; genMask - param to FFStopSound
|
||||||
|
gen12off equ $1000 ; genMask - param to FFStopSound
|
||||||
|
gen13off equ $2000 ; genMask - param to FFStopSound
|
||||||
|
gen14off equ $4000 ; genMask - param to FFStopSound
|
||||||
|
|
||||||
|
genAvail equ $0000 ; genStatus - Generator available status
|
||||||
|
ffSynth equ $0100 ; genStatus - Free Form Synthesizer status
|
||||||
|
noteSynth equ $0200 ; genStatus - Note Synthesizer status
|
||||||
|
lastBlock equ $8000 ; genStatus - Last block of wave
|
||||||
|
|
||||||
|
readRegister equ $00 ; Jump Table Offset - Read Register routine
|
||||||
|
writeRegister equ $04 ; Jump Table Offset - Write Register routi
|
||||||
|
;ne
|
||||||
|
readRam equ $08 ; Jump Table Offset - Read Ram routine
|
||||||
|
writeRam equ $0C ; Jump Table Offset - Write Ram routine
|
||||||
|
readNext equ $10 ; Jump Table Offset - Read Next routine
|
||||||
|
writeNext equ $14 ; Jump Table Offset - Write Next routine
|
||||||
|
oscTable equ $18 ; Jump Table Offset - Pointer to Oscillator tab
|
||||||
|
;le
|
||||||
|
genTable equ $1C ; Jump Table Offset - Pointer to generator tabl
|
||||||
|
;e
|
||||||
|
gcbAddrTable equ $20 ; Jump Table Offset - Pointer to GCB addres
|
||||||
|
;s table
|
||||||
|
disableInc equ $24 ; Jump Table Offset - Disable Increment routi
|
||||||
|
;ne
|
|
@ -0,0 +1,27 @@
|
||||||
|
|
||||||
|
;-----------------------------------------------------------
|
||||||
|
; FILE: E16.STDFILE
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
;
|
||||||
|
;
|
||||||
|
;
|
||||||
|
;-----------------------------------------------------------
|
||||||
|
|
||||||
|
ogood equ $00 ; Boolean - SFReplyRec - TRUE for open; FALSE for
|
||||||
|
;cancel
|
||||||
|
ofileType equ $02 ; Word - SFReplyRec - ProDOS file type
|
||||||
|
oauxFileType equ $04 ; Word - SFReplyRec - ProDOS aux file type
|
||||||
|
ofilename equ $06 ; Byte - SFReplyRec - Name of file in prefix 0
|
||||||
|
ofullPathname equ $22 ; Byte - SFReplyRec - The full pathname of
|
||||||
|
; the selected file.
|
||||||
|
|
||||||
|
noDisplay equ $0000 ; filterProc result - file not to be display
|
||||||
|
;ed
|
||||||
|
noSelect equ $0001 ; filterProc result - file displayed, but not
|
||||||
|
; selectable
|
||||||
|
displaySelect equ $0002 ; filterProc result - file displayed and
|
||||||
|
; selectable
|
|
@ -0,0 +1,49 @@
|
||||||
|
|
||||||
|
;-----------------------------------------------------------
|
||||||
|
; FILE: E16.TEXT
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
;
|
||||||
|
;
|
||||||
|
;
|
||||||
|
;-----------------------------------------------------------
|
||||||
|
|
||||||
|
badDevType equ $0C01 ; TextTool error - not implemented
|
||||||
|
badDevNum equ $0C02 ; TextTool error - Illegal device number.
|
||||||
|
badMode equ $0C03 ; TextTool error - Bad mode: illegal operation
|
||||||
|
;.
|
||||||
|
unDefHW equ $0C04 ; TextTool error - Undefined hardware error
|
||||||
|
lostDev equ $0C05 ; TextTool error - Lost device: Device no long
|
||||||
|
;er on line
|
||||||
|
lostFile equ $0C06 ; TextTool error - File no longer in diskette
|
||||||
|
; directory
|
||||||
|
badTitle equ $0C07 ; TextTool error - Illegal Filename
|
||||||
|
noRoom equ $0C08 ; TT error - Insufficient space on specified di
|
||||||
|
;skette
|
||||||
|
noDevice equ $0C09 ; TextTool error - Volume not online
|
||||||
|
noFile equ $0C0A ; TextTool error - File not in specifiled direc
|
||||||
|
;tory
|
||||||
|
dupFile equ $0C0B ; TextTool error - Filename already exists
|
||||||
|
notClosed equ $0C0C ; TextTool error - Attempt to open an open f
|
||||||
|
;ile
|
||||||
|
notOpen equ $0C0D ; TextTool error - Attempt to close closed fil
|
||||||
|
;e
|
||||||
|
badFormat equ $0C0E ; TextTool error - error reading real or int
|
||||||
|
;eger
|
||||||
|
ringBuffOFlo equ $0C0F ; TextTool error - Chars arriving too fas
|
||||||
|
;t
|
||||||
|
writeProtected equ $0C10 ; TextTool error -
|
||||||
|
devErr equ $0C40 ; TextTool error - Read or Write failed
|
||||||
|
|
||||||
|
input equ $0000 ; deviceNum -
|
||||||
|
output equ $0001 ; deviceNum -
|
||||||
|
errorOutput equ $0002 ; deviceNum -
|
||||||
|
basicType equ $0000 ; deviceType -
|
||||||
|
pascalType equ $0001 ; deviceType -
|
||||||
|
ramBased equ $0002 ; deviceType -
|
||||||
|
|
||||||
|
noEcho equ $0000 ; echoFlag -
|
||||||
|
echo equ $0001 ; echoFlag -
|
|
@ -0,0 +1,185 @@
|
||||||
|
|
||||||
|
; File: E16.Window
|
||||||
|
;
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
;
|
||||||
|
|
||||||
|
paramLenErr equ $0E01 ; Window error - first word of parameter l
|
||||||
|
;ist is the wrong size
|
||||||
|
allocateErr equ $0E02 ; Window error - unable to allocate window
|
||||||
|
; record
|
||||||
|
taskMaskErr equ $0E03 ; Window error - bits 12-15 are not clear
|
||||||
|
;in WmTaskMask field of WmTaskRec
|
||||||
|
|
||||||
|
owNext equ $00 ; GrafPortPtr - WindRec - Pointer to next window
|
||||||
|
;Record.
|
||||||
|
oport equ $04 ; GrafPort - WindRec - Window's port.
|
||||||
|
owPadding equ $AE ; 16 Bytes - WindRec - Space for possible futu
|
||||||
|
;re expansion
|
||||||
|
owStrucRgn equ $BE ; RgnHandle - WindRec - Region of frame plus
|
||||||
|
;content.
|
||||||
|
owContRgn equ $C2 ; RgnHandle - WindRec - Content region.
|
||||||
|
owUpdateRgn equ $C6 ; RgnHandle - WindRec - Update region.
|
||||||
|
owControls equ $CA ; CtlRecHndl - WindRec - Window's control lis
|
||||||
|
;t.
|
||||||
|
owFrameCtrls equ $CE ; CtlRecHndl - WindRec - Window frame's con
|
||||||
|
;trol list.
|
||||||
|
owFrame equ $D2 ; Word - WindRec - Bit flags.
|
||||||
|
|
||||||
|
oframeColor equ $00 ; Word - WindColor - Color of window frame.
|
||||||
|
otitleColor equ $02 ; Word - WindColor - Color of title and bar.
|
||||||
|
otBarColor equ $04 ; Word - WindColor - Color/pattern of title b
|
||||||
|
;ar.
|
||||||
|
ogrowColor equ $06 ; Word - WindColor - Color of grow box.
|
||||||
|
oinfoColor equ $08 ; Word - WindColor - Color of information bar
|
||||||
|
;.
|
||||||
|
|
||||||
|
oparamLength equ $00 ; Word - ParamList - Parameter to NewWindow
|
||||||
|
;.
|
||||||
|
owFrameBits equ $02 ; Word - ParamList - Parameter to NewWindow.
|
||||||
|
owTitle equ $04 ; Pointer - ParamList - Parameter to NewWindow.
|
||||||
|
owRefCon equ $08 ; Long - ParamList - Parameter to NewWindow.
|
||||||
|
owZoom equ $0C ; Rect - ParamList - Parameter to NewWindow.
|
||||||
|
owColor equ $14 ; WindColorPtr - ParamList - Parameter to NewWin
|
||||||
|
;dow.
|
||||||
|
owYOrigin equ $18 ; Integer - ParamList - Parameter to NewWindow
|
||||||
|
;.
|
||||||
|
owXOrigin equ $1A ; Integer - ParamList - Parameter to NewWindow
|
||||||
|
;.
|
||||||
|
owDataH equ $1C ; Word - ParamList - Parameter to NewWindow.
|
||||||
|
owDataW equ $1E ; Word - ParamList - Parameter to NewWindow.
|
||||||
|
owMaxH equ $20 ; Word - ParamList - Parameter to NewWindow.
|
||||||
|
owMaxW equ $22 ; Word - ParamList - Parameter to NewWindow.
|
||||||
|
owScrollVer equ $24 ; Word - ParamList - Parameter to NewWindow.
|
||||||
|
owScrollHor equ $26 ; Word - ParamList - Parameter to NewWindow.
|
||||||
|
owPageVer equ $28 ; Word - ParamList - Parameter to NewWindow.
|
||||||
|
owPageHor equ $2A ; Word - ParamList - Parameter to NewWindow.
|
||||||
|
owInfoRefCon equ $2C ; Long - ParamList - Parameter to NewWindow
|
||||||
|
;.
|
||||||
|
owInfoHeight equ $30 ; Word - ParamList - height of information
|
||||||
|
;bar
|
||||||
|
owFrameDefProc equ $32 ; Pointer - ParamList - Parameter to NewW
|
||||||
|
;indow.
|
||||||
|
owInfoDefProc equ $36 ; Pointer - ParamList - Parameter to NewWi
|
||||||
|
;ndow.
|
||||||
|
owContDefProc equ $3A ; Pointer - ParamList - Parameter to NewWi
|
||||||
|
;ndow.
|
||||||
|
owPosition equ $3E ; Rect - ParamList - Parameter to NewWindow.
|
||||||
|
owPlane equ $46 ; GrafPortPtr - ParamList - Parameter to NewWind
|
||||||
|
;ow.
|
||||||
|
owStorage equ $4A ; WindRecPtr - ParamList - Parameter to NewWin
|
||||||
|
;dow.
|
||||||
|
|
||||||
|
owmWhat equ $00 ; Word - WmTaskRec -
|
||||||
|
owmMessage equ $02 ; Long - WmTaskRec -
|
||||||
|
owmWhen equ $06 ; Long - WmTaskRec -
|
||||||
|
owmWhere equ $0A ; Point - WmTaskRec -
|
||||||
|
owmModifiers equ $0E ; Word - WmTaskRec -
|
||||||
|
owmTaskData equ $10 ; Long - WmTaskRec - TaskMaster return value
|
||||||
|
;.
|
||||||
|
owmTaskMask equ $14 ; Long - WmTaskRec - TaskMaster feature mask
|
||||||
|
;.
|
||||||
|
|
||||||
|
wNoConstraint equ $0000 ; Axis parameter - No constraint on move
|
||||||
|
;ment.
|
||||||
|
wHAxisOnly equ $0001 ; Axis parameter - Horizontal axis only.
|
||||||
|
wVAxisOnly equ $0002 ; Axis parameter - Vertical axis only.
|
||||||
|
|
||||||
|
FromDesk equ $00 ; Desktop Command - Subtract region from deskto
|
||||||
|
;p
|
||||||
|
ToDesk equ $1 ; Desktop Command - Add region to desktop
|
||||||
|
GetDesktop equ $2 ; Desktop Command - Get Handle of Desktop regi
|
||||||
|
;on
|
||||||
|
SetDesktop equ $3 ; Desktop Command - Set Handle of Desktop regi
|
||||||
|
;on
|
||||||
|
GetDeskPat equ $4 ; Desktop command - Address of pattern or dra
|
||||||
|
;wing routine
|
||||||
|
SetDeskPat equ $5 ; Desktop command - Change Address of pattern
|
||||||
|
; or drawing routine
|
||||||
|
GetVisDesktop equ $6 ; Desktop command - Get destop region less
|
||||||
|
;visible windows.
|
||||||
|
BackGroundRgn equ $7 ; Desktop command - For drawing directly on
|
||||||
|
; desktop.
|
||||||
|
|
||||||
|
toBottom equ -2 ; SendBehind value - To send window to bottom.
|
||||||
|
topMost equ -1 ; SendBehind value - To make window top.
|
||||||
|
bottomMost equ $0000 ; SendBehind value - To make window bottom.
|
||||||
|
|
||||||
|
tmMenuKey equ $0001 ; Task Mask -
|
||||||
|
tmUpdate equ $0002 ; Task Mask -
|
||||||
|
tmFindW equ $0004 ; Task Mask -
|
||||||
|
tmMenuSel equ $0008 ; Task Mask -
|
||||||
|
tmOpenNDA equ $0010 ; Task Mask -
|
||||||
|
tmSysClick equ $0020 ; Task Mask -
|
||||||
|
tmDragW equ $0040 ; Task Mask -
|
||||||
|
tmContent equ $0080 ; Task Mask -
|
||||||
|
tmClose equ $0100 ; Task Mask -
|
||||||
|
tmZoom equ $0200 ; Task Mask -
|
||||||
|
tmGrow equ $0400 ; Task Mask -
|
||||||
|
tmScroll equ $0800 ; Task Mask -
|
||||||
|
tmSpecial equ $1000 ; Task Mask -
|
||||||
|
tmCRedraw equ $2000 ; Task Mask -
|
||||||
|
tmInactive equ $4000 ; Task Mask -
|
||||||
|
tmInfo equ $8000 ; Task Mask -
|
||||||
|
|
||||||
|
wNoHit equ $0000 ; TaskMaster codes - retained for back compatib
|
||||||
|
;ility.
|
||||||
|
inNull equ $0000 ; TaskMaster codes - retained for back compatib
|
||||||
|
;ility
|
||||||
|
inKey equ $0003 ; TaskMaster codes - retained for back compatibi
|
||||||
|
;lity
|
||||||
|
inButtDwn equ $0001 ; TaskMaster codes - retained for back compa
|
||||||
|
;tibility
|
||||||
|
inUpdate equ $0006 ; TaskMaster codes - retained for back compat
|
||||||
|
;ibility
|
||||||
|
wInDesk equ $0010 ; TaskMaster codes - On Desktop
|
||||||
|
wInMenuBar equ $0011 ; TaskMaster codes - On system menu bar
|
||||||
|
wClickCalled equ $0012 ; TaskMaster codes - system click called
|
||||||
|
wInContent equ $0013 ; TaskMaster codes - In content region
|
||||||
|
wInDrag equ $0014 ; TaskMaster codes - In drag region
|
||||||
|
wInGrow equ $0015 ; TaskMaster codes - In grow region, active wi
|
||||||
|
;ndow only
|
||||||
|
wInGoAway equ $0016 ; TaskMaster codes - In go-away region, acti
|
||||||
|
;ve window only
|
||||||
|
wInZoom equ $0017 ; TaskMaster codes - In zoom region, active wi
|
||||||
|
;ndow only
|
||||||
|
wInInfo equ $0018 ; TaskMaster codes - In information bar
|
||||||
|
wInSpecial equ $0019 ; TaskMaster codes - Item ID selected was 2
|
||||||
|
;50 - 255
|
||||||
|
wInDeskItem equ $001A ; TaskMaster codes - Item ID selected was
|
||||||
|
;1 - 249
|
||||||
|
wInFrame equ $1B ; TaskMaster codes - in Frame, but not on anyth
|
||||||
|
;ing else
|
||||||
|
wInactMenu equ $1C ; TaskMaster codes - "selection" of inactive
|
||||||
|
;menu item
|
||||||
|
wInSysWindow equ $8000 ; TaskMaster codes - hi bit set for syste
|
||||||
|
;m windows
|
||||||
|
|
||||||
|
wDraw equ $00 ; VarCode - Draw window frame command.
|
||||||
|
wHit equ $01 ; VarCode - Hit test command.
|
||||||
|
wCalcRgns equ $02 ; VarCode - Compute regions command.
|
||||||
|
wNew equ $03 ; VarCode - Initialization command.
|
||||||
|
wDispose equ $04 ; VarCode - Dispose command.
|
||||||
|
|
||||||
|
fHilited equ $0001 ; WFrame - Window is highlighted.
|
||||||
|
fZoomed equ $0002 ; WFrame - Window is zoomed.
|
||||||
|
fAllocated equ $0004 ; WFrame - Window record was allocated.
|
||||||
|
fCtlTie equ $0008 ; WFrame - Window state tied to controls.
|
||||||
|
fInfo equ $0010 ; WFrame - Window has an information bar.
|
||||||
|
fVis equ $0020 ; WFrame - Window is visible.
|
||||||
|
fQContent equ $0040 ; WFrame -
|
||||||
|
fMove equ $0080 ; WFrame - Window is movable.
|
||||||
|
fZoom equ $0100 ; WFrame - Window is zoomable.
|
||||||
|
fFlex equ $0200 ; WFrame -
|
||||||
|
fGrow equ $0400 ; WFrame - Window has grow box.
|
||||||
|
fBScroll equ $0800 ; WFrame - Window has horizontal scroll bar.
|
||||||
|
fRScroll equ $1000 ; WFrame - Window has vertical scroll bar.
|
||||||
|
fAlert equ $2000 ; WFrame -
|
||||||
|
fClose equ $4000 ; WFrame - Window has a close box.
|
||||||
|
fTitle equ $8000 ; WFrame - Window has a title bar.
|
||||||
|
|
||||||
|
windSize equ $145 ; WindRec - Size of WindRec.
|
||||||
|
wmTaskRecSize equ $16 ; WmTaskRec - Size of WmTaskRec.
|
|
@ -0,0 +1,143 @@
|
||||||
|
* Event Manager macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_EMBootInit MAC
|
||||||
|
Tool $106
|
||||||
|
<<<
|
||||||
|
~EMStartUp MAC
|
||||||
|
PxW ]1;]2;]3;]4
|
||||||
|
PxW ]5;]6;]7
|
||||||
|
_EMStartUp MAC
|
||||||
|
Tool $206
|
||||||
|
<<<
|
||||||
|
_EMShutDown MAC
|
||||||
|
Tool $306
|
||||||
|
<<<
|
||||||
|
~EMVersion MAC
|
||||||
|
PHA
|
||||||
|
_EMVersion MAC
|
||||||
|
Tool $406
|
||||||
|
<<<
|
||||||
|
_EMReset MAC
|
||||||
|
Tool $506
|
||||||
|
<<<
|
||||||
|
~EMStatus MAC
|
||||||
|
PHA
|
||||||
|
_EMStatus MAC
|
||||||
|
Tool $606
|
||||||
|
<<<
|
||||||
|
~DoWindows MAC
|
||||||
|
PHA
|
||||||
|
_DoWindows MAC
|
||||||
|
Tool $906
|
||||||
|
<<<
|
||||||
|
~GetNextEvent MAC
|
||||||
|
PHA
|
||||||
|
PHWL ]1;]2
|
||||||
|
_GetNextEvent MAC
|
||||||
|
Tool $A06
|
||||||
|
<<<
|
||||||
|
~EventAvail MAC
|
||||||
|
PHA
|
||||||
|
PHWL ]1;]2
|
||||||
|
_EventAvail MAC
|
||||||
|
Tool $B06
|
||||||
|
<<<
|
||||||
|
~GetMouse MAC
|
||||||
|
PHL ]1
|
||||||
|
_GetMouse MAC
|
||||||
|
Tool $C06
|
||||||
|
<<<
|
||||||
|
~Button MAC
|
||||||
|
P1SW ]1
|
||||||
|
_Button MAC
|
||||||
|
Tool $D06
|
||||||
|
<<<
|
||||||
|
~StillDown MAC
|
||||||
|
P1SW ]1
|
||||||
|
_StillDown MAC
|
||||||
|
Tool $E06
|
||||||
|
<<<
|
||||||
|
~WaitMouseUp MAC
|
||||||
|
P1SW ]1
|
||||||
|
_WaitMouseUp MAC
|
||||||
|
Tool $F06
|
||||||
|
<<<
|
||||||
|
~TickCount MAC
|
||||||
|
PHS 2
|
||||||
|
_TickCount MAC
|
||||||
|
Tool $1006
|
||||||
|
<<<
|
||||||
|
~GetDblTime MAC
|
||||||
|
PHS 2
|
||||||
|
_GetDblTime MAC
|
||||||
|
Tool $1106
|
||||||
|
<<<
|
||||||
|
~GetCaretTime MAC
|
||||||
|
PHS 2
|
||||||
|
_GetCaretTime MAC
|
||||||
|
Tool $1206
|
||||||
|
<<<
|
||||||
|
_SetSwitch MAC
|
||||||
|
Tool $1306
|
||||||
|
<<<
|
||||||
|
~PostEvent MAC
|
||||||
|
PHA
|
||||||
|
PHWL ]1;]2
|
||||||
|
_PostEvent MAC
|
||||||
|
Tool $1406
|
||||||
|
<<<
|
||||||
|
~FlushEvents MAC
|
||||||
|
PHA
|
||||||
|
PxW ]1;]2
|
||||||
|
_FlushEvents MAC
|
||||||
|
Tool $1506
|
||||||
|
<<<
|
||||||
|
~GetOSEvent MAC
|
||||||
|
PHA
|
||||||
|
PHWL ]1;]2
|
||||||
|
_GetOSEvent MAC
|
||||||
|
Tool $1606
|
||||||
|
<<<
|
||||||
|
~OSEventAvail MAC
|
||||||
|
PHA
|
||||||
|
PHWL ]1;]2
|
||||||
|
_OSEventAvail MAC
|
||||||
|
Tool $1706
|
||||||
|
<<<
|
||||||
|
~SetEventMask MAC
|
||||||
|
PHW ]1
|
||||||
|
_SetEventMask MAC
|
||||||
|
Tool $1806
|
||||||
|
<<<
|
||||||
|
~FakeMouse MAC
|
||||||
|
PxW ]1;]2;]3;]4
|
||||||
|
PHW ]5
|
||||||
|
_FakeMouse MAC
|
||||||
|
Tool $1906
|
||||||
|
<<<
|
||||||
|
~SetAutoKeyLimit MAC
|
||||||
|
PHW ]1
|
||||||
|
_SetAutoKeyLimit MAC
|
||||||
|
Tool $1A06
|
||||||
|
<<<
|
||||||
|
~GetKeyTranslation MAC
|
||||||
|
P1SW ]1
|
||||||
|
_GetKeyTranslation MAC
|
||||||
|
Tool $1B06
|
||||||
|
<<<
|
||||||
|
~SetKeyTranslation MAC
|
||||||
|
PHW ]1
|
||||||
|
_SetKeyTranslation MAC
|
||||||
|
Tool $1C06
|
||||||
|
<<<
|
||||||
|
~qEMStartUp MAC
|
||||||
|
NextDP ]1;$100
|
||||||
|
PxW ]2;]3;]4;]5
|
||||||
|
PxW ]6;]7
|
||||||
|
Tool $206
|
||||||
|
<<<
|
|
@ -0,0 +1,141 @@
|
||||||
|
* Font Manager macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_FMBootInit MAC
|
||||||
|
Tool $11B
|
||||||
|
<<<
|
||||||
|
~FMStartUp MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_FMStartUp MAC
|
||||||
|
Tool $21B
|
||||||
|
<<<
|
||||||
|
_FMShutDown MAC
|
||||||
|
Tool $31B
|
||||||
|
<<<
|
||||||
|
~FMVersion MAC
|
||||||
|
PHA
|
||||||
|
_FMVersion MAC
|
||||||
|
Tool $41B
|
||||||
|
<<<
|
||||||
|
_FMReset MAC
|
||||||
|
Tool $51B
|
||||||
|
<<<
|
||||||
|
~FMStatus MAC
|
||||||
|
PHA
|
||||||
|
_FMStatus MAC
|
||||||
|
Tool $61B
|
||||||
|
<<<
|
||||||
|
~CountFamilies MAC
|
||||||
|
P1SW ]1
|
||||||
|
_CountFamilies MAC
|
||||||
|
Tool $91B
|
||||||
|
<<<
|
||||||
|
~FindFamily MAC
|
||||||
|
P1SW ]1
|
||||||
|
PHWL ]2;]3
|
||||||
|
_FindFamily MAC
|
||||||
|
Tool $A1B
|
||||||
|
<<<
|
||||||
|
~GetFamInfo MAC
|
||||||
|
PHA
|
||||||
|
PHWL ]1;]2
|
||||||
|
_GetFamInfo MAC
|
||||||
|
Tool $B1B
|
||||||
|
<<<
|
||||||
|
~GetFamNum MAC
|
||||||
|
P1SL ]1
|
||||||
|
_GetFamNum MAC
|
||||||
|
Tool $C1B
|
||||||
|
<<<
|
||||||
|
~AddFamily MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_AddFamily MAC
|
||||||
|
Tool $D1B
|
||||||
|
<<<
|
||||||
|
~InstallFont MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_InstallFont MAC
|
||||||
|
Tool $E1B
|
||||||
|
<<<
|
||||||
|
~SetPurgeStat MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_SetPurgeStat MAC
|
||||||
|
Tool $F1B
|
||||||
|
<<<
|
||||||
|
~CountFonts MAC
|
||||||
|
P1SL ]1
|
||||||
|
PHW ]2
|
||||||
|
_CountFonts MAC
|
||||||
|
Tool $101B
|
||||||
|
<<<
|
||||||
|
~FindFontStats MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
PHWL ]3;]4
|
||||||
|
_FindFontStats MAC
|
||||||
|
Tool $111B
|
||||||
|
<<<
|
||||||
|
~LoadFont MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
PHWL ]3;]4
|
||||||
|
_LoadFont MAC
|
||||||
|
Tool $121B
|
||||||
|
<<<
|
||||||
|
_LoadSysFont MAC
|
||||||
|
Tool $131B
|
||||||
|
<<<
|
||||||
|
~AddFontVar MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_AddFontVar MAC
|
||||||
|
Tool $141B
|
||||||
|
<<<
|
||||||
|
~FixFontMenu MAC
|
||||||
|
PxW ]1;]2;]3
|
||||||
|
_FixFontMenu MAC
|
||||||
|
Tool $151B
|
||||||
|
<<<
|
||||||
|
~ChooseFont MAC
|
||||||
|
P2SL ]1
|
||||||
|
PHW ]2
|
||||||
|
_ChooseFont MAC
|
||||||
|
Tool $161B
|
||||||
|
<<<
|
||||||
|
~ItemID2FamNum MAC
|
||||||
|
P1SW ]1
|
||||||
|
_ItemID2FamNum MAC
|
||||||
|
Tool $171B
|
||||||
|
<<<
|
||||||
|
~FMSetSysFont MAC
|
||||||
|
PHL ]1
|
||||||
|
_FMSetSysFont MAC
|
||||||
|
Tool $181B
|
||||||
|
<<<
|
||||||
|
~FMGetSysFID MAC
|
||||||
|
PHS 2
|
||||||
|
_FMGetSysFID MAC
|
||||||
|
Tool $191B
|
||||||
|
<<<
|
||||||
|
~FMGetCurFID MAC
|
||||||
|
PHS 2
|
||||||
|
_FMGetCurFID MAC
|
||||||
|
Tool $1A1B
|
||||||
|
<<<
|
||||||
|
~FamNum2ItemID MAC
|
||||||
|
P1SW ]1
|
||||||
|
_FamNum2ItemID MAC
|
||||||
|
Tool $1B1B
|
||||||
|
<<<
|
||||||
|
~InstallWithStats MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_InstallWithStats MAC
|
||||||
|
Tool $1C1B
|
||||||
|
<<<
|
||||||
|
~qFMStartUp MAC
|
||||||
|
PHW ]1
|
||||||
|
NextDP ]2;$100
|
||||||
|
Tool $21B
|
||||||
|
<<<
|
|
@ -0,0 +1,38 @@
|
||||||
|
* File: MGSOS
|
||||||
|
*
|
||||||
|
* Copyright 1989 by Dave Klimas
|
||||||
|
*
|
||||||
|
* IMPORTANT! To use these macros, you must also include the
|
||||||
|
* label equates as defined in the file E16.GSOS from the TOOL.EQUATES
|
||||||
|
* directory.
|
||||||
|
*-----------------------------------------------
|
||||||
|
*
|
||||||
|
* xGSOS <callname>;<recpointer>;class 0/1 flag
|
||||||
|
*
|
||||||
|
* iGSOS _Create;addr;0 ;this is a class 0 Create call
|
||||||
|
*
|
||||||
|
*-----------------------------------------------
|
||||||
|
* Inline GS/OS call macro
|
||||||
|
|
||||||
|
iGSOS MAC
|
||||||
|
JSL $E100A8
|
||||||
|
DO ]3
|
||||||
|
DA ]1.$2000
|
||||||
|
ELSE
|
||||||
|
DA ]1
|
||||||
|
FIN
|
||||||
|
ADRL ]2
|
||||||
|
<<<
|
||||||
|
|
||||||
|
*-----------------------------------------------
|
||||||
|
* Stack GS/OS call macro
|
||||||
|
|
||||||
|
sGSOS MAC
|
||||||
|
PHL ]2
|
||||||
|
DO ]3
|
||||||
|
PEA ]1.$2000
|
||||||
|
ELSE
|
||||||
|
PEA ]1
|
||||||
|
FIN
|
||||||
|
JSL $E100B0
|
||||||
|
<<<
|
|
@ -0,0 +1,220 @@
|
||||||
|
* Integer Math macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_IMBootInit MAC
|
||||||
|
Tool $10B
|
||||||
|
<<<
|
||||||
|
_IMStartUp MAC
|
||||||
|
_IntStartUp MAC
|
||||||
|
Tool $20B
|
||||||
|
<<<
|
||||||
|
_IMShutDown MAC
|
||||||
|
_IntShutDown MAC
|
||||||
|
Tool $30B
|
||||||
|
<<<
|
||||||
|
~IMVersion MAC
|
||||||
|
PHA
|
||||||
|
_IMVersion MAC
|
||||||
|
Tool $40B
|
||||||
|
<<<
|
||||||
|
_IMReset MAC
|
||||||
|
Tool $50B
|
||||||
|
<<<
|
||||||
|
~IMStatus MAC
|
||||||
|
PHA
|
||||||
|
_IMStatus MAC
|
||||||
|
Tool $60B
|
||||||
|
<<<
|
||||||
|
~Multiply MAC
|
||||||
|
PHS 2
|
||||||
|
PxW ]1;]2
|
||||||
|
_Multiply MAC
|
||||||
|
Tool $90B
|
||||||
|
<<<
|
||||||
|
~SDivide MAC
|
||||||
|
PHS 2
|
||||||
|
PxW ]1;]2
|
||||||
|
_SDivide MAC
|
||||||
|
Tool $A0B
|
||||||
|
<<<
|
||||||
|
~UDivide MAC
|
||||||
|
PHS 2
|
||||||
|
PxW ]1;]2
|
||||||
|
_UDivide MAC
|
||||||
|
Tool $B0B
|
||||||
|
<<<
|
||||||
|
~LongMul MAC
|
||||||
|
PHS 4
|
||||||
|
PxL ]1;]2
|
||||||
|
_LongMul MAC
|
||||||
|
Tool $C0B
|
||||||
|
<<<
|
||||||
|
~LongDivide MAC
|
||||||
|
PHS 4
|
||||||
|
PxL ]1;]2
|
||||||
|
_LongDivide MAC
|
||||||
|
Tool $D0B
|
||||||
|
<<<
|
||||||
|
~FixRatio MAC
|
||||||
|
PHS 2
|
||||||
|
PxW ]1;]2
|
||||||
|
_FixRatio MAC
|
||||||
|
Tool $E0B
|
||||||
|
<<<
|
||||||
|
~FixMul MAC
|
||||||
|
PHS 2
|
||||||
|
PxL ]1;]2
|
||||||
|
_FixMul MAC
|
||||||
|
Tool $F0B
|
||||||
|
<<<
|
||||||
|
~FracMul MAC
|
||||||
|
PHS 2
|
||||||
|
PxL ]1;]2
|
||||||
|
_FracMul MAC
|
||||||
|
Tool $100B
|
||||||
|
<<<
|
||||||
|
~FixDiv MAC
|
||||||
|
PHS 2
|
||||||
|
PxL ]1;]2
|
||||||
|
_FixDiv MAC
|
||||||
|
Tool $110B
|
||||||
|
<<<
|
||||||
|
~FracDiv MAC
|
||||||
|
PHS 2
|
||||||
|
PxL ]1;]2
|
||||||
|
_FracDiv MAC
|
||||||
|
Tool $120B
|
||||||
|
<<<
|
||||||
|
~FixRound MAC
|
||||||
|
P1SL ]1
|
||||||
|
_FixRound MAC
|
||||||
|
Tool $130B
|
||||||
|
<<<
|
||||||
|
~FracSqrt MAC
|
||||||
|
P2SL ]1
|
||||||
|
_FracSqrt MAC
|
||||||
|
Tool $140B
|
||||||
|
<<<
|
||||||
|
~FracCos MAC
|
||||||
|
P2SL ]1
|
||||||
|
_FracCos MAC
|
||||||
|
Tool $150B
|
||||||
|
<<<
|
||||||
|
~FracSin MAC
|
||||||
|
P2SL ]1
|
||||||
|
_FracSin MAC
|
||||||
|
Tool $160B
|
||||||
|
<<<
|
||||||
|
~FixATan2 MAC
|
||||||
|
PHS 2
|
||||||
|
PxL ]1;]2
|
||||||
|
_FixATan2 MAC
|
||||||
|
Tool $170B
|
||||||
|
<<<
|
||||||
|
~HiWord MAC
|
||||||
|
P1SL ]1
|
||||||
|
_HiWord MAC
|
||||||
|
Tool $180B
|
||||||
|
<<<
|
||||||
|
~LoWord MAC
|
||||||
|
P1SL ]1
|
||||||
|
_LoWord MAC
|
||||||
|
Tool $190B
|
||||||
|
<<<
|
||||||
|
~Long2Fix MAC
|
||||||
|
P2SL ]1
|
||||||
|
_Long2Fix MAC
|
||||||
|
Tool $1A0B
|
||||||
|
<<<
|
||||||
|
~Fix2Long MAC
|
||||||
|
P2SL ]1
|
||||||
|
_Fix2Long MAC
|
||||||
|
Tool $1B0B
|
||||||
|
<<<
|
||||||
|
~Fix2Frac MAC
|
||||||
|
P2SL ]1
|
||||||
|
_Fix2Frac MAC
|
||||||
|
Tool $1C0B
|
||||||
|
<<<
|
||||||
|
~Frac2Fix MAC
|
||||||
|
P2SL ]1
|
||||||
|
_Frac2Fix MAC
|
||||||
|
Tool $1D0B
|
||||||
|
<<<
|
||||||
|
~Fix2X MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_Fix2X MAC
|
||||||
|
Tool $1E0B
|
||||||
|
<<<
|
||||||
|
~Frac2X MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_Frac2X MAC
|
||||||
|
Tool $1F0B
|
||||||
|
<<<
|
||||||
|
~X2Fix MAC
|
||||||
|
P2SL ]1
|
||||||
|
_X2Fix MAC
|
||||||
|
Tool $200B
|
||||||
|
<<<
|
||||||
|
~X2Frac MAC
|
||||||
|
P2SL ]1
|
||||||
|
_X2Frac MAC
|
||||||
|
Tool $210B
|
||||||
|
<<<
|
||||||
|
~Int2Hex MAC
|
||||||
|
PHW ]1
|
||||||
|
PHLW ]2;]3
|
||||||
|
_Int2Hex MAC
|
||||||
|
Tool $220B
|
||||||
|
<<<
|
||||||
|
~Long2Hex MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
PHW ]3
|
||||||
|
_Long2Hex MAC
|
||||||
|
Tool $230B
|
||||||
|
<<<
|
||||||
|
~Hex2Int MAC
|
||||||
|
PHA
|
||||||
|
PHLW ]1;]2
|
||||||
|
_Hex2Int MAC
|
||||||
|
Tool $240B
|
||||||
|
<<<
|
||||||
|
~Hex2Long MAC
|
||||||
|
PHS 2
|
||||||
|
PHLW ]1;]2
|
||||||
|
_Hex2Long MAC
|
||||||
|
Tool $250B
|
||||||
|
<<<
|
||||||
|
~Int2Dec MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
PxW ]3;]4
|
||||||
|
_Int2Dec MAC
|
||||||
|
Tool $260B
|
||||||
|
<<<
|
||||||
|
~Long2Dec MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
PxW ]3;]4
|
||||||
|
_Long2Dec MAC
|
||||||
|
Tool $270B
|
||||||
|
<<<
|
||||||
|
~Dec2Int MAC
|
||||||
|
P1SL ]1
|
||||||
|
PxW ]2;]3
|
||||||
|
_Dec2Int MAC
|
||||||
|
Tool $280B
|
||||||
|
<<<
|
||||||
|
~Dec2Long MAC
|
||||||
|
P2SL ]1
|
||||||
|
PxW ]2;]3
|
||||||
|
_Dec2Long MAC
|
||||||
|
Tool $290B
|
||||||
|
<<<
|
||||||
|
~HexIt MAC
|
||||||
|
P2SW ]1
|
||||||
|
_HexIt MAC
|
||||||
|
Tool $2A0B
|
||||||
|
<<<
|
|
@ -0,0 +1,179 @@
|
||||||
|
* LineEdit macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_LEBootInit MAC
|
||||||
|
Tool $114
|
||||||
|
<<<
|
||||||
|
~LEStartUp MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_LEStartUp MAC
|
||||||
|
Tool $214
|
||||||
|
<<<
|
||||||
|
_LEShutDown MAC
|
||||||
|
Tool $314
|
||||||
|
<<<
|
||||||
|
~LEVersion MAC
|
||||||
|
PHA
|
||||||
|
_LEVersion MAC
|
||||||
|
Tool $414
|
||||||
|
<<<
|
||||||
|
_LEReset MAC
|
||||||
|
Tool $514
|
||||||
|
<<<
|
||||||
|
~LEStatus MAC
|
||||||
|
PHA
|
||||||
|
_LEStatus MAC
|
||||||
|
Tool $614
|
||||||
|
<<<
|
||||||
|
~LENew MAC
|
||||||
|
P2SL ]1
|
||||||
|
PHLW ]2;]3
|
||||||
|
_LENew MAC
|
||||||
|
Tool $914
|
||||||
|
<<<
|
||||||
|
~LEDispose MAC
|
||||||
|
PHL ]1
|
||||||
|
_LEDispose MAC
|
||||||
|
Tool $A14
|
||||||
|
<<<
|
||||||
|
~LESetText MAC
|
||||||
|
PHL ]1
|
||||||
|
PHWL ]2;]3
|
||||||
|
_LESetText MAC
|
||||||
|
Tool $B14
|
||||||
|
<<<
|
||||||
|
~LEIdle MAC
|
||||||
|
PHL ]1
|
||||||
|
_LEIdle MAC
|
||||||
|
Tool $C14
|
||||||
|
<<<
|
||||||
|
~LEClick MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_LEClick MAC
|
||||||
|
Tool $D14
|
||||||
|
<<<
|
||||||
|
~LESetSelect MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_LESetSelect MAC
|
||||||
|
Tool $E14
|
||||||
|
<<<
|
||||||
|
~LEActivate MAC
|
||||||
|
PHL ]1
|
||||||
|
_LEActivate MAC
|
||||||
|
Tool $F14
|
||||||
|
<<<
|
||||||
|
~LEDeactivate MAC
|
||||||
|
PHL ]1
|
||||||
|
_LEDeactivate MAC
|
||||||
|
Tool $1014
|
||||||
|
<<<
|
||||||
|
~LEKey MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_LEKey MAC
|
||||||
|
Tool $1114
|
||||||
|
<<<
|
||||||
|
~LECut MAC
|
||||||
|
PHL ]1
|
||||||
|
_LECut MAC
|
||||||
|
Tool $1214
|
||||||
|
<<<
|
||||||
|
~LECopy MAC
|
||||||
|
PHL ]1
|
||||||
|
_LECopy MAC
|
||||||
|
Tool $1314
|
||||||
|
<<<
|
||||||
|
~LEPaste MAC
|
||||||
|
PHL ]1
|
||||||
|
_LEPaste MAC
|
||||||
|
Tool $1414
|
||||||
|
<<<
|
||||||
|
~LEDelete MAC
|
||||||
|
PHL ]1
|
||||||
|
_LEDelete MAC
|
||||||
|
Tool $1514
|
||||||
|
<<<
|
||||||
|
~LEInsert MAC
|
||||||
|
PHL ]1
|
||||||
|
PHWL ]2;]3
|
||||||
|
_LEInsert MAC
|
||||||
|
Tool $1614
|
||||||
|
<<<
|
||||||
|
~LEUpdate MAC
|
||||||
|
PHL ]1
|
||||||
|
_LEUpdate MAC
|
||||||
|
Tool $1714
|
||||||
|
<<<
|
||||||
|
~LETextBox MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
PHLW ]3;]4
|
||||||
|
_LETextBox MAC
|
||||||
|
Tool $1814
|
||||||
|
<<<
|
||||||
|
_LEFromScrap MAC
|
||||||
|
Tool $1914
|
||||||
|
<<<
|
||||||
|
_LEToScrap MAC
|
||||||
|
Tool $1A14
|
||||||
|
<<<
|
||||||
|
~LEScrapHandle MAC
|
||||||
|
PHS 2
|
||||||
|
_LEScrapHandle MAC
|
||||||
|
Tool $1B14
|
||||||
|
<<<
|
||||||
|
~LEGetScrapLen MAC
|
||||||
|
PHA
|
||||||
|
_LEGetScrapLen MAC
|
||||||
|
Tool $1C14
|
||||||
|
<<<
|
||||||
|
~LESetScrapLen MAC
|
||||||
|
PHW ]1
|
||||||
|
_LESetScrapLen MAC
|
||||||
|
Tool $1D14
|
||||||
|
<<<
|
||||||
|
~LESetHilite MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_LESetHilite MAC
|
||||||
|
Tool $1E14
|
||||||
|
<<<
|
||||||
|
~LESetCaret MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_LESetCaret MAC
|
||||||
|
Tool $1F14
|
||||||
|
<<<
|
||||||
|
~LETextBox2 MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
PHLW ]3;]4
|
||||||
|
_LETextBox2 MAC
|
||||||
|
Tool $2014
|
||||||
|
<<<
|
||||||
|
~LESetJust MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_LESetJust MAC
|
||||||
|
Tool $2114
|
||||||
|
<<<
|
||||||
|
~LEGetTextHand MAC
|
||||||
|
P2SL ]1
|
||||||
|
_LEGetTextHand MAC
|
||||||
|
Tool $2214
|
||||||
|
<<<
|
||||||
|
~LEGetTextLen MAC
|
||||||
|
P1SL ]1
|
||||||
|
_LEGetTextLen MAC
|
||||||
|
Tool $2314
|
||||||
|
<<<
|
||||||
|
~GetLEDefProc MAC
|
||||||
|
PHS 2
|
||||||
|
_GetLEDefProc MAC
|
||||||
|
Tool $2414
|
||||||
|
<<<
|
||||||
|
~qLEStartUp MAC
|
||||||
|
PHW ]1
|
||||||
|
NextDP ]2;$100
|
||||||
|
Tool $214
|
||||||
|
<<<
|
|
@ -0,0 +1,104 @@
|
||||||
|
* List Mgr. macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_ListBootInit MAC
|
||||||
|
Tool $011C
|
||||||
|
<<<
|
||||||
|
_ListStartup MAC
|
||||||
|
Tool $021C
|
||||||
|
<<<
|
||||||
|
_ListShutDown MAC
|
||||||
|
Tool $031C
|
||||||
|
<<<
|
||||||
|
~ListVersion MAC
|
||||||
|
PHA
|
||||||
|
_ListVersion MAC
|
||||||
|
Tool $041C
|
||||||
|
<<<
|
||||||
|
_ListReset MAC
|
||||||
|
Tool $051C
|
||||||
|
<<<
|
||||||
|
~ListStatus MAC
|
||||||
|
PHA
|
||||||
|
_ListStatus MAC
|
||||||
|
Tool $061C
|
||||||
|
<<<
|
||||||
|
~CreateList MAC
|
||||||
|
PHS 2
|
||||||
|
PxL ]1;]2
|
||||||
|
_CreateList MAC
|
||||||
|
Tool $091C
|
||||||
|
<<<
|
||||||
|
~SortList MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SortList MAC
|
||||||
|
Tool $0A1C
|
||||||
|
<<<
|
||||||
|
~NextMember MAC
|
||||||
|
PHS 2
|
||||||
|
PxL ]1;]2
|
||||||
|
_NextMember MAC
|
||||||
|
Tool $0B1C
|
||||||
|
<<<
|
||||||
|
~DrawMember MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_DrawMember MAC
|
||||||
|
Tool $0C1C
|
||||||
|
<<<
|
||||||
|
~SelectMember MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SelectMember MAC
|
||||||
|
Tool $0D1C
|
||||||
|
<<<
|
||||||
|
~GetListDefProc MAC
|
||||||
|
PHS 2
|
||||||
|
_GetListDefProc MAC
|
||||||
|
Tool $0E1C
|
||||||
|
<<<
|
||||||
|
~ResetMember MAC
|
||||||
|
P2SL ]1
|
||||||
|
_ResetMember MAC
|
||||||
|
Tool $0F1C
|
||||||
|
<<<
|
||||||
|
~NewList MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_NewList MAC
|
||||||
|
Tool $101C
|
||||||
|
<<<
|
||||||
|
~DrawMember2 MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_DrawMember2 MAC
|
||||||
|
Tool $111C
|
||||||
|
<<<
|
||||||
|
~NextMember2 MAC
|
||||||
|
PHA
|
||||||
|
PHWL ]1;]2
|
||||||
|
_NextMember2 MAC
|
||||||
|
Tool $121C
|
||||||
|
<<<
|
||||||
|
~ResetMember2 MAC
|
||||||
|
P1SL ]1
|
||||||
|
_ResetMember2 MAC
|
||||||
|
Tool $131C
|
||||||
|
<<<
|
||||||
|
~SelectMember2 MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_SelectMember2 MAC
|
||||||
|
Tool $141C
|
||||||
|
<<<
|
||||||
|
~SortList2 MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SortList2 MAC
|
||||||
|
Tool $151C
|
||||||
|
<<<
|
||||||
|
~NewList2 MAC
|
||||||
|
PHL ]1
|
||||||
|
PxW ]2;]3;]4;]5
|
||||||
|
PHL ]6
|
||||||
|
_NewList2 MAC
|
||||||
|
Tool $161C
|
||||||
|
<<<
|
|
@ -0,0 +1,112 @@
|
||||||
|
* Load Manager macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_LoaderInitialization MAC
|
||||||
|
Tool $111
|
||||||
|
<<<
|
||||||
|
_LoaderStartUp MAC
|
||||||
|
Tool $211
|
||||||
|
<<<
|
||||||
|
_LoaderShutDown MAC
|
||||||
|
Tool $311
|
||||||
|
<<<
|
||||||
|
~LoaderVersion MAC
|
||||||
|
PHA
|
||||||
|
_LoaderVersion MAC
|
||||||
|
Tool $411
|
||||||
|
<<<
|
||||||
|
_LoaderReset MAC
|
||||||
|
Tool $511
|
||||||
|
<<<
|
||||||
|
~LoaderStatus MAC
|
||||||
|
PHA
|
||||||
|
_LoaderStatus MAC
|
||||||
|
Tool $611
|
||||||
|
<<<
|
||||||
|
~InitialLoad MAC
|
||||||
|
PHS 5
|
||||||
|
PHWL ]1;]2
|
||||||
|
PHW ]3
|
||||||
|
_InitialLoad MAC
|
||||||
|
Tool $911
|
||||||
|
<<<
|
||||||
|
~InitialLoad2 MAC
|
||||||
|
PHS 5
|
||||||
|
PHWL ]1;]2
|
||||||
|
PxW ]3;]4
|
||||||
|
_InitialLoad2 MAC
|
||||||
|
Tool $2011
|
||||||
|
<<<
|
||||||
|
~Restart MAC
|
||||||
|
PHS 5
|
||||||
|
PHW ]1
|
||||||
|
_Restart MAC
|
||||||
|
Tool $A11
|
||||||
|
<<<
|
||||||
|
~LoadSegNum MAC
|
||||||
|
PHS 2
|
||||||
|
PxW ]1;]2;]3
|
||||||
|
_LoadSegNum MAC
|
||||||
|
Tool $B11
|
||||||
|
<<<
|
||||||
|
~UnloadSegNum MAC
|
||||||
|
PxW ]1;]2;]3
|
||||||
|
_UnloadSegNum MAC
|
||||||
|
Tool $C11
|
||||||
|
<<<
|
||||||
|
~LoadSegName MAC
|
||||||
|
PHS 4
|
||||||
|
PHW ]1
|
||||||
|
PxL ]2;]3
|
||||||
|
_LoadSegName MAC
|
||||||
|
Tool $D11
|
||||||
|
<<<
|
||||||
|
~UnloadSeg MAC
|
||||||
|
PHS 3
|
||||||
|
PHL ]1
|
||||||
|
_UnloadSeg MAC
|
||||||
|
Tool $E11
|
||||||
|
<<<
|
||||||
|
~GetLoadSegInfo MAC
|
||||||
|
PxW ]1;]2;]3
|
||||||
|
PHL ]4
|
||||||
|
_GetLoadSegInfo MAC
|
||||||
|
Tool $F11
|
||||||
|
<<<
|
||||||
|
~GetUserID MAC
|
||||||
|
P1SL ]1
|
||||||
|
_GetUserID MAC
|
||||||
|
Tool $1011
|
||||||
|
<<<
|
||||||
|
~GetUserID2 MAC
|
||||||
|
P1SL ]1
|
||||||
|
_GetUserID2 MAC
|
||||||
|
Tool $2111
|
||||||
|
<<<
|
||||||
|
~LGetPathname MAC
|
||||||
|
PHS 2
|
||||||
|
PxW ]1;]2
|
||||||
|
_LGetPathname MAC
|
||||||
|
Tool $1111
|
||||||
|
<<<
|
||||||
|
~LGetPathname2 MAC
|
||||||
|
PHS 2
|
||||||
|
PxW ]1;]2
|
||||||
|
_LGetPathname2 MAC
|
||||||
|
Tool $2211
|
||||||
|
<<<
|
||||||
|
~UserShutdown MAC
|
||||||
|
PHA
|
||||||
|
PxW ]1;]2
|
||||||
|
_UserShutdown MAC
|
||||||
|
Tool $1211
|
||||||
|
<<<
|
||||||
|
~RenamePathname MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_RenamePathname MAC
|
||||||
|
Tool $1311
|
||||||
|
<<<
|
|
@ -0,0 +1,125 @@
|
||||||
|
* Tool Locator macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_TLBootInit MAC
|
||||||
|
Tool $101
|
||||||
|
<<<
|
||||||
|
_TLStartUp MAC
|
||||||
|
Tool $201
|
||||||
|
<<<
|
||||||
|
_TLShutDown MAC
|
||||||
|
Tool $301
|
||||||
|
<<<
|
||||||
|
~TLVersion MAC
|
||||||
|
PHA
|
||||||
|
_TLVersion MAC
|
||||||
|
Tool $401
|
||||||
|
<<<
|
||||||
|
_TLReset MAC
|
||||||
|
Tool $501
|
||||||
|
<<<
|
||||||
|
~TLStatus MAC
|
||||||
|
PHA
|
||||||
|
_TLStatus MAC
|
||||||
|
Tool $601
|
||||||
|
<<<
|
||||||
|
~GetTSPtr MAC
|
||||||
|
PHS 2
|
||||||
|
PxW ]1;]2
|
||||||
|
_GetTSPtr MAC
|
||||||
|
Tool $901
|
||||||
|
<<<
|
||||||
|
~SetTSPtr MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_SetTSPtr MAC
|
||||||
|
Tool $A01
|
||||||
|
<<<
|
||||||
|
~GetFuncPtr MAC
|
||||||
|
PHS 2
|
||||||
|
PxW ]1;]2
|
||||||
|
_GetFuncPtr MAC
|
||||||
|
Tool $B01
|
||||||
|
<<<
|
||||||
|
~GetWAP MAC
|
||||||
|
PHS 2
|
||||||
|
PxW ]1;]2
|
||||||
|
_GetWAP MAC
|
||||||
|
Tool $C01
|
||||||
|
<<<
|
||||||
|
~SetWAP MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_SetWAP MAC
|
||||||
|
Tool $D01
|
||||||
|
<<<
|
||||||
|
~LoadTools MAC
|
||||||
|
PHL ]1
|
||||||
|
_LoadTools MAC
|
||||||
|
Tool $E01
|
||||||
|
<<<
|
||||||
|
~LoadOneTool MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_LoadOneTool MAC
|
||||||
|
Tool $F01
|
||||||
|
<<<
|
||||||
|
~UnloadOneTool MAC
|
||||||
|
PHW ]1
|
||||||
|
_UnloadOneTool MAC
|
||||||
|
Tool $1001
|
||||||
|
<<<
|
||||||
|
~TLMountVolume MAC
|
||||||
|
PHA
|
||||||
|
PxW ]1;]2
|
||||||
|
PxL ]3;]4;]5;]6
|
||||||
|
_TLMountVolume MAC
|
||||||
|
Tool $1101
|
||||||
|
<<<
|
||||||
|
~TLTextMountVol MAC
|
||||||
|
PHA
|
||||||
|
PxL ]1;]2;]3;]4
|
||||||
|
_TLTextMountVol MAC
|
||||||
|
Tool $1201
|
||||||
|
<<<
|
||||||
|
~SaveTextState MAC
|
||||||
|
PHS 2
|
||||||
|
_SaveTextState MAC
|
||||||
|
Tool $1301
|
||||||
|
<<<
|
||||||
|
~RestoreTextState MAC
|
||||||
|
PHL ]1
|
||||||
|
_RestoreTextState MAC
|
||||||
|
Tool $1401
|
||||||
|
<<<
|
||||||
|
~MessageCenter MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_MessageCenter MAC
|
||||||
|
Tool $1501
|
||||||
|
<<<
|
||||||
|
_SetDefaultTPT MAC
|
||||||
|
Tool $1601
|
||||||
|
<<<
|
||||||
|
~MessageByName MAC
|
||||||
|
PHS 2
|
||||||
|
PHWL ]1;]2
|
||||||
|
PxW ]3;]4
|
||||||
|
_MessageByName MAC
|
||||||
|
Tool $1701
|
||||||
|
<<<
|
||||||
|
~StartupTools MAC
|
||||||
|
PHA
|
||||||
|
PxW ]1;]2
|
||||||
|
PxL ]3;]4
|
||||||
|
_StartupTools MAC
|
||||||
|
Tool $1801
|
||||||
|
<<<
|
||||||
|
~ShutdownTools MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_ShutdownTools MAC
|
||||||
|
Tool $1901
|
||||||
|
<<<
|
|
@ -0,0 +1,570 @@
|
||||||
|
*-------------------------
|
||||||
|
* Macro library
|
||||||
|
*-------------------------
|
||||||
|
|
||||||
|
INCD MAC ;Two byte INC
|
||||||
|
INC ]1
|
||||||
|
IF MX>1
|
||||||
|
BNE NC
|
||||||
|
INC ]1+1
|
||||||
|
NC FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
DECD MAC ;Two byte DEC
|
||||||
|
IF MX>1
|
||||||
|
LDA ]1
|
||||||
|
BNE NC
|
||||||
|
DEC ]1+1
|
||||||
|
NC FIN
|
||||||
|
DEC ]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
MOV MAC
|
||||||
|
LDA ]1
|
||||||
|
STA ]2
|
||||||
|
<<<
|
||||||
|
|
||||||
|
MOVD MAC
|
||||||
|
MOV ]1;]2
|
||||||
|
IF MX>1 ;If A is short
|
||||||
|
IF (=]1 ;Syntax MOVD (ADR1),Y;????
|
||||||
|
INY
|
||||||
|
IF (=]2 ; MOVD (ADR1),Y;(ADR2),Y
|
||||||
|
MOV ]1;]2
|
||||||
|
ELSE ; MOVD (ADR1),Y;ADR2
|
||||||
|
MOV ]1;]2+1
|
||||||
|
FIN
|
||||||
|
ELSE
|
||||||
|
IF (=]2 ;Syntax MOVD ????;(ADR2),Y
|
||||||
|
INY
|
||||||
|
IF #=]1 ; MOVD #ADR1;(ADR2),Y
|
||||||
|
MOV ]1/$100;]2
|
||||||
|
ELSE ; MOVD ADR1;(ADR2),Y
|
||||||
|
MOV ]1+1;]2
|
||||||
|
FIN
|
||||||
|
ELSE ;Syntax MOVD ????;ADR2
|
||||||
|
IF #=]1 ; MOVD #ADR1;ADR2
|
||||||
|
MOV ]1/$100;]2+1
|
||||||
|
ELSE ; MOVD ADR1;ADR2
|
||||||
|
MOV ]1+1;]2+1
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
LDHI MAC ;For calls from other macs
|
||||||
|
IF #=]1
|
||||||
|
LDA ]1/$100
|
||||||
|
ELSE
|
||||||
|
LDA ]1+1
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
ADD MAC
|
||||||
|
IF #=]2
|
||||||
|
IF #=]1
|
||||||
|
ERR 1 ;Error if ADD #lab1;#lab2..
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
CLC
|
||||||
|
LDA ]1 ;Syntax ADD lab1;lab2;lab3
|
||||||
|
ADC ]2 ; or ADD #lab1;lab2;lab3 etc
|
||||||
|
DO ]0/3
|
||||||
|
STA ]3 ;If 3 parms
|
||||||
|
ELSE ;2 parm cases:
|
||||||
|
IF #=]2
|
||||||
|
STA ]1 ;Syntax ADD lab1;#lab2
|
||||||
|
ELSE ;Syntax ADD lab1;lab2
|
||||||
|
STA ]2 ; or ADD #lab1;lab2 -> lab2
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
IF MX>1 ;Following ignored if M long
|
||||||
|
LDA ]1+1
|
||||||
|
IF #=]2
|
||||||
|
ADC ]2/$100
|
||||||
|
ELSE
|
||||||
|
ADC ]2+1
|
||||||
|
FIN
|
||||||
|
DO ]0/3
|
||||||
|
STA ]3+1 ;If 3 parms
|
||||||
|
ELSE ;Two parm cases:
|
||||||
|
IF #=]2
|
||||||
|
STA ]1+1 ;Syntax ADD lab1;#lab2
|
||||||
|
ELSE ; -> lab1
|
||||||
|
STA ]2+1 ;Syntax ADD lab1;lab2 -> lab2
|
||||||
|
FIN ; or ADD #lab1;lab2 -> lab2
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
SUB MAC
|
||||||
|
IF #=]2
|
||||||
|
IF #=]1
|
||||||
|
ERR 1 ;Error if SUB #lab1;#lab2..
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
SEC
|
||||||
|
LDA ]1 ;Syntax SUB lab1;lab2;lab3
|
||||||
|
SBC ]2 ; or SUB #lab1;lab2;lab3 etc
|
||||||
|
DO ]0/3
|
||||||
|
STA ]3 ;If 3 parms
|
||||||
|
ELSE ;Two parm cases:
|
||||||
|
IF #=]2
|
||||||
|
STA ]1 ;Syntax SUB lab1;#lab2
|
||||||
|
ELSE ;Syntax SUB lab1;lab2
|
||||||
|
STA ]2 ; or SUB #lab1;lab2 -> lab2
|
||||||
|
FIN
|
||||||
|
FIN ;Of 2 parm cases
|
||||||
|
IF MX>1 ;Rest ignored if M long
|
||||||
|
LDHI ]1
|
||||||
|
IF #=]2
|
||||||
|
SBC ]2/$100 ;Case #lab2
|
||||||
|
ELSE
|
||||||
|
SBC ]2+1 ;Case lab2
|
||||||
|
FIN
|
||||||
|
DO ]0/3
|
||||||
|
STA ]3+1 ;If 3 parms
|
||||||
|
ELSE ;Two parm cases:
|
||||||
|
IF #=]2
|
||||||
|
STA ]1+1 ;Syntax SUB lab1;#lab2
|
||||||
|
ELSE ; -> lab1
|
||||||
|
STA ]2+1 ;Syntax SUB lab1;lab2 -> lab2
|
||||||
|
FIN ; or SUB #lab1;lab2 -> lab2
|
||||||
|
FIN ;Of 2 parm cases
|
||||||
|
FIN ;Of M short
|
||||||
|
<<<
|
||||||
|
|
||||||
|
ADDX MAC
|
||||||
|
TXA
|
||||||
|
ADDA MAC
|
||||||
|
CLC
|
||||||
|
ADC ]1
|
||||||
|
STA ]2
|
||||||
|
IF MX>1
|
||||||
|
LDHI ]1
|
||||||
|
ADC #0
|
||||||
|
STA ]2+1
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
ADDY MAC
|
||||||
|
TYA
|
||||||
|
ADDA ]1;]2
|
||||||
|
<<<
|
||||||
|
|
||||||
|
ADDNUM MAC
|
||||||
|
LDA #]1
|
||||||
|
CLC
|
||||||
|
ADC ]2
|
||||||
|
STA ]2
|
||||||
|
IF MX>1
|
||||||
|
BCC NC
|
||||||
|
INC ]2+1
|
||||||
|
NC FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
SWAP MAC
|
||||||
|
LDA ]1
|
||||||
|
PHA
|
||||||
|
LDA ]2
|
||||||
|
STA ]1
|
||||||
|
PLA
|
||||||
|
STA ]2
|
||||||
|
<<<
|
||||||
|
|
||||||
|
COMPARE MAC
|
||||||
|
LDA ]1
|
||||||
|
CMP ]2
|
||||||
|
IF MX>1
|
||||||
|
LDHI ]1 ;Syntax COMPARE lab1;lab2
|
||||||
|
IF #=]2 ; or COMPARE lab1;#lab2
|
||||||
|
SBC ]2/$100
|
||||||
|
ELSE
|
||||||
|
SBC ]2+1
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
POKE MAC
|
||||||
|
MOV #]2;]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
STADR MAC
|
||||||
|
POKE ]2;]1
|
||||||
|
IF MX>1 ;If M is short, do high byte
|
||||||
|
POKE ]2+1;]1/$100
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
*=================================================
|
||||||
|
* Save and restore registers macros. Recommended
|
||||||
|
* for use at the start and end of subroutines
|
||||||
|
* which might be called from unknown status and
|
||||||
|
* which must set up register lengths.
|
||||||
|
*-------------------------------------------------
|
||||||
|
|
||||||
|
SAVSTAT MAC ;Save registers & status
|
||||||
|
PHA
|
||||||
|
PHY
|
||||||
|
PHX
|
||||||
|
PHP
|
||||||
|
<<<
|
||||||
|
|
||||||
|
RESTORE MAC ;Restore regs & status
|
||||||
|
PLP ;This must come first
|
||||||
|
PLX ; so register restores
|
||||||
|
PLY ; have correct length.
|
||||||
|
PLA
|
||||||
|
<<<
|
||||||
|
|
||||||
|
*=================================================
|
||||||
|
* Conditional branches not available on the 65816:
|
||||||
|
*-------------------------------------------------
|
||||||
|
|
||||||
|
BLE MAC ;Branch if less than or =
|
||||||
|
BEQ ]1
|
||||||
|
BLT ]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
BGT MAC ;Branch if greater than
|
||||||
|
BEQ OV
|
||||||
|
BGE ]1
|
||||||
|
OV <<<
|
||||||
|
|
||||||
|
*=================================================
|
||||||
|
* Conditional long branches. For use when out of
|
||||||
|
* range of a short branch and branching mechanism
|
||||||
|
* is wanted to be hidden on the listing.
|
||||||
|
*-------------------------------------------------
|
||||||
|
|
||||||
|
BRTL MAC ;BRL if less than (long)
|
||||||
|
BCCL MAC ;BRL if carry clear (long)
|
||||||
|
BCS OV
|
||||||
|
BRL ]1
|
||||||
|
OV <<<
|
||||||
|
|
||||||
|
BGEL MAC ;BRL if greater or equal (long)
|
||||||
|
BCSL MAC ;BRL if carry set (long)
|
||||||
|
BCC OV
|
||||||
|
BRL ]1
|
||||||
|
OV <<<
|
||||||
|
|
||||||
|
BPLL MAC ;BRL if plus (long)
|
||||||
|
BMI OV
|
||||||
|
BRL ]1
|
||||||
|
OV <<<
|
||||||
|
|
||||||
|
BMIL MAC ;BRL if minus (long)
|
||||||
|
BPL OV
|
||||||
|
BRL ]1
|
||||||
|
OV <<<
|
||||||
|
|
||||||
|
BEQL MAC ;BRL if equal (long)
|
||||||
|
BNE OV
|
||||||
|
BRL ]1
|
||||||
|
OV <<<
|
||||||
|
|
||||||
|
BNEL MAC ;BRL if not equal (long)
|
||||||
|
BEQ OV
|
||||||
|
BRL ]1
|
||||||
|
OV <<<
|
||||||
|
|
||||||
|
BVCL MAC ;BRL if V clear (long)
|
||||||
|
BVS OV
|
||||||
|
BRL ]1
|
||||||
|
OV <<<
|
||||||
|
|
||||||
|
BVSL MAC ;BRL if V set (long)
|
||||||
|
BVC OV
|
||||||
|
BRL ]1
|
||||||
|
OV <<<
|
||||||
|
|
||||||
|
BLEL MAC ;BRL if less or equal (long)
|
||||||
|
BEQ BR
|
||||||
|
BGE OV
|
||||||
|
BR BRL ]1
|
||||||
|
OV <<<
|
||||||
|
|
||||||
|
BLTL MAC ;BRL if less than (long)
|
||||||
|
BGE OV
|
||||||
|
BRL ]1
|
||||||
|
OV <<<
|
||||||
|
|
||||||
|
BGTL MAC ;BRL if greater than (long)
|
||||||
|
BEQ OV
|
||||||
|
BLT OV
|
||||||
|
BR BRL ]1
|
||||||
|
OV <<<
|
||||||
|
|
||||||
|
*=================================================
|
||||||
|
* The I/O macros below expect the COUT routine
|
||||||
|
* to be included or linked in as an external.
|
||||||
|
* PRINT expects the same of the SENDMSG routine.
|
||||||
|
*
|
||||||
|
* (Just declare COUT and SENDMSG as externals
|
||||||
|
* and include the linker command LIB 5 in the
|
||||||
|
* linker command file. SENDMSG also requires an
|
||||||
|
* OUTPUT routine in your source declared as an
|
||||||
|
* entry. It can be as simple as:
|
||||||
|
*
|
||||||
|
* OUTPUT JMP COUT
|
||||||
|
*
|
||||||
|
* SENDMSG and COUT are in the LIB directory and
|
||||||
|
* their source files are in the SOURCE directory.
|
||||||
|
*-------------------------------------------------
|
||||||
|
|
||||||
|
PRINT MAC ;Syntax PRINT "message"
|
||||||
|
JSR SENDMSG ; or PRINT 8D8D or
|
||||||
|
ASC ]1 ; PRINT 8D8D"text"8D"more"
|
||||||
|
BRK ; etc.
|
||||||
|
<<<
|
||||||
|
|
||||||
|
OUT MAC
|
||||||
|
LDA ]1 ;Syntax OUT #"A"
|
||||||
|
JSR COUT ; or OUT ADDRESS
|
||||||
|
<<< ; or OUT (PNT),Y etc.
|
||||||
|
|
||||||
|
HOME MAC ;Clear 80 col screen
|
||||||
|
OUT #"L"&$9F
|
||||||
|
<<<
|
||||||
|
|
||||||
|
NORMAL MAC ;Set normal text
|
||||||
|
OUT #"N"&$9F
|
||||||
|
<<<
|
||||||
|
|
||||||
|
INVERSE MAC ;Set inverse text
|
||||||
|
OUT #"O"&$9F
|
||||||
|
<<<
|
||||||
|
|
||||||
|
MOUSEON MAC ;Turn mousetext on
|
||||||
|
OUT #"["&$9F
|
||||||
|
INVERSE
|
||||||
|
<<<
|
||||||
|
|
||||||
|
MOUSEOFF MAC ;Turn mousetext off
|
||||||
|
OUT #"X"&$9F
|
||||||
|
NORMAL
|
||||||
|
<<<
|
||||||
|
|
||||||
|
BELL MAC ;Ring bell
|
||||||
|
OUT #"G"&$9F
|
||||||
|
<<<
|
||||||
|
|
||||||
|
CLEOL MAC ;Clear to end of line
|
||||||
|
OUT #$9D
|
||||||
|
<<<
|
||||||
|
|
||||||
|
CLEOP MAC ;Clear to end of screen
|
||||||
|
OUT #$8B
|
||||||
|
<<<
|
||||||
|
|
||||||
|
OUTCR MAC ;Do carriage return
|
||||||
|
OUT #$8D
|
||||||
|
<<<
|
||||||
|
|
||||||
|
GOTOXY MAC ;Pascal output only!
|
||||||
|
OUT #$1E
|
||||||
|
LDA ]1 ;X coor (imm or location)
|
||||||
|
CLC
|
||||||
|
ADC #' '
|
||||||
|
JSR COUT
|
||||||
|
LDA ]2 ;Y coor (")
|
||||||
|
CLC
|
||||||
|
ADC #' '
|
||||||
|
JSR COUT
|
||||||
|
<<<
|
||||||
|
|
||||||
|
CURSXY MAC ;GOTOXY for BASIC output
|
||||||
|
OUT #"Y"&$9F ;Home cursor
|
||||||
|
LDX ]2 ;Syntax (both versions):
|
||||||
|
BEQ H ; CURSXY #55;#10 or
|
||||||
|
CR OUTCR ; CURSXY XLOC,YLOC etc.
|
||||||
|
DEX
|
||||||
|
BNE CR
|
||||||
|
H IF MX<2 ;If M is long then
|
||||||
|
SEP %00100000 ; must shorten it
|
||||||
|
LDA ]1
|
||||||
|
STAL $24
|
||||||
|
REP %00100000 ; and lengthen on exit.
|
||||||
|
ELSE ;If M is short then
|
||||||
|
LDA ]1 ; leave as is
|
||||||
|
STAL $24
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
**************************************************
|
||||||
|
* APW-Equivalent Macros 1/20/89 *
|
||||||
|
* For use with APW or ORCA/M source listings. *
|
||||||
|
* *
|
||||||
|
**************************************************
|
||||||
|
|
||||||
|
*================================================
|
||||||
|
|
||||||
|
DP MAC
|
||||||
|
ADRL ]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
ASL4 MAC
|
||||||
|
LDA ]1+2
|
||||||
|
DO ]0/2 ;If 2 parms then set
|
||||||
|
LDX ]2 ; X to 2nd parm.
|
||||||
|
FIN
|
||||||
|
]A ASL ;Otherwise use X to
|
||||||
|
ASL ]1 ; decide how many
|
||||||
|
ADC #0 ; ASL's to do.
|
||||||
|
DEX
|
||||||
|
BNE ]A
|
||||||
|
STA ]1+2
|
||||||
|
<<<
|
||||||
|
|
||||||
|
LSR4 MAC
|
||||||
|
DO ]0/2 ;If 2 parms, then COMPLEMENT
|
||||||
|
LDA ]2 ; of X must be 2nd parm.
|
||||||
|
EOR $FFFF
|
||||||
|
CLC
|
||||||
|
ADC #1
|
||||||
|
TAX
|
||||||
|
FIN
|
||||||
|
LDA ]1
|
||||||
|
]A LSR
|
||||||
|
LSR ]1+2
|
||||||
|
BCC ]B
|
||||||
|
ORA #$8000
|
||||||
|
]B INX
|
||||||
|
BNE ]A
|
||||||
|
STA ]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
DEC4 MAC
|
||||||
|
IF MX/2-1 ; IF M IS SHORT
|
||||||
|
ERR 1 ; ERR IF NOT 16-BIT MODE
|
||||||
|
ELSE
|
||||||
|
DEC ]1
|
||||||
|
BPL ]A
|
||||||
|
DEC ]1+2
|
||||||
|
]A FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
INC4 MAC
|
||||||
|
IF MX/2-1 ; IF M IS SHORT
|
||||||
|
ERR 1 ; ERR IF NOT 16-BIT MODE
|
||||||
|
ELSE
|
||||||
|
INC ]1
|
||||||
|
BNE ]A
|
||||||
|
INC ]1+2
|
||||||
|
]A FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
ADD4 MAC
|
||||||
|
CLC ;If 3 parms then use
|
||||||
|
DO ]0/3 ; raw 4 byte addresses.
|
||||||
|
|
||||||
|
IF #=]1
|
||||||
|
LDA #<]1
|
||||||
|
ELSE ;Make sure we use the
|
||||||
|
LDA ]1 ; right LDA for data
|
||||||
|
FIN ; or addresses.
|
||||||
|
|
||||||
|
IF #=]2
|
||||||
|
ADC #<]2
|
||||||
|
ELSE ;Make sure we use the
|
||||||
|
ADC ]2 ; right ADC for data
|
||||||
|
FIN ; or addresses.
|
||||||
|
|
||||||
|
STA ]3
|
||||||
|
|
||||||
|
IF #=]1
|
||||||
|
LDA #^]1
|
||||||
|
ELSE ;Make sure we use the
|
||||||
|
LDA ]1+2 ; right LDA for data
|
||||||
|
FIN ; or addresses.
|
||||||
|
|
||||||
|
IF #=]2
|
||||||
|
ADC #^]2
|
||||||
|
ELSE ;Make sure we use the
|
||||||
|
ADC ]2+2 ; right ADC for data
|
||||||
|
FIN ; or addresses.
|
||||||
|
|
||||||
|
STA ]3+2
|
||||||
|
|
||||||
|
ELSE ;If 2 parms then use
|
||||||
|
; 2 byte Accumulator.
|
||||||
|
|
||||||
|
|
||||||
|
IF #=]1
|
||||||
|
ADC #<]1
|
||||||
|
ELSE ;Make sure we use the
|
||||||
|
ADC ]1 ; right ADC for data
|
||||||
|
FIN ; or addresses.
|
||||||
|
|
||||||
|
STA ]2
|
||||||
|
|
||||||
|
|
||||||
|
IF #=]1
|
||||||
|
LDA #^]1
|
||||||
|
ELSE ;Make sure we use the
|
||||||
|
LDA ]1+2 ; right LDA for data
|
||||||
|
FIN ; or addresses.
|
||||||
|
|
||||||
|
ADC #0
|
||||||
|
STA ]2+2
|
||||||
|
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
SUB4 MAC
|
||||||
|
SEC ;If 3 parms then use
|
||||||
|
DO ]0/3 ; raw 4 byte addresses.
|
||||||
|
|
||||||
|
|
||||||
|
IF #=]1
|
||||||
|
LDA #<]1
|
||||||
|
ELSE ;Make sure we use the
|
||||||
|
LDA ]1 ; right LDA for data
|
||||||
|
FIN ; or addresses.
|
||||||
|
|
||||||
|
IF #=]2
|
||||||
|
SBC #<]2
|
||||||
|
ELSE ;Make sure we use the
|
||||||
|
SBC ]2 ; right SBC for data
|
||||||
|
FIN ; or addresses.
|
||||||
|
|
||||||
|
STA ]3
|
||||||
|
|
||||||
|
|
||||||
|
IF #=]1
|
||||||
|
LDA #^]1
|
||||||
|
ELSE ;Make sure we use the
|
||||||
|
LDA ]1+2 ; right LDA for data
|
||||||
|
FIN ; or addresses.
|
||||||
|
|
||||||
|
IF #=]2
|
||||||
|
SBC #^]2
|
||||||
|
ELSE ;Make sure we use the
|
||||||
|
SBC ]2+2 ; right SBC for data
|
||||||
|
FIN ; or addresses.
|
||||||
|
|
||||||
|
STA ]3+2
|
||||||
|
|
||||||
|
ELSE
|
||||||
|
|
||||||
|
IF #=]1
|
||||||
|
SBC #<]1
|
||||||
|
ELSE ;Make sure we use the
|
||||||
|
SBC ]1 ; right SBC for data
|
||||||
|
FIN ; or addresses.
|
||||||
|
|
||||||
|
STA ]2
|
||||||
|
|
||||||
|
IF #=]1
|
||||||
|
LDA #^]1
|
||||||
|
ELSE ;Make sure we use the
|
||||||
|
LDA ]1+2 ; right LDA for data
|
||||||
|
FIN ; or addresses.
|
||||||
|
|
||||||
|
SBC #0
|
||||||
|
STA ]2+2
|
||||||
|
|
||||||
|
FIN
|
||||||
|
<<<
|
|
@ -0,0 +1,175 @@
|
||||||
|
* Memory Manager macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_MMBootInit MAC
|
||||||
|
Tool $102
|
||||||
|
<<<
|
||||||
|
~MMStartUp MAC
|
||||||
|
PHA
|
||||||
|
_MMStartUp MAC
|
||||||
|
Tool $202
|
||||||
|
<<<
|
||||||
|
~MMShutDown MAC
|
||||||
|
PHW ]1
|
||||||
|
_MMShutDown MAC
|
||||||
|
Tool $302
|
||||||
|
<<<
|
||||||
|
~MMVersion MAC
|
||||||
|
PHA
|
||||||
|
_MMVersion MAC
|
||||||
|
Tool $402
|
||||||
|
<<<
|
||||||
|
_MMReset MAC
|
||||||
|
Tool $502
|
||||||
|
<<<
|
||||||
|
~MMStatus MAC
|
||||||
|
PHA
|
||||||
|
_MMStatus MAC
|
||||||
|
Tool $602
|
||||||
|
<<<
|
||||||
|
~NewHandle MAC
|
||||||
|
P2SL ]1
|
||||||
|
PxW ]2;]3
|
||||||
|
PHL ]4
|
||||||
|
_NewHandle MAC
|
||||||
|
Tool $902
|
||||||
|
<<<
|
||||||
|
~ReallocHandle MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
PHWL ]3;]4
|
||||||
|
PHL ]5
|
||||||
|
_ReallocHandle MAC
|
||||||
|
Tool $A02
|
||||||
|
<<<
|
||||||
|
~RestoreHandle MAC
|
||||||
|
PHL ]1
|
||||||
|
_RestoreHandle MAC
|
||||||
|
Tool $B02
|
||||||
|
<<<
|
||||||
|
~AddToOOMQueue MAC
|
||||||
|
PHL ]1
|
||||||
|
_AddToOOMQueue MAC
|
||||||
|
Tool $C02
|
||||||
|
<<<
|
||||||
|
~DeleteFromOOMQueue MAC
|
||||||
|
PHL ]1
|
||||||
|
_DeleteFromOOMQueue MAC
|
||||||
|
Tool $D02
|
||||||
|
<<<
|
||||||
|
~DisposeHandle MAC
|
||||||
|
PHL ]1
|
||||||
|
_DisposeHandle MAC
|
||||||
|
Tool $1002
|
||||||
|
<<<
|
||||||
|
~DisposeAll MAC
|
||||||
|
PHW ]1
|
||||||
|
_DisposeAll MAC
|
||||||
|
Tool $1102
|
||||||
|
<<<
|
||||||
|
~PurgeHandle MAC
|
||||||
|
PHL ]1
|
||||||
|
_PurgeHandle MAC
|
||||||
|
Tool $1202
|
||||||
|
<<<
|
||||||
|
~PurgeAll MAC
|
||||||
|
PHW ]1
|
||||||
|
_PurgeAll MAC
|
||||||
|
Tool $1302
|
||||||
|
<<<
|
||||||
|
~GetHandleSize MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetHandleSize MAC
|
||||||
|
Tool $1802
|
||||||
|
<<<
|
||||||
|
~SetHandleSize MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SetHandleSize MAC
|
||||||
|
Tool $1902
|
||||||
|
<<<
|
||||||
|
~FindHandle MAC
|
||||||
|
P2SL ]1
|
||||||
|
_FindHandle MAC
|
||||||
|
Tool $1A02
|
||||||
|
<<<
|
||||||
|
~FreeMem MAC
|
||||||
|
PHS 2
|
||||||
|
_FreeMem MAC
|
||||||
|
Tool $1B02
|
||||||
|
<<<
|
||||||
|
~MaxBlock MAC
|
||||||
|
PHS 2
|
||||||
|
_MaxBlock MAC
|
||||||
|
Tool $1C02
|
||||||
|
<<<
|
||||||
|
~TotalMem MAC
|
||||||
|
PHS 2
|
||||||
|
_TotalMem MAC
|
||||||
|
Tool $1D02
|
||||||
|
<<<
|
||||||
|
~CheckHandle MAC
|
||||||
|
PHL ]1
|
||||||
|
_CheckHandle MAC
|
||||||
|
Tool $1E02
|
||||||
|
<<<
|
||||||
|
_CompactMem MAC
|
||||||
|
Tool $1F02
|
||||||
|
<<<
|
||||||
|
~HLock MAC
|
||||||
|
PHL ]1
|
||||||
|
_HLock MAC
|
||||||
|
Tool $2002
|
||||||
|
<<<
|
||||||
|
~HLockAll MAC
|
||||||
|
PHW ]1
|
||||||
|
_HLockAll MAC
|
||||||
|
Tool $2102
|
||||||
|
<<<
|
||||||
|
~HUnlock MAC
|
||||||
|
PHL ]1
|
||||||
|
_HUnlock MAC
|
||||||
|
Tool $2202
|
||||||
|
<<<
|
||||||
|
~HUnlockAll MAC
|
||||||
|
PHW ]1
|
||||||
|
_HUnlockAll MAC
|
||||||
|
Tool $2302
|
||||||
|
<<<
|
||||||
|
~SetPurge MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_SetPurge MAC
|
||||||
|
Tool $2402
|
||||||
|
<<<
|
||||||
|
~SetPurgeAll MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_SetPurgeAll MAC
|
||||||
|
Tool $2502
|
||||||
|
<<<
|
||||||
|
~PtrToHand MAC
|
||||||
|
PxL ]1;]2;]3
|
||||||
|
_PtrToHand MAC
|
||||||
|
Tool $2802
|
||||||
|
<<<
|
||||||
|
~HandToPtr MAC
|
||||||
|
PxL ]1;]2;]3
|
||||||
|
_HandToPtr MAC
|
||||||
|
Tool $2902
|
||||||
|
<<<
|
||||||
|
~HandToHand MAC
|
||||||
|
PxL ]1;]2;3
|
||||||
|
_HandToHand MAC
|
||||||
|
Tool $2A02
|
||||||
|
<<<
|
||||||
|
~BlockMove MAC
|
||||||
|
PxL ]1;]2;]3
|
||||||
|
_BlockMove MAC
|
||||||
|
Tool $2B02
|
||||||
|
<<<
|
||||||
|
~RealFreeMem MAC
|
||||||
|
PHS 2
|
||||||
|
_RealFreeMem MAC
|
||||||
|
Tool $2F02
|
||||||
|
<<<
|
|
@ -0,0 +1,344 @@
|
||||||
|
* Menu Manager macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_MenuBootInit MAC
|
||||||
|
Tool $10F
|
||||||
|
<<<
|
||||||
|
~MenuStartUp MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_MenuStartUp MAC
|
||||||
|
Tool $20F
|
||||||
|
<<<
|
||||||
|
_MenuShutDown MAC
|
||||||
|
Tool $30F
|
||||||
|
<<<
|
||||||
|
~MenuVersion MAC
|
||||||
|
PHA
|
||||||
|
_MenuVersion MAC
|
||||||
|
Tool $40F
|
||||||
|
<<<
|
||||||
|
_MenuReset MAC
|
||||||
|
Tool $50F
|
||||||
|
<<<
|
||||||
|
~MenuStatus MAC
|
||||||
|
PHA
|
||||||
|
_MenuStatus MAC
|
||||||
|
Tool $60F
|
||||||
|
<<<
|
||||||
|
~MenuKey MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_MenuKey MAC
|
||||||
|
Tool $90F
|
||||||
|
<<<
|
||||||
|
~GetMenuBar MAC
|
||||||
|
PHS 2
|
||||||
|
_GetMenuBar MAC
|
||||||
|
Tool $A0F
|
||||||
|
<<<
|
||||||
|
~MenuRefresh MAC
|
||||||
|
PHL ]1
|
||||||
|
_MenuRefresh MAC
|
||||||
|
Tool $B0F
|
||||||
|
<<<
|
||||||
|
_FlashMenuBar MAC
|
||||||
|
Tool $C0F
|
||||||
|
<<<
|
||||||
|
~InsertMenu MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_InsertMenu MAC
|
||||||
|
Tool $D0F
|
||||||
|
<<<
|
||||||
|
~DeleteMenu MAC
|
||||||
|
PHW ]1
|
||||||
|
_DeleteMenu MAC
|
||||||
|
Tool $E0F
|
||||||
|
<<<
|
||||||
|
~InsertMItem MAC
|
||||||
|
PHL ]1
|
||||||
|
PxW ]2;]3
|
||||||
|
_InsertMItem MAC
|
||||||
|
Tool $F0F
|
||||||
|
<<<
|
||||||
|
~DeleteMItem MAC
|
||||||
|
PHW ]1
|
||||||
|
_DeleteMItem MAC
|
||||||
|
Tool $100F
|
||||||
|
<<<
|
||||||
|
~GetSysBar MAC
|
||||||
|
PHS 2
|
||||||
|
_GetSysBar MAC
|
||||||
|
Tool $110F
|
||||||
|
<<<
|
||||||
|
~SetSysBar MAC
|
||||||
|
PHL ]1
|
||||||
|
_SetSysBar MAC
|
||||||
|
Tool $120F
|
||||||
|
<<<
|
||||||
|
~FixMenuBar MAC
|
||||||
|
PHA
|
||||||
|
_FixMenuBar MAC
|
||||||
|
Tool $130F
|
||||||
|
<<<
|
||||||
|
~CountMItems MAC
|
||||||
|
P1SW ]1
|
||||||
|
_CountMItems MAC
|
||||||
|
Tool $140F
|
||||||
|
<<<
|
||||||
|
~NewMenuBar MAC
|
||||||
|
P2SL ]1
|
||||||
|
_NewMenuBar MAC
|
||||||
|
Tool $150F
|
||||||
|
<<<
|
||||||
|
~GetMHandle MAC
|
||||||
|
P2SW ]1
|
||||||
|
_GetMHandle MAC
|
||||||
|
Tool $160F
|
||||||
|
<<<
|
||||||
|
~SetBarColors MAC
|
||||||
|
PxW ]1;]2;]3
|
||||||
|
_SetBarColors MAC
|
||||||
|
Tool $170F
|
||||||
|
<<<
|
||||||
|
~GetBarColors MAC
|
||||||
|
PHS 2
|
||||||
|
_GetBarColors MAC
|
||||||
|
Tool $180F
|
||||||
|
<<<
|
||||||
|
~SetMTitleStart MAC
|
||||||
|
PHW ]1
|
||||||
|
_SetMTitleStart MAC
|
||||||
|
Tool $190F
|
||||||
|
<<<
|
||||||
|
~GetMTitleStart MAC
|
||||||
|
PHA
|
||||||
|
_GetMTitleStart MAC
|
||||||
|
Tool $1A0F
|
||||||
|
<<<
|
||||||
|
~GetMenuMgrPort MAC
|
||||||
|
PHS 2
|
||||||
|
_GetMenuMgrPort MAC
|
||||||
|
Tool $1B0F
|
||||||
|
<<<
|
||||||
|
~CalcMenuSize MAC
|
||||||
|
PxW ]1;]2;]3
|
||||||
|
_CalcMenuSize MAC
|
||||||
|
Tool $1C0F
|
||||||
|
<<<
|
||||||
|
~SetMTitleWidth MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_SetMTitleWidth MAC
|
||||||
|
Tool $1D0F
|
||||||
|
<<<
|
||||||
|
~GetMTitleWidth MAC
|
||||||
|
P1SW ]1
|
||||||
|
_GetMTitleWidth MAC
|
||||||
|
Tool $1E0F
|
||||||
|
<<<
|
||||||
|
~SetMenuFlag MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_SetMenuFlag MAC
|
||||||
|
Tool $1F0F
|
||||||
|
<<<
|
||||||
|
~GetMenuFlag MAC
|
||||||
|
P1SW ]1
|
||||||
|
_GetMenuFlag MAC
|
||||||
|
Tool $200F
|
||||||
|
<<<
|
||||||
|
~SetMenuTitle MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_SetMenuTitle MAC
|
||||||
|
Tool $210F
|
||||||
|
<<<
|
||||||
|
~GetMenuTitle MAC
|
||||||
|
P2SW ]1
|
||||||
|
_GetMenuTitle MAC
|
||||||
|
Tool $220F
|
||||||
|
<<<
|
||||||
|
~MenuGlobal MAC
|
||||||
|
P1SW ]1
|
||||||
|
_MenuGlobal MAC
|
||||||
|
Tool $230F
|
||||||
|
<<<
|
||||||
|
~SetMItem MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_SetMItem MAC
|
||||||
|
Tool $240F
|
||||||
|
<<<
|
||||||
|
~GetMItem MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_GetMItem MAC
|
||||||
|
Tool $250F
|
||||||
|
<<<
|
||||||
|
~SetMItemFlag MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_SetMItemFlag MAC
|
||||||
|
Tool $260F
|
||||||
|
<<<
|
||||||
|
~GetMItemFlag MAC
|
||||||
|
P1SW ]1
|
||||||
|
_GetMItemFlag MAC
|
||||||
|
Tool $270F
|
||||||
|
<<<
|
||||||
|
~SetMItemBlink MAC
|
||||||
|
PHW ]1
|
||||||
|
_SetMItemBlink MAC
|
||||||
|
Tool $280F
|
||||||
|
<<<
|
||||||
|
_MenuNewRes MAC
|
||||||
|
Tool $290F
|
||||||
|
<<<
|
||||||
|
_DrawMenuBar MAC
|
||||||
|
Tool $2A0F
|
||||||
|
<<<
|
||||||
|
~MenuSelect MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_MenuSelect MAC
|
||||||
|
Tool $2B0F
|
||||||
|
<<<
|
||||||
|
~HiliteMenu MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_HiliteMenu MAC
|
||||||
|
Tool $2C0F
|
||||||
|
<<<
|
||||||
|
~NewMenu MAC
|
||||||
|
P2SL ]1
|
||||||
|
_NewMenu MAC
|
||||||
|
Tool $2D0F
|
||||||
|
<<<
|
||||||
|
~DisposeMenu MAC
|
||||||
|
PHL ]1
|
||||||
|
_DisposeMenu MAC
|
||||||
|
Tool $2E0F
|
||||||
|
<<<
|
||||||
|
_InitPalette MAC
|
||||||
|
Tool $2F0F
|
||||||
|
<<<
|
||||||
|
~EnableMItem MAC
|
||||||
|
PHW ]1
|
||||||
|
_EnableMItem MAC
|
||||||
|
Tool $300F
|
||||||
|
<<<
|
||||||
|
~DisableMItem MAC
|
||||||
|
PHW ]1
|
||||||
|
_DisableMItem MAC
|
||||||
|
Tool $310F
|
||||||
|
<<<
|
||||||
|
~CheckMItem MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_CheckMItem MAC
|
||||||
|
Tool $320F
|
||||||
|
<<<
|
||||||
|
~SetMItemMark MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_SetMItemMark MAC
|
||||||
|
Tool $330F
|
||||||
|
<<<
|
||||||
|
~GetMItemMark MAC
|
||||||
|
P1SW ]1
|
||||||
|
_GetMItemMark MAC
|
||||||
|
Tool $340F
|
||||||
|
<<<
|
||||||
|
~SetMItemStyle MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_SetMItemStyle MAC
|
||||||
|
Tool $350F
|
||||||
|
<<<
|
||||||
|
~GetMItemStyle MAC
|
||||||
|
P1SW ]1
|
||||||
|
_GetMItemStyle MAC
|
||||||
|
Tool $360F
|
||||||
|
<<<
|
||||||
|
~SetMenuID MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_SetMenuID MAC
|
||||||
|
Tool $370F
|
||||||
|
<<<
|
||||||
|
~SetMItemID MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_SetMItemID MAC
|
||||||
|
Tool $380F
|
||||||
|
<<<
|
||||||
|
~SetMenuBar MAC
|
||||||
|
PHL ]1
|
||||||
|
_SetMenuBar MAC
|
||||||
|
Tool $390F
|
||||||
|
<<<
|
||||||
|
~SetMItemName MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_SetMItemName MAC
|
||||||
|
Tool $3A0F
|
||||||
|
<<<
|
||||||
|
~GetPopUpDefProc MAC
|
||||||
|
PHS 2
|
||||||
|
_GetPopUpDefProc MAC
|
||||||
|
Tool $3B0F
|
||||||
|
<<<
|
||||||
|
~PopUpMenuSelect MAC
|
||||||
|
PHA
|
||||||
|
PxW ]1;]2;]3;]4
|
||||||
|
PHL ]5
|
||||||
|
_PopUpMenuSelect MAC
|
||||||
|
Tool $3C0F
|
||||||
|
<<<
|
||||||
|
~DrawPopUp MAC
|
||||||
|
PxW ]1;]2;]3;]4
|
||||||
|
PxW ]5;]6;]7
|
||||||
|
_DrawPopUp MAC
|
||||||
|
Tool $3D0F
|
||||||
|
<<<
|
||||||
|
~NewMenu2 MAC
|
||||||
|
P2SW ]1
|
||||||
|
PHL ]2
|
||||||
|
_NewMenu2 MAC
|
||||||
|
Tool $3E0F
|
||||||
|
<<<
|
||||||
|
~InsertMItem2 MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
PxW ]3;]4
|
||||||
|
_InsertMItem2 MAC
|
||||||
|
Tool $3F0F
|
||||||
|
<<<
|
||||||
|
~SetMenuTitle2 MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
PHW ]3
|
||||||
|
_SetMenuTitle2 MAC
|
||||||
|
Tool $400F
|
||||||
|
<<<
|
||||||
|
~SetMItem2 MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
PHW ]3
|
||||||
|
_SetMItem2 MAC
|
||||||
|
Tool $410F
|
||||||
|
<<<
|
||||||
|
~SetMItemName2 MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
PHW ]3
|
||||||
|
_SetMItemName2 MAC
|
||||||
|
Tool $420F
|
||||||
|
<<<
|
||||||
|
~NewMenuBar2 MAC
|
||||||
|
P2SW ]1
|
||||||
|
PxL ]2;]3
|
||||||
|
_NewMenuBar2 MAC
|
||||||
|
Tool $430F
|
||||||
|
<<<
|
||||||
|
_HideMenuBar MAC
|
||||||
|
Tool $450F
|
||||||
|
<<<
|
||||||
|
_ShowMenuBar MAC
|
||||||
|
Tool $460F
|
||||||
|
<<<
|
||||||
|
~qMenuStartUp MAC
|
||||||
|
PHW ]1
|
||||||
|
NextDP ]2;$100
|
||||||
|
Tool $20F
|
||||||
|
<<<
|
||||||
|
~qNewMenu MAC
|
||||||
|
~NewMenu ]1
|
||||||
|
PHW #0
|
||||||
|
_InsertMenu
|
||||||
|
<<<
|
|
@ -0,0 +1,78 @@
|
||||||
|
* MIDI tool macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
|
||||||
|
_MidiBootInit MAC
|
||||||
|
Tool $120
|
||||||
|
<<<
|
||||||
|
~MidiStartUp MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_MidiStartUp MAC
|
||||||
|
Tool $220
|
||||||
|
<<<
|
||||||
|
_MidiShutDown MAC
|
||||||
|
Tool $320
|
||||||
|
<<<
|
||||||
|
~MidiVersion MAC
|
||||||
|
PHA
|
||||||
|
_MidiVersion MAC
|
||||||
|
Tool $420
|
||||||
|
<<<
|
||||||
|
_MidiReset MAC
|
||||||
|
Tool $520
|
||||||
|
<<<
|
||||||
|
~MidiStatus MAC
|
||||||
|
PHA
|
||||||
|
_MidiStatus MAC
|
||||||
|
Tool $620
|
||||||
|
<<<
|
||||||
|
~MidiControl MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_MidiControl MAC
|
||||||
|
Tool $920
|
||||||
|
<<<
|
||||||
|
~MidiDevice MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_MidiDevice MAC
|
||||||
|
Tool $A20
|
||||||
|
<<<
|
||||||
|
~MidiClock MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_MidiClock MAC
|
||||||
|
Tool $B20
|
||||||
|
<<<
|
||||||
|
~MidiInfo MAC
|
||||||
|
P2SW ]1
|
||||||
|
_MidiInfo MAC
|
||||||
|
Tool $C20
|
||||||
|
<<<
|
||||||
|
~MidiReadPacket MAC
|
||||||
|
P1SL ]1
|
||||||
|
PHW ]2
|
||||||
|
_MidiReadPacket MAC
|
||||||
|
Tool $D20
|
||||||
|
<<<
|
||||||
|
~MidiWritePacket MAC
|
||||||
|
P1SL ]1
|
||||||
|
_MidiWritePacket MAC
|
||||||
|
Tool $E20
|
||||||
|
<<<
|
||||||
|
_MidiRecordSeq MAC
|
||||||
|
Tool $F20
|
||||||
|
<<<
|
||||||
|
_MidiStopRecord MAC
|
||||||
|
Tool $1020
|
||||||
|
<<<
|
||||||
|
_MidiPlaySeq MAC
|
||||||
|
Tool $1120
|
||||||
|
<<<
|
||||||
|
_MidiStopPlay MAC
|
||||||
|
Tool $1220
|
||||||
|
<<<
|
||||||
|
_MidiConvert MAC
|
||||||
|
Tool $1320
|
||||||
|
<<<
|
|
@ -0,0 +1,250 @@
|
||||||
|
* Misc Tool macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_MTBootInit MAC
|
||||||
|
Tool $103
|
||||||
|
<<<
|
||||||
|
_MTStartUp MAC
|
||||||
|
Tool $203
|
||||||
|
<<<
|
||||||
|
_MTShutDown MAC
|
||||||
|
Tool $303
|
||||||
|
<<<
|
||||||
|
~MTVersion MAC
|
||||||
|
PHA
|
||||||
|
_MTVersion MAC
|
||||||
|
Tool $403
|
||||||
|
<<<
|
||||||
|
_MTReset MAC
|
||||||
|
Tool $503
|
||||||
|
<<<
|
||||||
|
~MTStatus MAC
|
||||||
|
PHA
|
||||||
|
_MTStatus MAC
|
||||||
|
Tool $603
|
||||||
|
<<<
|
||||||
|
~WriteBRam MAC
|
||||||
|
PHL ]1
|
||||||
|
_WriteBRam MAC
|
||||||
|
Tool $903
|
||||||
|
<<<
|
||||||
|
~ReadBRam MAC
|
||||||
|
PHL ]1
|
||||||
|
_ReadBRam MAC
|
||||||
|
Tool $A03
|
||||||
|
<<<
|
||||||
|
~WriteBParam MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_WriteBParam MAC
|
||||||
|
Tool $B03
|
||||||
|
<<<
|
||||||
|
~ReadBParam MAC
|
||||||
|
P1SW ]1
|
||||||
|
_ReadBParam MAC
|
||||||
|
Tool $C03
|
||||||
|
<<<
|
||||||
|
~ReadTimeHex MAC
|
||||||
|
PHS 4
|
||||||
|
_ReadTimeHex MAC
|
||||||
|
Tool $D03
|
||||||
|
<<<
|
||||||
|
~WriteTimeHex MAC
|
||||||
|
PxW ]1;]2;]3
|
||||||
|
_WriteTimeHex MAC
|
||||||
|
Tool $E03
|
||||||
|
<<<
|
||||||
|
~ReadAsciiTime MAC
|
||||||
|
PHL ]1
|
||||||
|
_ReadAsciiTime MAC
|
||||||
|
Tool $F03
|
||||||
|
<<<
|
||||||
|
~SetVector MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_SetVector MAC
|
||||||
|
Tool $1003
|
||||||
|
<<<
|
||||||
|
~GetVector MAC
|
||||||
|
P2SW ]1
|
||||||
|
_GetVector MAC
|
||||||
|
Tool $1103
|
||||||
|
<<<
|
||||||
|
~SetHeartBeat MAC
|
||||||
|
PHL ]1
|
||||||
|
_SetHeartBeat MAC
|
||||||
|
Tool $1203
|
||||||
|
<<<
|
||||||
|
~DelHeartBeat MAC
|
||||||
|
PHL ]1
|
||||||
|
_DelHeartBeat MAC
|
||||||
|
Tool $1303
|
||||||
|
<<<
|
||||||
|
_ClrHeartBeat MAC
|
||||||
|
Tool $1403
|
||||||
|
<<<
|
||||||
|
~SysFailMgr MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_SysFailMgr MAC
|
||||||
|
Tool $1503
|
||||||
|
<<<
|
||||||
|
~GetAddr MAC
|
||||||
|
P2SW ]1
|
||||||
|
_GetAddr MAC
|
||||||
|
Tool $1603
|
||||||
|
<<<
|
||||||
|
~ReadMouse MAC
|
||||||
|
PHS 3
|
||||||
|
_ReadMouse MAC
|
||||||
|
Tool $1703
|
||||||
|
<<<
|
||||||
|
~InitMouse MAC
|
||||||
|
PHW ]1
|
||||||
|
_InitMouse MAC
|
||||||
|
Tool $1803
|
||||||
|
<<<
|
||||||
|
~SetMouse MAC
|
||||||
|
PHW ]1
|
||||||
|
_SetMouse MAC
|
||||||
|
Tool $1903
|
||||||
|
<<<
|
||||||
|
_HomeMouse MAC
|
||||||
|
Tool $1A03
|
||||||
|
<<<
|
||||||
|
_ClearMouse MAC
|
||||||
|
Tool $1B03
|
||||||
|
<<<
|
||||||
|
~ClampMouse MAC
|
||||||
|
PxW ]1;]2;]3;]4
|
||||||
|
_ClampMouse MAC
|
||||||
|
Tool $1C03
|
||||||
|
<<<
|
||||||
|
~GetMouseClamp MAC
|
||||||
|
PHS 4
|
||||||
|
_GetMouseClamp MAC
|
||||||
|
Tool $1D03
|
||||||
|
<<<
|
||||||
|
~PosMouse MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_PosMouse MAC
|
||||||
|
Tool $1E03
|
||||||
|
<<<
|
||||||
|
~ServeMouse MAC
|
||||||
|
PHA
|
||||||
|
_ServeMouse MAC
|
||||||
|
Tool $1F03
|
||||||
|
<<<
|
||||||
|
~GetNewID MAC
|
||||||
|
P1SW ]1
|
||||||
|
_GetNewID MAC
|
||||||
|
Tool $2003
|
||||||
|
<<<
|
||||||
|
~DeleteID MAC
|
||||||
|
PHW ]1
|
||||||
|
_DeleteID MAC
|
||||||
|
Tool $2103
|
||||||
|
<<<
|
||||||
|
~StatusID MAC
|
||||||
|
PHW ]1
|
||||||
|
_StatusID MAC
|
||||||
|
Tool $2203
|
||||||
|
<<<
|
||||||
|
~IntSource MAC
|
||||||
|
PHW ]1
|
||||||
|
_IntSource MAC
|
||||||
|
Tool $2303
|
||||||
|
<<<
|
||||||
|
~FWEntry MAC
|
||||||
|
PHS 4
|
||||||
|
PxW ]1;]2;]3;]4
|
||||||
|
_FWEntry MAC
|
||||||
|
Tool $2403
|
||||||
|
<<<
|
||||||
|
~GetTick MAC
|
||||||
|
PHS 2
|
||||||
|
_GetTick MAC
|
||||||
|
Tool $2503
|
||||||
|
<<<
|
||||||
|
~PackBytes MAC
|
||||||
|
P1SL ]1
|
||||||
|
PxL ]2;]3
|
||||||
|
PHW ]4
|
||||||
|
_PackBytes MAC
|
||||||
|
Tool $2603
|
||||||
|
<<<
|
||||||
|
~UnPackBytes MAC
|
||||||
|
P1SL ]1
|
||||||
|
PHW ]2
|
||||||
|
PxL ]3;]4
|
||||||
|
_UnPackBytes MAC
|
||||||
|
Tool $2703
|
||||||
|
<<<
|
||||||
|
~Munger MAC
|
||||||
|
P1SL ]1
|
||||||
|
PxL ]2;]3
|
||||||
|
PHWL ]4;]5
|
||||||
|
PHWL ]6;]7
|
||||||
|
_Munger MAC
|
||||||
|
Tool $2803
|
||||||
|
<<<
|
||||||
|
~GetIRQEnable MAC
|
||||||
|
PHA
|
||||||
|
_GetIRQEnable MAC
|
||||||
|
Tool $2903
|
||||||
|
<<<
|
||||||
|
~SetAbsClamp MAC
|
||||||
|
PxW ]1;]2;]3;]4
|
||||||
|
_SetAbsClamp MAC
|
||||||
|
Tool $2A03
|
||||||
|
<<<
|
||||||
|
~GetAbsClamp MAC
|
||||||
|
PHS 4
|
||||||
|
_GetAbsClamp MAC
|
||||||
|
Tool $2B03
|
||||||
|
<<<
|
||||||
|
_SysBeep MAC
|
||||||
|
Tool $2C03
|
||||||
|
<<<
|
||||||
|
~AddToQueue MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_AddToQueue MAC
|
||||||
|
Tool $2E03
|
||||||
|
<<<
|
||||||
|
~DeleteFromQueue MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_DeleteFromQueue MAC
|
||||||
|
Tool $2F03
|
||||||
|
<<<
|
||||||
|
~SetInterruptState MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_SetInterruptState MAC
|
||||||
|
Tool $3003
|
||||||
|
<<<
|
||||||
|
~GetInterruptState MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_GetInterruptState MAC
|
||||||
|
Tool $3103
|
||||||
|
<<<
|
||||||
|
~GetIntStateRecSize MAC
|
||||||
|
PHA
|
||||||
|
_GetIntStateRecSize MAC
|
||||||
|
Tool $3203
|
||||||
|
<<<
|
||||||
|
~ReadMouse2 MAC
|
||||||
|
PHS 3
|
||||||
|
_ReadMouse2 MAC
|
||||||
|
Tool $3303
|
||||||
|
<<<
|
||||||
|
~GetCodeResConverter MAC
|
||||||
|
PHS 2
|
||||||
|
_GetCodeResConverter MAC
|
||||||
|
Tool $3403
|
||||||
|
<<<
|
||||||
|
_GetROMResource MAC ;private
|
||||||
|
Tool $3503
|
||||||
|
<<<
|
||||||
|
_ReleaseROMResource MAC ;private
|
||||||
|
Tool $3603
|
||||||
|
<<<
|
|
@ -0,0 +1,88 @@
|
||||||
|
* Note sequencer macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_SeqBootInit MAC
|
||||||
|
Tool $011A
|
||||||
|
<<<
|
||||||
|
~SeqStartUp MAC
|
||||||
|
PxW ]1;]2;]3;]4
|
||||||
|
_SeqStartUp MAC
|
||||||
|
Tool $021A
|
||||||
|
<<<
|
||||||
|
_SeqShutDown MAC
|
||||||
|
Tool $031A
|
||||||
|
<<<
|
||||||
|
~SeqVersion MAC
|
||||||
|
PHA
|
||||||
|
_SeqVersion MAC
|
||||||
|
Tool $041A
|
||||||
|
<<<
|
||||||
|
_SeqReset MAC
|
||||||
|
Tool $051A
|
||||||
|
<<<
|
||||||
|
~SeqStatus MAC
|
||||||
|
PHA
|
||||||
|
_SeqStatus MAC
|
||||||
|
Tool $061A
|
||||||
|
<<<
|
||||||
|
~SetIncr MAC
|
||||||
|
PHW ]1
|
||||||
|
_SetIncr MAC
|
||||||
|
Tool $091A
|
||||||
|
<<<
|
||||||
|
~ClearIncr MAC
|
||||||
|
PHA
|
||||||
|
_ClearIncr MAC
|
||||||
|
Tool $0A1A
|
||||||
|
<<<
|
||||||
|
~GetTimer MAC
|
||||||
|
PHA
|
||||||
|
_GetTimer MAC
|
||||||
|
Tool $0B1A
|
||||||
|
<<<
|
||||||
|
~GetLoc MAC
|
||||||
|
PHS 3
|
||||||
|
_GetLoc MAC
|
||||||
|
Tool $0C1A
|
||||||
|
<<<
|
||||||
|
_SeqAllNotesOff MAC
|
||||||
|
Tool $0D1A
|
||||||
|
<<<
|
||||||
|
~SetTrkInfo MAC
|
||||||
|
PxW ]1;]2;]3
|
||||||
|
_SetTrkInfo MAC
|
||||||
|
Tool $0E1A
|
||||||
|
<<<
|
||||||
|
~StartSeq MAC
|
||||||
|
PxL ]1;]2;]3
|
||||||
|
_StartSeq MAC
|
||||||
|
Tool $0F1A
|
||||||
|
<<<
|
||||||
|
_StepSeq MAC
|
||||||
|
Tool $101A
|
||||||
|
<<<
|
||||||
|
~StopSeq MAC
|
||||||
|
PHW ]1
|
||||||
|
_StopSeq MAC
|
||||||
|
Tool $111A
|
||||||
|
<<<
|
||||||
|
~SetInstTable MAC
|
||||||
|
PHL ]1
|
||||||
|
_SetInstTable MAC
|
||||||
|
Tool $121A
|
||||||
|
<<<
|
||||||
|
_StartInts MAC
|
||||||
|
Tool $131A
|
||||||
|
<<<
|
||||||
|
_StopInts MAC
|
||||||
|
Tool $141A
|
||||||
|
<<<
|
||||||
|
~StartSeqRel MAC
|
||||||
|
PxL ]1;]2;]3
|
||||||
|
_StartSeqRel MAC
|
||||||
|
Tool $151A
|
||||||
|
<<<
|
|
@ -0,0 +1,65 @@
|
||||||
|
* Note synthesizer macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_NSBootInit MAC
|
||||||
|
Tool $119
|
||||||
|
<<<
|
||||||
|
~NSStartUp MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_NSStartUp MAC
|
||||||
|
Tool $219
|
||||||
|
<<<
|
||||||
|
_NSShutDown MAC
|
||||||
|
Tool $319
|
||||||
|
<<<
|
||||||
|
~NSVersion MAC
|
||||||
|
PHA
|
||||||
|
_NSVersion MAC
|
||||||
|
Tool $419
|
||||||
|
<<<
|
||||||
|
_NSReset MAC
|
||||||
|
Tool $519
|
||||||
|
<<<
|
||||||
|
~NSStatus MAC
|
||||||
|
PHA
|
||||||
|
_NSStatus MAC
|
||||||
|
Tool $619
|
||||||
|
<<<
|
||||||
|
~AllocGen MAC
|
||||||
|
P1SW ]1
|
||||||
|
_AllocGen MAC
|
||||||
|
Tool $919
|
||||||
|
<<<
|
||||||
|
~DeallocGen MAC
|
||||||
|
PHW ]1
|
||||||
|
_DeallocGen MAC
|
||||||
|
Tool $A19
|
||||||
|
<<<
|
||||||
|
~NoteOn MAC
|
||||||
|
PxW ]1;]2;]3
|
||||||
|
PHL ]4
|
||||||
|
_NoteOn MAC
|
||||||
|
Tool $B19
|
||||||
|
<<<
|
||||||
|
~NoteOff MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_NoteOff MAC
|
||||||
|
Tool $C19
|
||||||
|
<<<
|
||||||
|
_AllNotesOff MAC
|
||||||
|
Tool $D19
|
||||||
|
<<<
|
||||||
|
~NSSetUpdateRate MAC
|
||||||
|
P1SW ]1
|
||||||
|
_NSSetUpdateRate MAC
|
||||||
|
Tool $E19
|
||||||
|
<<<
|
||||||
|
~NSSetUserUpdateRtn MAC
|
||||||
|
P2SL ]1
|
||||||
|
_NSSetUserUpdateRtn MAC
|
||||||
|
Tool $F19
|
||||||
|
<<<
|
|
@ -0,0 +1,190 @@
|
||||||
|
* Print Mgr. macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_PMBootInit MAC
|
||||||
|
Tool $0113
|
||||||
|
<<<
|
||||||
|
~PMStartUp MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_PMStartUp MAC
|
||||||
|
Tool $0213
|
||||||
|
<<<
|
||||||
|
_PMShutDown MAC
|
||||||
|
Tool $0313
|
||||||
|
<<<
|
||||||
|
~PMVersion MAC
|
||||||
|
PHA
|
||||||
|
_PMVersion MAC
|
||||||
|
Tool $0413
|
||||||
|
<<<
|
||||||
|
_PMReset MAC
|
||||||
|
Tool $0513
|
||||||
|
<<<
|
||||||
|
~PMStatus MAC
|
||||||
|
PHA
|
||||||
|
_PMStatus MAC
|
||||||
|
Tool $0613
|
||||||
|
<<<
|
||||||
|
~PrDefault MAC
|
||||||
|
PHL ]1
|
||||||
|
_PrDefault MAC
|
||||||
|
Tool $0913
|
||||||
|
<<<
|
||||||
|
~PrValidate MAC
|
||||||
|
P1SL ]1
|
||||||
|
_PrValidate MAC
|
||||||
|
Tool $0A13
|
||||||
|
<<<
|
||||||
|
~PrStlDialog MAC
|
||||||
|
P1SL ]1
|
||||||
|
_PrStlDialog MAC
|
||||||
|
Tool $0B13
|
||||||
|
<<<
|
||||||
|
~PrJobDialog MAC
|
||||||
|
P1SL ]1
|
||||||
|
_PrJobDialog MAC
|
||||||
|
Tool $0C13
|
||||||
|
<<<
|
||||||
|
~PrPixelMap MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
PHW ]3
|
||||||
|
_PrPixelMap MAC
|
||||||
|
Tool $0D13
|
||||||
|
<<<
|
||||||
|
~PrOpenDoc MAC
|
||||||
|
P2SL ]1
|
||||||
|
PHL ]2
|
||||||
|
_PrOpenDoc MAC
|
||||||
|
Tool $0E13
|
||||||
|
<<<
|
||||||
|
~PrCloseDoc MAC
|
||||||
|
PHL ]1
|
||||||
|
_PrCloseDoc MAC
|
||||||
|
Tool $0F13
|
||||||
|
<<<
|
||||||
|
~PrOpenPage MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_PrOpenPage MAC
|
||||||
|
Tool $1013
|
||||||
|
<<<
|
||||||
|
~PrClosePage MAC
|
||||||
|
PHL ]1
|
||||||
|
_PrClosePage MAC
|
||||||
|
Tool $1113
|
||||||
|
<<<
|
||||||
|
~PrPicFile MAC
|
||||||
|
PxL ]1;]2;]3
|
||||||
|
_PrPicFile MAC
|
||||||
|
Tool $1213
|
||||||
|
<<<
|
||||||
|
_PrControl MAC
|
||||||
|
Tool $1313
|
||||||
|
<<<
|
||||||
|
~PrError MAC
|
||||||
|
PHA
|
||||||
|
_PrError MAC
|
||||||
|
Tool $1413
|
||||||
|
<<<
|
||||||
|
~PrSetError MAC
|
||||||
|
PHW ]1
|
||||||
|
_PrSetError MAC
|
||||||
|
Tool $1513
|
||||||
|
<<<
|
||||||
|
~PrChoosePrinter MAC
|
||||||
|
PHA
|
||||||
|
_PrChoosePrinter MAC
|
||||||
|
Tool $1613
|
||||||
|
<<<
|
||||||
|
~PrGetPrinterSpecs MAC
|
||||||
|
PHS 2
|
||||||
|
_PrGetPrinterSpecs MAC
|
||||||
|
Tool $1813
|
||||||
|
<<<
|
||||||
|
_LLDStartUp MAC
|
||||||
|
Tool $1913
|
||||||
|
<<<
|
||||||
|
_LLDShutDown MAC
|
||||||
|
Tool $1A13
|
||||||
|
<<<
|
||||||
|
_LLDControl MAC
|
||||||
|
Tool $1B13
|
||||||
|
<<<
|
||||||
|
_LLDBitMap MAC
|
||||||
|
Tool $1C13
|
||||||
|
<<<
|
||||||
|
_LLDText MAC
|
||||||
|
Tool $1D13
|
||||||
|
<<<
|
||||||
|
~PrDriverVer MAC
|
||||||
|
PHA
|
||||||
|
_PrDriverVer MAC
|
||||||
|
Tool $2313
|
||||||
|
<<<
|
||||||
|
~PrPortVer MAC
|
||||||
|
PHA
|
||||||
|
_PrPortVer MAC
|
||||||
|
Tool $2413
|
||||||
|
<<<
|
||||||
|
~PrGetZoneName MAC
|
||||||
|
PHS 2
|
||||||
|
_PrGetZoneName MAC
|
||||||
|
Tool $2513
|
||||||
|
<<<
|
||||||
|
~PrGetPrinterDvrName MAC
|
||||||
|
PHS 2
|
||||||
|
_PrGetPrinterDvrName MAC
|
||||||
|
Tool $2813
|
||||||
|
<<<
|
||||||
|
~PrGetPortDvrName MAC
|
||||||
|
PHS 2
|
||||||
|
_PrGetPortDvrName MAC
|
||||||
|
Tool $2913
|
||||||
|
<<<
|
||||||
|
~PrGetUserName MAC
|
||||||
|
PHS 2
|
||||||
|
_PrGetUserName MAC
|
||||||
|
Tool $2A13
|
||||||
|
<<<
|
||||||
|
~PrGetNetworkName MAC
|
||||||
|
PHS 2
|
||||||
|
~PrGetNetworkName MAC
|
||||||
|
Tool $2B13
|
||||||
|
<<<
|
||||||
|
~PMUnloadDriver MAC
|
||||||
|
PHW ]1
|
||||||
|
_PMUnloadDriver MAC
|
||||||
|
Tool $3413
|
||||||
|
<<<
|
||||||
|
~PMLoadDriver MAC
|
||||||
|
PHW ]1
|
||||||
|
_PMLoadDriver MAC
|
||||||
|
Tool $3513
|
||||||
|
<<<
|
||||||
|
~PrGetDocName MAC
|
||||||
|
PHS 2
|
||||||
|
_PrGetDocName MAC
|
||||||
|
Tool $3613
|
||||||
|
<<<
|
||||||
|
~PrSetDocName MAC
|
||||||
|
PHL ]1
|
||||||
|
_PrSetDocName MAC
|
||||||
|
Tool $3713
|
||||||
|
<<<
|
||||||
|
~PrGetPgOrientation MAC
|
||||||
|
P1SL ]1
|
||||||
|
_PrGetPgOrientation MAC
|
||||||
|
Tool $3813
|
||||||
|
<<<
|
||||||
|
|
||||||
|
~qPMStartUp MAC
|
||||||
|
PHW ]1
|
||||||
|
CLC
|
||||||
|
LDA ]2
|
||||||
|
ADC ]NextDP
|
||||||
|
PHA
|
||||||
|
Tool $0213
|
||||||
|
<<<
|
File diff suppressed because it is too large
Load Diff
|
@ -0,0 +1,64 @@
|
||||||
|
* QuickDraw Aux macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_QDAuxBootInit MAC
|
||||||
|
Tool $112
|
||||||
|
<<<
|
||||||
|
_QDAuxStartUp MAC
|
||||||
|
Tool $212
|
||||||
|
<<<
|
||||||
|
_QDAuxShutDown MAC
|
||||||
|
Tool $312
|
||||||
|
<<<
|
||||||
|
~QDAuxVersion MAC
|
||||||
|
PHA
|
||||||
|
_QDAuxVersion MAC
|
||||||
|
Tool $412
|
||||||
|
<<<
|
||||||
|
_QDAuxReset MAC
|
||||||
|
Tool $512
|
||||||
|
<<<
|
||||||
|
~QDAuxStatus MAC
|
||||||
|
PHA
|
||||||
|
_QDAuxStatus MAC
|
||||||
|
Tool $612
|
||||||
|
<<<
|
||||||
|
~CopyPixels MAC
|
||||||
|
PxL ]1;]2;]3;]4
|
||||||
|
PHWL ]5;]6
|
||||||
|
_CopyPixels MAC
|
||||||
|
Tool $912
|
||||||
|
<<<
|
||||||
|
_WaitCursor MAC
|
||||||
|
Tool $A12
|
||||||
|
<<<
|
||||||
|
~DrawIcon MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
PxW ]3;]4
|
||||||
|
_DrawIcon MAC
|
||||||
|
Tool $B12
|
||||||
|
<<<
|
||||||
|
~SpecialRect MAC
|
||||||
|
PHL ]1
|
||||||
|
PxW ]2;]3
|
||||||
|
_SpecialRect MAC
|
||||||
|
Tool $C12
|
||||||
|
<<<
|
||||||
|
~SeedFill MAC
|
||||||
|
PxL ]1;]2;]3;]4
|
||||||
|
PxW ]5;]6;]7
|
||||||
|
PxL ]8;]9
|
||||||
|
_SeedFill MAC
|
||||||
|
Tool $D12
|
||||||
|
<<<
|
||||||
|
~CalcMask MAC
|
||||||
|
PxL ]1;]2;]3;]4
|
||||||
|
PHW ]5
|
||||||
|
PxL ]6;]7
|
||||||
|
_CalcMask MAC
|
||||||
|
Tool $E12
|
||||||
|
<<<
|
|
@ -0,0 +1,207 @@
|
||||||
|
* Resource macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_ResourceBootInit MAC
|
||||||
|
Tool $11E
|
||||||
|
<<<
|
||||||
|
~ResourceStartUp MAC
|
||||||
|
PHW ]1
|
||||||
|
_ResourceStartUp MAC
|
||||||
|
Tool $21E
|
||||||
|
<<<
|
||||||
|
_ResourceShutDown MAC
|
||||||
|
Tool $31E
|
||||||
|
<<<
|
||||||
|
~ResourceVersion MAC
|
||||||
|
PHA
|
||||||
|
_ResourceVersion MAC
|
||||||
|
Tool $41E
|
||||||
|
<<<
|
||||||
|
_ResourceReset MAC
|
||||||
|
Tool $51E
|
||||||
|
<<<
|
||||||
|
~ResourceStatus MAC
|
||||||
|
PHA
|
||||||
|
_ResourceStatus MAC
|
||||||
|
Tool $61E
|
||||||
|
<<<
|
||||||
|
~CreateResourceFile MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
PHWL ]3;]4
|
||||||
|
_CreateResourceFile MAC
|
||||||
|
Tool $91E
|
||||||
|
<<<
|
||||||
|
~OpenResourceFile MAC
|
||||||
|
P1SW ]1
|
||||||
|
PxL ]2;]3
|
||||||
|
_OpenResourceFile MAC
|
||||||
|
Tool $A1E
|
||||||
|
<<<
|
||||||
|
~CloseResourceFile MAC
|
||||||
|
PHW ]1
|
||||||
|
_CloseResourceFile MAC
|
||||||
|
Tool $B1E
|
||||||
|
<<<
|
||||||
|
~AddResource MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
PHWL ]3;]4
|
||||||
|
_AddResource MAC
|
||||||
|
Tool $C1E
|
||||||
|
<<<
|
||||||
|
~UpdateResourceFile MAC
|
||||||
|
PHW ]1
|
||||||
|
_UpdateResourceFile MAC
|
||||||
|
Tool $D1E
|
||||||
|
<<<
|
||||||
|
~LoadResource MAC
|
||||||
|
P2SW ]1
|
||||||
|
PHL ]2
|
||||||
|
_LoadResource MAC
|
||||||
|
Tool $E1E
|
||||||
|
<<<
|
||||||
|
~RemoveResource MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_RemoveResource MAC
|
||||||
|
Tool $F1E
|
||||||
|
<<<
|
||||||
|
~MarkResourceChange MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_MarkResourceChange MAC
|
||||||
|
Tool $101E
|
||||||
|
<<<
|
||||||
|
~SetCurResourceFile MAC
|
||||||
|
PHW ]1
|
||||||
|
_SetCurResourceFile MAC
|
||||||
|
Tool $111E
|
||||||
|
<<<
|
||||||
|
~GetCurResourceFile MAC
|
||||||
|
PHA
|
||||||
|
_GetCurResourceFile MAC
|
||||||
|
Tool $121E
|
||||||
|
<<<
|
||||||
|
~SetCurResourceApp MAC
|
||||||
|
PHW ]1
|
||||||
|
_SetCurResourceApp MAC
|
||||||
|
Tool $131E
|
||||||
|
<<<
|
||||||
|
~GetCurResourceApp MAC
|
||||||
|
PHA
|
||||||
|
_GetCurResourceApp MAC
|
||||||
|
Tool $141E
|
||||||
|
<<<
|
||||||
|
~HomeResourceFile MAC
|
||||||
|
P1SW ]1
|
||||||
|
PHL ]2
|
||||||
|
_HomeResourceFile MAC
|
||||||
|
Tool $151E
|
||||||
|
<<<
|
||||||
|
~WriteResource MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_WriteResource MAC
|
||||||
|
Tool $161E
|
||||||
|
<<<
|
||||||
|
~ReleaseResource MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_ReleaseResource MAC
|
||||||
|
Tool $171E
|
||||||
|
<<<
|
||||||
|
~DetatchResource MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_DetatchResource MAC
|
||||||
|
Tool $181E
|
||||||
|
<<<
|
||||||
|
~UniqueResourceID MAC
|
||||||
|
P2SW ]1
|
||||||
|
PHW ]2
|
||||||
|
_UniqueResourceID MAC
|
||||||
|
Tool $191E
|
||||||
|
<<<
|
||||||
|
~SetResourceID MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_SetResourceID MAC
|
||||||
|
Tool $1A1E
|
||||||
|
<<<
|
||||||
|
~GetResourceAttr MAC
|
||||||
|
P1SW ]1
|
||||||
|
PHL ]2
|
||||||
|
_GetResourceAttr MAC
|
||||||
|
Tool $1B1E
|
||||||
|
<<<
|
||||||
|
~SetResourceAttr MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_SetResourceAttr MAC
|
||||||
|
Tool $1C1E
|
||||||
|
<<<
|
||||||
|
~GetResourceSize MAC
|
||||||
|
P2SW ]1
|
||||||
|
PHL ]2
|
||||||
|
_GetResourceSize MAC
|
||||||
|
Tool $1D1E
|
||||||
|
<<<
|
||||||
|
~MatchResourceHandle MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_MatchResourceHandle MAC
|
||||||
|
Tool $1E1E
|
||||||
|
<<<
|
||||||
|
~GetOpenFileRefNum MAC
|
||||||
|
P1SW ]1
|
||||||
|
_GetOpenFileRefNum MAC
|
||||||
|
Tool $1F1E
|
||||||
|
<<<
|
||||||
|
~CountTypes MAC
|
||||||
|
PHA
|
||||||
|
_CountTypes MAC
|
||||||
|
Tool $201E
|
||||||
|
<<<
|
||||||
|
~GetIndType MAC
|
||||||
|
P1SW ]1
|
||||||
|
_GetIndType MAC
|
||||||
|
Tool $211E
|
||||||
|
<<<
|
||||||
|
~CountResources MAC
|
||||||
|
P2SW ]1
|
||||||
|
_CountResources MAC
|
||||||
|
Tool $221E
|
||||||
|
<<<
|
||||||
|
~GetIndResource MAC
|
||||||
|
P2SW ]1
|
||||||
|
PHL ]2
|
||||||
|
_GetIndResource MAC
|
||||||
|
Tool $231E
|
||||||
|
<<<
|
||||||
|
~SetResourceLoad MAC
|
||||||
|
P1SW ]1
|
||||||
|
_SetResourceLoad MAC
|
||||||
|
Tool $241E
|
||||||
|
<<<
|
||||||
|
~SetResourceFileDepth MAC
|
||||||
|
P1SW ]1
|
||||||
|
_SetResourceFileDepth MAC
|
||||||
|
Tool $251E
|
||||||
|
<<<
|
||||||
|
~GetMapHandle MAC
|
||||||
|
P2SW ]1
|
||||||
|
_GetMapHandle MAC
|
||||||
|
Tool $261E
|
||||||
|
<<<
|
||||||
|
~LoadAbsResource MAC
|
||||||
|
P2SL ]1
|
||||||
|
PHL ]2
|
||||||
|
PHWL ]3;]4
|
||||||
|
_LoadAbsResource MAC
|
||||||
|
Tool $271E
|
||||||
|
<<<
|
||||||
|
~ResourceConverter MAC
|
||||||
|
PHL ]1
|
||||||
|
PxW ]2;]3
|
||||||
|
_ResourceConverter MAC
|
||||||
|
Tool $281E
|
||||||
|
<<<
|
|
@ -0,0 +1,603 @@
|
||||||
|
* Sane Toolset macros.
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_SANEBootInit MAC
|
||||||
|
Tool $10A
|
||||||
|
<<<
|
||||||
|
~SANEStartUp MAC
|
||||||
|
PHW ]1
|
||||||
|
_SANEStartUp MAC
|
||||||
|
Tool $20A
|
||||||
|
<<<
|
||||||
|
_SANEShutDown MAC
|
||||||
|
Tool $30A
|
||||||
|
<<<
|
||||||
|
~SANEVersion MAC
|
||||||
|
PHA
|
||||||
|
_SANEVersion MAC
|
||||||
|
Tool $40A
|
||||||
|
<<<
|
||||||
|
_SANEReset MAC
|
||||||
|
Tool $50A
|
||||||
|
<<<
|
||||||
|
~SANEStatus MAC
|
||||||
|
PHA
|
||||||
|
_SANEStatus MAC
|
||||||
|
Tool $60A
|
||||||
|
<<<
|
||||||
|
_SANEFP816 MAC
|
||||||
|
Tool $90A
|
||||||
|
<<<
|
||||||
|
_SANEDecStr816 MAC
|
||||||
|
Tool $A0A
|
||||||
|
<<<
|
||||||
|
_SANEElems816 MAC
|
||||||
|
Tool $B0A
|
||||||
|
<<<
|
||||||
|
~qSANEStartUp MAC
|
||||||
|
NextDP ]1;$100
|
||||||
|
Tool $20A
|
||||||
|
<<<
|
||||||
|
* Auxiliary macros
|
||||||
|
|
||||||
|
FOPRF MAC ;call FP
|
||||||
|
PEA ]1
|
||||||
|
_SANEFP816
|
||||||
|
<<<
|
||||||
|
FOPRD MAC ;call DecStr
|
||||||
|
PEA ]1
|
||||||
|
_SANEDecStr816
|
||||||
|
<<<
|
||||||
|
FOPRE MAC ;call Elems
|
||||||
|
PEA ]1
|
||||||
|
_SANEElems816
|
||||||
|
<<<
|
||||||
|
* Addition
|
||||||
|
|
||||||
|
FADDX MAC
|
||||||
|
FOPRF 0
|
||||||
|
<<<
|
||||||
|
FADDD MAC
|
||||||
|
FOPRF $100
|
||||||
|
<<<
|
||||||
|
FADDS MAC
|
||||||
|
FOPRF $200
|
||||||
|
<<<
|
||||||
|
FADDC MAC
|
||||||
|
FOPRF $500
|
||||||
|
<<<
|
||||||
|
FADDI MAC
|
||||||
|
FOPRF $400
|
||||||
|
<<<
|
||||||
|
FADDL MAC
|
||||||
|
FOPRF $300
|
||||||
|
<<<
|
||||||
|
* Subtraction
|
||||||
|
|
||||||
|
FSUBX MAC
|
||||||
|
FOPRF $002
|
||||||
|
<<<
|
||||||
|
FSUBD MAC
|
||||||
|
FOPRF $102
|
||||||
|
<<<
|
||||||
|
FSUBS MAC
|
||||||
|
FOPRF $202
|
||||||
|
<<<
|
||||||
|
FSUBC MAC
|
||||||
|
FOPRF $502
|
||||||
|
<<<
|
||||||
|
FSUBI MAC
|
||||||
|
FOPRF $402
|
||||||
|
<<<
|
||||||
|
FSUBL MAC
|
||||||
|
FOPRF $302
|
||||||
|
<<<
|
||||||
|
* Multiplication
|
||||||
|
|
||||||
|
FMULX MAC
|
||||||
|
FOPRF $004
|
||||||
|
<<<
|
||||||
|
FMULD MAC
|
||||||
|
FOPRF $104
|
||||||
|
<<<
|
||||||
|
FMULS MAC
|
||||||
|
FOPRF $204
|
||||||
|
<<<
|
||||||
|
FMULC MAC
|
||||||
|
FOPRF $504
|
||||||
|
<<<
|
||||||
|
FMULI MAC
|
||||||
|
FOPRF $404
|
||||||
|
<<<
|
||||||
|
FMULL MAC
|
||||||
|
FOPRF $304
|
||||||
|
<<<
|
||||||
|
* Division
|
||||||
|
|
||||||
|
FDIVX MAC
|
||||||
|
FOPRF $006
|
||||||
|
<<<
|
||||||
|
FDIVD MAC
|
||||||
|
FOPRF $106
|
||||||
|
<<<
|
||||||
|
FDIVS MAC
|
||||||
|
FOPRF $206
|
||||||
|
<<<
|
||||||
|
FDIVC MAC
|
||||||
|
FOPRF $506
|
||||||
|
<<<
|
||||||
|
FDIVI MAC
|
||||||
|
FOPRF $406
|
||||||
|
<<<
|
||||||
|
FDIVL MAC
|
||||||
|
FOPRF $306
|
||||||
|
<<<
|
||||||
|
* Square root
|
||||||
|
|
||||||
|
FSQRTX MAC
|
||||||
|
FOPRF $12
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* Round to integer, according to the current rounding mode
|
||||||
|
|
||||||
|
FRINTX MAC
|
||||||
|
FOPRF $14
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* Truncate to integer, using round toward zero.
|
||||||
|
|
||||||
|
FTINTX MAC
|
||||||
|
FOPRF $16
|
||||||
|
<<<
|
||||||
|
* Remainder
|
||||||
|
|
||||||
|
FREMX MAC
|
||||||
|
FOPRF $00C
|
||||||
|
<<<
|
||||||
|
FREMD MAC
|
||||||
|
FOPRF $10C
|
||||||
|
<<<
|
||||||
|
FREMS MAC
|
||||||
|
FOPRF $20C
|
||||||
|
<<<
|
||||||
|
FREMC MAC
|
||||||
|
FOPRF $50C
|
||||||
|
<<<
|
||||||
|
FREMI MAC
|
||||||
|
FOPRF $40C
|
||||||
|
<<<
|
||||||
|
FREML MAC
|
||||||
|
FOPRF $30C
|
||||||
|
<<<
|
||||||
|
* Logb
|
||||||
|
|
||||||
|
FLOGBX MAC
|
||||||
|
FOPRF $1A
|
||||||
|
<<<
|
||||||
|
* Scalb
|
||||||
|
|
||||||
|
FSCALBX MAC
|
||||||
|
FOPRF $18
|
||||||
|
<<<
|
||||||
|
* Copy-sign
|
||||||
|
|
||||||
|
FCPYSGNX MAC
|
||||||
|
FOPRF $011
|
||||||
|
<<<
|
||||||
|
FCPYSGND MAC
|
||||||
|
FOPRF $111
|
||||||
|
<<<
|
||||||
|
FCPYSGNS MAC
|
||||||
|
FOPRF $211
|
||||||
|
<<<
|
||||||
|
FCPYSGNC MAC
|
||||||
|
FOPRF $511
|
||||||
|
<<<
|
||||||
|
FCPYSGNI MAC
|
||||||
|
FOPRF $411
|
||||||
|
<<<
|
||||||
|
FCPYSGNL MAC
|
||||||
|
FOPRF $311
|
||||||
|
<<<
|
||||||
|
* Negate
|
||||||
|
|
||||||
|
FNEGX MAC
|
||||||
|
FOPRF $0D
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* Absolute value
|
||||||
|
|
||||||
|
FABSX MAC
|
||||||
|
FOPRF $0F
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* Next-after. NOTE: both operands are of the
|
||||||
|
* the same format, as specified by the usual suffix.
|
||||||
|
|
||||||
|
FNEXTS MAC
|
||||||
|
FOPRF $21E
|
||||||
|
<<<
|
||||||
|
FNEXTD MAC
|
||||||
|
FOPRF $11E
|
||||||
|
<<<
|
||||||
|
FNEXTX MAC
|
||||||
|
FOPRF $01E
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* Conversion to extended
|
||||||
|
|
||||||
|
FX2X MAC
|
||||||
|
FOPRF $00E
|
||||||
|
<<<
|
||||||
|
FD2X MAC
|
||||||
|
FOPRF $10E
|
||||||
|
<<<
|
||||||
|
FS2X MAC
|
||||||
|
FOPRF $20E
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* 16-bit integer, by address
|
||||||
|
|
||||||
|
FI2X MAC
|
||||||
|
FOPRF $40E
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* 32-bit integer, by address
|
||||||
|
|
||||||
|
FL2X MAC
|
||||||
|
FOPRF $30E
|
||||||
|
<<<
|
||||||
|
FC2X MAC
|
||||||
|
FOPRF $50E
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* Conversion from extended
|
||||||
|
|
||||||
|
FX2D MAC
|
||||||
|
FOPRF $110
|
||||||
|
<<<
|
||||||
|
FX2S MAC
|
||||||
|
FOPRF $210
|
||||||
|
<<<
|
||||||
|
FX2I MAC
|
||||||
|
FOPRF $410
|
||||||
|
<<<
|
||||||
|
FX2L MAC
|
||||||
|
FOPRF $310
|
||||||
|
<<<
|
||||||
|
FX2C MAC
|
||||||
|
FOPRF $510
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* Binary to decimal conversion
|
||||||
|
|
||||||
|
FX2DEC MAC
|
||||||
|
FOPRF $00B
|
||||||
|
<<<
|
||||||
|
FD2DEC MAC
|
||||||
|
FOPRF $10B
|
||||||
|
<<<
|
||||||
|
FS2DEC MAC
|
||||||
|
FOPRF $20B
|
||||||
|
<<<
|
||||||
|
FC2DEC MAC
|
||||||
|
FOPRF $50B
|
||||||
|
<<<
|
||||||
|
FI2DEC MAC
|
||||||
|
FOPRF $40B
|
||||||
|
<<<
|
||||||
|
FL2DEC MAC
|
||||||
|
FOPRF $30B
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* Decimal to binary conversion
|
||||||
|
|
||||||
|
FDEC2X MAC
|
||||||
|
FOPRF $009
|
||||||
|
<<<
|
||||||
|
FDEC2D MAC
|
||||||
|
FOPRF $109
|
||||||
|
<<<
|
||||||
|
FDEC2S MAC
|
||||||
|
FOPRF $209
|
||||||
|
<<<
|
||||||
|
FDEC2C MAC
|
||||||
|
FOPRF $509
|
||||||
|
<<<
|
||||||
|
FDEC2I MAC
|
||||||
|
FOPRF $409
|
||||||
|
<<<
|
||||||
|
FDEC2L MAC
|
||||||
|
FOPRF $309
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* Compare, not signaling invalid on unordered
|
||||||
|
|
||||||
|
FCMPX MAC
|
||||||
|
FOPRF $008
|
||||||
|
<<<
|
||||||
|
FCMPD MAC
|
||||||
|
FOPRF $108
|
||||||
|
<<<
|
||||||
|
FCMPS MAC
|
||||||
|
FOPRF $208
|
||||||
|
<<<
|
||||||
|
FCMPC MAC
|
||||||
|
FOPRF $508
|
||||||
|
<<<
|
||||||
|
FCMPI MAC
|
||||||
|
FOPRF $408
|
||||||
|
<<<
|
||||||
|
FCMPL MAC
|
||||||
|
FOPRF $308
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* Compare, signaling invalid on unordered
|
||||||
|
|
||||||
|
FCPXX MAC
|
||||||
|
FOPRF $00A
|
||||||
|
<<<
|
||||||
|
FCPXD MAC
|
||||||
|
FOPRF $10A
|
||||||
|
<<<
|
||||||
|
FCPXS MAC
|
||||||
|
FOPRF $20A
|
||||||
|
<<<
|
||||||
|
FCPXC MAC
|
||||||
|
FOPRF $50A
|
||||||
|
<<<
|
||||||
|
FCPXI MAC
|
||||||
|
FOPRF $40A
|
||||||
|
<<<
|
||||||
|
FCPXL MAC
|
||||||
|
FOPRF $30A
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* The following macros define a set of so-called floating
|
||||||
|
* branches. They presume that the appropriate compare
|
||||||
|
* operation, macro FCMPz or FCPXz, precedes.
|
||||||
|
|
||||||
|
FBEQ MAC
|
||||||
|
BEQ ]1
|
||||||
|
<<<
|
||||||
|
FBLT MAC ;less
|
||||||
|
BMI ]1
|
||||||
|
<<<
|
||||||
|
FBLE MAC ;less or equal
|
||||||
|
BMI ]1
|
||||||
|
BEQ ]1
|
||||||
|
<<<
|
||||||
|
FBGT MAC ;greater
|
||||||
|
BVS ]1
|
||||||
|
<<<
|
||||||
|
FBGE MAC ;greater or equal
|
||||||
|
BVS ]1
|
||||||
|
BEQ ]1
|
||||||
|
<<<
|
||||||
|
FBULT MAC ;less or unordered
|
||||||
|
BMI ]1
|
||||||
|
BVS *+4
|
||||||
|
BNE ]1
|
||||||
|
<<<
|
||||||
|
FBULE MAC ;unordered, less, or equal
|
||||||
|
BMI ]1
|
||||||
|
BEQ ]1
|
||||||
|
BVC ]1
|
||||||
|
<<<
|
||||||
|
FBUGT MAC ;unordered or greater
|
||||||
|
BVS ]1
|
||||||
|
BMI *+4
|
||||||
|
BNE ]1
|
||||||
|
<<<
|
||||||
|
FBUGE MAC ;unordered, greater, or equal
|
||||||
|
BVS ]1
|
||||||
|
BEQ ]1
|
||||||
|
BPL ]1
|
||||||
|
<<<
|
||||||
|
FBU MAC ;unordered
|
||||||
|
BVS *+6
|
||||||
|
BMI *+4
|
||||||
|
BNE ]1
|
||||||
|
<<<
|
||||||
|
FBO MAC ;ordered
|
||||||
|
BMI ]1
|
||||||
|
BVS ]1
|
||||||
|
BEQ ]1
|
||||||
|
<<<
|
||||||
|
FBNE MAC ;not equal
|
||||||
|
BMI ]1
|
||||||
|
BVS ]1
|
||||||
|
BNE ]1
|
||||||
|
<<<
|
||||||
|
FBUE MAC ;unordered, equal
|
||||||
|
BEQ ]1
|
||||||
|
BMI *+4
|
||||||
|
BVC ]1
|
||||||
|
<<<
|
||||||
|
FBLG MAC ;less or greater
|
||||||
|
BMI ]1
|
||||||
|
BVS ]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
FCLASSS MAC
|
||||||
|
FOPRF $21C
|
||||||
|
<<<
|
||||||
|
FCLASSD MAC
|
||||||
|
FOPRF $11C
|
||||||
|
<<<
|
||||||
|
FCLASSX MAC
|
||||||
|
FOPRF $01C
|
||||||
|
<<<
|
||||||
|
FCLASSC MAC
|
||||||
|
FOPRF $51C
|
||||||
|
<<<
|
||||||
|
FCLASSI MAC
|
||||||
|
FOPRF $41C
|
||||||
|
<<<
|
||||||
|
FCLASSL MAC
|
||||||
|
FOPRF $31C
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* The following macros provide branches based on the
|
||||||
|
* the result of a FCLASSz macro.
|
||||||
|
|
||||||
|
FBSNAN MAC ;signaling NaN
|
||||||
|
TXA
|
||||||
|
ASL
|
||||||
|
CMP #2*$FC
|
||||||
|
BEQ ]1
|
||||||
|
<<<
|
||||||
|
FBQNAN MAC ;quiet NaN
|
||||||
|
TXA
|
||||||
|
ASL
|
||||||
|
CMP #2*$FD
|
||||||
|
BEQ ]1
|
||||||
|
<<<
|
||||||
|
FBINF MAC ;infinite
|
||||||
|
TXA
|
||||||
|
ASL
|
||||||
|
CMP #2*$FE
|
||||||
|
BEQ ]1
|
||||||
|
<<<
|
||||||
|
FBZERO MAC ;zero
|
||||||
|
TXA
|
||||||
|
ASL
|
||||||
|
CMP #2*$FF
|
||||||
|
BEQ ]1
|
||||||
|
<<<
|
||||||
|
FBNORM MAC ;normal
|
||||||
|
TXA
|
||||||
|
ASL
|
||||||
|
BEQ ]1
|
||||||
|
<<<
|
||||||
|
FBDENORM MAC ;denormal
|
||||||
|
TXA
|
||||||
|
ASL
|
||||||
|
CMP #2*1
|
||||||
|
BEQ ]1
|
||||||
|
<<<
|
||||||
|
FBNZENUM MAC ;non-zero num (norm or denorm)
|
||||||
|
TXA
|
||||||
|
XBA
|
||||||
|
ASL
|
||||||
|
BCC ]1
|
||||||
|
<<<
|
||||||
|
FBNUM MAC ;number (zero, norm or denorm)
|
||||||
|
TXA
|
||||||
|
INC A
|
||||||
|
XBA
|
||||||
|
ASL
|
||||||
|
BCC ]1
|
||||||
|
<<<
|
||||||
|
FBMINUS MAC ;minus sign
|
||||||
|
BMI ]1
|
||||||
|
<<<
|
||||||
|
FBPLUS MAC ;plus sign
|
||||||
|
BPL ]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* Get and set environment
|
||||||
|
|
||||||
|
FGETENV MAC
|
||||||
|
FOPRF $03
|
||||||
|
<<<
|
||||||
|
FSETENV MAC
|
||||||
|
FOPRF $01
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* Test and set exception
|
||||||
|
|
||||||
|
FTESTXCP MAC
|
||||||
|
FOPRF $1B
|
||||||
|
<<<
|
||||||
|
FSETXCP MAC
|
||||||
|
FOPRF $15
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* Procedure entry and exit
|
||||||
|
|
||||||
|
FPROCENTRY MAC
|
||||||
|
FOPRF $17
|
||||||
|
<<<
|
||||||
|
FPROCEXIT MAC
|
||||||
|
FOPRF $19
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* Get and set halt vector
|
||||||
|
|
||||||
|
FGETHV MAC
|
||||||
|
FOPRF $07
|
||||||
|
<<<
|
||||||
|
FSETHV MAC
|
||||||
|
FOPRF $05
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* Elementary function macros
|
||||||
|
|
||||||
|
FLNX MAC ;natural (base-e) log
|
||||||
|
FOPRE $00
|
||||||
|
<<<
|
||||||
|
FLOG2X MAC ;base-2 log
|
||||||
|
FOPRE $02
|
||||||
|
<<<
|
||||||
|
FLN1X MAC ;ln (1 + x)
|
||||||
|
FOPRE $04
|
||||||
|
<<<
|
||||||
|
FLOG21X MAC ;log2 (1 +x)
|
||||||
|
FOPRE $06
|
||||||
|
<<<
|
||||||
|
FEXPX MAC ;base-e exponential
|
||||||
|
FOPRE $08
|
||||||
|
<<<
|
||||||
|
FEXP2X MAC ;base-2 exponential
|
||||||
|
FOPRE $0A
|
||||||
|
<<<
|
||||||
|
FEXP1X MAC ;exp (x) - 1
|
||||||
|
FOPRE $0C
|
||||||
|
<<<
|
||||||
|
FEXP21X MAC ;exp2 (x) - 1
|
||||||
|
FOPRE $0E
|
||||||
|
<<<
|
||||||
|
FXPWRI MAC ;integer exponential
|
||||||
|
FOPRE $10
|
||||||
|
<<<
|
||||||
|
FXPWRY MAC ;general exponential
|
||||||
|
FOPRE $12
|
||||||
|
<<<
|
||||||
|
FCOMPOUND MAC ;compound
|
||||||
|
FOPRE $14
|
||||||
|
<<<
|
||||||
|
FANNUITY MAC ;annuity
|
||||||
|
FOPRE $16
|
||||||
|
<<<
|
||||||
|
FATANX MAC ;arctangent
|
||||||
|
FOPRE $18
|
||||||
|
<<<
|
||||||
|
FSINX MAC ;sine
|
||||||
|
FOPRE $1A
|
||||||
|
<<<
|
||||||
|
FCOSX MAC ;cosine
|
||||||
|
FOPRE $1C
|
||||||
|
<<<
|
||||||
|
FTANX MAC ;tangent
|
||||||
|
FOPRE $1E
|
||||||
|
<<<
|
||||||
|
FRANDX MAC ;random number generator
|
||||||
|
FOPRE $20
|
||||||
|
<<<
|
||||||
|
|
||||||
|
* Scanner and formatter function macros
|
||||||
|
|
||||||
|
FPSTR2DEC MAC ;pascal string to decimal record
|
||||||
|
FOPRD 0
|
||||||
|
<<<
|
||||||
|
FDEC2STR MAC ;decimal record to pascal string
|
||||||
|
FOPRD 1
|
||||||
|
<<<
|
||||||
|
FCSTR2DEC MAC ;C string to decimal record
|
||||||
|
FOPRD 2
|
||||||
|
<<<
|
|
@ -0,0 +1,37 @@
|
||||||
|
* Scheduler macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_SchBootInit MAC
|
||||||
|
Tool $107
|
||||||
|
<<<
|
||||||
|
_SchStartUp MAC
|
||||||
|
Tool $207
|
||||||
|
<<<
|
||||||
|
_SchShutDown MAC
|
||||||
|
Tool $307
|
||||||
|
<<<
|
||||||
|
~SchVersion MAC
|
||||||
|
PHA
|
||||||
|
_SchVersion MAC
|
||||||
|
Tool $407
|
||||||
|
<<<
|
||||||
|
_SchReset MAC
|
||||||
|
Tool $507
|
||||||
|
<<<
|
||||||
|
~SchStatus MAC
|
||||||
|
PHA
|
||||||
|
_SchStatus MAC
|
||||||
|
Tool $607
|
||||||
|
<<<
|
||||||
|
~SchAddTask MAC
|
||||||
|
P1SL ]1
|
||||||
|
_SchAddTask MAC
|
||||||
|
Tool $907
|
||||||
|
<<<
|
||||||
|
_SchFlush MAC
|
||||||
|
Tool $A07
|
||||||
|
<<<
|
|
@ -0,0 +1,79 @@
|
||||||
|
* Scrap manager macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_ScrapBootInit MAC
|
||||||
|
Tool $116
|
||||||
|
<<<
|
||||||
|
_ScrapStartUp MAC
|
||||||
|
Tool $216
|
||||||
|
<<<
|
||||||
|
_ScrapShutDown MAC
|
||||||
|
Tool $316
|
||||||
|
<<<
|
||||||
|
~ScrapVersion MAC
|
||||||
|
PHA
|
||||||
|
_ScrapVersion MAC
|
||||||
|
Tool $416
|
||||||
|
<<<
|
||||||
|
_ScrapReset MAC
|
||||||
|
Tool $516
|
||||||
|
<<<
|
||||||
|
~ScrapStatus MAC
|
||||||
|
PHA
|
||||||
|
_ScrapStatus MAC
|
||||||
|
Tool $616
|
||||||
|
<<<
|
||||||
|
_UnloadScrap MAC
|
||||||
|
Tool $916
|
||||||
|
<<<
|
||||||
|
_LoadScrap MAC
|
||||||
|
Tool $A16
|
||||||
|
<<<
|
||||||
|
_ZeroScrap MAC
|
||||||
|
Tool $B16
|
||||||
|
<<<
|
||||||
|
~PutScrap MAC
|
||||||
|
PHL ]1
|
||||||
|
PHWL ]2;]3
|
||||||
|
_PutScrap MAC
|
||||||
|
Tool $C16
|
||||||
|
<<<
|
||||||
|
~GetScrap MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
_GetScrap MAC
|
||||||
|
Tool $D16
|
||||||
|
<<<
|
||||||
|
~GetScrapHandle MAC
|
||||||
|
P2SW ]1
|
||||||
|
_GetScrapHandle MAC
|
||||||
|
Tool $E16
|
||||||
|
<<<
|
||||||
|
~GetScrapSize MAC
|
||||||
|
P2SW ]1
|
||||||
|
_GetScrapSize MAC
|
||||||
|
Tool $F16
|
||||||
|
<<<
|
||||||
|
~GetScrapPath MAC
|
||||||
|
PHS 2
|
||||||
|
_GetScrapPath MAC
|
||||||
|
Tool $1016
|
||||||
|
<<<
|
||||||
|
~SetScrapPath MAC
|
||||||
|
PHL ]1
|
||||||
|
_SetScrapPath MAC
|
||||||
|
Tool $1116
|
||||||
|
<<<
|
||||||
|
~GetScrapCount MAC
|
||||||
|
PHA
|
||||||
|
_GetScrapCount MAC
|
||||||
|
Tool $1216
|
||||||
|
<<<
|
||||||
|
~GetScrapState MAC
|
||||||
|
PHA
|
||||||
|
_GetScrapState MAC
|
||||||
|
Tool $1316
|
||||||
|
<<<
|
|
@ -0,0 +1,97 @@
|
||||||
|
* Sound manager macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_SoundBootInit MAC
|
||||||
|
Tool $108
|
||||||
|
<<<
|
||||||
|
~SoundStartUp MAC
|
||||||
|
PHW ]1
|
||||||
|
_SoundStartUp MAC
|
||||||
|
Tool $208
|
||||||
|
<<<
|
||||||
|
_SoundShutDown MAC
|
||||||
|
Tool $308
|
||||||
|
<<<
|
||||||
|
~SoundVersion MAC
|
||||||
|
PHA
|
||||||
|
_SoundVersion MAC
|
||||||
|
Tool $408
|
||||||
|
<<<
|
||||||
|
_SoundReset MAC
|
||||||
|
Tool $508
|
||||||
|
<<<
|
||||||
|
~SoundToolStatus MAC
|
||||||
|
PHA
|
||||||
|
_SoundToolStatus MAC
|
||||||
|
Tool $608
|
||||||
|
<<<
|
||||||
|
~WriteRamBlock MAC
|
||||||
|
PHL ]1
|
||||||
|
PxW ]2;]3
|
||||||
|
_WriteRamBlock MAC
|
||||||
|
Tool $908
|
||||||
|
<<<
|
||||||
|
~ReadRamBlock MAC
|
||||||
|
PHL ]1
|
||||||
|
PxW ]2;]3
|
||||||
|
_ReadRamBlock MAC
|
||||||
|
Tool $A08
|
||||||
|
<<<
|
||||||
|
~GetTableAddress MAC
|
||||||
|
PHS 2
|
||||||
|
_GetTableAddress MAC
|
||||||
|
Tool $B08
|
||||||
|
<<<
|
||||||
|
~GetSoundVolume MAC
|
||||||
|
P1SW ]1
|
||||||
|
_GetSoundVolume MAC
|
||||||
|
Tool $C08
|
||||||
|
<<<
|
||||||
|
~SetSoundVolume MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_SetSoundVolume MAC
|
||||||
|
Tool $D08
|
||||||
|
<<<
|
||||||
|
~FFStartSound MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_FFStartSound MAC
|
||||||
|
Tool $E08
|
||||||
|
<<<
|
||||||
|
~FFStopSound MAC
|
||||||
|
PHW ]1
|
||||||
|
_FFStopSound MAC
|
||||||
|
Tool $F08
|
||||||
|
<<<
|
||||||
|
~FFSoundStatus MAC
|
||||||
|
PHA
|
||||||
|
_FFSoundStatus MAC
|
||||||
|
Tool $1008
|
||||||
|
<<<
|
||||||
|
~FFGeneratorStatus MAC
|
||||||
|
P1SW ]1
|
||||||
|
_FFGeneratorStatus MAC
|
||||||
|
Tool $1108
|
||||||
|
<<<
|
||||||
|
~SetSoundMIRQV MAC
|
||||||
|
PHL ]1
|
||||||
|
_SetSoundMIRQV MAC
|
||||||
|
Tool $1208
|
||||||
|
<<<
|
||||||
|
~SetUserSoundIRQV MAC
|
||||||
|
P2SL ]1
|
||||||
|
_SetUserSoundIRQV MAC
|
||||||
|
Tool $1308
|
||||||
|
<<<
|
||||||
|
~FFSoundDoneStatus MAC
|
||||||
|
P1SW ]1
|
||||||
|
_FFSoundDoneStatus MAC
|
||||||
|
Tool $1408
|
||||||
|
<<<
|
||||||
|
~qSoundStartUp MAC
|
||||||
|
NextDP ]1;$100
|
||||||
|
Tool $208
|
||||||
|
<<<
|
|
@ -0,0 +1,107 @@
|
||||||
|
* Standard File Operations macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_SFBootInit MAC
|
||||||
|
Tool $117
|
||||||
|
<<<
|
||||||
|
~SFStartUp MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_SFStartUp MAC
|
||||||
|
Tool $217
|
||||||
|
<<<
|
||||||
|
_SFShutDown MAC
|
||||||
|
Tool $317
|
||||||
|
<<<
|
||||||
|
~SFVersion MAC
|
||||||
|
PHA
|
||||||
|
_SFVersion MAC
|
||||||
|
Tool $417
|
||||||
|
<<<
|
||||||
|
_SFReset MAC
|
||||||
|
Tool $517
|
||||||
|
<<<
|
||||||
|
~SFStatus MAC
|
||||||
|
PHA
|
||||||
|
_SFStatus MAC
|
||||||
|
Tool $617
|
||||||
|
<<<
|
||||||
|
~SFGetFile MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PxL ]3;]4;]5;]6
|
||||||
|
_SFGetFile MAC
|
||||||
|
Tool $917
|
||||||
|
<<<
|
||||||
|
~SFPutFile MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PxL ]3;]4
|
||||||
|
PHWL ]5;]6
|
||||||
|
_SFPutFile MAC
|
||||||
|
Tool $A17
|
||||||
|
<<<
|
||||||
|
~SFPGetFile MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PxL ]3;]4;]5;]6
|
||||||
|
PxL ]7;]8
|
||||||
|
_SFPGetFile MAC
|
||||||
|
Tool $B17
|
||||||
|
<<<
|
||||||
|
~SFPPutFile MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PxL ]3;]4
|
||||||
|
PHWL ]5;]6
|
||||||
|
PxL ]7;]8
|
||||||
|
_SFPPutFile MAC
|
||||||
|
Tool $C17
|
||||||
|
<<<
|
||||||
|
~SFAllCaps MAC
|
||||||
|
PHW ]1
|
||||||
|
_SFAllCaps MAC
|
||||||
|
Tool $D17
|
||||||
|
<<<
|
||||||
|
~SFGetFile2 MAC
|
||||||
|
PxW ]1;]2;]3
|
||||||
|
PxL ]4;]5;]6;]7
|
||||||
|
_SFGetFile2 MAC
|
||||||
|
Tool $E17
|
||||||
|
<<<
|
||||||
|
~SFPutFile2 MAC
|
||||||
|
PxW ]1;]2;]3
|
||||||
|
PHLW ]4;]5
|
||||||
|
PxL ]6;]7
|
||||||
|
_SFPutFile2 MAC
|
||||||
|
Tool $F17
|
||||||
|
<<<
|
||||||
|
_SFPGetFile2 MAC
|
||||||
|
Tool $1017
|
||||||
|
<<<
|
||||||
|
_SFPPutFile2 MAC
|
||||||
|
Tool $1117
|
||||||
|
<<<
|
||||||
|
~SFShowInvisible MAC
|
||||||
|
P1SW ]1
|
||||||
|
_SFShowInvisible MAC
|
||||||
|
Tool $1217
|
||||||
|
<<<
|
||||||
|
~SFReScan MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SFReScan MAC
|
||||||
|
Tool $1317
|
||||||
|
<<<
|
||||||
|
~SFMultiGet2 MAC
|
||||||
|
PxW ]1;]2;]3
|
||||||
|
PxL ]4;]5;]6;]7
|
||||||
|
_SFMultiGet2 MAC
|
||||||
|
Tool $1417
|
||||||
|
<<<
|
||||||
|
_SFPMultiGet2 MAC
|
||||||
|
Tool $1517
|
||||||
|
<<<
|
||||||
|
~qSFStartUp MAC
|
||||||
|
PHW ]1
|
||||||
|
NextDP ]2;$100
|
||||||
|
Tool $217
|
||||||
|
<<<
|
|
@ -0,0 +1,183 @@
|
||||||
|
* Text tool macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_TextBootInit MAC
|
||||||
|
Tool $10C
|
||||||
|
<<<
|
||||||
|
_TextStartUp MAC
|
||||||
|
Tool $20C
|
||||||
|
<<<
|
||||||
|
_TextShutDown MAC
|
||||||
|
Tool $30C
|
||||||
|
<<<
|
||||||
|
~TextVersion MAC
|
||||||
|
PHA
|
||||||
|
_TextVersion MAC
|
||||||
|
Tool $40C
|
||||||
|
<<<
|
||||||
|
_TextReset MAC
|
||||||
|
Tool $50C
|
||||||
|
<<<
|
||||||
|
~TextStatus MAC
|
||||||
|
PHA
|
||||||
|
_TextStatus MAC
|
||||||
|
Tool $60C
|
||||||
|
<<<
|
||||||
|
~SetInGlobals MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_SetInGlobals MAC
|
||||||
|
Tool $90C
|
||||||
|
<<<
|
||||||
|
~SetOutGlobals MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_SetOutGlobals MAC
|
||||||
|
Tool $A0C
|
||||||
|
<<<
|
||||||
|
~SetErrGlobals MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_SetErrGlobals MAC
|
||||||
|
Tool $B0C
|
||||||
|
<<<
|
||||||
|
~GetInGlobals MAC
|
||||||
|
PHS 2
|
||||||
|
_GetInGlobals MAC
|
||||||
|
Tool $C0C
|
||||||
|
<<<
|
||||||
|
~GetOutGlobals MAC
|
||||||
|
PHS 2
|
||||||
|
_GetOutGlobals MAC
|
||||||
|
Tool $D0C
|
||||||
|
<<<
|
||||||
|
~GetErrGlobals MAC
|
||||||
|
PHS 2
|
||||||
|
_GetErrGlobals MAC
|
||||||
|
Tool $E0C
|
||||||
|
<<<
|
||||||
|
~SetInputDevice MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_SetInputDevice MAC
|
||||||
|
Tool $F0C
|
||||||
|
<<<
|
||||||
|
~SetOutputDevice MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_SetOutputDevice MAC
|
||||||
|
Tool $100C
|
||||||
|
<<<
|
||||||
|
~SetErrorDevice MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_SetErrorDevice MAC
|
||||||
|
Tool $110C
|
||||||
|
<<<
|
||||||
|
~GetInputDevice MAC
|
||||||
|
PHS 3
|
||||||
|
_GetInputDevice MAC
|
||||||
|
Tool $120C
|
||||||
|
<<<
|
||||||
|
~GetOutputDevice MAC
|
||||||
|
PHS 3
|
||||||
|
_GetOutputDevice MAC
|
||||||
|
Tool $130C
|
||||||
|
<<<
|
||||||
|
~GetErrorDevice MAC
|
||||||
|
PHS 3
|
||||||
|
_GetErrorDevice MAC
|
||||||
|
Tool $140C
|
||||||
|
<<<
|
||||||
|
~InitTextDev MAC
|
||||||
|
PHW ]1
|
||||||
|
_InitTextDev MAC
|
||||||
|
Tool $150C
|
||||||
|
<<<
|
||||||
|
~CtlTextDev MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_CtlTextDev MAC
|
||||||
|
Tool $160C
|
||||||
|
<<<
|
||||||
|
~StatusTextDev MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_StatusTextDev MAC
|
||||||
|
Tool $170C
|
||||||
|
<<<
|
||||||
|
~WriteChar MAC
|
||||||
|
PHW ]1
|
||||||
|
_WriteChar MAC
|
||||||
|
Tool $180C
|
||||||
|
<<<
|
||||||
|
~ErrWriteChar MAC
|
||||||
|
PHW ]1
|
||||||
|
_ErrWriteChar MAC
|
||||||
|
Tool $190C
|
||||||
|
<<<
|
||||||
|
~WriteLine MAC
|
||||||
|
PHL ]1
|
||||||
|
_WriteLine MAC
|
||||||
|
Tool $1A0C
|
||||||
|
<<<
|
||||||
|
~ErrWriteLine MAC
|
||||||
|
PHL ]1
|
||||||
|
_ErrWriteLine MAC
|
||||||
|
Tool $1B0C
|
||||||
|
<<<
|
||||||
|
~WriteString MAC
|
||||||
|
PHL ]1
|
||||||
|
_WriteString MAC
|
||||||
|
Tool $1C0C
|
||||||
|
<<<
|
||||||
|
~ErrWriteString MAC
|
||||||
|
PHL ]1
|
||||||
|
_ErrWriteString MAC
|
||||||
|
Tool $1D0C
|
||||||
|
<<<
|
||||||
|
~TextWriteBlock MAC
|
||||||
|
PHL ]1
|
||||||
|
PxW ]2;]3
|
||||||
|
_TextWriteBlock MAC
|
||||||
|
Tool $1E0C
|
||||||
|
<<<
|
||||||
|
~ErrWriteBlock MAC
|
||||||
|
PHL ]1
|
||||||
|
PxW ]2;]3
|
||||||
|
_ErrWriteBlock MAC
|
||||||
|
Tool $1F0C
|
||||||
|
<<<
|
||||||
|
~WriteCString MAC
|
||||||
|
PHL ]1
|
||||||
|
_WriteCString MAC
|
||||||
|
Tool $200C
|
||||||
|
<<<
|
||||||
|
~ErrWriteCString MAC
|
||||||
|
PHL ]1
|
||||||
|
_ErrWriteCString MAC
|
||||||
|
Tool $210C
|
||||||
|
<<<
|
||||||
|
~ReadChar MAC
|
||||||
|
P1SW ]1
|
||||||
|
_ReadChar MAC
|
||||||
|
Tool $220C
|
||||||
|
<<<
|
||||||
|
~TextReadBlock MAC
|
||||||
|
PHL ]1
|
||||||
|
PxW ]2;]3;]4
|
||||||
|
_TextReadBlock MAC
|
||||||
|
Tool $230C
|
||||||
|
<<<
|
||||||
|
~ReadLine MAC
|
||||||
|
P1SL ]1
|
||||||
|
PxW ]2;]3;]4
|
||||||
|
_ReadLine MAC
|
||||||
|
Tool $240C
|
||||||
|
<<<
|
||||||
|
|
||||||
|
PrintLn MAC ; print a line of text
|
||||||
|
pea ^text
|
||||||
|
pea text
|
||||||
|
ldx #$1A0C
|
||||||
|
jsl $E10000
|
||||||
|
bra cont
|
||||||
|
text str ]1
|
||||||
|
cont
|
||||||
|
<<<
|
|
@ -0,0 +1,189 @@
|
||||||
|
* TextEdit macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_TEBootInit MAC
|
||||||
|
Tool $122
|
||||||
|
<<<
|
||||||
|
~TEStartUp MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
_TEStartUp MAC
|
||||||
|
Tool $222
|
||||||
|
<<<
|
||||||
|
_TEShutDown MAC
|
||||||
|
Tool $322
|
||||||
|
<<<
|
||||||
|
~TEVersion MAC
|
||||||
|
PHA
|
||||||
|
_TEVersion MAC
|
||||||
|
Tool $422
|
||||||
|
<<<
|
||||||
|
_TEReset MAC
|
||||||
|
Tool $522
|
||||||
|
<<<
|
||||||
|
~TEStatus MAC
|
||||||
|
PHA
|
||||||
|
_TEStatus MAC
|
||||||
|
Tool $622
|
||||||
|
<<<
|
||||||
|
~TENew MAC
|
||||||
|
P2SL ]1
|
||||||
|
_TENew MAC
|
||||||
|
Tool $922
|
||||||
|
<<<
|
||||||
|
~TEKill MAC
|
||||||
|
PHL ]1
|
||||||
|
_TEKill MAC
|
||||||
|
Tool $A22
|
||||||
|
<<<
|
||||||
|
~TESetText MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
PHLW ]3;]4
|
||||||
|
PxL ]5;]6
|
||||||
|
_TESetText MAC
|
||||||
|
Tool $B22
|
||||||
|
<<<
|
||||||
|
~TEGetText MAC
|
||||||
|
PHS 2
|
||||||
|
PHWL ]1;]2
|
||||||
|
PHLW ]3;]4
|
||||||
|
PxL ]5;]6
|
||||||
|
_TEGetText MAC
|
||||||
|
Tool $C22
|
||||||
|
<<<
|
||||||
|
~TEGetTextInfo MAC
|
||||||
|
PHLW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_TEGetTextInfo MAC
|
||||||
|
Tool $D22
|
||||||
|
<<<
|
||||||
|
~TEIdle MAC
|
||||||
|
PHL ]1
|
||||||
|
_TEIdle MAC
|
||||||
|
Tool $E22
|
||||||
|
<<<
|
||||||
|
~TEActivate MAC
|
||||||
|
PHL ]1
|
||||||
|
_TEActivate MAC
|
||||||
|
Tool $F22
|
||||||
|
<<<
|
||||||
|
~TEDeactivate MAC
|
||||||
|
PHL ]1
|
||||||
|
_TEDeactivate MAC
|
||||||
|
Tool $1022
|
||||||
|
<<<
|
||||||
|
~TEClick MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_TEClick MAC
|
||||||
|
Tool $1122
|
||||||
|
<<<
|
||||||
|
~TEUpdate MAC
|
||||||
|
PHL ]1
|
||||||
|
_TEUpdate MAC
|
||||||
|
Tool $1222
|
||||||
|
<<<
|
||||||
|
~TEPaintText MAC
|
||||||
|
P2SL ]1
|
||||||
|
PxL ]2;]3
|
||||||
|
PHWL ]4;]5
|
||||||
|
_TEPaintText MAC
|
||||||
|
Tool $1322
|
||||||
|
<<<
|
||||||
|
~TEKey MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_TEKey MAC
|
||||||
|
Tool $1422
|
||||||
|
<<<
|
||||||
|
~TECut MAC
|
||||||
|
PHL ]1
|
||||||
|
_TECut MAC
|
||||||
|
Tool $1622
|
||||||
|
<<<
|
||||||
|
~TECopy MAC
|
||||||
|
PHL ]1
|
||||||
|
_TECopy MAC
|
||||||
|
Tool $1722
|
||||||
|
<<<
|
||||||
|
~TEPaste MAC
|
||||||
|
PHL ]1
|
||||||
|
_TEPaste MAC
|
||||||
|
Tool $1822
|
||||||
|
<<<
|
||||||
|
~TEClear MAC
|
||||||
|
PHL ]1
|
||||||
|
_TEClear MAC
|
||||||
|
Tool $1922
|
||||||
|
<<<
|
||||||
|
~TEInsert MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
PHLW ]3;]4
|
||||||
|
PxL ]5;]6
|
||||||
|
_TEInsert MAC
|
||||||
|
Tool $1A22
|
||||||
|
<<<
|
||||||
|
~TEReplace MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
PHLW ]3;]4
|
||||||
|
PxL ]5;]6
|
||||||
|
_TEReplace MAC
|
||||||
|
Tool $1B22
|
||||||
|
<<<
|
||||||
|
~TEGetSelection MAC
|
||||||
|
PxL ]1;]2;]3
|
||||||
|
_TEGetSelection MAC
|
||||||
|
Tool $1C22
|
||||||
|
<<<
|
||||||
|
~TESetSelection MAC
|
||||||
|
PxL ]1;]2;]3
|
||||||
|
_TESetSelection MAC
|
||||||
|
Tool $1D22
|
||||||
|
<<<
|
||||||
|
~TEGetSelectionStyle MAC
|
||||||
|
PHA
|
||||||
|
PxL ]1;]2;]3
|
||||||
|
_TEGetSelectionStyle MAC
|
||||||
|
Tool $1E22
|
||||||
|
<<<
|
||||||
|
~TEStyleChange MAC
|
||||||
|
PHW ]1
|
||||||
|
PxL ]2;]3
|
||||||
|
_TEStyleChange MAC
|
||||||
|
Tool $1F22
|
||||||
|
<<<
|
||||||
|
~TEOffsetToPoint MAC
|
||||||
|
PxL ]1;]2;]3;]4
|
||||||
|
_TEOffsetToPoint MAC
|
||||||
|
Tool $2022
|
||||||
|
<<<
|
||||||
|
~TEPointToOffset MAC
|
||||||
|
PHS 2
|
||||||
|
PxL ]1;]2;]3
|
||||||
|
_TEPointToOffset MAC
|
||||||
|
Tool $2122
|
||||||
|
<<<
|
||||||
|
~TEGetDefProc MAC
|
||||||
|
PHS 2
|
||||||
|
_TEGetDefProc MAC
|
||||||
|
Tool $2222
|
||||||
|
<<<
|
||||||
|
~TEGetRuler MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_TEGetRuler MAC
|
||||||
|
Tool $2322
|
||||||
|
<<<
|
||||||
|
~TESetRuler MAC
|
||||||
|
PHW ]1
|
||||||
|
PxL ]2;]3
|
||||||
|
_TESetRuler MAC
|
||||||
|
Tool $2422
|
||||||
|
<<<
|
||||||
|
~TEScroll MAC
|
||||||
|
PHW ]1
|
||||||
|
PxL ]2;]3;]4
|
||||||
|
_TEScroll MAC
|
||||||
|
Tool $2522
|
||||||
|
<<<
|
|
@ -0,0 +1,795 @@
|
||||||
|
*=================================================
|
||||||
|
* Utility Macros - from Merlin disk
|
||||||
|
* by Dave Klimas, et al
|
||||||
|
*
|
||||||
|
* Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
* and Roger Wagner Publishing, Inc. 1988
|
||||||
|
* All Rights Reserved
|
||||||
|
*-------------------------------------------------
|
||||||
|
|
||||||
|
PHWL MAC
|
||||||
|
PHW ]1
|
||||||
|
PHL ]2
|
||||||
|
<<<
|
||||||
|
PHLW MAC
|
||||||
|
PHL ]1
|
||||||
|
PHW ]2
|
||||||
|
<<<
|
||||||
|
PxW MAC
|
||||||
|
DO ]0/1
|
||||||
|
PHW ]1
|
||||||
|
DO ]0/2
|
||||||
|
PHW ]2
|
||||||
|
DO ]0/3
|
||||||
|
PHW ]3
|
||||||
|
DO ]0/4
|
||||||
|
PHW ]4
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
PxL MAC
|
||||||
|
DO ]0/1
|
||||||
|
PHL ]1
|
||||||
|
DO ]0/2
|
||||||
|
PHL ]2
|
||||||
|
DO ]0/3
|
||||||
|
PHL ]3
|
||||||
|
DO ]0/4
|
||||||
|
PHL ]4
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
P2SL MAC
|
||||||
|
PHA
|
||||||
|
P1SL MAC
|
||||||
|
PHA
|
||||||
|
PHL MAC
|
||||||
|
IF #=]1
|
||||||
|
PEA ^]1
|
||||||
|
ELSE
|
||||||
|
PHW ]1+2
|
||||||
|
FIN
|
||||||
|
PHW ]1
|
||||||
|
<<<
|
||||||
|
P2SW MAC
|
||||||
|
PHA
|
||||||
|
P1SW MAC
|
||||||
|
PHA
|
||||||
|
PHW MAC
|
||||||
|
IF #=]1
|
||||||
|
PEA ]1
|
||||||
|
ELSE
|
||||||
|
IF MX/2
|
||||||
|
LDA ]1+1
|
||||||
|
PHA
|
||||||
|
FIN
|
||||||
|
LDA ]1
|
||||||
|
PHA
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
PushSpace MAC
|
||||||
|
PHS MAC
|
||||||
|
DO ]0
|
||||||
|
LUP ]1
|
||||||
|
PHA
|
||||||
|
--^
|
||||||
|
ELSE
|
||||||
|
PHA
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
********************************
|
||||||
|
|
||||||
|
Push4 MAC
|
||||||
|
PushLong #0
|
||||||
|
PushLong #0
|
||||||
|
<<<
|
||||||
|
|
||||||
|
PushPtr MAC
|
||||||
|
PEA ^]1
|
||||||
|
PEA ]1
|
||||||
|
EOM
|
||||||
|
|
||||||
|
PushLong MAC
|
||||||
|
IF #=]1
|
||||||
|
PushWord #^]1
|
||||||
|
ELSE
|
||||||
|
PushWord ]1+2
|
||||||
|
FIN
|
||||||
|
PushWord ]1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
PushWord MAC
|
||||||
|
IF #=]1
|
||||||
|
PEA ]1
|
||||||
|
ELSE
|
||||||
|
IF MX/2
|
||||||
|
LDA ]1+1
|
||||||
|
PHA
|
||||||
|
FIN
|
||||||
|
LDA ]1
|
||||||
|
PHA
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
PullLong MAC
|
||||||
|
DO ]0
|
||||||
|
PullWord ]1
|
||||||
|
PullWord ]1+2
|
||||||
|
ELSE
|
||||||
|
PullWord
|
||||||
|
PullWord
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
PullWord MAC
|
||||||
|
PLA
|
||||||
|
DO ]0
|
||||||
|
STA ]1
|
||||||
|
FIN
|
||||||
|
IF MX/2
|
||||||
|
PLA
|
||||||
|
DO ]0
|
||||||
|
STA ]1+1
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
MoveLong MAC
|
||||||
|
MoveWord ]1;]2
|
||||||
|
MoveWord ]1+2;]2+2
|
||||||
|
<<<
|
||||||
|
|
||||||
|
MoveWord MAC
|
||||||
|
LDA ]1
|
||||||
|
STA ]2
|
||||||
|
IF MX/2
|
||||||
|
LDA ]1+1
|
||||||
|
STA ]2+1
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
MoveBlock MAC ;1st_byte;last_byte;dest
|
||||||
|
DO ]2/]1
|
||||||
|
DO ]3/]1
|
||||||
|
LDX #]2
|
||||||
|
LDY #]3+]2-]1
|
||||||
|
LDA #]2-]1
|
||||||
|
MVP ]1,]3
|
||||||
|
ELSE
|
||||||
|
LDX #]1
|
||||||
|
LDY #]3
|
||||||
|
LDA #]2-]1
|
||||||
|
MVN ]1,]3
|
||||||
|
FIN
|
||||||
|
ELSE
|
||||||
|
ERR 1 ;Last adrs < first adrs
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
CmpLong MAC
|
||||||
|
LDA ]1
|
||||||
|
CMP ]2
|
||||||
|
IF #=]1
|
||||||
|
LDA ^]1
|
||||||
|
ELSE
|
||||||
|
LDA ]1+2
|
||||||
|
FIN
|
||||||
|
IF #=]2
|
||||||
|
SBC ^]2
|
||||||
|
ELSE
|
||||||
|
SBC ]2+2
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
LONGM MAC
|
||||||
|
LONGACC MAC ;Assumes native mode
|
||||||
|
IF MX&2 ;If A is now short
|
||||||
|
REP %00100000
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
LONGX MAC
|
||||||
|
LONGXY MAC ;Assumes native mode
|
||||||
|
IF MX&1 ;If X is now short
|
||||||
|
REP %00010000
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
LONG MAC
|
||||||
|
LONGAX MAC ;Assumes native mode
|
||||||
|
IF MX ;If not now in full 16
|
||||||
|
REP %00110000
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
SHORTM MAC
|
||||||
|
SHORTACC MAC ;Assumes native mode
|
||||||
|
IF MX&2 ;If A is now short,
|
||||||
|
ELSE ; ignore
|
||||||
|
SEP %00100000
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
SHORTX MAC
|
||||||
|
SHORTXY MAC ;Assumes native mode
|
||||||
|
IF MX&1 ;If X is now short,
|
||||||
|
ELSE ; ignore
|
||||||
|
SEP %00010000
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
SHORT MAC
|
||||||
|
SHORTAX MAC ;Assumes native mode
|
||||||
|
IF MX!%11 ;If not now in full 8
|
||||||
|
SEP %00110000
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
LONGI MAC ; Duplicates APW function
|
||||||
|
LST OFF
|
||||||
|
DO ]1 ; If arg = 1 = "on" = make long
|
||||||
|
|
||||||
|
IF MX-3/-1 ; If M is short and X is long
|
||||||
|
; Leave alone
|
||||||
|
FIN ; End of this test
|
||||||
|
|
||||||
|
IF MX/3 ; If M is short and X is short
|
||||||
|
MX %10 ; Make X long, leave M short
|
||||||
|
FIN ; End of this test
|
||||||
|
|
||||||
|
IF MX!3/3 ; If M is long and X is long
|
||||||
|
FIN ; Leave alone
|
||||||
|
|
||||||
|
IF MX-2/-1 ; If M is long and X is short
|
||||||
|
MX %00 ; Make X long, leave M long
|
||||||
|
FIN ; End of this test
|
||||||
|
|
||||||
|
ELSE ; If arg = 0 = "off" = make short
|
||||||
|
|
||||||
|
IF MX/3 ; If M is short and X is short
|
||||||
|
; Leave alone
|
||||||
|
FIN ; End of this test
|
||||||
|
|
||||||
|
IF MX-3/-1 ; If M is short and X is long
|
||||||
|
MX %11 ; Make X short, leave M short
|
||||||
|
FIN ; End of this test
|
||||||
|
|
||||||
|
IF MX-2/-1 ; If M is long and X is short
|
||||||
|
; Leave alone
|
||||||
|
FIN ; End of this test
|
||||||
|
|
||||||
|
|
||||||
|
IF MX!3/3 ; If M is long and X is long
|
||||||
|
MX %01 ; Make X short, leave M long
|
||||||
|
FIN ; Leave alone
|
||||||
|
|
||||||
|
FIN ; End of macro tests
|
||||||
|
|
||||||
|
LST RTN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
LONGA MAC ; Duplicates APW function
|
||||||
|
LST OFF
|
||||||
|
DO ]1 ; If arg = 1 = "on" = make long
|
||||||
|
|
||||||
|
IF MX-3/-1 ; If M is short and X is long
|
||||||
|
MX %00 ; Make M long, leave X long
|
||||||
|
FIN ; End of this test
|
||||||
|
|
||||||
|
IF MX/3 ; If M is short and X is short
|
||||||
|
MX %01 ; Make M long, leave X short
|
||||||
|
FIN ; End of this test
|
||||||
|
|
||||||
|
IF MX!3/3 ; If M is long and X is long
|
||||||
|
FIN ; Leave alone
|
||||||
|
|
||||||
|
IF MX-2/-1 ; If M is long and X is short
|
||||||
|
; Leave alone
|
||||||
|
FIN ; End of this test
|
||||||
|
|
||||||
|
ELSE ; If arg = 0 = "off" = make short
|
||||||
|
|
||||||
|
IF MX/3 ; If M is short and X is short
|
||||||
|
; Leave alone
|
||||||
|
FIN ; End of this test
|
||||||
|
|
||||||
|
IF MX-3/-1 ; If M is short and X is long
|
||||||
|
; Leave alone
|
||||||
|
FIN ; End of this test
|
||||||
|
|
||||||
|
IF MX-2/-1 ; If M is long and X is short
|
||||||
|
MX %11 ; Make M short, leave X short
|
||||||
|
FIN ; End of this test
|
||||||
|
|
||||||
|
|
||||||
|
IF MX!3/3 ; If M is long and X is long
|
||||||
|
MX %10 ; Make M short, leave X long
|
||||||
|
FIN ; Leave alone
|
||||||
|
|
||||||
|
FIN ; End of macro tests
|
||||||
|
|
||||||
|
LST RTN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
M65816 MAC
|
||||||
|
DO ]1
|
||||||
|
XC
|
||||||
|
XC ; Full 65816 mode for assembler
|
||||||
|
MX %00
|
||||||
|
ELSE
|
||||||
|
MX %11 ; 8 bit mode for assembler
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
Expmac MAC ; Replace APW GEN function
|
||||||
|
DO ]1
|
||||||
|
EXP ONLY ; Expand macros
|
||||||
|
ELSE
|
||||||
|
EXP OFF
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
Tool MAC
|
||||||
|
LDX #]1 ; load tool call #
|
||||||
|
JSL $E10000 ; go to dispatcher
|
||||||
|
<<<
|
||||||
|
|
||||||
|
**************************************************
|
||||||
|
* Auto-menu item macros *
|
||||||
|
* This is one alternative for defining a menu *
|
||||||
|
* item. It has the advantage of letting you *
|
||||||
|
* include specifiers for Bold, Italic, etc. *
|
||||||
|
**************************************************
|
||||||
|
|
||||||
|
*-------------------------------------------------
|
||||||
|
* Syntax:
|
||||||
|
* ]mnum = 0 ; initialize menu # at startvalue-1
|
||||||
|
* Menu ' Menu 1 '
|
||||||
|
*
|
||||||
|
* (See Menu macro, defined later....)
|
||||||
|
*
|
||||||
|
* ]inum = 255 ; Menu item starts with #256
|
||||||
|
* Item ' Choice 1 ';Kybd;'Bb';Check
|
||||||
|
* Ch1 = ]inum ; Set label Ch1 if somewhere else
|
||||||
|
* needs to use this item #.
|
||||||
|
* Item ' Choice 2 ';Disable;'';Kybd;'Cc'
|
||||||
|
* Item ' Choice 3 ';Divide;''
|
||||||
|
*
|
||||||
|
* Menu ' Menu 2 '
|
||||||
|
*
|
||||||
|
* Item ' Choice 4 ';Bold;'';Check
|
||||||
|
* Item ' Choice 5 ';Italic;'';Blank
|
||||||
|
* Item ' Choice 6 ';Underline';Kybd;'Dd'
|
||||||
|
*
|
||||||
|
* IMPORTANT: ALL items, except for Check and Blank, are followed by a second
|
||||||
|
* value. For the Kybd item, the ASCII characters follow in single quotes, Ex:
|
||||||
|
* Kybd;'Cc' (specifies Apple-C as an equivalent).
|
||||||
|
* All other items use a null 2nd value, as in:
|
||||||
|
* Italic;'' or Divide;'' etc.
|
||||||
|
*
|
||||||
|
* The variable ]inum MUST be initialized for the value of your first
|
||||||
|
* menu item MINUS 1 before using the first Item macro.
|
||||||
|
*
|
||||||
|
* Check or Blank, if used, MUST be the last item in the macro line.
|
||||||
|
*
|
||||||
|
* There can be up to three parameter pairs after the item name.
|
||||||
|
*-------------------------------------------------
|
||||||
|
* The point of all this is that rather than hard-
|
||||||
|
* code menu items values and subsequent references
|
||||||
|
* to that number when disabling menus, etc., this
|
||||||
|
* lets you add and delete menu items at will,
|
||||||
|
* and have labels like Ch1, etc. above, auto-
|
||||||
|
* matically set for the correct value during the
|
||||||
|
* assembly.
|
||||||
|
*-------------------------------------------------
|
||||||
|
|
||||||
|
* Equates for Item macro:
|
||||||
|
|
||||||
|
Bold = 'B' ; bold menu item
|
||||||
|
Disable = 'D' ; disabled menu item
|
||||||
|
Italic = 'I' ; italic menu item
|
||||||
|
Underline = 'U' ; underlined menu item
|
||||||
|
Divide = 'V' ; menu dividing line
|
||||||
|
ColorHi = 'X' ; color hilite menu item
|
||||||
|
Kybd = '*' ; keyboard menu equivalent
|
||||||
|
Check = $1243 ; menu item with checkmark
|
||||||
|
Blank = $2043 ; menu item with blank
|
||||||
|
|
||||||
|
*-------------------------------------------------
|
||||||
|
|
||||||
|
Item MAC ; Macro for creating a menu item
|
||||||
|
|
||||||
|
ASC '--'
|
||||||
|
ASC ]1 ; Text of menu item
|
||||||
|
ASC '\H'
|
||||||
|
DA ]inum ; Menu item #
|
||||||
|
|
||||||
|
DO ]0/2 ; Only if more items to do... (>2)
|
||||||
|
|
||||||
|
DO ]2-Check-1/-1 ; Only if Check item
|
||||||
|
DA ]2 ; ]2 = Check
|
||||||
|
ELSE ; otherwise kybd char or null
|
||||||
|
DO ]2-Blank-1/-1 ; Only if Blank check item
|
||||||
|
DA ]2 ; ]2 = Blank
|
||||||
|
ELSE
|
||||||
|
DB ]2 ; Function char value
|
||||||
|
ASC ]3 ; ASCII argument, if any for Kybd
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
|
||||||
|
FIN
|
||||||
|
|
||||||
|
DO ]0/4 ; Only if more items to do... (>3)
|
||||||
|
|
||||||
|
DO ]4-Check-1/-1 ; Only if Check item
|
||||||
|
DA ]4 ; ]4 = Check
|
||||||
|
ELSE ; otherwise kybd char or null
|
||||||
|
DO ]4-Blank-1/-1 ; Only if Blank check item
|
||||||
|
DA ]4 ; ]4 = Blank
|
||||||
|
ELSE
|
||||||
|
DB ]4 ; Function char value
|
||||||
|
ASC ]5 ; ASCII argument, if any for Kybd
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
|
||||||
|
FIN
|
||||||
|
|
||||||
|
DO ]0/6 ; Only if more items to do... (>5)
|
||||||
|
|
||||||
|
DO ]6-Check-1/-1 ; Only if Check item
|
||||||
|
DA ]6 ; ]6 = Check
|
||||||
|
ELSE ; otherwise kybd char or null
|
||||||
|
DO ]6-Blank-1/-1 ; Only if Blank check item
|
||||||
|
DA ]6 ; ]6 = Blank
|
||||||
|
ELSE
|
||||||
|
DB ]6 ; Function char value
|
||||||
|
ASC ]7 ; ASCII argument, if any for Kybd
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
|
||||||
|
FIN
|
||||||
|
|
||||||
|
DB $00 ; End of menu item
|
||||||
|
|
||||||
|
]inum = ]inum+1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
**************************************************
|
||||||
|
* This is another alternative macro for both *
|
||||||
|
* menus and menu items. It is simpler, and *
|
||||||
|
* more compact, but not as versatile. *
|
||||||
|
**************************************************
|
||||||
|
|
||||||
|
*===============================================
|
||||||
|
* Variables ]mnum,]inum should be defined
|
||||||
|
* prior to using these MenuMaker macros.
|
||||||
|
*
|
||||||
|
* They both should be starting value-1
|
||||||
|
*
|
||||||
|
* Syntax:
|
||||||
|
*
|
||||||
|
* ]mnum = 0 ; 1st menu number will be 1
|
||||||
|
* ]inum = 255 ; 1st menu item number will be 256
|
||||||
|
*
|
||||||
|
* Menu ' @';X ; Apple menu, color highlighting.
|
||||||
|
*
|
||||||
|
* MItem ' About... ' ; "About" menu item
|
||||||
|
*
|
||||||
|
* Menu ' Menu Title 1' ; (this will be menu number 2)
|
||||||
|
*
|
||||||
|
* MItem ' Choice 1 '
|
||||||
|
* MItem ' Choice 2 ';'D*Cc' ; Disabled, kybd char: Cc
|
||||||
|
* ; Above will be menu item #'s 2&3
|
||||||
|
*
|
||||||
|
*
|
||||||
|
|
||||||
|
|
||||||
|
Menu MAC
|
||||||
|
ASC '>>'
|
||||||
|
ASC ]1
|
||||||
|
ASC '\H'
|
||||||
|
DA ]mnum
|
||||||
|
DO ]0>1
|
||||||
|
ASC ]2
|
||||||
|
FIN
|
||||||
|
DB 0
|
||||||
|
]mnum = ]mnum+1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
MItem MAC
|
||||||
|
ASC '--'
|
||||||
|
ASC ]1
|
||||||
|
ASC '\H'
|
||||||
|
DA ]inum
|
||||||
|
DO ]0>1
|
||||||
|
ASC ]2
|
||||||
|
FIN
|
||||||
|
DB 0
|
||||||
|
]inum = ]inum+1
|
||||||
|
<<<
|
||||||
|
|
||||||
|
*-----------------------------------------------------
|
||||||
|
*
|
||||||
|
* Native -- Processor is in LONG "native" mode.
|
||||||
|
* Native Long -- Processor is in LONG "native" mode.
|
||||||
|
* Native Short -- Processor is in SHORT "native" mode.
|
||||||
|
*
|
||||||
|
|
||||||
|
Native MAC
|
||||||
|
CLC
|
||||||
|
XCE
|
||||||
|
IF 0=]0 ;If Native (Long)
|
||||||
|
LONGAX
|
||||||
|
FIN
|
||||||
|
|
||||||
|
DO ]0
|
||||||
|
IF L=]1 ;If Native Long
|
||||||
|
LONGAX
|
||||||
|
|
||||||
|
FIN ;If Native Short only
|
||||||
|
FIN ; do CLC, XCE.
|
||||||
|
EOM
|
||||||
|
|
||||||
|
*--------------------------------------------------------
|
||||||
|
*
|
||||||
|
* Emulation -- Set Processor into "emulation" mode.
|
||||||
|
*
|
||||||
|
|
||||||
|
Emulation MAC
|
||||||
|
SEC
|
||||||
|
XCE
|
||||||
|
EOM
|
||||||
|
|
||||||
|
*-----------------------------------------------------
|
||||||
|
*
|
||||||
|
* WriteCh -- Print Character From Accumulator
|
||||||
|
* WriteCh ADDR -- Print Character At Label
|
||||||
|
* WriteCh ADDR,X -- Print Character At Label,X
|
||||||
|
*
|
||||||
|
|
||||||
|
WriteCh MAC
|
||||||
|
DO ]0
|
||||||
|
LDA ]1
|
||||||
|
FIN
|
||||||
|
PHA
|
||||||
|
LDX #$180C
|
||||||
|
JSL $E10000
|
||||||
|
EOM
|
||||||
|
|
||||||
|
*-----------------------------------------------------
|
||||||
|
*
|
||||||
|
* ReadCh -- Get Keypress in Accumulator
|
||||||
|
* ReadCh ADDR -- Get Keypress in Label
|
||||||
|
*
|
||||||
|
|
||||||
|
ReadCh MAC
|
||||||
|
PEA 0
|
||||||
|
PEA 1
|
||||||
|
LDX #$220C
|
||||||
|
JSL $E10000
|
||||||
|
PLA
|
||||||
|
DO ]0
|
||||||
|
STA ]1
|
||||||
|
FIN
|
||||||
|
EOM
|
||||||
|
|
||||||
|
*-----------------------------------------------------
|
||||||
|
*
|
||||||
|
* WriteLn "STRING" -- Print Literal String with CR.
|
||||||
|
* WriteLn ADDR -- Print String At Address with CR.
|
||||||
|
* WriteLn -- Print CR.
|
||||||
|
*
|
||||||
|
|
||||||
|
WriteLn MAC
|
||||||
|
DO ]0
|
||||||
|
WriteStr ]1
|
||||||
|
FIN
|
||||||
|
WriteCh #$8D
|
||||||
|
EOM
|
||||||
|
|
||||||
|
*-----------------------------------------------------
|
||||||
|
*
|
||||||
|
* WriteStr "STRING" -- Print Literal String.
|
||||||
|
* WriteStr ADDR -- Print String At Address.
|
||||||
|
* WriteStr -- Print String At A (Lo),Y (Hi).
|
||||||
|
*
|
||||||
|
|
||||||
|
WriteStr MAC
|
||||||
|
IF 0=]0 ;If No Label
|
||||||
|
PHY
|
||||||
|
PHA
|
||||||
|
|
||||||
|
ELSE
|
||||||
|
|
||||||
|
IF "=]1
|
||||||
|
PEA ^]String
|
||||||
|
PEA ]String
|
||||||
|
BRL ]Skip
|
||||||
|
]String STR ]1
|
||||||
|
]Skip
|
||||||
|
ELSE
|
||||||
|
|
||||||
|
IF '=]1
|
||||||
|
PEA ^]String
|
||||||
|
PEA ]String
|
||||||
|
BRL ]Skip
|
||||||
|
]String STR ]1
|
||||||
|
]Skip
|
||||||
|
ELSE
|
||||||
|
|
||||||
|
PEA ^]1
|
||||||
|
PEA ]1
|
||||||
|
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
LDX #$1C0C
|
||||||
|
JSL $E10000
|
||||||
|
EOM
|
||||||
|
|
||||||
|
*-----------------------------------------------------
|
||||||
|
*
|
||||||
|
* DrawStrHV 8;12;"STRING" Print Literal String on
|
||||||
|
* DrawStr 8;12;ADDR Super Hi-Res Screen.
|
||||||
|
*
|
||||||
|
|
||||||
|
DrawStrHV MAC
|
||||||
|
HtabVtab ]1;]2
|
||||||
|
DrawStr ]3
|
||||||
|
<<<
|
||||||
|
|
||||||
|
*-----------------------------------------------------
|
||||||
|
*
|
||||||
|
* DrawStr "STRING" -- Print Literal String.
|
||||||
|
* DrawStr ADDR -- Print String At Address.
|
||||||
|
*
|
||||||
|
|
||||||
|
DrawStr MAC
|
||||||
|
IF "=]1
|
||||||
|
PEA ^]String
|
||||||
|
PEA ]String
|
||||||
|
BRL ]Skip
|
||||||
|
]String STR ]1
|
||||||
|
]Skip
|
||||||
|
ELSE
|
||||||
|
IF '=]1
|
||||||
|
PEA ^]String
|
||||||
|
PEA ]String
|
||||||
|
BRL ]Skip
|
||||||
|
]String STR ]1
|
||||||
|
]Skip
|
||||||
|
ELSE
|
||||||
|
PEA ^]1
|
||||||
|
PEA ]1
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
LDX #$A504 ;DrawString
|
||||||
|
JSL $E10000
|
||||||
|
<<<
|
||||||
|
|
||||||
|
*-----------------------------------------------------
|
||||||
|
*
|
||||||
|
* HtabVtab #8;#12 -- Position at Htab 8, Vtab 12.
|
||||||
|
* HtabVtab H;V on super hires screens.
|
||||||
|
*
|
||||||
|
|
||||||
|
HtabVtab MAC
|
||||||
|
IF #=]1
|
||||||
|
LDA ]1*8
|
||||||
|
ELSE
|
||||||
|
LDA ]1
|
||||||
|
ASL
|
||||||
|
ASL
|
||||||
|
ASL
|
||||||
|
FIN
|
||||||
|
PHA
|
||||||
|
IF #=]1
|
||||||
|
LDA ]2*8
|
||||||
|
ELSE
|
||||||
|
LDA ]2
|
||||||
|
ASL
|
||||||
|
ASL
|
||||||
|
ASL
|
||||||
|
FIN
|
||||||
|
PHA
|
||||||
|
LDX #$3A04 ;MoveTo
|
||||||
|
JSL $E10000
|
||||||
|
<<<
|
||||||
|
|
||||||
|
*-----------------------------------------------------
|
||||||
|
*
|
||||||
|
* Deref MyHandle;MyPtr -- Uses zero page 0-3 to
|
||||||
|
* de-reference a handle.
|
||||||
|
*
|
||||||
|
|
||||||
|
Deref MAC
|
||||||
|
LDA ]1
|
||||||
|
LDX ]1+2
|
||||||
|
STA 0
|
||||||
|
STX 2
|
||||||
|
LDA [0]
|
||||||
|
STA ]2
|
||||||
|
LDY #2
|
||||||
|
LDA [0],Y
|
||||||
|
STA ]2+2
|
||||||
|
<<<
|
||||||
|
|
||||||
|
*==================================================
|
||||||
|
* The MLI16 macro assumes the CALLDOS file from the
|
||||||
|
* SUBROUT.LIB is linked in. It provides an easy
|
||||||
|
* way to make MLI calls. Example syntax:
|
||||||
|
*
|
||||||
|
* MLI16 close;CLSPARMS
|
||||||
|
*--------------------------------------------------
|
||||||
|
|
||||||
|
MLI16 MAC ;Uses CALLDOS file in the
|
||||||
|
IF MX ; subroutine library
|
||||||
|
REP %00110000 ;Force full 16-bit mode, if
|
||||||
|
FIN ; not already there.
|
||||||
|
LDX #]1 ;Call code (use MLI.CODES)
|
||||||
|
LDA #]2 ;Low word of PARMS tbl adr
|
||||||
|
JSR CALLDOS ;Returns CS if an error
|
||||||
|
<<<
|
||||||
|
|
||||||
|
*=================================================
|
||||||
|
* The following macros are APW-equivalents for
|
||||||
|
* compatibility with APW style listings.
|
||||||
|
*
|
||||||
|
* One difference between Merlin and APW here: Instead of
|
||||||
|
* using the syntax PULL1 ADDRESS;X, Merlin can take
|
||||||
|
* the raw statement PULL1 ADDRESS,X.
|
||||||
|
*
|
||||||
|
|
||||||
|
PULL1 MAC
|
||||||
|
SEP #%00100000
|
||||||
|
PLA
|
||||||
|
REP #%00100000
|
||||||
|
DO ]0/1 ;If 1 parm
|
||||||
|
IF MX>0
|
||||||
|
STA ]1
|
||||||
|
FIN
|
||||||
|
IF MX=0
|
||||||
|
STAL ]1
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
PULL3 MAC
|
||||||
|
SEP #%00100000
|
||||||
|
PLA
|
||||||
|
STA ]1
|
||||||
|
REP #%00100000
|
||||||
|
PLA
|
||||||
|
STA ]1+1
|
||||||
|
FIN
|
||||||
|
<<<
|
||||||
|
|
||||||
|
PUSH1 MAC
|
||||||
|
SEP #%00100000
|
||||||
|
IF ]0/1 ;if one parm
|
||||||
|
LDA ]1
|
||||||
|
FIN
|
||||||
|
PHA
|
||||||
|
REP #%00100000
|
||||||
|
<<<
|
||||||
|
|
||||||
|
PUSH3 MAC
|
||||||
|
IF #=]1
|
||||||
|
LDA #^]1 ;get two hi order bytes
|
||||||
|
PHA
|
||||||
|
PHB
|
||||||
|
LDA #<]1
|
||||||
|
STA 1,S
|
||||||
|
ELSE
|
||||||
|
LDA ]1+1
|
||||||
|
PHA
|
||||||
|
PHB
|
||||||
|
LDA ]1
|
||||||
|
STA 1,S
|
||||||
|
FIN
|
||||||
|
<<<
|
|
@ -0,0 +1,503 @@
|
||||||
|
* Window Manager macros
|
||||||
|
* by Dave Klimas
|
||||||
|
;
|
||||||
|
; Copyright Apple Computer, Inc. 1986, 1987
|
||||||
|
; and Roger Wagner Publishing, Inc. 1988
|
||||||
|
; All Rights Reserved
|
||||||
|
;
|
||||||
|
_WindBootInit MAC
|
||||||
|
Tool $10E
|
||||||
|
<<<
|
||||||
|
~WindStartUp MAC
|
||||||
|
PHW ]1
|
||||||
|
_WindStartUp MAC
|
||||||
|
Tool $20E
|
||||||
|
<<<
|
||||||
|
_WindShutDown MAC
|
||||||
|
Tool $30E
|
||||||
|
<<<
|
||||||
|
~WindVersion MAC
|
||||||
|
PHA
|
||||||
|
_WindVersion MAC
|
||||||
|
Tool $40E
|
||||||
|
<<<
|
||||||
|
_WindReset MAC
|
||||||
|
Tool $50E
|
||||||
|
<<<
|
||||||
|
~WindStatus MAC
|
||||||
|
PHA
|
||||||
|
_WindStatus MAC
|
||||||
|
Tool $60E
|
||||||
|
<<<
|
||||||
|
~NewWindow MAC
|
||||||
|
P2SL ]1
|
||||||
|
_NewWindow MAC
|
||||||
|
Tool $90E
|
||||||
|
<<<
|
||||||
|
~CheckUpdate MAC
|
||||||
|
P1SL ]1
|
||||||
|
_CheckUpdate MAC
|
||||||
|
Tool $A0E
|
||||||
|
<<<
|
||||||
|
~CloseWindow MAC
|
||||||
|
PHL ]1
|
||||||
|
_CloseWindow MAC
|
||||||
|
Tool $B0E
|
||||||
|
<<<
|
||||||
|
~DeskTop MAC
|
||||||
|
IF 2=]1
|
||||||
|
IF 3=]1
|
||||||
|
IF 4=]1
|
||||||
|
PHS 2
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
FIN
|
||||||
|
PHWL ]1;]2
|
||||||
|
_DeskTop MAC
|
||||||
|
Tool $C0E
|
||||||
|
<<<
|
||||||
|
~SetWTitle MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SetWTitle MAC
|
||||||
|
Tool $D0E
|
||||||
|
<<<
|
||||||
|
~GetWTitle MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetWTitle MAC
|
||||||
|
Tool $E0E
|
||||||
|
<<<
|
||||||
|
~SetFrameColor MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SetFrameColor MAC
|
||||||
|
Tool $F0E
|
||||||
|
<<<
|
||||||
|
~GetFrameColor MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_GetFrameColor MAC
|
||||||
|
Tool $100E
|
||||||
|
<<<
|
||||||
|
~SelectWindow MAC
|
||||||
|
PHL ]1
|
||||||
|
_SelectWindow MAC
|
||||||
|
Tool $110E
|
||||||
|
<<<
|
||||||
|
~HideWindow MAC
|
||||||
|
PHL ]1
|
||||||
|
_HideWindow MAC
|
||||||
|
Tool $120E
|
||||||
|
<<<
|
||||||
|
~ShowWindow MAC
|
||||||
|
PHL ]1
|
||||||
|
_ShowWindow MAC
|
||||||
|
Tool $130E
|
||||||
|
<<<
|
||||||
|
~SendBehind MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SendBehind MAC
|
||||||
|
Tool $140E
|
||||||
|
<<<
|
||||||
|
~FrontWindow MAC
|
||||||
|
PHS 2
|
||||||
|
_FrontWindow MAC
|
||||||
|
Tool $150E
|
||||||
|
<<<
|
||||||
|
~SetInfoDraw MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SetInfoDraw MAC
|
||||||
|
Tool $160E
|
||||||
|
<<<
|
||||||
|
~FindWindow MAC
|
||||||
|
P1SL ]1
|
||||||
|
PxW ]2;]3
|
||||||
|
_FindWindow MAC
|
||||||
|
Tool $170E
|
||||||
|
<<<
|
||||||
|
~TrackGoAway MAC
|
||||||
|
P1SW ]1
|
||||||
|
PHWL ]2;]3
|
||||||
|
_TrackGoAway MAC
|
||||||
|
Tool $180E
|
||||||
|
<<<
|
||||||
|
~MoveWindow MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_MoveWindow MAC
|
||||||
|
Tool $190E
|
||||||
|
<<<
|
||||||
|
~DragWindow MAC
|
||||||
|
PxW ]1;]2;]3;]4
|
||||||
|
PxL ]5;]6
|
||||||
|
_DragWindow MAC
|
||||||
|
Tool $1A0E
|
||||||
|
<<<
|
||||||
|
~GrowWindow MAC
|
||||||
|
PHS 2
|
||||||
|
PxW ]1;]2;]3;]4
|
||||||
|
PHL ]5
|
||||||
|
_GrowWindow MAC
|
||||||
|
Tool $1B0E
|
||||||
|
<<<
|
||||||
|
~SizeWindow MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_SizeWindow MAC
|
||||||
|
Tool $1C0E
|
||||||
|
<<<
|
||||||
|
~TaskMaster MAC
|
||||||
|
PHA
|
||||||
|
PHWL ]1;]2
|
||||||
|
_TaskMaster MAC
|
||||||
|
Tool $1D0E
|
||||||
|
<<<
|
||||||
|
~BeginUpdate MAC
|
||||||
|
PHL ]1
|
||||||
|
_BeginUpdate MAC
|
||||||
|
Tool $1E0E
|
||||||
|
<<<
|
||||||
|
~EndUpdate MAC
|
||||||
|
PHL ]1
|
||||||
|
_EndUpdate MAC
|
||||||
|
Tool $1F0E
|
||||||
|
<<<
|
||||||
|
~GetWMgrPort MAC
|
||||||
|
PHS 2
|
||||||
|
_GetWMgrPort MAC
|
||||||
|
Tool $200E
|
||||||
|
<<<
|
||||||
|
~PinRect MAC
|
||||||
|
PHS 2
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_PinRect MAC
|
||||||
|
Tool $210E
|
||||||
|
<<<
|
||||||
|
~HiliteWindow MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_HiliteWindow MAC
|
||||||
|
Tool $220E
|
||||||
|
<<<
|
||||||
|
~ShowHide MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_ShowHide MAC
|
||||||
|
Tool $230E
|
||||||
|
<<<
|
||||||
|
~BringToFront MAC
|
||||||
|
PHL ]1
|
||||||
|
_BringToFront MAC
|
||||||
|
Tool $240E
|
||||||
|
<<<
|
||||||
|
_WindNewRes MAC
|
||||||
|
Tool $250E
|
||||||
|
<<<
|
||||||
|
~TrackZoom MAC
|
||||||
|
P1SW ]1
|
||||||
|
PHWL ]2;]3
|
||||||
|
_TrackZoom MAC
|
||||||
|
Tool $260E
|
||||||
|
<<<
|
||||||
|
~ZoomWindow MAC
|
||||||
|
PHL ]1
|
||||||
|
_ZoomWindow MAC
|
||||||
|
Tool $270E
|
||||||
|
<<<
|
||||||
|
~SetWRefCon MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SetWRefCon MAC
|
||||||
|
Tool $280E
|
||||||
|
<<<
|
||||||
|
~GetWRefCon MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetWRefCon MAC
|
||||||
|
Tool $290E
|
||||||
|
<<<
|
||||||
|
~GetNextWindow MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetNextWindow MAC
|
||||||
|
Tool $2A0E
|
||||||
|
<<<
|
||||||
|
~GetWKind MAC
|
||||||
|
P1SL ]1
|
||||||
|
_GetWKind MAC
|
||||||
|
Tool $2B0E
|
||||||
|
<<<
|
||||||
|
~SetWFrame MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_SetWFrame MAC
|
||||||
|
Tool $2D0E
|
||||||
|
<<<
|
||||||
|
~GetWFrame MAC
|
||||||
|
P1SL ]1
|
||||||
|
_GetWFrame MAC
|
||||||
|
Tool $2C0E
|
||||||
|
<<<
|
||||||
|
~GetStructRgn MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetStructRgn MAC
|
||||||
|
Tool $2E0E
|
||||||
|
<<<
|
||||||
|
~GetContentRgn MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetContentRgn MAC
|
||||||
|
Tool $2F0E
|
||||||
|
<<<
|
||||||
|
~GetUpdateRgn MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetUpdateRgn MAC
|
||||||
|
Tool $300E
|
||||||
|
<<<
|
||||||
|
~GetDefProc MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetDefProc MAC
|
||||||
|
Tool $310E
|
||||||
|
<<<
|
||||||
|
~SetDefProc MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SetDefProc MAC
|
||||||
|
Tool $320E
|
||||||
|
<<<
|
||||||
|
~GetWControls MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetWControls MAC
|
||||||
|
Tool $330E
|
||||||
|
<<<
|
||||||
|
~SetOriginMask MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
_SetOriginMask MAC
|
||||||
|
Tool $340E
|
||||||
|
<<<
|
||||||
|
~GetInfoRefCon MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetInfoRefCon MAC
|
||||||
|
Tool $350E
|
||||||
|
<<<
|
||||||
|
~SetInfoRefCon MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SetInfoRefCon MAC
|
||||||
|
Tool $360E
|
||||||
|
<<<
|
||||||
|
~GetZoomRect MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetZoomRect MAC
|
||||||
|
Tool $370E
|
||||||
|
<<<
|
||||||
|
~SetZoomRect MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SetZoomRect MAC
|
||||||
|
Tool $380E
|
||||||
|
<<<
|
||||||
|
~RefreshDesktop MAC
|
||||||
|
PHL ]1
|
||||||
|
_RefreshDesktop MAC
|
||||||
|
Tool $390E
|
||||||
|
<<<
|
||||||
|
~InvalRect MAC
|
||||||
|
PHL ]1
|
||||||
|
_InvalRect MAC
|
||||||
|
Tool $3A0E
|
||||||
|
<<<
|
||||||
|
~InvalRgn MAC
|
||||||
|
PHL ]1
|
||||||
|
_InvalRgn MAC
|
||||||
|
Tool $3B0E
|
||||||
|
<<<
|
||||||
|
~ValidRect MAC
|
||||||
|
PHL ]1
|
||||||
|
_ValidRect MAC
|
||||||
|
Tool $3C0E
|
||||||
|
<<<
|
||||||
|
~ValidRgn MAC
|
||||||
|
PHL ]1
|
||||||
|
_ValidRgn MAC
|
||||||
|
Tool $3D0E
|
||||||
|
<<<
|
||||||
|
~GetContentOrigin MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetContentOrigin MAC
|
||||||
|
Tool $3E0E
|
||||||
|
<<<
|
||||||
|
~SetContentOrigin MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_SetContentOrigin MAC
|
||||||
|
Tool $3F0E
|
||||||
|
<<<
|
||||||
|
~GetDataSize MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetDataSize MAC
|
||||||
|
Tool $400E
|
||||||
|
<<<
|
||||||
|
~SetDataSize MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_SetDataSize MAC
|
||||||
|
Tool $410E
|
||||||
|
<<<
|
||||||
|
~GetMaxGrow MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetMaxGrow MAC
|
||||||
|
Tool $420E
|
||||||
|
<<<
|
||||||
|
~SetMaxGrow MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_SetMaxGrow MAC
|
||||||
|
Tool $430E
|
||||||
|
<<<
|
||||||
|
~GetScroll MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetScroll MAC
|
||||||
|
Tool $440E
|
||||||
|
<<<
|
||||||
|
~SetScroll MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_SetScroll MAC
|
||||||
|
Tool $450E
|
||||||
|
<<<
|
||||||
|
~GetPage MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetPage MAC
|
||||||
|
Tool $460E
|
||||||
|
<<<
|
||||||
|
~SetPage MAC
|
||||||
|
PxW ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_SetPage MAC
|
||||||
|
Tool $470E
|
||||||
|
<<<
|
||||||
|
~GetContentDraw MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetContentDraw MAC
|
||||||
|
Tool $480E
|
||||||
|
<<<
|
||||||
|
~SetContentDraw MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_SetContentDraw MAC
|
||||||
|
Tool $490E
|
||||||
|
<<<
|
||||||
|
~GetInfoDraw MAC
|
||||||
|
P2SL ]1
|
||||||
|
_GetInfoDraw MAC
|
||||||
|
Tool $4A0E
|
||||||
|
<<<
|
||||||
|
~SetSysWindow MAC
|
||||||
|
PHL ]1
|
||||||
|
_SetSysWindow MAC
|
||||||
|
Tool $4B0E
|
||||||
|
<<<
|
||||||
|
~GetSysWFlag MAC
|
||||||
|
P1SL ]1
|
||||||
|
_GetSysWFlag MAC
|
||||||
|
Tool $4C0E
|
||||||
|
<<<
|
||||||
|
~StartDrawing MAC
|
||||||
|
PHL ]1
|
||||||
|
_StartDrawing MAC
|
||||||
|
Tool $4D0E
|
||||||
|
<<<
|
||||||
|
~SetWindowIcons MAC
|
||||||
|
P2SL ]1
|
||||||
|
_SetWindowIcons MAC
|
||||||
|
Tool $4E0E
|
||||||
|
<<<
|
||||||
|
~GetRectInfo MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_GetRectInfo MAC
|
||||||
|
Tool $4F0E
|
||||||
|
<<<
|
||||||
|
~StartInfoDrawing MAC
|
||||||
|
PxL ]1;]2
|
||||||
|
_StartInfoDrawing MAC
|
||||||
|
Tool $500E
|
||||||
|
<<<
|
||||||
|
_EndInfoDrawing MAC
|
||||||
|
Tool $510E
|
||||||
|
<<<
|
||||||
|
~GetFirstWindow MAC
|
||||||
|
PHS 2
|
||||||
|
_GetFirstWindow MAC
|
||||||
|
Tool $520E
|
||||||
|
<<<
|
||||||
|
~WindDragRect MAC
|
||||||
|
P2SL ]1
|
||||||
|
PHLW ]2;]3
|
||||||
|
PHWL ]4;]5
|
||||||
|
PxL ]6;]7
|
||||||
|
PHW ]8
|
||||||
|
_WindDragRect MAC
|
||||||
|
Tool $530E
|
||||||
|
<<<
|
||||||
|
~DrawInfoBar MAC
|
||||||
|
PHL ]1
|
||||||
|
_DrawInfoBar MAC
|
||||||
|
Tool $550E
|
||||||
|
<<<
|
||||||
|
~WindowGlobal MAC
|
||||||
|
P1SW ]1
|
||||||
|
_WindowGlobal MAC
|
||||||
|
Tool $560E
|
||||||
|
<<<
|
||||||
|
~SetContentOrigin2 MAC
|
||||||
|
PxW ]1;]2;]3
|
||||||
|
PHL ]4
|
||||||
|
_SetContentOrigin2 MAC
|
||||||
|
Tool $570E
|
||||||
|
<<<
|
||||||
|
~GetWindowMgrGlobals MAC
|
||||||
|
PHS 2
|
||||||
|
_GetWindowMgrGlobals MAC
|
||||||
|
Tool $580E
|
||||||
|
<<<
|
||||||
|
~AlertWindow MAC
|
||||||
|
P1SW ]1
|
||||||
|
PxL ]2;]3
|
||||||
|
_AlertWindow MAC
|
||||||
|
Tool $590E
|
||||||
|
<<<
|
||||||
|
~StartFrameDrawing MAC
|
||||||
|
PHL ]1
|
||||||
|
_StartFrameDrawing MAC
|
||||||
|
Tool $5A0E
|
||||||
|
<<<
|
||||||
|
_EndFrameDrawing MAC
|
||||||
|
Tool $5B0E
|
||||||
|
<<<
|
||||||
|
~ResizeWindow MAC
|
||||||
|
PHWL ]1;]2
|
||||||
|
PHL ]3
|
||||||
|
_ResizeWindow MAC
|
||||||
|
Tool $5C0E
|
||||||
|
<<<
|
||||||
|
_TaskMasterContent MAC ;private
|
||||||
|
Tool $5D0E
|
||||||
|
<<<
|
||||||
|
_TaskMasterKey MAC ;private
|
||||||
|
Tool $5E0E
|
||||||
|
<<<
|
||||||
|
~TaskMasterDA MAC
|
||||||
|
P1SW ]1
|
||||||
|
PHL ]2
|
||||||
|
_TaskMasterDA MAC
|
||||||
|
Tool $5F0E
|
||||||
|
<<<
|
||||||
|
~CompileText MAC
|
||||||
|
P2SW ]1
|
||||||
|
PxL ]2;]3
|
||||||
|
PHW ]4
|
||||||
|
_CompileText MAC
|
||||||
|
Tool $600E
|
||||||
|
<<<
|
||||||
|
~NewWindow2 MAC
|
||||||
|
PHS 2
|
||||||
|
PxL ]1;]2;]3;]4
|
||||||
|
PHWL ]5;]6
|
||||||
|
PHW ]7
|
||||||
|
_NewWindow2 MAC
|
||||||
|
Tool $610E
|
||||||
|
<<<
|
||||||
|
~ErrorWindow MAC
|
||||||
|
P1SW ]1
|
||||||
|
PHLW ]2;]3
|
||||||
|
_ErrorWindow MAC
|
||||||
|
Tool $620E
|
||||||
|
<<<
|
153
src/main.S
153
src/main.S
|
@ -1,37 +1,142 @@
|
||||||
REL
|
rel
|
||||||
TYP $B3
|
typ $B3
|
||||||
DSK main.l
|
dsk main.l
|
||||||
|
|
||||||
MX %00 ; enable 16-bit mode
|
mx %00
|
||||||
|
phk
|
||||||
|
plb
|
||||||
|
|
||||||
|
mx %11
|
||||||
|
sta $E0
|
||||||
|
pha
|
||||||
|
pha
|
||||||
|
plb
|
||||||
|
pld
|
||||||
|
sta $C000
|
||||||
|
sta $C054
|
||||||
|
|
||||||
|
mx %00
|
||||||
|
|
||||||
|
; load a char and write it to the 40 char text buffer
|
||||||
|
bois lda "B"
|
||||||
|
sta $E00400
|
||||||
|
sta $E00401
|
||||||
|
sta $E00402
|
||||||
|
jmp bois
|
||||||
|
|
||||||
; Important locations
|
; Important locations
|
||||||
|
SPEAKER equ $E0C030
|
||||||
|
PRODOS16 equ $E100A8
|
||||||
|
|
||||||
SPEAKER EQU $E0C030
|
jsl PRODOS16
|
||||||
PRODOS16 EQU $E100A8
|
|
||||||
|
|
||||||
PHK
|
|
||||||
PLB
|
|
||||||
|
|
||||||
* Beep code freezes
|
|
||||||
*beep LDA SPEAKER
|
|
||||||
* LDY #1000
|
|
||||||
* LDX #1000
|
|
||||||
*loop DEX
|
|
||||||
* BNE loop
|
|
||||||
* DEY
|
|
||||||
* BNE beep
|
|
||||||
|
|
||||||
JSL PRODOS16
|
|
||||||
; This exit code is "device busy", why is it the only one
|
; This exit code is "device busy", why is it the only one
|
||||||
; that works?!
|
; that works?!
|
||||||
DA $29
|
da $29
|
||||||
ADRL QP
|
adrl QP
|
||||||
bcs ERROR
|
bcs ERROR
|
||||||
|
|
||||||
ERROR BRK
|
ERROR brk
|
||||||
|
|
||||||
QP adrl $0000
|
QP adrl $0000
|
||||||
DA $00
|
da $00
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue