finished literal char output rework

This commit is contained in:
FeralChild64 committed 2020-01-02 18:54:06 +01:00
1 parent d82907bdc3
commit ca22b228d7
3 files changed
+23 -16

No files matched your search

+13 -13
View File
@@ -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
@@ -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
+5 -1
View File
@@ -1,11 +1,15 @@
/* 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