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 bcc .3
inc CBX.Cache+S.CB.SrcW+1 inc CBX.Cache+S.CB.SrcW+1
bra .3 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 ldx CBX.Cache+S.CB.SrcW+1
ldy CBX.Cache+S.CB.SrcH ldy CBX.Cache+S.CB.SrcH
bcc OSD.GETRECTBUFSIZE.RTS
sta DstBM.Cache+S.BM.W sta DstBM.Cache+S.BM.W
stx DstBM.Cache+S.BM.W+1 stx DstBM.Cache+S.BM.W+1

View File

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

View File

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

View File

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