A2osX/INC/KERNEL.I.txt

NEW
PREFIX /A2OSX.BUILD
AUTO 4,1
				.LIST OFF
*--------------------------------------
* KERNEL CONSTANTS DEFINITON
*--------------------------------------
K.ENV.SIZE		.EQ 256
K.FLT.MAX		.EQ 4
K.EVT.MAX		.EQ 4
K.DEV.MAX		.EQ 32
K.PS.MAX		.EQ 32
*--------------------------------------
ZPKERNEL		.EQ $0
ZPMEMMGR		.EQ $10
*--------------------------------------
ZPPtr1			.EQ ZPKERNEL
ZPPtr2			.EQ ZPKERNEL+2
ZPPtr3			.EQ ZPKERNEL+4
ZPPtr4			.EQ ZPKERNEL+6

pIOCTL			.EQ ZPKERNEL+8
*pDev			.EQ ZPKERNEL+10
pFD				.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.DSTAT		.EQ $0340				S.DSTAT=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
*--------------------------------------
FD.Table.hMem	.EQ $0C00				K.Dev.MAX
FD.Table.F		.EQ $0C20				K.Dev.MAX
FD.Table.PTRLO	.EQ $0C40				K.Dev.MAX
FD.Table.PTRHI	.EQ $0C60				K.Dev.MAX
*--------------------------------------
PS.Table.hMem	.EQ $0D00				K.PS.MAX
PS.Table.PID	.EQ $0D20				K.PS.MAX
PS.Table.Stat	.EQ $0D40				K.PS.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.VERSION		.EQ 5
H.BIN.CODE.LEN	.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 4
*--------------------------------------
MAN
SAVE /A2OSX.BUILD/INC/KERNEL.I
LOAD /A2OSX.SRC/SYS/KERNEL.S
ASM