mirror of
https://github.com/A2osX/A2osX.git
synced 2024-11-29 17:50:18 +00:00
Kernel 0.94
This commit is contained in:
parent
7df3a2e93e
commit
e774d6e44b
Binary file not shown.
@ -236,7 +236,8 @@ CS.RUN.LOGO.SHOW
|
|||||||
|
|
||||||
.80 >SYSCALL GetChar
|
.80 >SYSCALL GetChar
|
||||||
|
|
||||||
|
lda CB.LOGO+S.CB.DstPtr
|
||||||
|
>SYSCALL FreeStkObj
|
||||||
|
|
||||||
|
|
||||||
.99 rts
|
.99 rts
|
||||||
@ -273,14 +274,16 @@ CS.QUIT lda hFont
|
|||||||
beq .6
|
beq .6
|
||||||
>SYSCALL FreeStkObj
|
>SYSCALL FreeStkObj
|
||||||
|
|
||||||
.6
|
.6 lda CB.PALETTE+S.CB.SrcPtr
|
||||||
lda hDevGFX
|
beq .7
|
||||||
|
>SYSCALL FreeStkObj
|
||||||
|
|
||||||
|
.7 lda hDevGFX
|
||||||
beq .8
|
beq .8
|
||||||
* >DEBUG
|
* >DEBUG
|
||||||
* >SYSCALL close
|
* >SYSCALL close
|
||||||
* >DEBUG
|
|
||||||
.8
|
.8 clc
|
||||||
clc
|
|
||||||
rts
|
rts
|
||||||
*--------------------------------------
|
*--------------------------------------
|
||||||
LoadResources >PUSHW L.FONTFILE
|
LoadResources >PUSHW L.FONTFILE
|
||||||
|
Loading…
Reference in New Issue
Block a user