Kernel 0.9.2

This commit is contained in:
Rémy GIBERT 2018-07-16 17:29:18 +02:00
parent 6c8a40e170
commit 545cd148d0
5 changed files with 16 additions and 13 deletions

Binary file not shown.

Binary file not shown.

View File

@ -43,9 +43,9 @@ CS.INIT ldy #S.PS.ARGC
bne .90 bne .90
lda #1 lda #1
>SYSCALL GetArg.A >SYSCALL GetArg
>SYSCALL MkNod.YA >SYSCALL MkNod
bcs .9 bcs .9
ldy #S.PS.hStdIn ldy #S.PS.hStdIn
@ -58,10 +58,10 @@ CS.INIT ldy #S.PS.ARGC
>STA.G hNode >STA.G hNode
lda #2 lda #2
>SYSCALL GetArg.A >SYSCALL GetArg
bcs .9 bcs .9
>SYSCALL ExpandStr.YA >SYSCALL ExpandStr
bcs .9 bcs .9
txa txa
@ -97,7 +97,7 @@ CS.RUN >SLEEP
.1 lda MSG.TELNETOPT,y .1 lda MSG.TELNETOPT,y
phy phy
>SYSCALL PutChar.A >SYSCALL PutChar
ply ply
iny iny
cpy #MSG.TELNETOPT.LEN cpy #MSG.TELNETOPT.LEN
@ -122,8 +122,8 @@ CS.RUN.LOOP
bcs .8 unable to send greetings...reset.. bcs .8 unable to send greetings...reset..
>LDA.G hBinName >LDA.G hBinName
>SYSCALL GetMemPtr.A >SYSCALL GetMemPtr
>SYSCALL ExecPS.YA >SYSCALL ExecPS
.9 rts .9 rts
@ -218,13 +218,13 @@ CS.DOEVENT lda (pEvent)
*-------------------------------------- *--------------------------------------
CS.QUIT >LDA.G hBinName CS.QUIT >LDA.G hBinName
beq .1 beq .1
>SYSCALL FreeMem.A >SYSCALL FreeMem
.1 >LDA.G hNode .1 >LDA.G hNode
beq .8 beq .8
>PUSHA >PUSHA
>PUSHBI DEVMGR.CLOSE >PUSHBI IOCTL.CLOSE
>PUSHBI 0 >PUSHBI 0
>SYSCALL IOCTL >SYSCALL IOCTL

View File

@ -338,6 +338,9 @@ K.InsDrv >STYA BIN.R.CS.Start
jsr BIN.Move jsr BIN.Move
>LDYA BIN.R.CS.Start
>STYA ZPPtr1
jsr BIN.RelDrv jsr BIN.RelDrv
>LDYA BIN.R.End >LDYA BIN.R.End