mirror of
https://github.com/antoinevignau/source.git
synced 2024-10-31 22:06:40 +00:00
1 line
126 KiB
Plaintext
Executable File
1 line
126 KiB
Plaintext
Executable File
PRINT PUSH
|
||
PRINT OFF
|
||
**********************************************************************
|
||
*
|
||
* All.Macros
|
||
*
|
||
* This file contains all the tool macros and the utility macros
|
||
* that we use to build system tools and the ROM.
|
||
*
|
||
**********************************************************************
|
||
|
||
|
||
**********************************************************************
|
||
*
|
||
* OUR MACROS
|
||
*
|
||
* Macros used by the toolbox group in making system software.
|
||
*
|
||
* These include most of the M16.Utility macros by Lou Infeld,
|
||
* the dummy section macros by Steve Glass and Don Marsh and the
|
||
* PushPtr macro.
|
||
*
|
||
**********************************************************************
|
||
|
||
|
||
|
||
|
||
*************************************************************************
|
||
* *
|
||
* Apple //GS Utility Macros *
|
||
* by *
|
||
* Lou Infeld *
|
||
* *
|
||
* Copyright Apple Computer, Inc. 1986-1988 *
|
||
* All Rights Reserved *
|
||
* *
|
||
* Revision History *
|
||
* ---------------- *
|
||
* v1.0R1 (04/29/87) -- First Release *
|
||
* This file is a subset of the old *
|
||
* 'M16.Utility' *
|
||
* v2.0R1 (01/22/88) -- First AsmIIGS release *
|
||
* v2.0R2 (02/11/88) -- "writelin" renamed "writeline" *
|
||
* v2.0R3 (03/29/88) -- "|" added to pea instrs to avoid Assembler *
|
||
* warning *
|
||
* "pushlong" was incorrect if &offset was "s" *
|
||
* or not specified *
|
||
* v2.0R4 (04/14/88) -- "writestr" and "writeline" didn't restore *
|
||
* STRING setting *
|
||
* v2.0R5 (06/15/88) -- "pushlong" was incorrect for stack relative *
|
||
*
|
||
* (Long and Short Removed by SEG)
|
||
*************************************************************************
|
||
|
||
;...............................................................
|
||
;
|
||
; Pull 3 bytes from stack
|
||
;
|
||
; pull3 addr -- pulls bytes off stack and stores in 'loc'
|
||
;...............................................................
|
||
MACRO
|
||
pull3 &addr
|
||
pull1 &addr
|
||
pullword &addr+1
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Pull 1 byte from stack
|
||
;
|
||
; pull1 loc -- pulls byte off stack and stores in 'loc'
|
||
; pull1 loc,x -- pulls byte off stack and stores in 'loc,x'
|
||
; pull1 -- pulls byte off stack and leaves in A
|
||
;...............................................................
|
||
MACRO
|
||
pull1 &addr,®
|
||
shortm
|
||
pullword &addr,®
|
||
longm
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Push 1 byte onto stack
|
||
;
|
||
; push1 loc -- pushes byte onto stack from 'loc'
|
||
; push1 loc,x -- pushes byte onto stack from 'loc,x'
|
||
; push1 #n -- pushes constant #n onto stack
|
||
; push1 -- pushes byte onto stack (from A)
|
||
;...............................................................
|
||
MACRO
|
||
push1 &addr,®
|
||
shortm
|
||
pushword &addr,®
|
||
longm
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Push 3 bytes onto stack
|
||
;
|
||
; push3 addr -- pushes bytes onto stack from 'loc'
|
||
; push3 addr,x -- pushes bytes onto stack from 'loc,x'
|
||
; push3 #n -- pushes constant #n onto stack
|
||
;...............................................................
|
||
MACRO
|
||
push3 &addr,®
|
||
IF ®<65>'' THEN
|
||
lda &addr+1,®
|
||
pha
|
||
phb
|
||
lda &addr,®
|
||
sta 1,s
|
||
ELSEIF &addr[1:1]='#' THEN
|
||
lda #&addr[2:255]>>8
|
||
pha
|
||
GOTO .a
|
||
ELSE
|
||
lda &addr+1
|
||
pha
|
||
.a phb
|
||
lda &addr
|
||
sta 1,s
|
||
ENDIF
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Add 2 byte integers
|
||
;
|
||
; add loc1,loc2,loc3 - adds 'loc1' to 'loc2' and stores in 'loc3'
|
||
; add loc1,loc2 - adds 'loc1' to 'loc2' and leaves in A
|
||
; add ,loc2,loc3 - adds A with 'loc2' and stores in 'loc3'
|
||
;
|
||
; 'loc1' and 'loc2' can be constants
|
||
;...............................................................
|
||
MACRO
|
||
add &a1,&a2,&a3
|
||
IF &a1<61>'' THEN
|
||
lda &a1
|
||
ENDIF
|
||
clc
|
||
adc &a2
|
||
IF &a3<61>'' THEN
|
||
sta &a3
|
||
ENDIF
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Add 4 byte integers
|
||
;
|
||
; add4 loc1,loc2,loc3 - adds 'loc1' to 'loc2' and stores in 'loc3'
|
||
; add4 ,loc2,loc3 - adds A to 'loc2' and stores in 'loc3'
|
||
;
|
||
; 'loc1' and 'loc2' can be constants
|
||
;...............................................................
|
||
MACRO
|
||
add4 &a1,&a2,&a3
|
||
IF &a1<61>'' THEN
|
||
lda &a1
|
||
ENDIF
|
||
clc
|
||
adc &a2
|
||
sta &a3
|
||
IF &a1='' THEN
|
||
lda #0
|
||
ELSEIF &a1[1:1]='#' THEN
|
||
lda #^&a1[2:255]
|
||
ELSE
|
||
lda &a1+2
|
||
ENDIF
|
||
IF &a2[1:1]='#' THEN
|
||
adc #^&a2[2:255]
|
||
ELSE
|
||
adc &a2+2
|
||
ENDIF
|
||
sta &a3+2
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Increment a 4 byte integer
|
||
;
|
||
; inc4 loc - increments 'loc'
|
||
;...............................................................
|
||
MACRO
|
||
inc4 &a1
|
||
inc &a1
|
||
bne @a
|
||
inc &a1+2
|
||
@a
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Subtract 2 byte integers
|
||
;
|
||
; sub loc1,loc2,loc3 - subtracts 'loc2' from 'loc1' and stores in 'loc3'
|
||
; sub loc1,loc2 - subtracts 'loc2' from 'loc1' and leaves in A
|
||
; sub ,loc2,loc3 - subtracts 'loc2' from A and stores in 'loc3'
|
||
;
|
||
; 'loc1' and 'loc2' can be constants
|
||
;...............................................................
|
||
MACRO
|
||
sub &a1,&a2,&a3
|
||
IF &a1<61>'' THEN
|
||
lda &a1
|
||
ENDIF
|
||
sec
|
||
sbc &a2
|
||
IF &a3<61>'' THEN
|
||
sta &a3
|
||
ENDIF
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Subtract 4 byte integers
|
||
;
|
||
; sub4 loc1,loc2,loc3 - subtracts 'loc2' from 'loc1' and stores in 'loc3'
|
||
; sub4 ,loc2,loc3 - subtracts 'loc2' from A and stores in 'loc3'
|
||
;...............................................................
|
||
MACRO
|
||
sub4 &a1,&a2,&a3
|
||
IF &a1<61>'' THEN
|
||
lda &a1
|
||
ENDIF
|
||
sec
|
||
sbc &a2
|
||
sta &a3
|
||
IF &a1='' THEN
|
||
lda #0
|
||
ELSEIF &a1[1:1]='#' THEN
|
||
lda #^&a1[2:255]
|
||
ELSE
|
||
lda &a1+2
|
||
ENDIF
|
||
IF &a2[1:1]='#' THEN
|
||
sbc #^&a2[2:255]
|
||
ELSE
|
||
sbc &a2+2
|
||
ENDIF
|
||
sta &a3+2
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Decrement a 4 byte integer
|
||
;
|
||
; dec4 loc - decrements 'loc'
|
||
;...............................................................
|
||
MACRO
|
||
dec4 &a1
|
||
dec &a1
|
||
bpl @a
|
||
dec &a1+2
|
||
@a
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Define string
|
||
;
|
||
; Generates a Pascal type of string
|
||
;...............................................................
|
||
MACRO
|
||
str &string
|
||
lclc &sset
|
||
&sset SETC &SETTING('STRING')
|
||
STRING PASCAL
|
||
dc.B &string
|
||
STRING &sset
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Define pointer
|
||
;...............................................................
|
||
MACRO
|
||
dp &pointer
|
||
dc.L &pointer
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Left Shift 4 bytes
|
||
;
|
||
; asl4 loc,#n ;n is shift count (pos)
|
||
; asl4 loc,lnum ;lnum contains shift count (pos)
|
||
; asl4 loc ;X contains shift count (pos)
|
||
;...............................................................
|
||
MACRO
|
||
asl4 &loc,&num
|
||
lda &loc+2
|
||
IF &num<75>'' THEN
|
||
ldx &num
|
||
ENDIF
|
||
@a asl a
|
||
asl &loc
|
||
adc #0
|
||
dex
|
||
bne @a
|
||
sta &loc+2
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Right Shift 4 bytes
|
||
;
|
||
; lsr4 loc,#n ;n is shift count (pos)
|
||
; lsr4 loc,lnum ;lnum contains shift count (pos)
|
||
; lsr4 loc ;X contains shift count (neg)
|
||
;...............................................................
|
||
MACRO
|
||
lsr4 &loc,&num
|
||
IF &num<75>'' THEN
|
||
lda &num
|
||
eor #$FFFF
|
||
clc
|
||
adc #1
|
||
tax
|
||
ENDIF
|
||
lda &loc
|
||
@a lsr a
|
||
lsr &loc+2
|
||
bcc @b
|
||
ora #$8000
|
||
@b inx
|
||
bne @a
|
||
sta &loc
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Turn on native mode
|
||
;
|
||
; The processor is put into 'native' mode. 8 bit or 16 bit
|
||
; mode can be specified by using 'short' or 'long' as the
|
||
; parameter. If no parameter is specified, 'long' is assumed
|
||
;...............................................................
|
||
MACRO
|
||
native &mode
|
||
clc
|
||
xce
|
||
IF &mode<64>'' THEN
|
||
&mode
|
||
ELSE
|
||
long
|
||
ENDIF
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Turn on emulation mode
|
||
;
|
||
; The processor is put into 'emulation' mode.
|
||
;...............................................................
|
||
MACRO
|
||
emulation
|
||
sec
|
||
xce
|
||
longa off
|
||
longi off
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Set Memory & A register to 16 bits
|
||
;...............................................................
|
||
MACRO
|
||
longm
|
||
rep #%00100000
|
||
longa on
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Set X & Y registers to 16 bits
|
||
;...............................................................
|
||
MACRO
|
||
longx
|
||
rep #%00010000
|
||
longi on
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Set Memory & A register to 8 bits
|
||
;...............................................................
|
||
MACRO
|
||
shortm
|
||
sep #%00100000
|
||
longa off
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Set X & Y registers to 8 bits
|
||
;...............................................................
|
||
MACRO
|
||
shortx
|
||
sep #%00010000
|
||
longi off
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Write string
|
||
;
|
||
; writestr loc - string at loc 'loc'
|
||
; writestr #'ABC' - string='ABC'
|
||
; writestr - A,Y has loc of string
|
||
;...............................................................
|
||
MACRO
|
||
writestr &addr
|
||
IF &addr<64>'' THEN
|
||
IF &addr[1:1]='#' THEN
|
||
bra @b
|
||
LCLC &sset
|
||
&sset SETC &SETTING('STRING')
|
||
STRING PASCAL
|
||
@a DC.B &addr[2:255]
|
||
STRING &sset
|
||
@b pea @a>>16
|
||
pea |@a
|
||
ELSE
|
||
pea &addr>>16
|
||
pea |&addr
|
||
ENDIF
|
||
ELSE
|
||
phy
|
||
pha
|
||
ENDIF
|
||
ldx #$1C0C
|
||
jsl $E10000
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Write line (string+CR)
|
||
;
|
||
; writeline loc - string at loc 'loc'
|
||
; writeline #'ABC' - string='ABC'
|
||
; writeline 'ABC' - string='ABC'
|
||
; writeline - CR only
|
||
;
|
||
;...............................................................
|
||
MACRO
|
||
writeline &addr
|
||
IF &addr<64>'' THEN
|
||
IF &addr[1:1]='#' OR &addr[1:1]='''' THEN
|
||
bra @b
|
||
LCLC &sset
|
||
&sset SETC &SETTING('STRING')
|
||
STRING PASCAL
|
||
IF &addr[1:1]='#' THEN
|
||
@a DC.B &addr[2:255]
|
||
ELSE
|
||
@a DC.B &addr[1:255]
|
||
ENDIF
|
||
STRING &sset
|
||
@b pea @a>>16
|
||
pea |@a
|
||
ELSE
|
||
pea &addr>>16
|
||
pea |&addr
|
||
ENDIF
|
||
ELSE
|
||
pea @c+1>>16
|
||
pea |@c+1
|
||
ENDIF
|
||
ldx #$1A0C
|
||
@c jsl $E10000
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Write character
|
||
;
|
||
; writech - char in A register
|
||
; writech #'A' - char='A'
|
||
; writech ch,x - char in loc 'ch,x'
|
||
;...............................................................
|
||
MACRO
|
||
writech &addr,®
|
||
IF &addr<64>'' THEN
|
||
IF ®<65>'' THEN
|
||
lda &addr,®
|
||
ELSE
|
||
lda &addr
|
||
ENDIF
|
||
ENDIF
|
||
pha
|
||
ldx #$180C
|
||
jsl $E10000
|
||
MEND
|
||
;...............................................................
|
||
;
|
||
; Read a char from keyboard
|
||
;
|
||
; readch addr - char stored in 'addr'
|
||
; readch - char left in A register
|
||
;
|
||
;...............................................................
|
||
MACRO
|
||
readch &addr
|
||
pea 0
|
||
pea 1
|
||
ldx #$220C
|
||
jsl $E10000
|
||
pla
|
||
IF &addr<64>'' THEN
|
||
sta &addr
|
||
ENDIF
|
||
MEND
|
||
|
||
|
||
;
|
||
; DSect Macros
|
||
;
|
||
; By Don Marsh and Steven Glass
|
||
; 11 Sep 87
|
||
;
|
||
; A series of macros to help in making equates. This is
|
||
; useful when you want to define a series of equates that
|
||
; relate to each other. For example, offsets on the stack,
|
||
; locations on direct page, offsets in a record.
|
||
;
|
||
; Normally you would do something like
|
||
;
|
||
; lab1 equ 0
|
||
; lab2 equ lab1+4
|
||
; lab3 equ lab2+2
|
||
; etc.
|
||
;
|
||
; These macros let you do the following
|
||
;
|
||
; DSECT 0
|
||
; lab1 long
|
||
; lab2 word
|
||
; lab3 long
|
||
;
|
||
; The macros do the equating and addition for you. They also make the
|
||
; code more readable.
|
||
;
|
||
; The macro GlobalDSECT makes the equates global rather than
|
||
; local.
|
||
;
|
||
; The macro DSectSize returns the current value of the
|
||
; dummy program counter that is being maintained.
|
||
;
|
||
; The macro DefineStack is like using DSECT 1.
|
||
;
|
||
|
||
|
||
|
||
|
||
;
|
||
; DSect &Value
|
||
;
|
||
; Begin local data section. This defines a dummy PC
|
||
; register which can be used in equates to avoid error-
|
||
; prone linked equates for setting up direct page or
|
||
; stack offsets. The dummy PC begins at &Value and
|
||
; is updated by the appropriate amount by the BYTE,
|
||
; WORD, LONG, and BLOCK macros.
|
||
;
|
||
MACRO
|
||
DSect &Value
|
||
DummyPC SET &Value
|
||
MEND
|
||
|
||
|
||
;
|
||
; DefineStack
|
||
;
|
||
; This is a specialized data section which defines
|
||
; a dummy PC starting at 1 in order to define a
|
||
; series of stack offsets using the BYTE, WORD,
|
||
; LONG, and BLOCK macros.
|
||
;
|
||
MACRO
|
||
DefineStack
|
||
DummyPC SET 1
|
||
MEND
|
||
|
||
;
|
||
; &lab byte
|
||
;
|
||
; Equate the given label with the current dummy
|
||
; PC (defined by DSect, GlobalDSect, or
|
||
; DefineStack), and update the dummy PC by the
|
||
; appropriate amount.
|
||
;
|
||
MACRO
|
||
&lab BYTE
|
||
&lab equ DummyPC
|
||
DummyPC SET DummyPC+1
|
||
MEND
|
||
|
||
;
|
||
; &lab word
|
||
;
|
||
; Equate the given label with the current dummy
|
||
; PC (defined by DSect, GlobalDSect, or
|
||
; DefineStack), and update the dummy PC by the
|
||
; appropriate amount.
|
||
;
|
||
MACRO
|
||
&lab WORD
|
||
&lab equ DummyPC
|
||
DummyPC SET DummyPC+2
|
||
MEXIT
|
||
MEND
|
||
|
||
;
|
||
; &lab long
|
||
;
|
||
; Equate the given label with the current dummy
|
||
; PC (defined by DSect, GlobalDSect, or
|
||
; DefineStack), and update the dummy PC by the
|
||
; appropriate amount.
|
||
;
|
||
MACRO
|
||
&lab LONG
|
||
&lab equ DummyPC
|
||
DummyPC SET DummyPC+4
|
||
MEND
|
||
|
||
;
|
||
; &lab block &size
|
||
;
|
||
; Equate the given label with the current dummy
|
||
; PC (defined by DSect, GlobalDSect, or
|
||
; DefineStack), and update the dummy PC by the
|
||
; appropriate amount (&size bytes).
|
||
;
|
||
MACRO
|
||
&lab BLOCK &Value
|
||
if &lab = '' goto .skiplab
|
||
&lab equ DummyPC
|
||
.skiplab
|
||
DummyPC SET DummyPC+&Value
|
||
MEND
|
||
|
||
;
|
||
; &lab DSectSize
|
||
;
|
||
; This macro equates the given label with the
|
||
; current dummy PC defined by the DSect,
|
||
; GlobalDSect, or DefineStack macros. This is
|
||
; useful for determing the size of data sections
|
||
; or parts of data sections.
|
||
;
|
||
MACRO
|
||
&lab DSectSize
|
||
&lab equ DummyPC
|
||
MEND
|
||
|
||
;
|
||
; CheckSize &size,&limit
|
||
;
|
||
; This macro causes an assembler error if
|
||
; &size > &limit. Useful in checking the size
|
||
; of direct page assignments.
|
||
;
|
||
MACRO
|
||
CheckSize &size,&limit
|
||
IF &Eval(&size)<=&Eval(&limit) goto .DONE
|
||
AError 'Programmer-specified size limit exceeded: ABORT ASSEMBLY!'
|
||
.DONE
|
||
MEND
|
||
|
||
|
||
|
||
MACRO
|
||
&lab SYSTEMDATE
|
||
&lab
|
||
LCLC &Temp
|
||
&Temp setc &getenv('SystemDate')
|
||
LCLC &EIB ; declare a temporary var to hold current string setting
|
||
&EIB SETC &SETTING('STRING') ; put current string setting into temp
|
||
STRING ASIS ; Set string type to ASIS.
|
||
if &TEMP='' then
|
||
DC.B '&SysDate' ; make the string
|
||
else
|
||
DC.B '&TEMP'
|
||
endif
|
||
STRING &EIB ; restore orig string settings
|
||
MEND
|
||
|
||
MACRO
|
||
&lab SYSTEMTIME
|
||
&lab
|
||
LCLC &Temp
|
||
&Temp setc &getenv('SystemTime')
|
||
LCLC &EIB ; declare a temporary var to hold current string setting
|
||
&EIB SETC &SETTING('STRING') ; put current string setting into temp
|
||
STRING ASIS ; Set string type to ASIS.
|
||
if &TEMP='' then
|
||
DC.B '&SysTime' ; make the string
|
||
else
|
||
DC.B '&TEMP'
|
||
endif
|
||
STRING &EIB ; restore orig string settings
|
||
MEND
|
||
|
||
|
||
;-----------------------------------------------------------
|
||
;
|
||
; A few last macros
|
||
;
|
||
MACRO
|
||
&lab PushPtr &addr
|
||
&lab
|
||
dc.B $F4
|
||
dc.W (&addr)>>16
|
||
dc.B $F4
|
||
dc.W &addr
|
||
MEND
|
||
|
||
|
||
macro
|
||
&lab SetMode16
|
||
&lab
|
||
rep #$30
|
||
longa on
|
||
longi on
|
||
ENDM
|
||
|
||
macro
|
||
&lab SetMode8
|
||
&lab
|
||
sep #$30
|
||
longa off
|
||
longi off
|
||
ENDM
|
||
|
||
; File: M16.ACE
|
||
;
|
||
;
|
||
; Copyright Apple computer, Inc. 1988
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _ACEBootInit
|
||
&lab ldx #$011D
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ACEStartUp
|
||
&lab ldx #$021D
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ACEShutDown
|
||
&lab ldx #$031D
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ACEVersion
|
||
&lab ldx #$041D
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; MACRO
|
||
;&lab _ACEReset
|
||
;&lab ldx #$051D
|
||
; jsl $E10000
|
||
; MEND
|
||
|
||
MACRO
|
||
&lab _ACEStatus
|
||
&lab ldx #$061D
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ACEInfo
|
||
&lab ldx #$071D
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ACECompBegin
|
||
&lab ldx #$0B1D
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ACECompress
|
||
&lab ldx #$091D
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ACEExpand
|
||
&lab ldx #$0A1D
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ACEExpBegin
|
||
&lab ldx #$0C1D
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.ADB
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _ADBBootInit
|
||
&lab ldx #$0109
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ADBStartUp
|
||
&lab ldx #$0209
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ADBShutDown
|
||
&lab ldx #$0309
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ADBVersion
|
||
&lab ldx #$0409
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ADBReset
|
||
&lab ldx #$0509
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ADBStatus
|
||
&lab ldx #$0609
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _AbsOff
|
||
&lab ldx #$1009
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _AbsOn
|
||
&lab ldx #$0F09
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _AsyncADBReceive
|
||
&lab ldx #$0D09
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ClearSRQTable
|
||
&lab ldx #$1609
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetAbsScale
|
||
&lab ldx #$1309
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ReadAbs
|
||
&lab ldx #$1109
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ReadKeyMicroData
|
||
&lab ldx #$0A09
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ReadKeyMicroMem
|
||
&lab ldx #$0B09
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SendInfo
|
||
&lab ldx #$0909
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetAbsScale
|
||
&lab ldx #$1209
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SRQPoll
|
||
&lab ldx #$1409
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SRQRemove
|
||
&lab ldx #$1509
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SyncADBReceive
|
||
&lab ldx #$0E09
|
||
jsl $E10000
|
||
MEND
|
||
; File: M16.Control
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _CtlBootInit
|
||
&lab ldx #$0110
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CtlStartUp
|
||
&lab ldx #$0210
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CtlShutDown
|
||
&lab ldx #$0310
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CtlVersion
|
||
&lab ldx #$0410
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CtlReset
|
||
&lab ldx #$0510
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CtlStatus
|
||
&lab ldx #$0610
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CtlNewRes
|
||
&lab ldx #$1210
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DisposeControl
|
||
&lab ldx #$0A10
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DragControl
|
||
&lab ldx #$1710
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DragRect
|
||
&lab ldx #$1D10
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DrawControls
|
||
&lab ldx #$1010
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DrawOneCtl
|
||
&lab ldx #$2510
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EraseControl
|
||
&lab ldx #$2410
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FindControl
|
||
&lab ldx #$1310
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetCtlAction
|
||
&lab ldx #$2110
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetCtlDPage
|
||
&lab ldx #$1F10
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetCtlParams
|
||
&lab ldx #$1C10
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetCtlRefCon
|
||
&lab ldx #$2310
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetCtlTitle
|
||
&lab ldx #$0D10
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetCtlValue
|
||
&lab ldx #$1A10
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GrowSize
|
||
&lab ldx #$1E10
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _HideControl
|
||
&lab ldx #$0E10
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _HiliteControl
|
||
&lab ldx #$1110
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _KillControls
|
||
&lab ldx #$0B10
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MoveControl
|
||
&lab ldx #$1610
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NewControl
|
||
&lab ldx #$0910
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetCtlAction
|
||
&lab ldx #$2010
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetCtlIcons
|
||
&lab ldx #$1810
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetCtlParams
|
||
&lab ldx #$1B10
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetCtlRefCon
|
||
&lab ldx #$2210
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetCtlTitle
|
||
&lab ldx #$0C10
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetCtlValue
|
||
&lab ldx #$1910
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ShowControl
|
||
&lab ldx #$0F10
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TestControl
|
||
&lab ldx #$1410
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TrackControl
|
||
&lab ldx #$1510
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.Desk
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
|
||
MACRO
|
||
&lab _DeskBootInit
|
||
&lab ldx #$0105
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DeskStartUp
|
||
&lab ldx #$0205
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DeskShutDown
|
||
&lab ldx #$0305
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DeskVersion
|
||
&lab ldx #$0405
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DeskReset
|
||
&lab ldx #$0505
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DeskStatus
|
||
&lab ldx #$0605
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ChooseCDA
|
||
&lab ldx #$1105
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CloseAllNDAs
|
||
&lab ldx #$1D05
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CloseNDA
|
||
&lab ldx #$1605
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CloseNDAByWinPtr
|
||
&lab ldx #$1C05
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FixAppleMenu
|
||
&lab ldx #$1E05
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetDAStrPtr
|
||
&lab ldx #$1405
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetNumNDAs
|
||
&lab ldx #$1B05
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InstallCDA
|
||
&lab ldx #$0F05
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InstallNDA
|
||
&lab ldx #$0E05
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _OpenNDA
|
||
&lab ldx #$1505
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _RestAll
|
||
&lab ldx #$0C05
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _RestScrn
|
||
&lab ldx #$0A05
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SaveAll
|
||
&lab ldx #$0B05
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SaveScrn
|
||
&lab ldx #$0905
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetDAStrPtr
|
||
&lab ldx #$1305
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SystemClick
|
||
&lab ldx #$1705
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SystemEdit
|
||
&lab ldx #$1805
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SystemEvent
|
||
&lab ldx #$1A05
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SystemTask
|
||
&lab ldx #$1905
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DialogBootInit
|
||
&lab ldx #$0115
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DialogStartUp
|
||
&lab ldx #$0215
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DialogShutDown
|
||
&lab ldx #$0315
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DialogVersion
|
||
&lab ldx #$0415
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DialogReset
|
||
&lab ldx #$0515
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DialogStatus
|
||
&lab ldx #$0615
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Alert
|
||
&lab ldx #$1715
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CautionAlert
|
||
&lab ldx #$1A15
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CloseDialog
|
||
&lab ldx #$0C15
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DefaultFilter
|
||
&lab ldx #$3615
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DialogSelect
|
||
&lab ldx #$1115
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DisableDItem
|
||
&lab ldx #$3915
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DlgCopy
|
||
&lab ldx #$1315
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DlgCut
|
||
&lab ldx #$1215
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DlgDelete
|
||
&lab ldx #$1515
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DlgPaste
|
||
&lab ldx #$1415
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DrawDialog
|
||
&lab ldx #$1615
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EnableDItem
|
||
&lab ldx #$3A15
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ErrorSound
|
||
&lab ldx #$0915
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FindDItem
|
||
&lab ldx #$2415
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetAlertStage
|
||
&lab ldx #$3415
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetControlDItem
|
||
&lab ldx #$1E15
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetDefButton
|
||
&lab ldx #$3715
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetDItemBox
|
||
&lab ldx #$2815
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetDItemType
|
||
&lab ldx #$2615
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetDItemValue
|
||
&lab ldx #$2E15
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetFirstDItem
|
||
&lab ldx #$2A15
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetIText
|
||
&lab ldx #$1F15
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetNewDItem
|
||
&lab ldx #$3315
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetNewModalDialog
|
||
&lab ldx #$3215
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetNextDItem
|
||
&lab ldx #$2B15
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _HideDItem
|
||
&lab ldx #$2215
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _IsDialogEvent
|
||
&lab ldx #$1015
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ModalDialog
|
||
&lab ldx #$0F15
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ModalDialog2
|
||
&lab ldx #$2C15
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NewDItem
|
||
&lab ldx #$0D15
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NewModalDialog
|
||
&lab ldx #$0A15
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NewModelessDialog
|
||
&lab ldx #$0B15
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NoteAlert
|
||
&lab ldx #$1915
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ParamText
|
||
&lab ldx #$1B15
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _RemoveDItem
|
||
&lab ldx #$0E15
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ResetAlertStage
|
||
&lab ldx #$3515
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SelectIText
|
||
&lab ldx #$2115
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SelIText
|
||
&lab ldx #$2115
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetDAFont
|
||
&lab ldx #$1C15
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetDefButton
|
||
&lab ldx #$3815
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetDItemBox
|
||
&lab ldx #$2915
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetDItemType
|
||
&lab ldx #$2715
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetDItemValue
|
||
&lab ldx #$2F15
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetIText
|
||
&lab ldx #$2015
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ShowDItem
|
||
&lab ldx #$2315
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _StopAlert
|
||
&lab ldx #$1815
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _UpdateDialog
|
||
&lab ldx #$2515
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.Event
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _EMBootInit
|
||
&lab ldx #$0106
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EMStartUp
|
||
&lab ldx #$0206
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EMShutDown
|
||
&lab ldx #$0306
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EMVersion
|
||
&lab ldx #$0406
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EMReset
|
||
&lab ldx #$0506
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EMStatus
|
||
&lab ldx #$0606
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Button
|
||
&lab ldx #$0D06
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DoWindows
|
||
&lab ldx #$0906
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EventAvail
|
||
&lab ldx #$0B06
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FakeMouse
|
||
&lab ldx #$1906
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FlushEvents
|
||
&lab ldx #$1506
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetCaretTime
|
||
&lab ldx #$1206
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetDblTime
|
||
&lab ldx #$1106
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetMouse
|
||
&lab ldx #$0C06
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetNextEvent
|
||
&lab ldx #$0A06
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetOSEvent
|
||
&lab ldx #$1606
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _OSEventAvail
|
||
&lab ldx #$1706
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PostEvent
|
||
&lab ldx #$1406
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetEventMask
|
||
&lab ldx #$1806
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetSwitch
|
||
&lab ldx #$1306
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _StillDown
|
||
&lab ldx #$0E06
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TickCount
|
||
&lab ldx #$1006
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WaitMouseUp
|
||
&lab ldx #$0F06
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.Font
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987, 1988
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _FMBootInit
|
||
&lab ldx #$011B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FMStartUp
|
||
&lab ldx #$021B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FMShutDown
|
||
&lab ldx #$031B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FMVersion
|
||
&lab ldx #$041B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FMReset
|
||
&lab ldx #$051B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FMStatus
|
||
&lab ldx #$061B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _AddFamily
|
||
&lab ldx #$0D1B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _AddFontVar
|
||
&lab ldx #$141B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ChooseFont
|
||
&lab ldx #$161B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CountFamilies
|
||
&lab ldx #$091B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CountFonts
|
||
&lab ldx #$101B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FamNum2ItemID
|
||
&lab ldx #$1B1B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FindFamily
|
||
&lab ldx #$0A1B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FindFontStats
|
||
&lab ldx #$111B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FixFontMenu
|
||
&lab ldx #$151B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FMGetCurFID
|
||
&lab ldx #$1A1B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FMGetSysFID
|
||
&lab ldx #$191B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FMSetSysFont
|
||
&lab ldx #$181B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetFamInfo
|
||
&lab ldx #$0B1B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetFamNum
|
||
&lab ldx #$0C1B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InstallFont
|
||
&lab ldx #$0E1B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InstallWithStats
|
||
&lab ldx #$1C1B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ItemID2FamNum
|
||
&lab ldx #$171B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LoadFont
|
||
&lab ldx #$121B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LoadSysFont
|
||
&lab ldx #$131B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPurgeStat
|
||
&lab ldx #$0F1B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.IntMath
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _IMBootInit
|
||
&lab ldx #$010B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _IMStartUp
|
||
&lab ldx #$020B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _IMShutDown
|
||
&lab ldx #$030B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _IMVersion
|
||
&lab ldx #$040B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _IMReset
|
||
&lab ldx #$050B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _IMStatus
|
||
&lab ldx #$060B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Dec2Int
|
||
&lab ldx #$280B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Dec2Long
|
||
&lab ldx #$290B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Fix2Frac
|
||
&lab ldx #$1C0B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Fix2Long
|
||
&lab ldx #$1B0B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Fix2X
|
||
&lab ldx #$1E0B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FixATan2
|
||
&lab ldx #$170B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FixDiv
|
||
&lab ldx #$110B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FixMul
|
||
&lab ldx #$0F0B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FixRatio
|
||
&lab ldx #$0E0B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FixRound
|
||
&lab ldx #$130B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Frac2Fix
|
||
&lab ldx #$1D0B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Frac2X
|
||
&lab ldx #$1F0B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FracCos
|
||
&lab ldx #$150B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FracDiv
|
||
&lab ldx #$120B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FracMul
|
||
&lab ldx #$100B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FracSin
|
||
&lab ldx #$160B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FracSqrt
|
||
&lab ldx #$140B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Hex2Int
|
||
&lab ldx #$240B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Hex2Long
|
||
&lab ldx #$250B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _HexIt
|
||
&lab ldx #$2A0B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _HiWord
|
||
&lab ldx #$180B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Int2Dec
|
||
&lab ldx #$260B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Int2Hex
|
||
&lab ldx #$220B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Long2Dec
|
||
&lab ldx #$270B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Long2Fix
|
||
&lab ldx #$1A0B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Long2Hex
|
||
&lab ldx #$230B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LongDivide
|
||
&lab ldx #$0D0B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LongMul
|
||
&lab ldx #$0C0B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LoWord
|
||
&lab ldx #$190B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Multiply
|
||
&lab ldx #$090B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SDivide
|
||
&lab ldx #$0A0B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _UDivide
|
||
&lab ldx #$0B0B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _X2Fix
|
||
&lab ldx #$200B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _X2Frac
|
||
&lab ldx #$210B
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.lineEdit
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _LEBootInit
|
||
&lab ldx #$0114
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEStartUp
|
||
&lab ldx #$0214
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEShutDown
|
||
&lab ldx #$0314
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEVersion
|
||
&lab ldx #$0414
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEReset
|
||
&lab ldx #$0514
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEStatus
|
||
&lab ldx #$0614
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEActivate
|
||
&lab ldx #$0F14
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEClick
|
||
&lab ldx #$0D14
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LECopy
|
||
&lab ldx #$1314
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LECut
|
||
&lab ldx #$1214
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEDeactivate
|
||
&lab ldx #$1014
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEDelete
|
||
&lab ldx #$1514
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEDispose
|
||
&lab ldx #$0A14
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEFromScrap
|
||
&lab ldx #$1914
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEGetScrapLen
|
||
&lab ldx #$1C14
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEGetTextHand
|
||
&lab ldx #$2214
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEGetTextLen
|
||
&lab ldx #$2314
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEIdle
|
||
&lab ldx #$0C14
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEInsert
|
||
&lab ldx #$1614
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEKey
|
||
&lab ldx #$1114
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LENew
|
||
&lab ldx #$0914
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEPaste
|
||
&lab ldx #$1414
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEScrapHandle
|
||
&lab ldx #$1B14
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LESetCaret
|
||
&lab ldx #$1F14
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LESetHilite
|
||
&lab ldx #$1E14
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LESetJust
|
||
&lab ldx #$2114
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LESetScrapLen
|
||
&lab ldx #$1D14
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LESetSelect
|
||
&lab ldx #$0E14
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LESetText
|
||
&lab ldx #$0B14
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LETextBox
|
||
&lab ldx #$1814
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LETextBox2
|
||
&lab ldx #$2014
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEToScrap
|
||
&lab ldx #$1A14
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LEUpdate
|
||
&lab ldx #$1714
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.List
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
|
||
MACRO
|
||
&lab _ListBootInit
|
||
&lab ldx #$011C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ListStartup
|
||
&lab ldx #$021C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ListShutDown
|
||
&lab ldx #$031C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ListVersion
|
||
&lab ldx #$041C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ListReset
|
||
&lab ldx #$051C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ListStatus
|
||
&lab ldx #$061C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CreateList
|
||
&lab ldx #$091C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DrawMember
|
||
&lab ldx #$0C1C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetListDefProc
|
||
&lab ldx #$0E1C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NewList
|
||
&lab ldx #$101C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NextMember
|
||
&lab ldx #$0B1C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ResetMember
|
||
&lab ldx #$0F1C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SelectMember
|
||
&lab ldx #$0D1C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SortList
|
||
&lab ldx #$0A1C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.Loader
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987, 1988
|
||
; All Rights Reserved
|
||
;
|
||
|
||
MACRO
|
||
&lab _LoaderInitialization
|
||
&lab ldx #$0111
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LoaderInit
|
||
&lab ldx #$0111
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LoaderStartUp
|
||
&lab ldx #$0211
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LoaderShutDown
|
||
&lab ldx #$0311
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LoaderVersion
|
||
&lab ldx #$0411
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LoaderReset
|
||
&lab ldx #$0511
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LoaderStatus
|
||
&lab ldx #$0611
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetLoadSegInfo
|
||
&lab ldx #$0F11
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetPathname
|
||
&lab ldx #$1111
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetUserID
|
||
&lab ldx #$1011
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InitialLoad
|
||
&lab ldx #$0911
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LGetPathname
|
||
&lab ldx #$1111
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LoadSegName
|
||
&lab ldx #$0D11
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LoadSegNum
|
||
&lab ldx #$0B11
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Restart
|
||
&lab ldx #$0A11
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _UnloadSeg
|
||
&lab ldx #$0E11
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _UnloadSegNum
|
||
&lab ldx #$0C11
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _UserShutDown
|
||
&lab ldx #$1211
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.Locator
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987, 1988
|
||
; All Rights Reserved
|
||
;
|
||
|
||
MACRO
|
||
&lab _TLBootInit
|
||
&lab ldx #$0101
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TLStartUp
|
||
&lab ldx #$0201
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TLShutDown
|
||
&lab ldx #$0301
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TLVersion
|
||
&lab ldx #$0401
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TLReset
|
||
&lab ldx #$0501
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TLStatus
|
||
&lab ldx #$0601
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetFuncPtr
|
||
&lab ldx #$0B01
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetTSPtr
|
||
&lab ldx #$0901
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetWAP
|
||
&lab ldx #$0C01
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LoadOneTool
|
||
&lab ldx #$0F01
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LoadTools
|
||
&lab ldx #$0E01
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MessageCenter
|
||
&lab ldx #$1501
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _RestoreTextState
|
||
&lab ldx #$1401
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SaveTextState
|
||
&lab ldx #$1301
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetDefaultTPT
|
||
&lab ldx #$1601
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetTSPtr
|
||
&lab ldx #$0A01
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetWAP
|
||
&lab ldx #$0D01
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TLMountVolume
|
||
&lab ldx #$1101
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TLTextMountVolume
|
||
&lab ldx #$1201
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _UnloadOneTool
|
||
&lab ldx #$1001
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.Memory
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987, 1988
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _MMBootInit
|
||
&lab ldx #$0102
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MMStartUp
|
||
&lab ldx #$0202
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MMShutDown
|
||
&lab ldx #$0302
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MMVersion
|
||
&lab ldx #$0402
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MMReset
|
||
&lab ldx #$0502
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MMStatus
|
||
&lab ldx #$0602
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _BlockMove
|
||
&lab ldx #$2B02
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CheckHandle
|
||
&lab ldx #$1E02
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CompactMem
|
||
&lab ldx #$1F02
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DisposeAll
|
||
&lab ldx #$1102
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DisposeHandle
|
||
&lab ldx #$1002
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FindHandle
|
||
&lab ldx #$1A02
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FreeMem
|
||
&lab ldx #$1B02
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetHandleSize
|
||
&lab ldx #$1802
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _HandToHand
|
||
&lab ldx #$2A02
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _HandToPtr
|
||
&lab ldx #$2902
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _HLock
|
||
&lab ldx #$2002
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _HLockAll
|
||
&lab ldx #$2102
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _HUnlock
|
||
&lab ldx #$2202
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _HUnlockAll
|
||
&lab ldx #$2302
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MaxBlock
|
||
&lab ldx #$1C02
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NewHandle
|
||
&lab ldx #$0902
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PtrToHand
|
||
&lab ldx #$2802
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PurgeAll
|
||
&lab ldx #$1302
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PurgeHandle
|
||
&lab ldx #$1202
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _RealFreeMem
|
||
&lab ldx #$2F02
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ReallocHandle
|
||
&lab ldx #$0A02
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _RestoreHandle
|
||
&lab ldx #$0B02
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetHandleSize
|
||
&lab ldx #$1902
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPurge
|
||
&lab ldx #$2402
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPurgeAll
|
||
&lab ldx #$2502
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TotalMem
|
||
&lab ldx #$1D02
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.Menu
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _MenuBootInit
|
||
&lab ldx #$010F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MenuStartUp
|
||
&lab ldx #$020F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MenuShutDown
|
||
&lab ldx #$030F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MenuVersion
|
||
&lab ldx #$040F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MenuReset
|
||
&lab ldx #$050F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MenuStatus
|
||
&lab ldx #$060F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CalcMenuSize
|
||
&lab ldx #$1C0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CheckMItem
|
||
&lab ldx #$320F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CountMItems
|
||
&lab ldx #$140F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DeleteMenu
|
||
&lab ldx #$0E0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DeleteMItem
|
||
&lab ldx #$100F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DisableMItem
|
||
&lab ldx #$310F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DisposeMenu
|
||
&lab ldx #$2E0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DrawMenuBar
|
||
&lab ldx #$2A0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EnableMItem
|
||
&lab ldx #$300F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FixMenuBar
|
||
&lab ldx #$130F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FlashMenuBar
|
||
&lab ldx #$0C0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetBarColors
|
||
&lab ldx #$180F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetMenuBar
|
||
&lab ldx #$0A0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetMenuFlag
|
||
&lab ldx #$200F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetMenuMgrPort
|
||
&lab ldx #$1B0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetMenuTitle
|
||
&lab ldx #$220F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetMHandle
|
||
&lab ldx #$160F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetMItem
|
||
&lab ldx #$250F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetMItemFlag
|
||
&lab ldx #$270F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetMItemMark
|
||
&lab ldx #$340F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetMItemStyle
|
||
&lab ldx #$360F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetMTitleStart
|
||
&lab ldx #$1A0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetMTitleWidth
|
||
&lab ldx #$1E0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetSysBar
|
||
&lab ldx #$110F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _HiliteMenu
|
||
&lab ldx #$2C0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InitPalette
|
||
&lab ldx #$2F0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InsertMenu
|
||
&lab ldx #$0D0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InsertMItem
|
||
&lab ldx #$0F0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MenuGlobal
|
||
&lab ldx #$230F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MenuKey
|
||
&lab ldx #$090F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MenuNewRes
|
||
&lab ldx #$290F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MenuRefresh
|
||
&lab ldx #$0B0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MenuSelect
|
||
&lab ldx #$2B0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NewMenu
|
||
&lab ldx #$2D0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NewMenuBar
|
||
&lab ldx #$150F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetBarColors
|
||
&lab ldx #$170F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMenuBar
|
||
&lab ldx #$390F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMenuFlag
|
||
&lab ldx #$1F0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMenuID
|
||
&lab ldx #$370F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMenuTitle
|
||
&lab ldx #$210F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMItem
|
||
&lab ldx #$240F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMItemBlink
|
||
&lab ldx #$280F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMItemFlag
|
||
&lab ldx #$260F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMItemID
|
||
&lab ldx #$380F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMItemMark
|
||
&lab ldx #$330F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMItemName
|
||
&lab ldx #$3A0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMItemStyle
|
||
&lab ldx #$350F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMTitleStart
|
||
&lab ldx #$190F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMTitleWidth
|
||
&lab ldx #$1D0F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetSysBar
|
||
&lab ldx #$120F
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.Midi
|
||
;
|
||
;
|
||
; Copyright Apple computer, Inc. 1988
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _MidiBootInit
|
||
&lab ldx #$0120
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MidiStartUp
|
||
&lab ldx #$0220
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MidiShutDown
|
||
&lab ldx #$0320
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MidiVersion
|
||
&lab ldx #$0420
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MidiReset
|
||
&lab ldx #$0520
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MidiStatus
|
||
&lab ldx #$0620
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MidiClock
|
||
&lab ldx #$0B20
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MidiControl
|
||
&lab ldx #$0920
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MidiDevice
|
||
&lab ldx #$0A20
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MidiInfo
|
||
&lab ldx #$0C20
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MidiInputPoll
|
||
&lab jsl $E11DD8
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MidiReadPacket
|
||
&lab ldx #$0D20
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MidiWritePacket
|
||
&lab ldx #$0E20
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.MiscTool
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _MTBootInit
|
||
&lab ldx #$0103
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MTStartUp
|
||
&lab ldx #$0203
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MTShutDown
|
||
&lab ldx #$0303
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MTVersion
|
||
&lab ldx #$0403
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MTReset
|
||
&lab ldx #$0503
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MTStatus
|
||
&lab ldx #$0603
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ClampMouse
|
||
&lab ldx #$1C03
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ClearMouse
|
||
&lab ldx #$1B03
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ClrHeartBeat
|
||
&lab ldx #$1403
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DeleteID
|
||
&lab ldx #$2103
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DelHeartBeat
|
||
&lab ldx #$1303
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FWEntry
|
||
&lab ldx #$2403
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetAbsClamp
|
||
&lab ldx #$2B03
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetAddr
|
||
&lab ldx #$1603
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetIRQEnable
|
||
&lab ldx #$2903
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetMouseClamp
|
||
&lab ldx #$1D03
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetNewID
|
||
&lab ldx #$2003
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetTick
|
||
&lab ldx #$2503
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetVector
|
||
&lab ldx #$1103
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _HomeMouse
|
||
&lab ldx #$1A03
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InitMouse
|
||
&lab ldx #$1803
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _IntSource
|
||
&lab ldx #$2303
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Munger
|
||
&lab ldx #$2803
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PackBytes
|
||
&lab ldx #$2603
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PosMouse
|
||
&lab ldx #$1E03
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ReadAsciiTime
|
||
&lab ldx #$0F03
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ReadBParam
|
||
&lab ldx #$0C03
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ReadBRam
|
||
&lab ldx #$0A03
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ReadMouse
|
||
&lab ldx #$1703
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ReadTimeHex
|
||
&lab ldx #$0D03
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ServeMouse
|
||
&lab ldx #$1F03
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetAbsClamp
|
||
&lab ldx #$2A03
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetHeartBeat
|
||
&lab ldx #$1203
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMouse
|
||
&lab ldx #$1903
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetVector
|
||
&lab ldx #$1003
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _StatusID
|
||
&lab ldx #$2203
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SysBeep
|
||
&lab ldx #$2C03
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SysFailMgr
|
||
&lab ldx #$1503
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _UnPackBytes
|
||
&lab ldx #$2703
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WriteBParam
|
||
&lab ldx #$0B03
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WriteBRam
|
||
&lab ldx #$0903
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WriteTimeHex
|
||
&lab ldx #$0E03
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.noteseq
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987, 1988
|
||
; All Rights Reserved
|
||
;
|
||
|
||
MACRO
|
||
&lab _SeqBootInit
|
||
&lab ldx #$011A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SeqStartUp
|
||
&lab ldx #$021A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SeqShutDown
|
||
&lab ldx #$031A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SeqVersion
|
||
&lab ldx #$041A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SeqReset
|
||
&lab ldx #$051A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SeqStatus
|
||
&lab ldx #$061A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ClearIncr
|
||
&lab ldx #$0A1A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetLoc
|
||
&lab ldx #$0C1A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetTimer
|
||
&lab ldx #$0B1A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SeqAllNotesOff
|
||
&lab ldx #$0D1A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetIncr
|
||
&lab ldx #$091A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetInstTable
|
||
&lab ldx #$121A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetTrkInfo
|
||
&lab ldx #$0E1A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _StartInts
|
||
&lab ldx #$131A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _StartSeq
|
||
&lab ldx #$0F1A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _StepSeq
|
||
&lab ldx #$101A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _StopInts
|
||
&lab ldx #$141A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _StopSeq
|
||
&lab ldx #$111A
|
||
jsl $E10000
|
||
MEND
|
||
; File: M16.NoteSyn
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987, 1988
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _NSBootInit
|
||
&lab ldx #$0119
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NSStartUp
|
||
&lab ldx #$0219
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NSShutDown
|
||
&lab ldx #$0319
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NSVersion
|
||
&lab ldx #$0419
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NSReset
|
||
&lab ldx #$0519
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NSStatus
|
||
&lab ldx #$0619
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _AllocGen
|
||
&lab ldx #$0919
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DeallocGen
|
||
&lab ldx #$0A19
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NoteOn
|
||
&lab ldx #$0B19
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NoteOff
|
||
&lab ldx #$0C19
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _AllNotesOff
|
||
&lab ldx #$0D19
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NSSetUpdateRate
|
||
&lab ldx #$0E19
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NSSetUserUpdateRtn
|
||
&lab ldx #$0F19
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.Print
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987, 1988
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _PMBootInit
|
||
&lab ldx #$0113
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PMStartUp
|
||
&lab ldx #$0213
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PMShutDown
|
||
&lab ldx #$0313
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PMVersion
|
||
&lab ldx #$0413
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PMReset
|
||
&lab ldx #$0513
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PMStatus
|
||
&lab ldx #$0613
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LLDBitMap
|
||
&lab ldx #$1C13
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LLDControl
|
||
&lab ldx #$1B13
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LLDShutDown
|
||
&lab ldx #$1A13
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LLDStartUp
|
||
&lab ldx #$1913
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LLDText
|
||
&lab ldx #$1D13
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PMLoadDriver
|
||
&lab ldx #$3513
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PMUnloadDriver
|
||
&lab ldx #$3413
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PMGetPortName
|
||
&lab ldx #$2913
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PrChoosePrinter
|
||
&lab ldx #$1613
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PrChooser
|
||
&lab ldx #$1613
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PrCloseDoc
|
||
&lab ldx #$0F13
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PrClosePage
|
||
&lab ldx #$1113
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PrDefault
|
||
&lab ldx #$0913
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PrDriverVer
|
||
&lab ldx #$2313
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PrError
|
||
&lab ldx #$1413
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PrJobDialog
|
||
&lab ldx #$0C13
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PrOpenDoc
|
||
&lab ldx #$0E13
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PrOpenPage
|
||
&lab ldx #$1013
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PrPicFile
|
||
&lab ldx #$1213
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PrPixelMap
|
||
&lab ldx #$0D13
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PrPortVer
|
||
&lab ldx #$2413
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PrSetError
|
||
&lab ldx #$1513
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PrStlDialog
|
||
&lab ldx #$0B13
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PrValidate
|
||
&lab ldx #$0A13
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.ProDos
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987, 1988
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
|
||
|
||
MACRO
|
||
&lab _CREATE ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W 1
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DESTROY ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W 2
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CHANGE_PATH ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W 4
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SET_FILE_INFO ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W 5
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GET_FILE_INFO ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W 6
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _VOLUME ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W 8
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SET_PREFIX ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W 9
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GET_PREFIX ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $0A
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CLEAR_BACKUP_BIT ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $0B
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _OPEN ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $10
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NEWLINE ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $11
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _READ ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $12
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WRITE ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $13
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CLOSE ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $14
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FLUSH ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $15
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SET_MARK ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $16
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GET_MARK ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $17
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SET_EOF ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $18
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GET_EOF ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $19
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SET_LEVEL ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $1A
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GET_LEVEL ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $1B
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GET_DIR_ENTRY ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $1C
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GET_DEV_NUM ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $20
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GET_LAST_DEV ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $21
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _READ_BLOCK ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $22
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WRITE_BLOCK ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $23
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FORMAT ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $24
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ERASE_DISK ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $25
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GET_NAME ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $27
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GET_PATH_NAME ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $27
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GET_BOOT_VOL ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $28
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _QUIT ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $29
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GET_VERSION ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $2A
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _D_INFO ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $2C
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ALLOC_INTERRUPT ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $31
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DEALLOC_INTERRUPT ¶ms
|
||
&lab jsl $E100A8
|
||
DC.W $32
|
||
DC.L ¶ms
|
||
MEND
|
||
|
||
|
||
; File: M16.QDAux
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987, 1988
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _QDAuxBootInit
|
||
&lab ldx #$0112
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _QDAuxStartUp
|
||
&lab ldx #$0212
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _QDAuxShutDown
|
||
&lab ldx #$0312
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _QDAuxVersion
|
||
&lab ldx #$0412
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _QDAuxReset
|
||
&lab ldx #$0512
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _QDAuxStatus
|
||
&lab ldx #$0612
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CopyPixels
|
||
&lab ldx #$0912
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DrawIcon
|
||
&lab ldx #$0B12
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SpecialRect
|
||
&lab ldx #$0C12
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WaitCursor
|
||
&lab ldx #$0A12
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.QuickDraw
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _QDBootInit
|
||
&lab ldx #$0104
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _QDStartUp
|
||
&lab ldx #$0204
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _QDShutDown
|
||
&lab ldx #$0304
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _QDVersion
|
||
&lab ldx #$0404
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _QDReset
|
||
&lab ldx #$0504
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _QDStatus
|
||
&lab ldx #$0604
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _AddPt
|
||
&lab ldx #$8004
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CharBounds
|
||
&lab ldx #$AC04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CharWidth
|
||
&lab ldx #$A804
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ClearScreen
|
||
&lab ldx #$1504
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ClipRect
|
||
&lab ldx #$2604
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ClosePicture
|
||
&lab ldx #$B904
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ClosePoly
|
||
&lab ldx #$C204
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ClosePort
|
||
&lab ldx #$1A04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CloseRgn
|
||
&lab ldx #$6E04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CopyRgn
|
||
&lab ldx #$6904
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CStringBounds
|
||
&lab ldx #$AE04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CStringWidth
|
||
&lab ldx #$AA04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DiffRgn
|
||
&lab ldx #$7304
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DisposeRgn
|
||
&lab ldx #$6804
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DrawChar
|
||
&lab ldx #$A404
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DrawCString
|
||
&lab ldx #$A604
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DrawPicture
|
||
&lab ldx #$BA04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DrawString
|
||
&lab ldx #$A504
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DrawText
|
||
&lab ldx #$A704
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EmptyRect
|
||
&lab ldx #$5204
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EmptyRgn
|
||
&lab ldx #$7804
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EqualPt
|
||
&lab ldx #$8304
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EqualRect
|
||
&lab ldx #$5104
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EqualRgn
|
||
&lab ldx #$7704
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EraseArc
|
||
&lab ldx #$6404
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EraseOval
|
||
&lab ldx #$5A04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ErasePoly
|
||
&lab ldx #$BE04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EraseRect
|
||
&lab ldx #$5504
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EraseRgn
|
||
&lab ldx #$7B04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EraseRRect
|
||
&lab ldx #$5F04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FillArc
|
||
&lab ldx #$6604
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FillOval
|
||
&lab ldx #$5C04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FillPoly
|
||
&lab ldx #$C004
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FillRect
|
||
&lab ldx #$5704
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FillRgn
|
||
&lab ldx #$7D04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FillRRect
|
||
&lab ldx #$6104
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ForceBufDims
|
||
&lab ldx #$CC04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FrameArc
|
||
&lab ldx #$6204
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FrameOval
|
||
&lab ldx #$5804
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FramePoly
|
||
&lab ldx #$BC04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FrameRect
|
||
&lab ldx #$5304
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FrameRgn
|
||
&lab ldx #$7904
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FrameRRect
|
||
&lab ldx #$5D04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetAddress
|
||
&lab ldx #$0904
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetArcRot
|
||
&lab ldx #$B104
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetBackColor
|
||
&lab ldx #$A304
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetBackPat
|
||
&lab ldx #$3504
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetCharExtra
|
||
&lab ldx #$D504
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetClip
|
||
&lab ldx #$2504
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetClipHandle
|
||
&lab ldx #$C704
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetColorEntry
|
||
&lab ldx #$1104
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetColorTable
|
||
&lab ldx #$0F04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetCursorAdr
|
||
&lab ldx #$8F04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetFGSize
|
||
&lab ldx #$CF04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetFont
|
||
&lab ldx #$9504
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetFontFlags
|
||
&lab ldx #$9904
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetFontGlobals
|
||
&lab ldx #$9704
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetFontID
|
||
&lab ldx #$D104
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetFontInfo
|
||
&lab ldx #$9604
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetFontLore
|
||
&lab ldx #$D904
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetForeColor
|
||
&lab ldx #$A104
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetGrafProcs
|
||
&lab ldx #$4504
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetMasterSCB
|
||
&lab ldx #$1704
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetPen
|
||
&lab ldx #$2904
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetPenMask
|
||
&lab ldx #$3304
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetPenMode
|
||
&lab ldx #$2F04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetPenPat
|
||
&lab ldx #$3104
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetPenSize
|
||
&lab ldx #$2D04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetPenState
|
||
&lab ldx #$2B04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetPicSave
|
||
&lab ldx #$3F04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetPixel
|
||
&lab ldx #$8804
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetPolySave
|
||
&lab ldx #$4304
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetPort
|
||
&lab ldx #$1C04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetPortLoc
|
||
&lab ldx #$1E04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetPortRect
|
||
&lab ldx #$2004
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetRgnSave
|
||
&lab ldx #$4104
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetROMFont
|
||
&lab ldx #$D804
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetSCB
|
||
&lab ldx #$1304
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetSpaceExtra
|
||
&lab ldx #$9F04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetStandardSCB
|
||
&lab ldx #$0C04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetSysField
|
||
&lab ldx #$4904
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetSysFont
|
||
&lab ldx #$B304
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetTextFace
|
||
&lab ldx #$9B04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetTextMode
|
||
&lab ldx #$9D04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetTextSize
|
||
&lab ldx #$D304
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetUserField
|
||
&lab ldx #$4704
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetVisHandle
|
||
&lab ldx #$C904
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetVisRgn
|
||
&lab ldx #$B504
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GlobalToLocal
|
||
&lab ldx #$8504
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GrafOff
|
||
&lab ldx #$0B04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GrafOn
|
||
&lab ldx #$0A04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _HideCursor
|
||
&lab ldx #$9004
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _HidePen
|
||
&lab ldx #$2704
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InflateTextBuffer
|
||
&lab ldx #$D704
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InitColorTable
|
||
&lab ldx #$0D04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InitCursor
|
||
&lab ldx #$CA04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InitPort
|
||
&lab ldx #$1904
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InsetRect
|
||
&lab ldx #$4C04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InsetRgn
|
||
&lab ldx #$7004
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InvertArc
|
||
&lab ldx #$6504
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InvertOval
|
||
&lab ldx #$5B04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InvertPoly
|
||
&lab ldx #$BF04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InvertRect
|
||
&lab ldx #$5604
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InvertRgn
|
||
&lab ldx #$7C04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InvertRRect
|
||
&lab ldx #$6004
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _KillPicture
|
||
&lab ldx #$BB04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _KillPoly
|
||
&lab ldx #$C304
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Line
|
||
&lab ldx #$3D04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LineTo
|
||
&lab ldx #$3C04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LocalToGlobal
|
||
&lab ldx #$8404
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MapPoly
|
||
&lab ldx #$C504
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MapPt
|
||
&lab ldx #$8A04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MapRect
|
||
&lab ldx #$8B04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MapRgn
|
||
&lab ldx #$8C04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Move
|
||
&lab ldx #$3B04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MovePortTo
|
||
&lab ldx #$2204
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MoveTo
|
||
&lab ldx #$3A04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NewRgn
|
||
&lab ldx #$6704
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NotEmptyRect
|
||
&lab ldx #$5204
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ObscureCursor
|
||
&lab ldx #$9204
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _OffsetPoly
|
||
&lab ldx #$C404
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _OffsetRect
|
||
&lab ldx #$4B04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _OffsetRgn
|
||
&lab ldx #$6F04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _OpenPicture
|
||
&lab ldx #$B704
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _OpenPoly
|
||
&lab ldx #$C104
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _OpenPort
|
||
&lab ldx #$1804
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _OpenRgn
|
||
&lab ldx #$6D04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PaintArc
|
||
&lab ldx #$6304
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PaintOval
|
||
&lab ldx #$5904
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PaintPixels
|
||
&lab ldx #$7F04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PaintPoly
|
||
&lab ldx #$BD04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PaintRect
|
||
&lab ldx #$5404
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PaintRgn
|
||
&lab ldx #$7A04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PaintRRect
|
||
&lab ldx #$5E04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PenNormal
|
||
&lab ldx #$3604
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PicComment
|
||
&lab ldx #$B804
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PPToPort
|
||
&lab ldx #$D604
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Pt2Rect
|
||
&lab ldx #$5004
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PtInRect
|
||
&lab ldx #$4F04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PtInRgn
|
||
&lab ldx #$7504
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Random
|
||
&lab ldx #$8604
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _RectInRgn
|
||
&lab ldx #$7604
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _RectRgn
|
||
&lab ldx #$6C04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _RestoreBufDims
|
||
&lab ldx #$CE04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SaveBufDims
|
||
&lab ldx #$CD04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ScalePt
|
||
&lab ldx #$8904
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ScrollRect
|
||
&lab ldx #$7E04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SectRect
|
||
&lab ldx #$4D04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SectRgn
|
||
&lab ldx #$7104
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetAllSCBs
|
||
&lab ldx #$1404
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetArcRot
|
||
&lab ldx #$B004
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetBackColor
|
||
&lab ldx #$A204
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetBackPat
|
||
&lab ldx #$3404
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetBufDims
|
||
&lab ldx #$CB04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetCharExtra
|
||
&lab ldx #$D404
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetClip
|
||
&lab ldx #$2404
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetClipHandle
|
||
&lab ldx #$C604
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetColorEntry
|
||
&lab ldx #$1004
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetColorTable
|
||
&lab ldx #$0E04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetCursor
|
||
&lab ldx #$8E04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetEmptyRgn
|
||
&lab ldx #$6A04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetFont
|
||
&lab ldx #$9404
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetFontFlags
|
||
&lab ldx #$9804
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetFontID
|
||
&lab ldx #$D004
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetForeColor
|
||
&lab ldx #$A004
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetGrafProcs
|
||
&lab ldx #$4404
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetIntUse
|
||
&lab ldx #$B604
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMasterSCB
|
||
&lab ldx #$1604
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetOrigin
|
||
&lab ldx #$2304
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPenMask
|
||
&lab ldx #$3204
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPenMode
|
||
&lab ldx #$2E04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPenPat
|
||
&lab ldx #$3004
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPenSize
|
||
&lab ldx #$2C04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPenState
|
||
&lab ldx #$2A04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPicSave
|
||
&lab ldx #$3E04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPolySave
|
||
&lab ldx #$4204
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPort
|
||
&lab ldx #$1B04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPortLoc
|
||
&lab ldx #$1D04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPortRect
|
||
&lab ldx #$1F04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPortSize
|
||
&lab ldx #$2104
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPt
|
||
&lab ldx #$8204
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetRandSeed
|
||
&lab ldx #$8704
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetRect
|
||
&lab ldx #$4A04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetRectRgn
|
||
&lab ldx #$6B04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetRgnSave
|
||
&lab ldx #$4004
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetSCB
|
||
&lab ldx #$1204
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetSolidBackPat
|
||
&lab ldx #$3804
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetSolidPenPat
|
||
&lab ldx #$3704
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetSpaceExtra
|
||
&lab ldx #$9E04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetStdProcs
|
||
&lab ldx #$8D04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetSysField
|
||
&lab ldx #$4804
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetSysFont
|
||
&lab ldx #$B204
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetTextFace
|
||
&lab ldx #$9A04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetTextMode
|
||
&lab ldx #$9C04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetTextSize
|
||
&lab ldx #$D204
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetUserField
|
||
&lab ldx #$4604
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetVisHandle
|
||
&lab ldx #$C804
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetVisRgn
|
||
&lab ldx #$B404
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ShowCursor
|
||
&lab ldx #$9104
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ShowPen
|
||
&lab ldx #$2804
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SolidPattern
|
||
&lab ldx #$3904
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _StringBounds
|
||
&lab ldx #$AD04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _StringWidth
|
||
&lab ldx #$A904
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SubPt
|
||
&lab ldx #$8104
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TextBounds
|
||
&lab ldx #$AF04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TextWidth
|
||
&lab ldx #$AB04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _UnionRect
|
||
&lab ldx #$4E04
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _UnionRgn
|
||
&lab ldx #$7204
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _XorRgn
|
||
&lab ldx #$7404
|
||
jsl $E10000
|
||
MEND
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
;-----------------------------------------------------------
|
||
; FILE: M16.SANE
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
;
|
||
; These macros give assembly language access to 65816 SANE.
|
||
; NOTE: To use these macros you must also include E16.SANE in your
|
||
; source file.
|
||
;-----------------------------------------------------------
|
||
; Operation macros: operands should already be on the stack,
|
||
; with the destination address on top. Generally the suffix
|
||
; X, D, S, C, I, or L determines the format of the source
|
||
; operand - extended, double, single, comp, integer or longint.
|
||
;-----------------------------------------------------------
|
||
;
|
||
;-----------------------------------------------------------
|
||
; Toolset macros.
|
||
;-----------------------------------------------------------
|
||
;
|
||
MACRO
|
||
&lab _SANEBootInit
|
||
&lab ldx #$010A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SANEStartup
|
||
&lab ldx #$020A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SANEShutDown
|
||
&lab ldx #$030A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SANEVersion
|
||
&lab ldx #$040A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SANEReset
|
||
&lab ldx #$050A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SANEStatus
|
||
&lab ldx #$060A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SANEFP816
|
||
&lab ldx #$090A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SANEDecStr816
|
||
&lab ldx #$0A0A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SANEElems816
|
||
&lab ldx #$0B0A
|
||
jsl $E10000
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Addition.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FADDX
|
||
&lab FOPRF FFEXT+FOADD
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FADDD
|
||
&lab FOPRF FFDBL+FOADD
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FADDS
|
||
&lab FOPRF FFSGL+FOADD
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FADDC
|
||
&lab FOPRF FFCOMP+FOADD
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FADDI
|
||
&lab FOPRF FFINT+FOADD
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FADDL
|
||
&lab FOPRF FFLNG+FOADD
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Subtraction.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FSUBX
|
||
&lab FOPRF FFEXT+FOSUB
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FSUBD
|
||
&lab FOPRF FFDBL+FOSUB
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FSUBS
|
||
&lab FOPRF FFSGL+FOSUB
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FSUBC
|
||
&lab FOPRF FFCOMP+FOSUB
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FSUBI
|
||
&lab FOPRF FFINT+FOSUB
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FSUBL
|
||
&lab FOPRF FFLNG+FOSUB
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Multiplication.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FMULX
|
||
&lab FOPRF FFEXT+FOMUL
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FMULD
|
||
&lab FOPRF FFDBL+FOMUL
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FMULS
|
||
&lab FOPRF FFSGL+FOMUL
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FMULC
|
||
&lab FOPRF FFCOMP+FOMUL
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FMULI
|
||
&lab FOPRF FFINT+FOMUL
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FMULL
|
||
&lab FOPRF FFLNG+FOMUL
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Division.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FDIVX
|
||
&lab FOPRF FFEXT+FODIV
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FDIVD
|
||
&lab FOPRF FFDBL+FODIV
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FDIVS
|
||
&lab FOPRF FFSGL+FODIV
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FDIVC
|
||
&lab FOPRF FFCOMP+FODIV
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FDIVI
|
||
&lab FOPRF FFINT+FODIV
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FDIVL
|
||
&lab FOPRF FFLNG+FODIV
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Square root.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FSQRTX
|
||
&lab FOPRF FOSQRT
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Round to integer, according to the current rounding mode.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FRINTX
|
||
&lab FOPRF FORTI
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Truncate to integer, using round toward zero.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FTINTX
|
||
&lab FOPRF FOTTI
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Remainder.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FREMX
|
||
&lab FOPRF FFEXT+FOREM
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FREMD
|
||
&lab FOPRF FFDBL+FOREM
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FREMS
|
||
&lab FOPRF FFSGL+FOREM
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FREMC
|
||
&lab FOPRF FFCOMP+FOREM
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FREMI
|
||
&lab FOPRF FFINT+FOREM
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FREML
|
||
&lab FOPRF FFLNG+FOREM
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Logb.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FLOGBX
|
||
&lab FOPRF FOLOGB
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Scalb.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FSCALBX
|
||
&lab FOPRF FOSCALB
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Copy-sign.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FCPYSGNX
|
||
&lab FOPRF FFEXT+FOCPYSGN
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCPYSGND
|
||
&lab FOPRF FFDBL+FOCPYSGN
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCPYSGNS
|
||
&lab FOPRF FFSGL+FOCPYSGN
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCPYSGNC
|
||
&lab FOPRF FFCOMP+FOCPYSGN
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCPYSGNI
|
||
&lab FOPRF FFINT+FOCPYSGN
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCPYSGNL
|
||
&lab FOPRF FFLNG+FOCPYSGN
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Negate.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FNEGX
|
||
&lab FOPRF FONEG
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Absolute value.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FABSX
|
||
&lab FOPRF FOABS
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Next-after. NOTE: both operands are of the
|
||
; the same format, as specified by the usual suffix.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FNEXTS
|
||
&lab FOPRF FFSGL+FONEXT
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FNEXTD
|
||
&lab FOPRF FFDBL+FONEXT
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FNEXTX
|
||
&lab FOPRF FFEXT+FONEXT
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Conversion to extended.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FX2X
|
||
&lab FOPRF FFEXT+FOZ2X
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FD2X
|
||
&lab FOPRF FFDBL+FOZ2X
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FS2X
|
||
&lab FOPRF FFSGL+FOZ2X
|
||
MEND
|
||
|
||
MACRO ; 16-bit integer, by address
|
||
&lab FI2X
|
||
&lab FOPRF FFINT+FOZ2X
|
||
MEND
|
||
|
||
MACRO ; 32-bit integer, by address
|
||
&lab FL2X
|
||
&lab FOPRF FFLNG+FOZ2X
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FC2X
|
||
&lab FOPRF FFCOMP+FOZ2X
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Conversion from extended.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FX2D
|
||
&lab FOPRF FFDBL+FOX2Z
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FX2S
|
||
&lab FOPRF FFSGL+FOX2Z
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FX2I
|
||
&lab FOPRF FFINT+FOX2Z
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FX2L
|
||
&lab FOPRF FFLNG+FOX2Z
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FX2C
|
||
&lab FOPRF FFCOMP+FOX2Z
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Binary to decimal conversion.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FX2DEC
|
||
&lab FOPRF FFEXT+FOB2D
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FD2DEC
|
||
&lab FOPRF FFDBL+FOB2D
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FS2DEC
|
||
&lab FOPRF FFSGL+FOB2D
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FC2DEC
|
||
&lab FOPRF FFCOMP+FOB2D
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FI2DEC
|
||
&lab FOPRF FFINT+FOB2D
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FL2DEC
|
||
&lab FOPRF FFLNG+FOB2D
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Decimal to binary conversion.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FDEC2X
|
||
&lab FOPRF FFEXT+FOD2B
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FDEC2D
|
||
&lab FOPRF FFDBL+FOD2B
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FDEC2S
|
||
&lab FOPRF FFSGL+FOD2B
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FDEC2C
|
||
&lab FOPRF FFCOMP+FOD2B
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FDEC2I
|
||
&lab FOPRF FFINT+FOD2B
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FDEC2L
|
||
&lab FOPRF FFLNG+FOD2B
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Compare, not signaling invalid on unordered.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FCMPX
|
||
&lab FOPRF FFEXT+FOCMP
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCMPD
|
||
&lab FOPRF FFDBL+FOCMP
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCMPS
|
||
&lab FOPRF FFSGL+FOCMP
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCMPC
|
||
&lab FOPRF FFCOMP+FOCMP
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCMPI
|
||
&lab FOPRF FFINT+FOCMP
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCMPL
|
||
&lab FOPRF FFLNG+FOCMP
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Compare, signaling invalid on unordered.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FCPXX
|
||
&lab FOPRF FFEXT+FOCPX
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCPXD
|
||
&lab FOPRF FFDBL+FOCPX
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCPXS
|
||
&lab FOPRF FFSGL+FOCPX
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCPXC
|
||
&lab FOPRF FFCOMP+FOCPX
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCPXI
|
||
&lab FOPRF FFINT+FOCPX
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCPXL
|
||
&lab FOPRF FFLNG+FOCPX
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; The following macros define a set of so-called floating
|
||
; branches. They presume that the appropriate compare
|
||
; operation, macro FCMPz or FCPXz, precedes.
|
||
;----------------------------------------------------------
|
||
MACRO ; branch equal
|
||
&lab FBEQ &N1
|
||
&lab BEQ &N1
|
||
MEND
|
||
|
||
MACRO ; branch less
|
||
&lab FBLT &N1
|
||
&lab BMI &N1
|
||
MEND
|
||
|
||
MACRO ; branch less or equal
|
||
&lab FBLE &N1
|
||
&lab BMI &N1
|
||
BEQ &N1
|
||
MEND
|
||
|
||
MACRO ; branch greater
|
||
&lab FBGT &N1
|
||
&lab BVS &N1
|
||
MEND
|
||
|
||
MACRO ; branch greater or equal
|
||
&lab FBGE &N1
|
||
&lab BVS &N1
|
||
BEQ &N1
|
||
MEND
|
||
|
||
MACRO ; branch less or unordered
|
||
&lab FBULT &N1
|
||
&lab BMI &N1
|
||
BVS *+4
|
||
BNE &N1
|
||
MEND
|
||
|
||
MACRO ; branch unordered, less, or equal
|
||
&lab FBULE &N1
|
||
&lab BMI &N1
|
||
BEQ &N1
|
||
BVC &N1
|
||
MEND
|
||
|
||
MACRO ; branch unordered or greater
|
||
&lab FBUGT &N1
|
||
&lab BVS &N1
|
||
BMI *+4
|
||
BNE &N1
|
||
MEND
|
||
|
||
MACRO ; branch unordered, greater, or equal
|
||
&lab FBUGE &N1
|
||
&lab BVS &N1
|
||
BEQ &N1
|
||
BPL &N1
|
||
MEND
|
||
|
||
MACRO ; branch unordered
|
||
&lab FBU &N1
|
||
&lab BVS *+6
|
||
BMI *+4
|
||
BNE &N1
|
||
MEND
|
||
|
||
MACRO ; branch ordered
|
||
&lab FBO &N1
|
||
&lab BMI &N1
|
||
BVS &N1
|
||
BEQ &N1
|
||
MEND
|
||
|
||
MACRO ; branch not equal
|
||
&lab FBNE &N1
|
||
&lab BMI &N1
|
||
BVS &N1
|
||
BNE &N1
|
||
MEND
|
||
|
||
MACRO ; branch unordered or equal
|
||
&lab FBUE &N1
|
||
&lab BEQ &N1
|
||
BMI *+4
|
||
BVC &N1
|
||
MEND
|
||
|
||
MACRO ; branch less or greater
|
||
&lab FBLG &N1
|
||
&lab BMI &N1
|
||
BVS &N1
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCLASSS
|
||
&lab FOPRF FFSGL+FOCLASS
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCLASSD
|
||
&lab FOPRF FFDBL+FOCLASS
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCLASSX
|
||
&lab FOPRF FFEXT+FOCLASS
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCLASSC
|
||
&lab FOPRF FFCOMP+FOCLASS
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCLASSI
|
||
&lab FOPRF FFINT+FOCLASS
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FCLASSL
|
||
&lab FOPRF FFLNG+FOCLASS
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; The following macros provide branches based on the
|
||
; the result of a FCLASSz macro.
|
||
;-----------------------------------------------------------
|
||
MACRO ; branch signaling NaN
|
||
&lab FBSNAN &N1
|
||
&lab TXA
|
||
ASL A
|
||
CMP #2*FCSNAN
|
||
BEQ &N1
|
||
MEND
|
||
|
||
MACRO ; branch quiet NaN
|
||
&lab FBQNAN &N1
|
||
&lab TXA
|
||
ASL A
|
||
CMP #2*FCQNAN
|
||
BEQ &N1
|
||
MEND
|
||
|
||
MACRO ; branch infinite
|
||
&lab FBINF &N1
|
||
&lab TXA
|
||
ASL A
|
||
CMP #2*FCINF
|
||
BEQ &N1
|
||
MEND
|
||
|
||
MACRO ; branch zero
|
||
&lab FBZERO &N1
|
||
&lab TXA
|
||
ASL A
|
||
CMP #2*FCZERO
|
||
BEQ &N1
|
||
MEND
|
||
|
||
MACRO ; branch normal
|
||
&lab FBNORM &N1
|
||
&lab TXA
|
||
ASL A
|
||
BEQ &N1
|
||
MEND
|
||
|
||
MACRO ; branch denormal
|
||
&lab FBDENORM &N1
|
||
&lab TXA
|
||
ASL A
|
||
CMP #2*FCDENORM
|
||
BEQ &N1
|
||
MEND
|
||
|
||
MACRO ; branch non-zero num (norm or denorm)
|
||
&lab FBNZENUM &N1
|
||
&lab TXA
|
||
XBA
|
||
ASL A
|
||
BCC &N1
|
||
MEND
|
||
|
||
MACRO ; branch number (zero, norm, or denorm)
|
||
&lab FBNUM &N1
|
||
&lab TXA
|
||
INC A
|
||
XBA
|
||
ASL A
|
||
BCC &N1
|
||
MEND
|
||
|
||
MACRO ; branch minus sign
|
||
&lab FBMINUS &N1
|
||
&lab BMI &N1
|
||
MEND
|
||
|
||
MACRO ; branch plus sign
|
||
&lab FBPLUS &N1
|
||
&lab BPL &N1
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Get and set environment.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FGETENV
|
||
&lab FOPRF FOGETENV
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FSETENV
|
||
&lab FOPRF FOSETENV
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Test and set exception.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FTESTXCP
|
||
&lab FOPRF FOTESTXCP
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FSETXCP
|
||
&lab FOPRF FOSETXCP
|
||
MEND
|
||
|
||
;----------------------------------------------------------
|
||
; Procedure entry and exit.
|
||
;----------------------------------------------------------
|
||
MACRO
|
||
&lab FPROCENTRY
|
||
&lab FOPRF FOPROCENTRY
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FPROCEXIT
|
||
&lab FOPRF FOPROCEXIT
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Get and set halt vector.
|
||
;-----------------------------------------------------------
|
||
MACRO
|
||
&lab FGETHV
|
||
&lab FOPRF FOGETHV
|
||
MEND
|
||
|
||
MACRO
|
||
&lab FSETHV
|
||
&lab FOPRF FOSETHV
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Elementary function macros.
|
||
;-----------------------------------------------------------
|
||
MACRO ; natural (base-e) log
|
||
&lab FLNX
|
||
&lab FOPRE FOLNX
|
||
MEND
|
||
|
||
MACRO ; base-2 log
|
||
&lab FLOG2X
|
||
&lab FOPRE FOLOG2X
|
||
MEND
|
||
|
||
MACRO ; ln (1 + x)
|
||
&lab FLN1X
|
||
&lab FOPRE FOLN1X
|
||
MEND
|
||
|
||
MACRO ; log2 (1 + x)
|
||
&lab FLOG21X
|
||
&lab FOPRE FOLOG21X
|
||
MEND
|
||
|
||
MACRO ; base-e exponential
|
||
&lab FEXPX
|
||
&lab FOPRE FOEXPX
|
||
MEND
|
||
|
||
MACRO ; base-2 exponential
|
||
&lab FEXP2X
|
||
&lab FOPRE FOEXP2X
|
||
MEND
|
||
|
||
MACRO ; exp (x) - 1
|
||
&lab FEXP1X
|
||
&lab FOPRE FOEXP1X
|
||
MEND
|
||
|
||
MACRO ; exp2 (x) - 1
|
||
&lab FEXP21X
|
||
&lab FOPRE FOEXP21X
|
||
MEND
|
||
|
||
MACRO ; integer exponential
|
||
&lab FXPWRI
|
||
&lab FOPRE FOXPWRI
|
||
MEND
|
||
|
||
MACRO ; general exponential
|
||
&lab FXPWRY
|
||
&lab FOPRE FOXPWRY
|
||
MEND
|
||
|
||
MACRO ; compound
|
||
&lab FCOMPOUND
|
||
&lab FOPRE FOCOMPOUND
|
||
MEND
|
||
|
||
MACRO ; annuity
|
||
&lab FANNUITY
|
||
&lab FOPRE FOANNUITY
|
||
MEND
|
||
|
||
MACRO ; arctangent
|
||
&lab FATANX
|
||
&lab FOPRE FOATANX
|
||
MEND
|
||
|
||
MACRO ; sine
|
||
&lab FSINX
|
||
&lab FOPRE FOSINX
|
||
MEND
|
||
|
||
MACRO ; cosine
|
||
&lab FCOSX
|
||
&lab FOPRE FOCOSX
|
||
MEND
|
||
|
||
MACRO ; tangent
|
||
&lab FTANX
|
||
&lab FOPRE FOTANX
|
||
MEND
|
||
|
||
MACRO ; random number generator
|
||
&lab FRANDX
|
||
&lab FOPRE FORANDX
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Scanner and formatter function macros.
|
||
;-----------------------------------------------------------
|
||
MACRO ; Pascal string to decimal record
|
||
&lab FPSTR2DEC
|
||
&lab FOPRD FOPSTR2DEC
|
||
MEND
|
||
|
||
MACRO ; C string to decimal record
|
||
&lab FCSTR2DEC
|
||
&lab FOPRD FOCSTR2DEC
|
||
MEND
|
||
|
||
MACRO ; decimal record to (Pascal) string
|
||
&lab FDEC2STR
|
||
&lab FOPRD FODEC2STR
|
||
MEND
|
||
|
||
;-----------------------------------------------------------
|
||
; Auxiliary macros.
|
||
;-----------------------------------------------------------
|
||
MACRO ; call FP
|
||
&lab FOPRF &N1
|
||
&lab PEA &N1
|
||
LDX #SANEtsNum+256*FPNum
|
||
JSL $E10000
|
||
MEND
|
||
|
||
MACRO ; call DecStr
|
||
&lab FOPRD &N1
|
||
&lab PEA &N1
|
||
LDX #SANEtsNum+256*DecStrNum
|
||
JSL $E10000
|
||
MEND
|
||
|
||
MACRO ; call Elems
|
||
&lab FOPRE &N1
|
||
&lab PEA &N1
|
||
LDX #SANEtsNum+256*ElemNum
|
||
JSL $E10000
|
||
MEND
|
||
; File: M16.Scheduler
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _SchBootInit
|
||
&lab ldx #$0107
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SchStartUp
|
||
&lab ldx #$0207
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SchShutDown
|
||
&lab ldx #$0307
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SchVersion
|
||
&lab ldx #$0407
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SchReset
|
||
&lab ldx #$0507
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SchStatus
|
||
&lab ldx #$0607
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SchAddTask
|
||
&lab ldx #$0907
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SchFlush
|
||
&lab ldx #$0A07
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.Scrap
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _ScrapBootInit
|
||
&lab ldx #$0116
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ScrapStartUp
|
||
&lab ldx #$0216
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ScrapShutDown
|
||
&lab ldx #$0316
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ScrapVersion
|
||
&lab ldx #$0416
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ScrapReset
|
||
&lab ldx #$0516
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ScrapStatus
|
||
&lab ldx #$0616
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetScrap
|
||
&lab ldx #$0D16
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetScrapCount
|
||
&lab ldx #$1216
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetScrapHandle
|
||
&lab ldx #$0E16
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetScrapPath
|
||
&lab ldx #$1016
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetScrapSize
|
||
&lab ldx #$0F16
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetScrapState
|
||
&lab ldx #$1316
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _LoadScrap
|
||
&lab ldx #$0A16
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PutScrap
|
||
&lab ldx #$0C16
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetScrapPath
|
||
&lab ldx #$1116
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _UnloadScrap
|
||
&lab ldx #$0916
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ZeroScrap
|
||
&lab ldx #$0B16
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.Sound
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _SoundBootInit
|
||
&lab ldx #$0108
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SoundStartUp
|
||
&lab ldx #$0208
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SoundShutDown
|
||
&lab ldx #$0308
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SoundVersion
|
||
&lab ldx #$0408
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SoundReset
|
||
&lab ldx #$0508
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SoundToolStatus
|
||
&lab ldx #$0608
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FFGeneratorStatus
|
||
&lab ldx #$1108
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FFSoundDoneStatus
|
||
&lab ldx #$1408
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FFSoundStatus
|
||
&lab ldx #$1008
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FFStartSound
|
||
&lab ldx #$0E08
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FFStopSound
|
||
&lab ldx #$0F08
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetSoundVolume
|
||
&lab ldx #$0C08
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetTableAddress
|
||
&lab ldx #$0B08
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ReadRamBlock
|
||
&lab ldx #$0A08
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetSoundMIRQV
|
||
&lab ldx #$1208
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetSoundVolume
|
||
&lab ldx #$0D08
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetUserSoundIRQV
|
||
&lab ldx #$1308
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WriteRamBlock
|
||
&lab ldx #$0908
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.StdFile
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _SFBootInit
|
||
&lab ldx #$0117
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SFStartUp
|
||
&lab ldx #$0217
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SFShutDown
|
||
&lab ldx #$0317
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SFVersion
|
||
&lab ldx #$0417
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SFReset
|
||
&lab ldx #$0517
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SFStatus
|
||
&lab ldx #$0617
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SFAllCaps
|
||
&lab ldx #$0D17
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SFGetFile
|
||
&lab ldx #$0917
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SFPGetFile
|
||
&lab ldx #$0B17
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SFPPutFile
|
||
&lab ldx #$0C17
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SFPutFile
|
||
&lab ldx #$0A17
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.SysCalls
|
||
;
|
||
;
|
||
; Copyright Apple computer, Inc. 1988
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
|
||
|
||
MACRO
|
||
&lab _AllocInterrupt_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0031"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _BindIntGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2031"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ChangePath_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0004"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ChangePathGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2004"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ClearBackupBit_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$000B"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ClearBackupBitGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$200B"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Close_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0014"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CloseGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2014"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Create_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0001"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CreateGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2001"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DControlGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$202E"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DeallocInterrupt_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0032"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Destroy_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0002"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DestroyGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2002"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DInfo_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$002C"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DInfoGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$202C"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DReadGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$202F"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DStatusGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$202D"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DWriteGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2030"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EraseDisk_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0025"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EraseDiskGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2025"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ExpandPathGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$200E"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Flush_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0015"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FlushGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2015"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Format_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0024"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FormatGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2024"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetBootVol_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0027"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetBootVolGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2028"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetDevNumber_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0020"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetDevNumberGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2020"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetDirEntry_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$001C"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetDirEntryGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$201C"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetEOF_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0019"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetEOFGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2019"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetFileInfo_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0006"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetFileInfoGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2006"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetFSTInfoGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$202B"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetLastDev_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0021"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetLevel_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$001B"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetLevelGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$201B"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetMark_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0017"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetMarkGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2017"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Getname_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0027"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetNameGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2027"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetPrefix_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$000A"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetPrefixGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$200A"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetVersion_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$002A"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetVersionGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$202A"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Newline_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0011"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NewlineGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2011"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NullGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$200D"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Open_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0010"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _OpenGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2010"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Quit_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0029"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _QuitGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2029"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ReadBlock_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0022"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Read_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0012"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ReadGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2012"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetEOF_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0018"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetEOFGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2018"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetFileInfo_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0005"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetFileInfoGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2005"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetLevel_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$001A"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetLevelGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$201A"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMark_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0016"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMarkGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2016"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPrefix_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0009"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPrefixGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2009"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _UnbindIntGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2032"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Volume_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0008"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _VolumeGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2008"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WriteBlock_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0023"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Write_C0 ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$0013"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WriteGS ¶ms
|
||
&lab jsl $E100A8
|
||
dc i2"$2013"
|
||
dc i4"¶ms"
|
||
MEND
|
||
|
||
|
||
; File: M16.Textool
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _TextBootInit
|
||
&lab ldx #$010C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TextStartUp
|
||
&lab ldx #$020C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TextShutDown
|
||
&lab ldx #$030C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TextVersion
|
||
&lab ldx #$040C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TextReset
|
||
&lab ldx #$050C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TextStatus
|
||
&lab ldx #$060C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CtlTextDev
|
||
&lab ldx #$160C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ErrWriteBlock
|
||
&lab ldx #$1F0C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ErrWriteChar
|
||
&lab ldx #$190C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ErrWriteCString
|
||
&lab ldx #$210C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ErrWriteLine
|
||
&lab ldx #$1B0C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ErrWriteString
|
||
&lab ldx #$1D0C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetErrGlobals
|
||
&lab ldx #$0E0C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetErrorDevice
|
||
&lab ldx #$140C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetInGlobals
|
||
&lab ldx #$0C0C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetInputDevice
|
||
&lab ldx #$120C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetOutGlobals
|
||
&lab ldx #$0D0C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetOutputDevice
|
||
&lab ldx #$130C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InitTextDev
|
||
&lab ldx #$150C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ReadChar
|
||
&lab ldx #$220C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ReadLine
|
||
&lab ldx #$240C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetErrGlobals
|
||
&lab ldx #$0B0C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetErrorDevice
|
||
&lab ldx #$110C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetInGlobals
|
||
&lab ldx #$090C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetInputDevice
|
||
&lab ldx #$0F0C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetOutGlobals
|
||
&lab ldx #$0A0C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetOutputDevice
|
||
&lab ldx #$100C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _StatusTextDev
|
||
&lab ldx #$170C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TextReadBlock
|
||
&lab ldx #$230C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TextWriteBlock
|
||
&lab ldx #$1E0C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WriteChar
|
||
&lab ldx #$180C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WriteCString
|
||
&lab ldx #$200C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WriteLine
|
||
&lab ldx #$1A0C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WriteString
|
||
&lab ldx #$1C0C
|
||
jsl $E10000
|
||
MEND
|
||
|
||
; File: M16.Window
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986, 1987
|
||
; All Rights Reserved
|
||
;
|
||
;
|
||
|
||
MACRO
|
||
&lab _WindBootInit
|
||
&lab ldx #$010E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WindStartUp
|
||
&lab ldx #$020E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WindShutDown
|
||
&lab ldx #$030E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WindVersion
|
||
&lab ldx #$040E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WindReset
|
||
&lab ldx #$050E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WindStatus
|
||
&lab ldx #$060E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _BeginUpdate
|
||
&lab ldx #$1E0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _BringToFront
|
||
&lab ldx #$240E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CheckUpdate
|
||
&lab ldx #$0A0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _CloseWindow
|
||
&lab ldx #$0B0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _Desktop
|
||
&lab ldx #$0C0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _DragWindow
|
||
&lab ldx #$1A0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EndInfoDrawing
|
||
&lab ldx #$510E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _EndUpdate
|
||
&lab ldx #$1F0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FindWindow
|
||
&lab ldx #$170E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _FrontWindow
|
||
&lab ldx #$150E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetContentDraw
|
||
&lab ldx #$480E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetContentOrigin
|
||
&lab ldx #$3E0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetContentRgn
|
||
&lab ldx #$2F0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetDataSize
|
||
&lab ldx #$400E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetDefProc
|
||
&lab ldx #$310E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetFirstWindow
|
||
&lab ldx #$520E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetFrameColor
|
||
&lab ldx #$100E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetInfoDraw
|
||
&lab ldx #$4A0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetInfoRefCon
|
||
&lab ldx #$350E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetMaxGrow
|
||
&lab ldx #$420E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetNextWindow
|
||
&lab ldx #$2A0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetPage
|
||
&lab ldx #$460E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetRectInfo
|
||
&lab ldx #$4F0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetScroll
|
||
&lab ldx #$440E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetStructRgn
|
||
&lab ldx #$2E0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetSysWFlag
|
||
&lab ldx #$4C0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetUpdateRgn
|
||
&lab ldx #$300E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetWControls
|
||
&lab ldx #$330E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetWFrame
|
||
&lab ldx #$2C0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetWKind
|
||
&lab ldx #$2B0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetWMgrPort
|
||
&lab ldx #$200E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetWRefCon
|
||
&lab ldx #$290E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetWTitle
|
||
&lab ldx #$0E0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetZoomRect
|
||
&lab ldx #$370E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GrowWindow
|
||
&lab ldx #$1B0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _HideWindow
|
||
&lab ldx #$120E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _HiliteWindow
|
||
&lab ldx #$220E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InvalRect
|
||
&lab ldx #$3A0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _InvalRgn
|
||
&lab ldx #$3B0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _MoveWindow
|
||
&lab ldx #$190E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _NewWindow
|
||
&lab ldx #$090E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PinRect
|
||
&lab ldx #$210E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _RefreshDesktop
|
||
&lab ldx #$390E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SelectWindow
|
||
&lab ldx #$110E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SendBehind
|
||
&lab ldx #$140E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetContentDraw
|
||
&lab ldx #$490E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetContentOrigin
|
||
&lab ldx #$3F0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetContentOrigin2
|
||
&lab ldx #$570E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetDataSize
|
||
&lab ldx #$410E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetDefProc
|
||
&lab ldx #$320E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetFrameColor
|
||
&lab ldx #$0F0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetInfoDraw
|
||
&lab ldx #$160E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetInfoRefCon
|
||
&lab ldx #$360E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetMaxGrow
|
||
&lab ldx #$430E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetOriginMask
|
||
&lab ldx #$340E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetPage
|
||
&lab ldx #$470E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetScroll
|
||
&lab ldx #$450E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetSysWindow
|
||
&lab ldx #$4B0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetWFrame
|
||
&lab ldx #$2D0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetWindowIcons
|
||
&lab ldx #$4E0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetWRefCon
|
||
&lab ldx #$280E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetWTitle
|
||
&lab ldx #$0D0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SetZoomRect
|
||
&lab ldx #$380E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ShowHide
|
||
&lab ldx #$230E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ShowWindow
|
||
&lab ldx #$130E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SizeWindow
|
||
&lab ldx #$1C0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _StartDrawing
|
||
&lab ldx #$4D0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _StartInfoDrawing
|
||
&lab ldx #$500E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TaskMaster
|
||
&lab ldx #$1D0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TrackGoAway
|
||
&lab ldx #$180E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TrackZoom
|
||
&lab ldx #$260E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ValidRect
|
||
&lab ldx #$3C0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ValidRgn
|
||
&lab ldx #$3D0E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WindDragRect
|
||
&lab ldx #$530E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WindNewRes
|
||
&lab ldx #$250E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _WindowGlobal
|
||
&lab ldx #$560E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _ZoomWindow
|
||
&lab ldx #$270E
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _GetWindowMgrGlobals
|
||
&lab ldx #$580E
|
||
jsl $E10000
|
||
MEND
|
||
MACRO
|
||
&lab _StartFrameDrawing
|
||
&lab ldx #$5A0E
|
||
jsl $E10000
|
||
MEND
|
||
MACRO
|
||
&lab _EndFrameDrawing
|
||
&lab ldx #$5B0E
|
||
jsl $E10000
|
||
MEND
|
||
MACRO
|
||
&lab _DrawInfoBar
|
||
&lab ldx #$550E
|
||
jsl $E10000
|
||
MEND
|
||
MACRO
|
||
&lab _ResizeWindow
|
||
&lab ldx #$5C0E
|
||
jsl $E10000
|
||
MEND
|
||
MACRO
|
||
&lab _AlertWindow
|
||
&lab ldx #$590E
|
||
jsl $E10000
|
||
MEND
|
||
; File: M16.ALIAS
|
||
;
|
||
;
|
||
; Copyright Apple Computer, Inc. 1986
|
||
; All Rights Reserved
|
||
;
|
||
|
||
|
||
; Memory Manager Aliases
|
||
|
||
MACRO
|
||
&lab _DisposHandle
|
||
&lab ldx #2+256*16
|
||
jsl $E10000
|
||
MEND
|
||
|
||
|
||
; QuickDraw Aliases
|
||
|
||
MACRO
|
||
&lab _PenSize
|
||
&lab ldx #4+256*44
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PenMode
|
||
&lab ldx #4+256*46
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _PenPat
|
||
&lab ldx #4+256*48
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _BackPat
|
||
&lab ldx #4+256*52
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TextFace
|
||
&lab ldx #4+256*154
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TextMode
|
||
&lab ldx #4+256*156
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SpaceExtra
|
||
&lab ldx #4+256*158
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _TextSize
|
||
&lab ldx #4+256*210
|
||
jsl $E10000
|
||
MEND
|
||
|
||
|
||
|
||
MACRO
|
||
&lab _SysDeath
|
||
&lab ldx #$1503
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SysDeathMgr
|
||
&lab ldx #$1503
|
||
jsl $E10000
|
||
MEND
|
||
|
||
MACRO
|
||
&lab _SystemDeath
|
||
&lab ldx #$1503
|
||
jsl $E10000
|
||
MEND
|
||
|
||
;..............................................................................
|
||
;
|
||
; StyleWare Macros`
|
||
;
|
||
; Macros...: AddWord, AddLong, SubWord, SubLong
|
||
; Author...: Mike Hibbetts, (2.0 conversion Scott Lindsey)
|
||
; Date.....: June 30, 1987 ... Oct 22,1988
|
||
; Version..: 2.0
|
||
;
|
||
; The following is a short description of the available addressing
|
||
; modes that may be used with the math macros in m16.math.
|
||
;
|
||
; Notes: 'a', 'x', and 'y' denote the 65816 registers.
|
||
; 's' denotes that an operand is to be either pulled or pushed.
|
||
;
|
||
; For programmer based optimization, it should be noted that all zero
|
||
; page indirect indexing is done out of the 'y' register, and all other
|
||
; indexing is done out of the 'x' register. So, for example,
|
||
;
|
||
; AddLong Addr:#4,[zp]:#4,>Long
|
||
; is better coded as
|
||
; ldy #4
|
||
; AddLong Addr:y,[zp]:y,>Long,
|
||
; (it saves on 1 'ldx')
|
||
; and
|
||
;
|
||
; SubLong Addr1:#offset1,>Long:#offset2,Addr3
|
||
; is better coded as
|
||
; ldy #offset2
|
||
; SubLong Addr1:#offset1,>Long:y,Addr3.
|
||
; (it saves on 3 'ldx' and costs 1 'ldy')
|
||
;
|
||
; All other optimizations have been done internally to the macros.
|
||
;.............................................................................
|
||
;
|
||
; Where
|
||
;
|
||
; P = { Addr, Addr:#offset, Addr:offset, Addr:x, Addr:y,
|
||
; [zp], [zp]:#offset, [zp]:offset, [zp]:y, zp:s
|
||
; Long, Long:#offset, Long:offset, Long:x, s },
|
||
;
|
||
; Q = { a, x, y, #const } + P,
|
||
;
|
||
; R = { #const } + P, and
|
||
;
|
||
; T = { a, x, y } + P,
|
||
;
|
||
; all
|
||
;
|
||
; AddWord Q,R,T
|
||
; AddLong Q,R,P
|
||
; SubWord Q,R,T
|
||
; SubLong Q,R,P
|
||
;
|
||
; are allowed.
|
||
;
|
||
;-----------------------------------------------------------------------------
|
||
MACRO
|
||
&lab AddWord &term1,&term2,&dest
|
||
&lab ;
|
||
Arith 2,adc,clc,&term1,&term2,&dest
|
||
MEND
|
||
;----------------------------------------------------------------------------
|
||
MACRO
|
||
&lab AddLong &term1,&term2,&dest
|
||
&lab ;
|
||
Arith 4,adc,clc,&term1,&term2,&dest
|
||
MEND
|
||
;----------------------------------------------------------------------------
|
||
MACRO
|
||
&lab SubWord &term1,&term2,&dest
|
||
&lab ;
|
||
Arith 2,sbc,sec,&term1,&term2,&dest
|
||
MEND
|
||
;----------------------------------------------------------------------------
|
||
MACRO
|
||
&lab SubLong &term1,&term2,&dest
|
||
&lab ;
|
||
Arith 4,sbc,sec,&term1,&term2,&dest
|
||
MEND
|
||
;----------------------------------------------------------------------------
|
||
MACRO
|
||
Arith &length,&op1,&op2,&term1,&term2,&dest
|
||
|
||
lcla &same
|
||
gbla &Yinc
|
||
gblc &lastX
|
||
lclc &lastY
|
||
lcla &colon
|
||
lcla &stack1
|
||
lcla &pull1
|
||
lcla &pull2
|
||
lcla &OFFinc
|
||
lcla &zp1
|
||
lcla &zp2
|
||
lcla &zp3
|
||
gblc &pushed
|
||
lclc &addr1
|
||
lclc &off1
|
||
lclc &addr2
|
||
lclc &off2
|
||
lclc &addr3
|
||
lclc &off3
|
||
lclc &badreg
|
||
&badreg SETC 'y'
|
||
lclc &jump1
|
||
lclc &jump2
|
||
lclc &jump3
|
||
IF &substr(&term1,1,1)<29>'[' GOTO .doterm12
|
||
&zp1 seta 1
|
||
.doterm12
|
||
&colon seta &pos(':',&term1)
|
||
IF &colon=0 GOTO .no1offset
|
||
&off1 SETC &substr(&term1,&colon+1,&len(&term1)-&colon)
|
||
&addr1 SETC &substr(&term1,1,&colon-1)
|
||
GOTO .doterm21
|
||
|
||
.no1offset
|
||
&addr1 SETC &term1
|
||
.doterm21
|
||
IF &substr(&term2,1,1)<29>'[' GOTO .doterm22
|
||
&zp2 seta 1
|
||
.doterm22
|
||
&colon seta &pos(':',&term2)
|
||
IF &colon=0 GOTO .no2offset
|
||
&off2 SETC &substr(&term2,&colon+1,&len(&term2)-&colon)
|
||
&addr2 SETC &substr(&term2,1,&colon-1)
|
||
GOTO .dodest1
|
||
|
||
.no2offset
|
||
&addr2 SETC &term2
|
||
.dodest1
|
||
IF &substr(&dest,1,1)<29>'[' GOTO .dodest2
|
||
&zp3 seta 1
|
||
&badreg SETC 'x'
|
||
.dodest2
|
||
&colon seta &pos(':',&dest)
|
||
IF &colon=0 GOTO .no3offset
|
||
&off3 SETC &substr(&dest,&colon+1,&len(&dest)-&colon)
|
||
&addr3 SETC &substr(&dest,1,&colon-1)
|
||
IF &off3<66>'y' GOTO .start
|
||
&badreg SETC 'x'
|
||
GOTO .start
|
||
|
||
.no3offset
|
||
&addr3 SETC &dest
|
||
IF &addr3<72>'y' GOTO .start
|
||
&badreg SETC 'x'
|
||
.start
|
||
IF &zp1 GOTO .loadzp1
|
||
IF &len(&off1) GOTO .withoff11
|
||
IF &addr1='a' GOTO .loadR1
|
||
IF &addr1='x' GOTO .loadx1
|
||
IF &addr1='y' GOTO .loady1
|
||
IF &addr1='s' GOTO .loads1
|
||
lda &addr1
|
||
&jump1 SETC '.load2'
|
||
GOTO .loaded1
|
||
|
||
; -----------------
|
||
.loadx1
|
||
txa
|
||
GOTO .loadR1
|
||
|
||
.loady1
|
||
tya
|
||
.loadR1
|
||
&jump1 SETC '.loadR2'
|
||
GOTO .loaded1
|
||
|
||
; -----------------
|
||
.loads1
|
||
IF &off2='s' GOTO .loads12
|
||
IF &off3='s' GOTO .loads12
|
||
IF &length='2' GOTO .loads11
|
||
&stack1 seta 1
|
||
.loads11
|
||
pla
|
||
&jump1 SETC '.loads2'
|
||
GOTO .loaded1
|
||
|
||
; -----------------
|
||
.loads12
|
||
lda 1,s
|
||
&jump1 SETC '.loads22'
|
||
&pull1 seta 1
|
||
GOTO .loaded1
|
||
|
||
; -----------------
|
||
.loadzp1
|
||
IF &len(&off1) GOTO .loadzpo1
|
||
lda &addr1
|
||
&jump1 SETC '.loadzp2'
|
||
GOTO .loaded1
|
||
|
||
; -----------------
|
||
.loadzpo1
|
||
IF &off1='y' GOTO .loadzpy1
|
||
&jump1 SETC '.loadzpo2'
|
||
IF (&off2<66>'y') and (&off3<66>'y') GOTO .loadzpo12
|
||
phy
|
||
&pushed SETC 'y'
|
||
&jump1 SETC '.loadzpo22'
|
||
.loadzpo12
|
||
ldy &off1
|
||
lda &addr1,y
|
||
&lastY SETC &off1
|
||
GOTO .loaded1
|
||
|
||
; ------------------
|
||
.loadzpy1
|
||
lda &addr1,&off1
|
||
&jump1 SETC '.loadzpy2'
|
||
GOTO .loaded1
|
||
|
||
; ------------------
|
||
.withoff11
|
||
IF &off1='x' GOTO .loffx1
|
||
IF &off1='y' GOTO .loffy1
|
||
IF &off1='s' GOTO .loffs1
|
||
&jump1 SETC '.loadoff2'
|
||
IF (&off2<66>'x') and (&off3<66>'x') GOTO .withoff112
|
||
phx
|
||
&pushed SETC 'x'
|
||
&jump1 SETC '.loadoff22'
|
||
.withoff112
|
||
ldx &off1
|
||
lda &addr1,x
|
||
&lastX SETC &off1
|
||
GOTO .loaded1
|
||
|
||
; -----------------
|
||
.loffx1
|
||
lda &addr1,x
|
||
&jump1 SETC '.loffx2'
|
||
GOTO .loaded1
|
||
|
||
; -------------------
|
||
.loffy1
|
||
lda &addr1,y
|
||
&jump1 SETC '.loffy2'
|
||
GOTO .loaded1
|
||
|
||
; -------------------
|
||
.loffs1
|
||
lda &addr1,s
|
||
&jump1 SETC '.loffs2'
|
||
.loaded1
|
||
&op2
|
||
IF &zp2 GOTO .addzp1
|
||
IF &len(&off2) GOTO .withoff12
|
||
IF &addr2='s' GOTO .adds11
|
||
&op1 &addr2
|
||
&jump2 SETC '.add2'
|
||
GOTO .added1
|
||
|
||
; -----------------
|
||
.adds11
|
||
STreset
|
||
&pull2 seta 1
|
||
IF &pull1 GOTO .adds12
|
||
IF &stack1 GOTO .adds13
|
||
&op1 1,s
|
||
&jump2 SETC '.adds21'
|
||
GOTO .added1
|
||
|
||
; -----------------
|
||
.adds12
|
||
&op1 1+&length,s
|
||
&jump2 SETC '.adds22'
|
||
GOTO .added1
|
||
|
||
; -----------------
|
||
.adds13
|
||
&op1 3,s
|
||
&jump2 SETC '.adds21'
|
||
GOTO .added1
|
||
|
||
; -----------------
|
||
.addzp1
|
||
IF &len(&off2) GOTO .addzpo1
|
||
&op1 &addr2
|
||
&jump2 SETC '.addzp2'
|
||
GOTO .added1
|
||
|
||
; -----------------
|
||
.addzpo1
|
||
IF &off2='y' GOTO .addzpy1
|
||
IF &len(&pushed) GOTO .addzpo12
|
||
IF &off3='y' GOTO .addzpo11
|
||
IF (&off1<66>'y') or (&length='2') GOTO .addzpo12
|
||
.addzpo11
|
||
phy
|
||
&pushed SETC 'y'
|
||
.addzpo12
|
||
DoLoad 1,y,&off2
|
||
&op1 &addr2,y
|
||
&jump2 SETC '.addzpo2'
|
||
GOTO .added1
|
||
|
||
; ------------------
|
||
.addzpy1
|
||
IF &pushed<65>'y' GOTO .loadzpy12
|
||
ply
|
||
&pushed SETC ''
|
||
&lastY SETC ''
|
||
.loadzpy12
|
||
&op1 &addr2,&off2
|
||
&jump2 SETC '.addzpy2'
|
||
GOTO .added1
|
||
|
||
; ------------------
|
||
.withoff12
|
||
IF &off2='x' GOTO .aoffx1
|
||
IF &off2='y' GOTO .aoffy1
|
||
IF &off2='s' GOTO .aoffs1
|
||
IF &len(&pushed) GOTO .withoff122
|
||
IF &off3='x' GOTO .withoff121
|
||
IF (&off1<66>'x') or (&length='2') GOTO .withoff122
|
||
.withoff121
|
||
phx
|
||
&pushed SETC 'x'
|
||
.withoff122
|
||
DoLoad 1,x,&off2
|
||
&op1 &addr2,x
|
||
&jump2 SETC '.addoff2'
|
||
GOTO .added1
|
||
|
||
; -----------------
|
||
.aoffx1
|
||
IF &pushed<65>'x' GOTO .aoffx12
|
||
plx
|
||
&pushed SETC ''
|
||
&lastX SETC ''
|
||
.aoffx12
|
||
&op1 &addr2,x
|
||
&jump2 SETC '.aoffx2'
|
||
GOTO .added1
|
||
|
||
; -------------------
|
||
.aoffy1
|
||
IF &pushed<65>'y' GOTO .aoffy12
|
||
ply
|
||
&pushed SETC ''
|
||
&lastY SETC ''
|
||
.aoffy12
|
||
&op1 &addr2,y
|
||
&jump2 SETC '.aoffy2'
|
||
GOTO .added1
|
||
|
||
; -------------------
|
||
.aoffs1
|
||
STreset
|
||
&op1 &addr2,s
|
||
&jump2 SETC '.aoffs2'
|
||
.added1
|
||
IF &zp3 GOTO .storezp1
|
||
IF &len(&off3) GOTO .withoff13
|
||
IF &addr3='a' GOTO .storeR1
|
||
IF &addr3='x' GOTO .storex1
|
||
IF &addr3='y' GOTO .storey1
|
||
IF &addr3='s' GOTO .stores1
|
||
sta &addr3
|
||
&jump3 SETC '.store2'
|
||
GOTO .stored1
|
||
|
||
; ------------------
|
||
.storex1
|
||
tax
|
||
GOTO .storeR1
|
||
|
||
.storey1
|
||
tay
|
||
.storeR1
|
||
&jump3 SETC '.error1'
|
||
GOTO .stored1
|
||
|
||
; ------------------
|
||
.stores1
|
||
STreset
|
||
IF &pull1 or &pull2 GOTO .stores12
|
||
IF &stack1 GOTO .stores13
|
||
IF &length='2' GOTO .stores111
|
||
pha
|
||
.stores111
|
||
pha
|
||
&jump3 SETC '.stores2'
|
||
GOTO .stored1
|
||
|
||
; -----------------
|
||
.stores12
|
||
IF &stack1 GOTO .stores14
|
||
sta 1,s
|
||
&jump3 SETC '.stores2'
|
||
&pull1 seta 0
|
||
&pull2 seta 0
|
||
GOTO .stored1
|
||
|
||
; -----------------
|
||
.stores13
|
||
pha
|
||
&jump1 SETC '.loads22'
|
||
&jump3 SETC '.stores2'
|
||
GOTO .stored1
|
||
|
||
; -----------------
|
||
.stores14
|
||
sta 3,s
|
||
&jump3 SETC '.stores2'
|
||
&pull1 seta 0
|
||
&pull2 seta 0
|
||
GOTO .stored1
|
||
|
||
; ------------------
|
||
.storezp1
|
||
IF &len(&off3) GOTO .storezpo1
|
||
sta &addr3
|
||
&jump3 SETC '.storezp2'
|
||
GOTO .stored1
|
||
|
||
; -----------------
|
||
.storezpo1
|
||
IF &off3='y' GOTO .storezpy1
|
||
IF &len(&pushed) or (&length='2') GOTO .storezpo12
|
||
IF (&off1<66>'y') and (&off2<66>'y') GOTO .storezpo12
|
||
phy
|
||
&pushed SETC 'y'
|
||
.storezpo12
|
||
DOLoad 1,y,&off3
|
||
sta &addr3,y
|
||
&jump3 SETC '.storezpo2'
|
||
GOTO .stored1
|
||
|
||
; ------------------
|
||
.storezpy1
|
||
IF &pushed<65>'y' GOTO .storezpy12
|
||
ply
|
||
&pushed SETC ''
|
||
&lastY SETC ''
|
||
.storezpy12
|
||
sta &addr3,&off3
|
||
&jump3 SETC '.storezpy2'
|
||
GOTO .stored1
|
||
|
||
; ------------------
|
||
.withoff13
|
||
IF &off3='x' GOTO .soffx1
|
||
IF &off3='y' GOTO .soffy1
|
||
IF &off3='s' GOTO .soffs1
|
||
IF &len(&pushed) or (&length='2') GOTO .withoff132
|
||
IF (&off1<66>'x') and (&off2<66>'x') GOTO .withoff132
|
||
phx
|
||
&pushed SETC 'x'
|
||
.withoff132
|
||
DoLoad 1,x,&off3
|
||
sta &addr3,x
|
||
&jump3 SETC '.storeoff2'
|
||
GOTO .stored1
|
||
|
||
; -----------------
|
||
.soffx1
|
||
IF &pushed<65>'x' GOTO .soffx12
|
||
plx
|
||
&pushed SETC ''
|
||
&lastX SETC ''
|
||
.soffx12
|
||
sta &addr3,x
|
||
&jump3 SETC '.soffx2'
|
||
GOTO .stored1
|
||
|
||
; -------------------
|
||
.soffy1
|
||
IF &pushed<65>'y' GOTO .soffy12
|
||
ply
|
||
&pushed SETC ''
|
||
&lastY SETC ''
|
||
.soffy12
|
||
sta &addr3,y
|
||
&jump3 SETC '.soffy2'
|
||
GOTO .stored1
|
||
|
||
; -------------------
|
||
.soffs1
|
||
STreset
|
||
sta &addr3,s
|
||
&jump3 SETC '.soffs2'
|
||
.stored1
|
||
IF &length='2' GOTO .stored2
|
||
GOTO &jump1
|
||
|
||
;--------------------------------------------------------------
|
||
.load2
|
||
HighByte lda,&addr1
|
||
GOTO .loaded2
|
||
|
||
; -----------------
|
||
.loadR2
|
||
lda #0
|
||
GOTO .loaded2
|
||
|
||
; -----------------
|
||
.loads2
|
||
STreset
|
||
pla
|
||
GOTO .loaded2
|
||
|
||
; -----------------
|
||
.loads22
|
||
STreset
|
||
lda 3,s
|
||
GOTO .loaded2
|
||
|
||
; -----------------
|
||
.loadzp2
|
||
IF &len(&pushed) GOTO .loadzp22
|
||
IF (&off2<66>'y') and (&off3<66>'y') GOTO .loadzp22
|
||
phy
|
||
&pushed SETC 'y'
|
||
.loadzp22
|
||
Load 1,y,#2
|
||
lda &addr1,y
|
||
GOTO .loaded2
|
||
|
||
; -----------------
|
||
.loadzpo22
|
||
IF &len(&pushed) GOTO .loadzpo2
|
||
phy
|
||
&pushed SETC 'y'
|
||
.loadzpo2
|
||
Load 2,y,&off1
|
||
lda &addr1,y
|
||
GOTO .loaded2
|
||
|
||
; ------------------
|
||
.loadzpy2
|
||
IF &pushed<65>'y' GOTO .loadzpy21
|
||
ply
|
||
&pushed SETC ''
|
||
&lastY SETC ''
|
||
.loadzpy21
|
||
doY
|
||
lda &addr1,&off1
|
||
GOTO .loaded2
|
||
|
||
; ------------------
|
||
.loadoff22
|
||
IF &len(&pushed) GOTO .loadoff2
|
||
phx
|
||
&pushed SETC 'x'
|
||
.loadoff2
|
||
DoLoad 1,x,&off1
|
||
lda &addr1+2,x
|
||
GOTO .loaded2
|
||
|
||
; -----------------
|
||
.loffx2
|
||
IF &pushed<65>'x' GOTO .loffx21
|
||
plx
|
||
&pushed SETC ''
|
||
&lastX SETC ''
|
||
.loffx21
|
||
lda &addr1+2,x
|
||
GOTO .loaded2
|
||
|
||
; -------------------
|
||
.loffy2
|
||
IF &pushed<65>'y' GOTO .loffy21
|
||
ply
|
||
&pushed SETC ''
|
||
&lastY SETC ''
|
||
.loffy21
|
||
IF &Yinc GOTO .loffy22
|
||
lda &addr1+2,y
|
||
GOTO .loaded2
|
||
|
||
; -------------------
|
||
.loffy22
|
||
lda &addr1,y
|
||
GOTO .loaded2
|
||
|
||
; -------------------
|
||
.loffs2
|
||
STreset
|
||
lda &addr1+2,s
|
||
.loaded2
|
||
GOTO &jump2
|
||
|
||
;------------------------------
|
||
;------------------------------
|
||
.add2
|
||
HighByte &op1,&addr2
|
||
GOTO .added2
|
||
|
||
; -----------------
|
||
.adds21
|
||
STreset
|
||
&op1 3,s
|
||
GOTO .added2
|
||
|
||
; -----------------
|
||
.adds22
|
||
&op1 3+&length,s
|
||
GOTO .added2
|
||
|
||
; -----------------
|
||
.addzp2
|
||
IF &len(&pushed) or (&off3<66>'y') GOTO .addzp22
|
||
phy
|
||
&pushed SETC 'y'
|
||
.addzp22
|
||
DoLoad 1,y,#2
|
||
&op1 &addr2,y
|
||
GOTO .added2
|
||
|
||
; -----------------
|
||
.addzpo2
|
||
IF &len(&pushed) or (&off3<66>'y') GOTO .addzpo22
|
||
phy
|
||
&pushed SETC 'y'
|
||
.addzpo22
|
||
DoLoad 2,y,&off2
|
||
&op1 &addr2,y
|
||
GOTO .added2
|
||
|
||
; ------------------
|
||
.addzpy2
|
||
IF &pushed<65>'y' GOTO .addzpy22
|
||
ply
|
||
&pushed SETC ''
|
||
&lastY SETC ''
|
||
.addzpy22
|
||
doY
|
||
&op1 &addr2,&off2
|
||
GOTO .added2
|
||
|
||
; ------------------
|
||
.addoff2
|
||
IF &len(&pushed) or (&off3<66>'x') GOTO .addoff22
|
||
phx
|
||
&pushed SETC 'x'
|
||
.addoff22
|
||
DoLoad 1,x,&off2
|
||
&op1 &addr2+2,x
|
||
GOTO .added2
|
||
|
||
; -----------------
|
||
.aoffx2
|
||
IF &pushed<65>'x' GOTO .aoffx22
|
||
plx
|
||
&pushed SETC ''
|
||
&lastX SETC ''
|
||
.aoffx22
|
||
&op1 &addr2+2,x
|
||
GOTO .added2
|
||
|
||
; -------------------
|
||
.aoffy2
|
||
IF &pushed<65>'y' GOTO .aoffy22
|
||
ply
|
||
&pushed SETC ''
|
||
&lastY SETC ''
|
||
.aoffy22
|
||
IF &Yinc GOTO .aoffy23
|
||
&op1 &addr2+2,y
|
||
GOTO .added2
|
||
|
||
; -------------------
|
||
.aoffy23
|
||
&op1 &addr2,y
|
||
GOTO .added2
|
||
|
||
; -------------------
|
||
.aoffs2
|
||
STreset
|
||
&op1 &addr2+2,s
|
||
.added2
|
||
GOTO &jump3
|
||
|
||
;------------------------------
|
||
;------------------------------
|
||
.error1
|
||
MNOTE 'Register cannot hold long integer.',4
|
||
GOTO .stored2
|
||
|
||
; ------------------
|
||
.store2
|
||
HighByte sta,&addr3
|
||
GOTO .stored2
|
||
|
||
; ------------------
|
||
.stores2
|
||
STreset
|
||
sta 3,s
|
||
GOTO .stored2
|
||
|
||
; -----------------
|
||
.storezp2
|
||
DoLoad 1,y,#2
|
||
sta &addr3,y
|
||
GOTO .stored2
|
||
|
||
; -----------------
|
||
.storezpo2
|
||
DoLoad 2,y,&off3
|
||
sta &addr3,y
|
||
GOTO .stored2
|
||
|
||
; ------------------
|
||
.storezpy2
|
||
IF &pushed<65>'y' GOTO .storezpy22
|
||
ply
|
||
&pushed SETC ''
|
||
&lastY SETC ''
|
||
.storezpy22
|
||
doY
|
||
sta &addr3,&off3
|
||
GOTO .stored2
|
||
|
||
; ------------------
|
||
.storeoff2
|
||
DoLoad 1,x,&off3
|
||
sta &addr3+2,x
|
||
GOTO .stored2
|
||
|
||
; -----------------
|
||
.soffx2
|
||
IF &pushed<65>'x' GOTO .soffx22
|
||
plx
|
||
&pushed SETC ''
|
||
&lastX SETC ''
|
||
.soffx22
|
||
sta &addr3+2,x
|
||
GOTO .stored2
|
||
|
||
; -------------------
|
||
.soffy2
|
||
IF &pushed<65>'y' GOTO .soffy22
|
||
ply
|
||
&pushed SETC ''
|
||
&lastY SETC ''
|
||
.soffy22
|
||
IF &Yinc GOTO .soffy23
|
||
sta &addr3+2,y
|
||
GOTO .stored2
|
||
|
||
; -------------------
|
||
.soffy23
|
||
sta &addr3,y
|
||
GOTO .stored2
|
||
|
||
; -------------------
|
||
.soffs2
|
||
STreset
|
||
sta &addr3+2,s
|
||
.stored2
|
||
IF &pull1=0 GOTO .stored210
|
||
IF &length='2' GOTO .stored205
|
||
pl&badreg
|
||
.stored205
|
||
pl&badreg
|
||
.stored210
|
||
IF &pull2=0 GOTO .stored220
|
||
IF &length='2' GOTO .stored215
|
||
pl&badreg
|
||
.stored215
|
||
pl&badreg
|
||
.stored220
|
||
MEND
|
||
;------------------------------------------------------------------------------
|
||
MACRO
|
||
HighByte &oper,&loc
|
||
lclc &c
|
||
lclc &rest
|
||
IF &substr(&loc,1,1)='#' GOTO .b
|
||
&oper &loc+2
|
||
MEXIT
|
||
.b
|
||
&rest SETC &substr(&loc,2,&len(&loc)-1)
|
||
&oper #^&rest
|
||
MEND
|
||
;--------------------------------------------------------
|
||
MACRO
|
||
DoLoad &half,®,&value
|
||
IF &half='1' GOTO .c
|
||
IF &substr(&value,1,1)='#' GOTO .a
|
||
Check ®,&value
|
||
IF &same GOTO .e
|
||
ld® &value
|
||
in®
|
||
in®
|
||
&OFFinc seta 1
|
||
MEXIT
|
||
.e
|
||
IF &OFFinc GOTO .done
|
||
in®
|
||
in®
|
||
&OFFinc seta 1
|
||
MEXIT
|
||
.a
|
||
Check ®,&value+2
|
||
IF &same GOTO .done
|
||
ld® &value+2
|
||
&OFFinc seta 1
|
||
MEXIT
|
||
.c
|
||
Check ®,&value
|
||
IF &same GOTO .done
|
||
ld® &value
|
||
.done
|
||
MEND
|
||
;-----------------------------------------------------
|
||
MACRO
|
||
doY
|
||
GBLA &Yinc
|
||
IF &Yinc GOTO .done
|
||
&Yinc seta 1
|
||
iny
|
||
iny
|
||
.done
|
||
MEND
|
||
;-------------------------------------------------
|
||
MACRO
|
||
STreset
|
||
|
||
GBLC &pushed
|
||
GBLC &lastX
|
||
IF &len(&pushed)=0 GOTO .done
|
||
IF &pushed='y' GOTO .d
|
||
plx
|
||
&pushed SETC ''
|
||
&lastX SETC ''
|
||
MEXIT
|
||
.d
|
||
ply
|
||
&pushed SETC ''
|
||
&lastY SETC ''
|
||
.done
|
||
MEND
|
||
;-------------------------------------------------
|
||
MACRO
|
||
Check ®,&string
|
||
lcla &search
|
||
IF ®='y' GOTO .regy
|
||
IF &len(&lastx)<29>&len(&string) GOTO .nomatchx
|
||
&search seta &pos(&string,&lastx)
|
||
IF &search=0 GOTO .nomatchx
|
||
GOTO .match
|
||
|
||
.regy
|
||
IF &len(&lasty)<29>&len(&string) GOTO .nomatchy
|
||
&search ASEARCH &lasty,&string,1
|
||
IF &search=0 GOTO .nomatchy
|
||
.match
|
||
&same seta 1
|
||
MEXIT
|
||
.nomatchx
|
||
&same seta 0
|
||
&lastX SETC &string
|
||
MEXIT
|
||
.nomatchy
|
||
&same seta 0
|
||
&lastY SETC &string
|
||
MEND
|
||
;------------------------------------------------------
|
||
;...............................................................
|
||
;
|
||
; Addwl - add word quickly to long word in place
|
||
;...............................................................
|
||
MACRO
|
||
&lab addwl &a1,&a2
|
||
&lab ;
|
||
IF (&a1='a' or &a1='A') GOTO .a
|
||
lda &a1
|
||
.a
|
||
clc
|
||
adc &a2
|
||
sta &a2
|
||
bcc ~b&sysindex
|
||
inc &a2+2
|
||
~b&sysindex ;
|
||
mend
|
||
;...............................................................
|
||
;
|
||
; Subwl - sub word quickly to long word in place
|
||
;...............................................................
|
||
MACRO
|
||
&lab subwl &a1,&a2
|
||
&lab ;
|
||
IF (&a1='a' or &a1='A') GOTO .a
|
||
lda &a2
|
||
.a
|
||
sec
|
||
sbc &a1
|
||
sta &a2
|
||
bcs ~b&sysindex
|
||
dec &a2+2
|
||
~b&sysindex ;
|
||
mend
|
||
;------------------------------------------------------
|
||
MACRO
|
||
&lab mul2
|
||
&lab ;
|
||
asl a
|
||
MEND
|
||
MACRO
|
||
&lab mul4 ¶m
|
||
&lab ;
|
||
asl ¶m
|
||
asl ¶m
|
||
MEND
|
||
MACRO
|
||
&lab mul8
|
||
&lab ;
|
||
asl a
|
||
asl a
|
||
asl a
|
||
MEND
|
||
MACRO
|
||
&lab mul16
|
||
&lab ;
|
||
asl a
|
||
asl a
|
||
asl a
|
||
asl a
|
||
MEND
|
||
MACRO
|
||
&lab mul32
|
||
&lab ;
|
||
asl a
|
||
asl a
|
||
asl a
|
||
asl a
|
||
asl a
|
||
MEND
|
||
MACRO
|
||
&lab div2
|
||
&lab ;
|
||
lsr a
|
||
MEND
|
||
MACRO
|
||
&lab div4 &op
|
||
&lab ;
|
||
lsr &op
|
||
lsr &op
|
||
MEND
|
||
MACRO
|
||
&lab div8
|
||
&lab ;
|
||
lsr a
|
||
lsr a
|
||
lsr a
|
||
MEND
|
||
MACRO
|
||
&lab div16
|
||
&lab ;
|
||
lsr a
|
||
lsr a
|
||
lsr a
|
||
lsr a
|
||
MEND
|
||
MACRO
|
||
&lab div32
|
||
&lab ;
|
||
lsr a
|
||
lsr a
|
||
lsr a
|
||
lsr a
|
||
lsr a
|
||
MEND
|
||
PRINT POP
|