Kernel 0.94

This commit is contained in:
Rémy GIBERT 2020-10-01 08:08:33 +02:00
parent eb0182dfd9
commit a84f65a534
5 changed files with 21 additions and 11 deletions

Binary file not shown.

View File

@ -208,12 +208,15 @@ OSD.GETTEXTSIZE clc
bcc .3
inc CBX.Cache+S.CB.SrcW+1
bra .3
.4 plp
lda CBX.Cache+S.CB.SrcW
.4 plp
bcs .5
jmp CB.Update
.5 lda CBX.Cache+S.CB.SrcW
ldx CBX.Cache+S.CB.SrcW+1
ldy CBX.Cache+S.CB.SrcH
bcc OSD.GETRECTBUFSIZE.RTS
sta DstBM.Cache+S.BM.W
stx DstBM.Cache+S.BM.W+1

View File

@ -12,6 +12,10 @@ DrawToYA jsr OBJ.Get
>LDYA ZPCBPtr
jsr CB.Get
cmp #S.CB.CMD.DRAWTEXT2
bne .77
>DEBUG
.77
jsr CLIP.CB.Cache
bcs .7
@ -133,6 +137,7 @@ DrawLine.IncXY lda DX DX=DY
jsr GFXWrite.CB
bra .1
.8 rts
DrawLine.IncY lda DY
eor #$ff
sta Counter

View File

@ -25,7 +25,7 @@ MENU.MBarInit >STYA ZPMENUPtr
stz DX
stz DX+1
.1 lda (ZPPtr1)
beq .8
@ -49,16 +49,16 @@ MENU.MBarInit >STYA ZPMENUPtr
lda DX+1
sta (ZPPtr1),y
iny #S.MBAR.XT
iny #S.MBAR.XT
lda DX
clc
adc #PREFS.MBARXMARGIN
adc PREFS.MBARXMARGIN
sta DX
sta (ZPPtr1),y
iny
lda DX+1
adc #0
sta DX+1
@ -66,20 +66,19 @@ MENU.MBarInit >STYA ZPMENUPtr
lda DX
clc
adc CB.CACHE+S.CB.SrcX
adc CB.CACHE+S.CB.SrcW
sta DX
lda DX+1
adc CB.CACHE+S.CB.SrcX+1
adc CB.CACHE+S.CB.SrcW+1
sta DX+1
iny #S.MBAR.X2
lda DX
clc
adc #PREFS.MBARXMARGIN
adc PREFS.MBARXMARGIN
sta DX
sta (ZPPtr1),y
iny

View File

@ -787,9 +787,12 @@ WND.PaintMBar jsr CB.Clear
ldy #S.WND.MBAR.Y1
lda (ZPWNDPtr),y
clc
adc #1
sta CB.CACHE+S.CB.Y1
iny
lda (ZPWNDPtr),y
adc #0
sta CB.CACHE+S.CB.Y1+1
lda #S.MBAR.TEXT