mirror of
https://github.com/A2osX/A2osX.git
synced 2024-11-22 16:31:07 +00:00
Kernel 0.93++
This commit is contained in:
parent
0c494b0094
commit
4e938bfdb2
Binary file not shown.
@ -106,7 +106,7 @@ CORE.Run.RTS rts
|
|||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
CORE.Run jsr IO.Reset
|
CORE.Run jsr IO.Reset
|
||||||
|
|
||||||
>LDYAI 256+16
|
>LDYAI 256
|
||||||
>SYSCALL GetMem
|
>SYSCALL GetMem
|
||||||
bcs CORE.Run.RTS
|
bcs CORE.Run.RTS
|
||||||
>STYA ZPArgVBuf
|
>STYA ZPArgVBuf
|
||||||
@ -128,7 +128,7 @@ CORE.Run.1 sec coming from PIPE OUT
|
|||||||
|
|
||||||
lda #0
|
lda #0
|
||||||
sta (ZPArgVBuf)
|
sta (ZPArgVBuf)
|
||||||
|
|
||||||
sec
|
sec
|
||||||
ror CORE.IntCmd assume external
|
ror CORE.IntCmd assume external
|
||||||
|
|
||||||
@ -268,11 +268,12 @@ CORE.Run.7 jsr CORE.GetCharNB
|
|||||||
CORE.Run.Exit php
|
CORE.Run.Exit php
|
||||||
pha
|
pha
|
||||||
>LDA.G CORE.hArgVBuf
|
>LDA.G CORE.hArgVBuf
|
||||||
|
beq .1
|
||||||
>SYSCALL freemem
|
>SYSCALL freemem
|
||||||
|
|
||||||
>STZ.G CORE.hArgVBuf
|
>STZ.G CORE.hArgVBuf
|
||||||
|
|
||||||
pla
|
.1 pla
|
||||||
plp
|
plp
|
||||||
rts
|
rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
|
Loading…
Reference in New Issue
Block a user