mirror of
https://github.com/A2osX/A2osX.git
synced 2024-12-25 04:30:59 +00:00
Kernel 0.92+
This commit is contained in:
parent
cac9b2f668
commit
951e3c8a1b
Binary file not shown.
Binary file not shown.
@ -146,8 +146,8 @@ CMD.CD.1 >SYSCALL realpath
|
|||||||
dey
|
dey
|
||||||
lda #'/'
|
lda #'/'
|
||||||
sta (ZPPtr2),y
|
sta (ZPPtr2),y
|
||||||
pla
|
|
||||||
phx
|
phx
|
||||||
|
lda ZPPtr3
|
||||||
>SYSCALL freemem
|
>SYSCALL freemem
|
||||||
pla
|
pla
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
|
@ -58,7 +58,7 @@ CORE.GetCmd >LDYA ZPInputBufPtr
|
|||||||
bne .1
|
bne .1
|
||||||
|
|
||||||
lda #E.SYN Line Too long !!!
|
lda #E.SYN Line Too long !!!
|
||||||
sec
|
.9 sec
|
||||||
rts
|
rts
|
||||||
|
|
||||||
.6 sec skip CR or ;
|
.6 sec skip CR or ;
|
||||||
@ -77,9 +77,6 @@ CORE.GetCmd >LDYA ZPInputBufPtr
|
|||||||
|
|
||||||
clc
|
clc
|
||||||
rts
|
rts
|
||||||
|
|
||||||
.9 sec A=0
|
|
||||||
rts
|
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
* Input : ZPArgVBuf (String)
|
* Input : ZPArgVBuf (String)
|
||||||
* Tokenize ZPArgVBuf
|
* Tokenize ZPArgVBuf
|
||||||
|
@ -173,7 +173,7 @@ LIB.LOAD ldx RefCount
|
|||||||
.8 inc RefCount
|
.8 inc RefCount
|
||||||
|
|
||||||
clc
|
clc
|
||||||
.9 rts
|
rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
LIB.UNLOAD dec RefCount
|
LIB.UNLOAD dec RefCount
|
||||||
|
|
||||||
|
@ -153,7 +153,7 @@ CS.INIT.LIBS lda LibCnt
|
|||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
CS.INIT.CONF >LDYAI 64
|
CS.INIT.CONF >LDYAI 64
|
||||||
>SYSCALL GetMem
|
>SYSCALL GetMem
|
||||||
bcs .9
|
bcs .99
|
||||||
|
|
||||||
>STYA pBuf
|
>STYA pBuf
|
||||||
stx hLineBuf
|
stx hLineBuf
|
||||||
@ -164,7 +164,7 @@ CS.INIT.CONF >LDYAI 64
|
|||||||
|
|
||||||
>LDYA L.ETCNETWORK
|
>LDYA L.ETCNETWORK
|
||||||
>SYSCALL fopen
|
>SYSCALL fopen
|
||||||
bcs .9
|
bcs .98
|
||||||
|
|
||||||
sta hNetworkFile
|
sta hNetworkFile
|
||||||
|
|
||||||
@ -172,18 +172,27 @@ CS.INIT.CONF >LDYAI 64
|
|||||||
>PUSHW pBuf
|
>PUSHW pBuf
|
||||||
lda hNetworkFile
|
lda hNetworkFile
|
||||||
>SYSCALL fgets
|
>SYSCALL fgets
|
||||||
bcs .8
|
bcs .80
|
||||||
|
|
||||||
>PUSHBI 0 PS Flags
|
>PUSHBI 0 PS Flags
|
||||||
>LDYA pBuf
|
>LDYA pBuf
|
||||||
>SYSCALL execL
|
>SYSCALL execL
|
||||||
bra .1
|
bra .1
|
||||||
|
|
||||||
.8 lda hNetworkFile
|
.98 pha
|
||||||
|
jsr .81
|
||||||
|
pla
|
||||||
|
sec
|
||||||
|
.99 rts
|
||||||
|
|
||||||
|
.80 lda hNetworkFile
|
||||||
>SYSCALL fclose
|
>SYSCALL fclose
|
||||||
|
|
||||||
|
.81 lda hLineBuf
|
||||||
|
>SYSCALL FreeMem
|
||||||
|
|
||||||
clc
|
clc
|
||||||
.9 rts
|
rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
CS.RUN >PUSHW L.IOCTL
|
CS.RUN >PUSHW L.IOCTL
|
||||||
>PUSHBI IOCTL.READ
|
>PUSHBI IOCTL.READ
|
||||||
|
@ -52,17 +52,18 @@ K.UnloadLib pha
|
|||||||
ldy #S.MEM.REFCNT
|
ldy #S.MEM.REFCNT
|
||||||
lda (ZPMemMgrSPtr),y
|
lda (ZPMemMgrSPtr),y
|
||||||
dec
|
dec
|
||||||
sta (ZPMemMgrSPtr),y
|
bne .8
|
||||||
beq .1
|
|
||||||
|
|
||||||
pla
|
|
||||||
* clc
|
|
||||||
rts
|
|
||||||
|
|
||||||
.1 ldx #LIBMGR.UNLOAD
|
.1 ldx #LIBMGR.UNLOAD
|
||||||
.2 jsr $ffff Self Modified, Call LIB.UNLOAD function
|
.2 jsr $ffff Self Modified, Call LIB.UNLOAD function
|
||||||
pla
|
pla
|
||||||
jmp K.FreeMem
|
jmp K.FreeMem
|
||||||
|
|
||||||
|
.8 sta (ZPMemMgrSPtr),y
|
||||||
|
|
||||||
|
pla
|
||||||
|
* clc
|
||||||
|
rts
|
||||||
*/--------------------------------------
|
*/--------------------------------------
|
||||||
* # LoadDrv
|
* # LoadDrv
|
||||||
* ## ASM
|
* ## ASM
|
||||||
|
Loading…
Reference in New Issue
Block a user