Kernel 0.93

This commit is contained in:
Rémy GIBERT 2019-04-11 08:52:53 +01:00
parent f85e1583b8
commit 255af3c77f
2 changed files with 6 additions and 4 deletions

Binary file not shown.

View File

@ -186,7 +186,7 @@ A2osX.Screen80 lda #$8C
.1 lda Boot.Prefix,x .1 lda Boot.Prefix,x
sta LOGO.Filename,x sta LOGO.Filename,x
dex dex
bpl .1 bne .1
ldx Boot.Prefix ldx Boot.Prefix
ldy #0 ldy #0
@ -197,6 +197,8 @@ A2osX.Screen80 lda #$8C
sta LOGO.Filename,x sta LOGO.Filename,x
cpy A2osX.LOGO cpy A2osX.LOGO
bne .2 bne .2
stx LOGO.Filename
jsr MLI jsr MLI
.DA #MLIOPEN .DA #MLIOPEN
@ -209,7 +211,7 @@ A2osX.Screen80 lda #$8C
jsr MLI jsr MLI
.DA #MLIREAD .DA #MLIREAD
.DA MLIREAD00 .DA MLIREAD00
bcs .98 bcs .98
jsr .98 jsr .98
@ -231,7 +233,7 @@ A2osX.ScreenDLGR
sta CLRTEXT sta CLRTEXT
sta SET80STORE sta SET80STORE
sta SETDHIRES sta SETDHIRES
lda #A2osX.LOGOLOAD+S.BM lda #A2osX.LOGOLOAD+S.BM
sta TmpPtr1 sta TmpPtr1
lda /A2osX.LOGOLOAD+S.BM lda /A2osX.LOGOLOAD+S.BM
@ -312,7 +314,7 @@ A2osX.ScreenDLGR
.7 inx .7 inx
cpx #20 cpx #20
bne .1 bne .1
rts rts
*-------------------------------------- *--------------------------------------
DisableRamDRV php DisableRamDRV php