Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-06-01 07:41:51 +00:00
Code Issues Projects Releases Wiki Activity

Kernel 0.92

Browse Source
This commit is contained in:
Rémy GIBERT 2019-01-26 21:46:39 +00:00
parent 786ff8b5c8
commit 3344f59582
10 changed files with 46 additions and 30 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.Floppies/A2OSX.BUILD.po
View File

Binary file not shown.

5
BIN/ASM.S.FIO.txt
View File

@ -121,7 +121,7 @@ FIO.OpenFile >STYA ZPPtr1
rts
.1 >PUSHW L.FIO.Stat
>PUSHW ZPPtr1
>LDYA ZPPtr1
>SYSCALL Stat
bcs .99
@ -144,7 +144,7 @@ FIO.OpenFile >STYA ZPPtr1
.3 >LDYA ZPPtr1
>SYSCALL FOpen
bcs .99
>DEBUG
pha
ldy #SRC.COUNT
lda (pData),y
@ -307,6 +307,7 @@ FIO.ReadFromFile
adc #SRC.hFILES-1
tay
lda (pData),y
>DEBUG
>SYSCALL FRead
bcs .9

4
BIN/ASM.T.6502.A.txt
View File

@ -21,6 +21,6 @@ T.REGISTERS .EQ *
.HS 00
*---------------------------------------
MAN
SAVE /A2OSX.BUILD/BIN/DEV/ASM.T.6502.A
LOAD /A2OSX.BUILD/BIN/DEV/ASM.T.6502.S
SAVE USR/SRC/BIN/DEV/ASM.T.6502.A
LOAD USR/SRC/BIN/DEV/ASM.T.6502.S
ASM

4
BIN/ASM.T.6502.O.txt
View File

@ -325,6 +325,6 @@ TYA.E .HS 00
.HS 0000
*---------------------------------------
MAN
SAVE /A2OSX.BUILD/BIN/DEV/ASM.T.6502.O
LOAD /A2OSX.BUILD/BIN/DEV/ASM.T.6502.S
SAVE USR/SRC/BIN/DEV/ASM.T.6502.O
LOAD USR/SRC//BIN/DEV/ASM.T.6502.S
ASM

6
BIN/ASM.T.6502.S.txt
View File

@ -9,9 +9,9 @@ AUTO 4,1
.DA T.REGISTERS
.DA T.OPCODES
*---------------------------------------
.INB BIN/DEV/ASM.T.6502.O
.INB BIN/DEV/ASM.T.6502.A
.INB USR/SRC/BIN/DEV/ASM.T.6502.O
.INB USR/SRC/BIN/DEV/ASM.T.6502.A
*---------------------------------------
MAN
SAVE /A2OSX.BUILD/BIN/DEV/ASM.T.6502.S
SAVE USR/SRC/BIN/DEV/ASM.T.6502.S
ASM

26
BIN/SHELL.S.CL.txt
View File

@ -3,6 +3,22 @@ PREFIX
AUTO 4,1
.LIST OFF
*--------------------------------------
CL.Init >LDYAI 256
>SYSCALL GetMem
bcs .9
>STYA ZPCLBuf
txa
>STA.G CMD.hCLBuf
.9 rts
*--------------------------------------
CL.Quit >LDA.G CMD.hCLBuf
beq .9
>SYSCALL FreeMem
.9 rts
*--------------------------------------
CL.PrintPrompt >LDYA L.ENV.PS1
>SYSCALL GetEnv
bcs .1
@ -158,7 +174,7 @@ CL.CLR lda (ZPCLBuf)
lda (ZPCLBuf),y
bne .3
jsr CL.PrintCmdBuf
jsr CL.PrintCLBuf
*--------------------------------------
CL.RESET lda #0
sta (ZPCLBuf)
@ -265,13 +281,15 @@ CL.PrintEOL >LDA.G CL.Ptr
CL.PrintEOL.8 clc
rts
*--------------------------------------
CL.PrintCmdBuf >LDYA ZPCLBuf
CL.PrintCLBuf >LDYA ZPCLBuf
>PUSHYA
ldy #S.PS.hStdOut
lda (pPs),y
>SYSCALL fputs
rts
*--------------------------------------
* Read From CLBuf or FileBuf
*--------------------------------------
CL.GetLine >LDYA ZPFileBufPtr
>STYA ZPFileBufPtrBak
@ -471,10 +489,6 @@ CL.IO.AMP >LDA.G CMD.PSFlags
sta (pData),y
clc
rts
CL.IO.PIPE
clc
rts
CL.IO.IN lda #O.RDONLY+O.TEXT
jsr CL.IO.Open

2
BIN/SHELL.S.CMD.txt
View File

@ -27,7 +27,7 @@ CMD.Init >LDYAI 256
CMD.Quit ldy #CMD.hArgVBuf
jsr .8
ldy #CMD.hCLBuf
ldy #CMD.hCmdBuf
jsr .8
ldy #hFileBuf

2
BIN/SHELL.S.HIS.txt
View File

@ -145,7 +145,7 @@ HIS.SetA jsr HIS.GetA
>STA.G CL.Ptr
>STA.G CL.Len
jmp CL.PrintCmdBuf
jmp CL.PrintCLBuf
*--------------------------------------
HIS.GetA ldy #0

21
BIN/SHELL.S.txt
View File

@ -42,7 +42,7 @@ C.FI .EQ 52
*--------------------------------------
E.CSYN .EQ $C0
E.SSYN .EQ $C1
E.ESYN .EQ $C1
E.ESYN .EQ $C2
E.STKOVERFLOW .EQ $C3
E.NOWHILE .EQ $C4
E.NOFOR .EQ $C5
@ -62,10 +62,11 @@ ZPPtr1 .BS 2
ZPPtr2 .BS 2
ZPPtr3 .BS 2
ZPCLBuf .BS 2
ZPArgVBuf .BS 2
ZPCLBufPtr .BS 2
ZPFileBufPtr .BS 2
ZPFileBufPtrBak .BS 2
ZPCLBufPtr .BS 2
ZPCmdBuf .BS 2
ZPArgVBuf .BS 2
ZS.END .ED
*--------------------------------------
* File Header (16 Bytes)
@ -111,7 +112,6 @@ J.ESC .DA CL.BS left arrow
.DA CL.NAK right arow
L.CL.IO .DA CL.IO
J.CL.IO .DA CL.IO.AMP
.DA CL.IO.PIPE
.DA CL.IO.IN
.DA CL.IO.OUTA
.DA CL.IO.OUT
@ -192,9 +192,9 @@ CS.RUN jsr CMD.Init
jsr ShiftA Remove $0=/bin/shell
bra CS.RUN.LOOP
*--------------------------------------
.1 jsr Cmd.INT.CD.HOME
jsr CL.Init
jsr HIS.Init
bcs CS.INIT.RTS
@ -214,8 +214,7 @@ CS.RUN jsr CMD.Init
>SYSCALL execl
>SLEEP
*--------------------------------------
CS.RUN.LOOP jsr CL.Reset
jsr IO.Reset
CS.RUN.LOOP jsr IO.Reset
.1 jsr CheckSleep
beq .3
@ -277,6 +276,7 @@ CS.RUN.LOOP jsr CL.Reset
rts
*--------------------------------------
CS.RUN.INTERACTIVE
jsr CL.Reset
jsr CL.PrintPrompt
bcs .9
@ -572,7 +572,6 @@ HOME.PROFILE .AZ "${HOME}PROFILE"
* https://www.tldp.org/LDP/abs/html/io-redirection.html
*--------------------------------------
CL.IO .AZ "&"
.AZ "|"
.AZ "<"
.AZ ">>"
.AZ ">"
@ -669,13 +668,13 @@ bREAD.S .BS 1
Sleep .BS 4
CL.hCLBuf .BS 1
CL.Ptr .BS 1
CL.Len .BS 1
CL.bExec .BS 1
CMD.hCLBuf .BS 1
CMD.IntCmd .BS 1
CMD.hCmdBuf .BS 1
CMD.hArgVBuf .BS 1
CMD.ArgIndex .BS 1

6
SYS/KERNEL.S.BIN.txt
View File

@ -26,7 +26,8 @@ K.LoadLib jsr ENV.Search.LIB
bcs .9
>STYA .1+1
stx BIN.hMem
txa Pass hLib to LibLoad
ldx #LIBMGR.LOAD
.1 jsr $ffff Self Modified, Call LIB.LOAD function
@ -74,7 +75,8 @@ K.LoadDrv >STYA .2+1 Save "BIN\0ARGS\0\0"
bcs .9
>STYA .3+1
stx BIN.hMem
ldx #$ff
.1 inx Skip "BIN"