Apple-2-SW/A2osX
1
0
Fork 0
mirror of https://github.com/A2osX/A2osX.git synced 2024-08-10 16:29:28 +00:00
Code Issues Projects Releases Wiki Activity

Kernel 0.93+

Browse Source
This commit is contained in:
Rémy GIBERT 2019-12-13 17:06:23 +01:00
parent 890eba262b
commit ce645607b9
3 changed files with 11 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

BIN
.Floppies/A2OSX.BUILD.po
View File

Binary file not shown.

15
BIN/EDIT.S.DLG.txt
View File

@ -224,8 +224,7 @@ DLG.CTRL.Draw.LBL
iny iny
bra .1 bra .1
.8 jsr SCRN.LineBufOut .8 jmp SCRN.LineBufOut
* >DEBUG
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
@ -297,7 +296,7 @@ DLG.CTRL.Draw.TB
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
DLG.CTRL.Draw.OL DLG.CTRL.Draw.OL
jsr SCRN.LineBufInitDlg jsr SCRN.LineBufInitLbl
jsr DLG.CTRL.GotoOrg jsr DLG.CTRL.GotoOrg
bcs .9 bcs .9
@ -340,7 +339,9 @@ DLG.CTRL.Draw.OL
.4 lda #C.SPACE .4 lda #C.SPACE
jsr SCRN.ToLineBuf jsr SCRN.ToLineBuf
.8 jmp SCRN.LineBufOut .8 jsr SCRN.LineBufOut
* >DEBUG
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
DLG.CTRL.Draw.BUT DLG.CTRL.Draw.BUT
@ -461,7 +462,7 @@ DLG.CTRL.Focus.TB
jmp SCRN.GotoXY jmp SCRN.GotoXY
DLG.CTRL.Focus.OL DLG.CTRL.Focus.OL
jsr SCRN.LineBufInitNorm jsr SCRN.LineBufInitLbl
jsr DLG.CTRL.GotoOrg jsr DLG.CTRL.GotoOrg
@ -489,6 +490,9 @@ DLG.CTRL.Focus.OL
lda #']' lda #']'
.4 jsr SCRN.ToLineBuf .4 jsr SCRN.ToLineBuf
lda #C.BS
jsr SCRN.ToLineBuf
jsr SCRN.ToLineBuf
jmp SCRN.LineBufOut jmp SCRN.LineBufOut
DLG.CTRL.Focus.BUT DLG.CTRL.Focus.BUT
@ -638,6 +642,7 @@ DLG.CTRL.GetWitdh.TB
iny iny
iny iny
lda (ZPPTR1),y lda (ZPPTR1),y
inc
rts rts
DLG.CTRL.GetWitdh.OL DLG.CTRL.GetWitdh.OL

2
BIN/EDIT.S.SCRN.txt
View File

@ -605,7 +605,7 @@ SCRN.LineBufSprintf
.9 rts .9 rts
*-------------------------------------- *--------------------------------------
SCRN.LineBufOut lda #0 SCRN.LineBufOut lda #0
jsr SCRN.ToLineBuf sta (LineBufPtr)
>PUSHBI 0 >PUSHBI 0
>LDYA.G LineBufBase >LDYA.G LineBufBase