Kernel 0.93+

This commit is contained in:
Rémy GIBERT
2019-12-11 08:38:45 +01:00
parent e9baba35fa
commit 5a5efd626d
2 changed files with 34 additions and 4 deletions

Binary file not shown.

View File

@@ -404,7 +404,7 @@ EnumKM ldx #0
ldy KM.PREFIX
.4 lda (TmpPtr1),y
.4 lda (TmpPtr1),y KM.* ?
cmp KM.PREFIX,y
bne .5
@@ -451,6 +451,13 @@ LoadKM ldx Boot.Prefix
dex
bne .1
ldy #$1c
lda (TmpPtr1),y
sta LoadKM.VERSION
iny
lda (TmpPtr1),y
sta LoadKM.MVERSION
ldx Boot.Prefix
lda (TmpPtr1)
and #$0F
@@ -460,7 +467,26 @@ LoadKM ldx Boot.Prefix
sta KM.Filename
tax
.2 lda (TmpPtr1),y
.2 bit LoadKM.VERSION
bpl .6
cpy #8
bcs .3
lda LoadKM.Bits,y
bit LoadKM.VERSION
beq .6
bra .4
.3 lda LoadKM.Bits-8,y
bit LoadKM.MVERSION
beq .6
.4 lda (TmpPtr1),y
eor #$20
.HS 2C BIT ABS
.6 lda (TmpPtr1),y
sta KM.Filename,x
dex
dey
@@ -501,6 +527,10 @@ LoadKM ldx Boot.Prefix
.DA #MLICLOSE
.DA MLICLOSE02
.99 rts
*--------------------------------------
LoadKM.VERSION .BS 1
LoadKM.MVERSION .BS 1
LoadKM.Bits .HS 8040201008040201
*--------------------------------------
.INB USR/SRC/SHARED/X.PRINTF.S
*--------------------------------------