mirror of
https://github.com/A2osX/A2osX.git
synced 2024-12-02 05:49:24 +00:00
172 lines
5.1 KiB
Plaintext
172 lines
5.1 KiB
Plaintext
|
NEW
|
|||
|
|
PREFIX
|
|||
|
|
AUTO 4,1
|
|||
|
|
*--------------------------------------
|
|||
|
|
ZPKERNEL .EQ $0
|
|||
|
|
ZPMEMMGR .EQ $10
|
|||
|
|
*--------------------------------------
|
|||
|
|
ZPPtr1 .EQ ZPKERNEL
|
|||
|
|
ZPPtr2 .EQ ZPKERNEL+2
|
|||
|
|
ZPPtr3 .EQ ZPKERNEL+4
|
|||
|
|
ZPPtr4 .EQ ZPKERNEL+6
|
|||
|
|
|
|||
|
|
pFD .EQ ZPKERNEL+10
|
|||
|
|
pDRV .EQ ZPKERNEL+12
|
|||
|
|
pIOCTL .EQ ZPKERNEL+12
|
|||
|
|
pIOBuf .EQ ZPKERNEL+14
|
|||
|
|
*--------------------------------------
|
|||
|
|
SYS.BASL0 .EQ $800
|
|||
|
|
*--------------------------------------
|
|||
|
|
* AuxMove / XFer
|
|||
|
|
*--------------------------------------
|
|||
|
|
A1L .EQ $3C
|
|||
|
|
A2L .EQ $3E
|
|||
|
|
A4L .EQ $42
|
|||
|
|
|
|||
|
|
XFer.JMP .EQ $3ED
|
|||
|
|
|
|||
|
|
AuxMove .EQ $C311
|
|||
|
|
XFer .EQ $C314 CS:M->X, VS:Use Aux ZP
|
|||
|
|
*--------------------------------------
|
|||
|
|
* $42-$47 ProDOS Block Device Drivers Main
|
|||
|
|
*--------------------------------------
|
|||
|
|
DRV.BLK.Cmd .EQ $42
|
|||
|
|
DRV.BLK.UnitNum .EQ $43
|
|||
|
|
DRV.BLK.Buf .EQ $44
|
|||
|
|
DRV.BLK.BlkNum .EQ $47
|
|||
|
|
*--------------------------------------
|
|||
|
|
* $5E-$C8 RESERVED APPLESOFT Main/Aux (ROM Call, no need to switch back MainZP)
|
|||
|
|
*--------------------------------------
|
|||
|
|
SIGNFLG .EQ $16 COS,SIN,TAN
|
|||
|
|
INDEX .EQ $5E ->$5F
|
|||
|
|
FORPNT .EQ $85 ->$86
|
|||
|
|
FAC .EQ $9D ->$A1
|
|||
|
|
FAC.SIGN .EQ $A2
|
|||
|
|
ARG .EQ $A5 -> $A9 (5 bytes)
|
|||
|
|
ARG.SIGN .EQ $AA
|
|||
|
|
*FAC.EXTENSION .EQ $AC
|
|||
|
|
TXTPTR .EQ $B8
|
|||
|
|
*--------------------------------------
|
|||
|
|
* ROM Entry Point
|
|||
|
|
*--------------------------------------
|
|||
|
|
ROM.FSUB .EQ 0
|
|||
|
|
ROM.FADD .EQ 2
|
|||
|
|
ROM.LTOF .EQ 4
|
|||
|
|
ROM.LOG .EQ 6
|
|||
|
|
ROM.FMULT .EQ 8
|
|||
|
|
ROM.SETARG .EQ 10
|
|||
|
|
ROM.FDIV .EQ 12
|
|||
|
|
ROM.SETFAC .EQ 14
|
|||
|
|
|
|||
|
|
ROM.GETFAC .EQ 16 Copy FAC to (FORPNT)
|
|||
|
|
ROM.FCOMP .EQ 18
|
|||
|
|
ROM.QINT .EQ 20
|
|||
|
|
ROM.FIN .EQ 22
|
|||
|
|
ROM.FOUT .EQ 24
|
|||
|
|
ROM.SQR .EQ 26
|
|||
|
|
ROM.PWR .EQ 28
|
|||
|
|
ROM.EXP .EQ 30
|
|||
|
|
|
|||
|
|
ROM.COS .EQ 32
|
|||
|
|
ROM.SIN .EQ 34
|
|||
|
|
ROM.TAN .EQ 36
|
|||
|
|
ROM.ATAN .EQ 38
|
|||
|
|
*--------------------------------------
|
|||
|
|
* Memory Map
|
|||
|
|
*--------------------------------------
|
|||
|
|
A2osX.SaveSM .EQ $100 Aux
|
|||
|
|
A2osX.SaveSX .EQ $101 Aux
|
|||
|
|
*--------------------------------------
|
|||
|
|
* Main $200 -> 2FF : (Used By ProDOS,Clock DRV....)
|
|||
|
|
* Main $300 -> 3EF : <free>
|
|||
|
|
* Main $3F0 -> 3FF : SYS Vectors (reset,IRQ...)
|
|||
|
|
* Aux $200 -> 3FD : /RAM Driver
|
|||
|
|
* Aux $3FE -> 3FF : IRQ Vector
|
|||
|
|
*--------------------------------------
|
|||
|
|
K.S.STAT .EQ $0300 S.STAT for internal kernel operations
|
|||
|
|
*K.S.DIB .EQ $0340 S.DIB=25 or higher depends on dev type
|
|||
|
|
K.S.IOCTL .EQ $0360 9 bytes
|
|||
|
|
K.MLI.PATH .EQ $0369 64+1
|
|||
|
|
K.MLI.PARAMS .EQ $03AA Main, 18 bytes min for GetFileInfo (ATLK needs MORE!!!...32 max for now)
|
|||
|
|
*--------------------------------------
|
|||
|
|
K.STACKTOP .EQ $03ED XFer !!! down to $3E0
|
|||
|
|
*--------------------------------------
|
|||
|
|
*** $3F0-$3FF IRQ Handler.... ***
|
|||
|
|
*--------------------------------------
|
|||
|
|
* Main/Aux $400 -> $7FF : TXT PAGE1 Console Screen
|
|||
|
|
* Main/Aux $800 -> $BFF : TXT PAGE2 System Screen
|
|||
|
|
*--------------------------------------
|
|||
|
|
* free $0C00->$17FF = $C00 (3072) Aux
|
|||
|
|
*--------------------------------------
|
|||
|
|
Dev.Table.hPath .EQ $0C00 K.Dev.MAX
|
|||
|
|
Dev.Table.hFD .EQ $0C20 K.Dev.MAX
|
|||
|
|
*--------------------------------------
|
|||
|
|
Nod.Table.hPath .EQ $0C40 K.NOD.MAX
|
|||
|
|
Nod.Table.hFD .EQ $0C60 K.NOD.MAX
|
|||
|
|
*--------------------------------------
|
|||
|
|
PS.Table.PID .EQ $0C80 K.PS.MAX
|
|||
|
|
PS.Table.hPS .EQ $0CA0 K.PS.MAX
|
|||
|
|
PS.Table.Hits .EQ $0CC0 K.PS.MAX
|
|||
|
|
PS.Table.Stats .EQ $0CE0 K.PS.MAX
|
|||
|
|
*--------------------------------------
|
|||
|
|
OF.Table.hPath .EQ $0D00 K.OF.MAX
|
|||
|
|
OF.Table.hFD .EQ $0D20 K.OF.MAX
|
|||
|
|
*--------------------------------------
|
|||
|
|
Evt.Table .EQ $0D60 K.EVT.MAX*S.EVT.SIZE=4*8=32b
|
|||
|
|
*--------------------------------------
|
|||
|
|
Flt.Table .EQ $0D80 K.FLT.MAX*S.FLT.SIZE=4*32=128b
|
|||
|
|
*--------------------------------------
|
|||
|
|
K.Buf256 .EQ $0E00
|
|||
|
|
*--------------------------------------
|
|||
|
|
K.IOBuf .EQ $0F00
|
|||
|
|
*--------------------------------------
|
|||
|
|
*** Z80 Reserved $1000-10FF***
|
|||
|
|
*--------------------------------------
|
|||
|
|
Z80CODE .EQ $1000 (00000h) Up To $10FF
|
|||
|
|
Z80STACK .EQ $10FF (000FFh) Down to $1000
|
|||
|
|
*--------------------------------------
|
|||
|
|
* CORE $1100->$17FF = $700 Main
|
|||
|
|
*--------------------------------------
|
|||
|
|
* MemMgr : $1800->$1FFF MAIN/AUX (2 kBytes)
|
|||
|
|
*--------------------------------------
|
|||
|
|
Mem.Table .EQ $1800 Slot 0 is Reserved
|
|||
|
|
Mem.LoMem .EQ $1800
|
|||
|
|
Mem.Free .EQ $1802
|
|||
|
|
Mem.HiMem .EQ $1804
|
|||
|
|
Mem.LastSlot .EQ $1806
|
|||
|
|
*--------------------------------------
|
|||
|
|
Mem.MLoMem .EQ $2000
|
|||
|
|
Mem.MHiMem .EQ $BD00
|
|||
|
|
Mem.XLoMem .EQ $2000
|
|||
|
|
Mem.XHiMem .EQ $C000
|
|||
|
|
*--------------------------------------
|
|||
|
|
DevMgr.HiMem .EQ $FFFA Protect IRQ vectors in Aux LC
|
|||
|
|
*--------------------------------------
|
|||
|
|
H.BIN.T .EQ 0
|
|||
|
|
H.BIN.T.DRV65 .EQ $4CD8 6502:cld,jmp abs
|
|||
|
|
H.BIN.T.LIB65 .EQ $7CD8 6502:cld,jmp (abs,x)
|
|||
|
|
H.BIN.T.BIN65 .EQ $7CD8 6502:cld,jmp (abs,x)
|
|||
|
|
*H.BIN.T.LIB80 .EQ $A28D Z80:
|
|||
|
|
*H.BIN.T.BIN80 .EQ $A28D Z80:
|
|||
|
|
H.BIN.JMP .EQ 2
|
|||
|
|
H.BIN.CPU .EQ 4
|
|||
|
|
H.BIN.CPU.6502 .EQ $60
|
|||
|
|
H.BIN.CPU.65C02 .EQ $61
|
|||
|
|
H.BIN.CPU.65R02 .EQ $62
|
|||
|
|
H.BIN.CPU.65816 .EQ $63
|
|||
|
|
H.BIN.V .EQ 5
|
|||
|
|
H.BIN.F .EQ 6
|
|||
|
|
H.BIN.CS.SIZE .EQ 8
|
|||
|
|
H.BIN.DS.SIZE .EQ 10
|
|||
|
|
H.BIN.SS.SIZE .EQ 12
|
|||
|
|
H.BIN.ZP.SIZE .EQ 13
|
|||
|
|
*
|
|||
|
|
H.BIN.EXE.REL.TABLE .EQ 16
|
|||
|
|
*
|
|||
|
|
H.BIN.DRV.REL.TABLE .EQ 2 Including main jmp
|
|||
|
|
*--------------------------------------
|
|||
|
|
MAN
|
|||
|
|
SAVE INC/KERNEL.I
|
|||
|
|
LOAD USR/SRC/SYS/KERNEL.S
|
|||
|
|
ASM
|