finished literal char output rework
This commit is contained in:
1 parent
d82907bdc3
commit
ca22b228d7
3 files changed
+24
-17
No files matched your search
@@ -100,36 +100,36 @@ chrout_screen_literal:
|
|||||||
lda COLOR
|
lda COLOR
|
||||||
sta (USER),y
|
sta (USER),y
|
||||||
|
|
||||||
|
// Advance the column
|
||||||
|
|
||||||
jmp !-
|
ldy PNTR
|
||||||
|
|
||||||
|
|
||||||
/* YYY disabled for rework
|
|
||||||
|
|
||||||
// Advance the column, and scroll screen down if we need
|
|
||||||
// to insert a 2nd line in this logical line.
|
|
||||||
// (eg Compute's Mapping the 64 p41)
|
|
||||||
ldx TBLX
|
|
||||||
iny
|
iny
|
||||||
sty PNTR
|
sty PNTR
|
||||||
|
|
||||||
|
// Scroll down (extend logical line) if needed
|
||||||
|
|
||||||
cpy #40
|
cpy #40
|
||||||
bne !+
|
bne !+
|
||||||
jsr screen_grow_logical_line
|
jsr screen_grow_logical_line
|
||||||
ldy PNTR
|
ldy PNTR
|
||||||
!:
|
!:
|
||||||
|
// If not the 80th character of the logical row, we are done
|
||||||
|
|
||||||
cpy #80
|
cpy #80
|
||||||
bcc chrout_screen_done
|
bcc chrout_screen_done
|
||||||
|
|
||||||
|
// Advance to the next line
|
||||||
|
|
||||||
lda #0
|
lda #0
|
||||||
sta PNTR
|
sta PNTR
|
||||||
jmp chrout_screen_advance_to_next_line
|
jmp screen_advance_to_next_line
|
||||||
|
|
||||||
|
|
||||||
chrout_screen_calc_lptr_done:
|
chrout_screen_calc_lptr_done:
|
||||||
|
|
||||||
jsr screen_calculate_line_pointer
|
jsr screen_calculate_PNT_USER
|
||||||
|
|
||||||
// FALLTROUGH
|
// FALLTROUGH
|
||||||
*/
|
|
||||||
chrout_screen_done:
|
chrout_screen_done:
|
||||||
|
|
||||||
jsr cursor_show_if_enabled
|
jsr cursor_show_if_enabled
|
||||||
|
|||||||
+5
-2
@@ -1,8 +1,11 @@
|
|||||||
|
|
||||||
|
|
||||||
|
screen_advance_to_next_line:
|
||||||
|
.break
|
||||||
|
rts
|
||||||
|
|
||||||
/* YYY disabled for rework
|
/* YYY disabled for rework
|
||||||
|
|
||||||
chrout_screen_advance_to_next_line:
|
|
||||||
|
|
||||||
// Go to start of line
|
// Go to start of line
|
||||||
lda #0
|
lda #0
|
||||||
sta PNTR
|
sta PNTR
|
||||||
@@ -1,12 +1,16 @@
|
|||||||
|
|
||||||
|
|
||||||
/* YYY disabled for rework
|
|
||||||
|
|
||||||
screen_grow_logical_line_done:
|
screen_grow_logical_line_done:
|
||||||
rts
|
rts
|
||||||
|
|
||||||
|
|
||||||
screen_grow_logical_line:
|
screen_grow_logical_line:
|
||||||
|
.break
|
||||||
|
rts
|
||||||
|
|
||||||
|
/* YYY disabled for rework
|
||||||
|
|
||||||
// Do not grow line if it is already grown
|
// Do not grow line if it is already grown
|
||||||
ldy TBLX
|
ldy TBLX
|
||||||
lda LDTBL,y
|
lda LDTBL,y
|
||||||
|
|||||||
Reference in new issue
Block a user