mirror of
https://github.com/A2osX/A2osX.git
synced 2024-07-13 13:29:04 +00:00
Kernel 0.93+
This commit is contained in:
parent
d2ce5eef6b
commit
bc535424f7
@ -1140,8 +1140,7 @@ CSH.IsDigit10 cmp #'0'
|
|||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
* EXEC
|
* EXEC
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
EXEC.printf >PULLYA
|
EXEC.printf >SYSCALL printf2
|
||||||
>SYSCALL printf
|
|
||||||
rts
|
rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
EXEC.puts >PULLYA
|
EXEC.puts >PULLYA
|
||||||
|
@ -207,7 +207,7 @@ SYS.MKDev .EQ $4E
|
|||||||
* .EQ $50
|
* .EQ $50
|
||||||
SYS.SScanF .EQ $52
|
SYS.SScanF .EQ $52
|
||||||
* .EQ $54
|
* .EQ $54
|
||||||
* .EQ $56
|
SYS.PrintF2 .EQ $56
|
||||||
SYS.PrintF .EQ $58
|
SYS.PrintF .EQ $58
|
||||||
SYS.SPrintF .EQ $5A
|
SYS.SPrintF .EQ $5A
|
||||||
SYS.FPrintF .EQ $5C
|
SYS.FPrintF .EQ $5C
|
||||||
|
@ -53,7 +53,7 @@ K.SYSCALL .DA 0 $00
|
|||||||
.DA 0 $50
|
.DA 0 $50
|
||||||
.DA K.SScanF
|
.DA K.SScanF
|
||||||
.DA 0
|
.DA 0
|
||||||
.DA 0
|
.DA K.PrintF2
|
||||||
.DA K.PrintF
|
.DA K.PrintF
|
||||||
.DA K.SPrintF
|
.DA K.SPrintF
|
||||||
.DA K.FPrintF
|
.DA K.FPrintF
|
||||||
|
@ -155,11 +155,7 @@ SHARED.NextCharPtr2
|
|||||||
.8 rts
|
.8 rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
SHARED.PullYA sta CLRREADAUX
|
SHARED.PullYA sta CLRREADAUX
|
||||||
lda (pStack)
|
>PULLYA
|
||||||
tay
|
|
||||||
inc pStack
|
|
||||||
lda (pStack)
|
|
||||||
inc pStack
|
|
||||||
sta SETREADAUX
|
sta SETREADAUX
|
||||||
rts
|
rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
|
@ -238,6 +238,67 @@ PrintF.Cnt .BS 2
|
|||||||
PrintF.hFILE .BS 1
|
PrintF.hFILE .BS 1
|
||||||
.ED
|
.ED
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
|
* `int printf2 ( const char * format, ... );`
|
||||||
|
* `>PUSHBI 2` #bytecount
|
||||||
|
* `>PUSHWI format`
|
||||||
|
* `>PUSHW IntValue`
|
||||||
|
* `...`
|
||||||
|
* `>SYSCALL printf2`
|
||||||
|
*--------------------------------------
|
||||||
|
K.PrintF2 lda (pStack) Bytecount
|
||||||
|
inc
|
||||||
|
tay
|
||||||
|
|
||||||
|
lda (pStack),y format LO
|
||||||
|
sta ZPPtr2
|
||||||
|
iny
|
||||||
|
lda (pStack),y format HI
|
||||||
|
sta ZPPtr2+1
|
||||||
|
|
||||||
|
ldy #S.PS.hStdOut
|
||||||
|
lda (pPs),y
|
||||||
|
sta PrintF.hFILE
|
||||||
|
|
||||||
|
>LDYAI K.IOBuf
|
||||||
|
>STYA pIOBuf
|
||||||
|
|
||||||
|
K.FPrintf2 lda (pStack) Bytecount
|
||||||
|
inc
|
||||||
|
tay
|
||||||
|
|
||||||
|
lda (pStack),y format LO
|
||||||
|
sta ZPPtr2
|
||||||
|
iny
|
||||||
|
lda (pStack),y format HI
|
||||||
|
sta ZPPtr2+1
|
||||||
|
|
||||||
|
iny
|
||||||
|
lda (pStack),y hFILE
|
||||||
|
sta PrintF.hFILE
|
||||||
|
|
||||||
|
>LDYAI K.IOBuf
|
||||||
|
>STYA pIOBuf
|
||||||
|
|
||||||
|
K.SPrintf2 lda (pStack) Bytecount
|
||||||
|
inc
|
||||||
|
tay
|
||||||
|
|
||||||
|
lda (pStack),y format LO
|
||||||
|
sta ZPPtr2
|
||||||
|
iny
|
||||||
|
lda (pStack),y format HI
|
||||||
|
sta ZPPtr2+1
|
||||||
|
|
||||||
|
stz PrintF.hFILE
|
||||||
|
|
||||||
|
iny
|
||||||
|
lda (pStack),y str LO
|
||||||
|
sta pIOBuf
|
||||||
|
iny
|
||||||
|
lda (pStack),y str HI
|
||||||
|
sta pIOBuf+1
|
||||||
|
|
||||||
|
*--------------------------------------
|
||||||
K.PrintF.GetFormat
|
K.PrintF.GetFormat
|
||||||
lda (pStack)
|
lda (pStack)
|
||||||
sta ZPPtr2
|
sta ZPPtr2
|
||||||
|
Loading…
Reference in New Issue
Block a user