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

View File

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