fixed 2 typos in syymbol names, updated binaries
This commit is contained in:
1 parent
af1f5b079d
commit
5fd45f1ece
16 files changed
+32
-32
No files matched your search
@@ -26,7 +26,7 @@ chrout_screen_ins_possible:
|
||||
|
||||
// Special handling for cursor in second line
|
||||
ldx TBLX
|
||||
lda LDTBL+0, x
|
||||
lda LDTB1+0, x
|
||||
bpl chrout_screen_ins_second_line
|
||||
|
||||
// Perform character copy
|
||||
|
||||
@@ -24,7 +24,7 @@ chrout_screen_RETURN:
|
||||
cpy #24
|
||||
beq !+ // last line on screen - no need for a double line skip
|
||||
|
||||
lda LDTBL+1, y
|
||||
lda LDTB1+1, y
|
||||
bmi !+ // current line is not continued
|
||||
|
||||
inc TBLX
|
||||
|
||||
@@ -17,9 +17,9 @@ clear_screen:
|
||||
// continuation of the previous one
|
||||
|
||||
lda #$80
|
||||
ldy #24
|
||||
ldy #24
|
||||
!:
|
||||
sta LDTBL,y
|
||||
sta LDTB1,y
|
||||
dey
|
||||
bpl !-
|
||||
|
||||
|
||||
@@ -47,18 +47,18 @@ screen_scroll_up:
|
||||
|
||||
screen_scroll_up_delay_done: // entry point for cursor move control codes
|
||||
|
||||
// Scroll the LDTBL (line link table)
|
||||
// Scroll the LDTB1 (line link table)
|
||||
|
||||
ldy #$00
|
||||
!:
|
||||
lda LDTBL+1, y
|
||||
sta LDTBL+0, y
|
||||
lda LDTB1+1, y
|
||||
sta LDTB1+0, y
|
||||
iny
|
||||
cpy #24
|
||||
bne !-
|
||||
|
||||
lda #$80
|
||||
sta LDTBL+24
|
||||
sta LDTB1+24
|
||||
|
||||
// Preserve SAL and EAL, prepare initial SAL/EAL/PNT/USER values
|
||||
|
||||
@@ -126,7 +126,7 @@ screen_scroll_up_loop_done:
|
||||
|
||||
// If the first line is linked, scroll once more
|
||||
|
||||
bit LDTBL+0
|
||||
bit LDTB1+0
|
||||
bpl screen_scroll_up
|
||||
|
||||
// Recalculate PNT and USER
|
||||
|
||||
@@ -12,7 +12,7 @@
|
||||
screen_calculate_PNTR_LNMX:
|
||||
|
||||
ldy TBLX
|
||||
lda LDTBL, y
|
||||
lda LDTB1, y
|
||||
php
|
||||
jsr screen_get_clipped_PNTR
|
||||
plp
|
||||
@@ -38,14 +38,14 @@ screen_calculate_PNTR_0_39:
|
||||
screen_calculate_LNMX:
|
||||
|
||||
ldy TBLX
|
||||
lda LDTBL, y
|
||||
lda LDTB1, y
|
||||
bpl screen_calculate_lnmx_79 // this line is a continuation
|
||||
|
||||
cpy #24
|
||||
beq screen_calculate_lnmx_39 // this is the last line, which is not a continuation
|
||||
|
||||
iny
|
||||
lda LDTBL, y
|
||||
lda LDTB1, y
|
||||
bpl screen_calculate_lnmx_79 // line is continued
|
||||
|
||||
// FALLTROUGH
|
||||
|
||||
@@ -10,10 +10,10 @@ screen_get_logical_line_end_ptr:
|
||||
cpy #24
|
||||
bcs screen_get_logical_line_end_39 // last line of the screen
|
||||
|
||||
lda LDTBL+0, y
|
||||
lda LDTB1+0, y
|
||||
bpl screen_get_logical_line_end_39 // current line continues previous one
|
||||
|
||||
lda LDTBL+1, y
|
||||
lda LDTB1+1, y
|
||||
bmi screen_get_logical_line_end_39 // current line is not continued
|
||||
|
||||
// FALLTROUGH
|
||||
|
||||
@@ -26,7 +26,7 @@ screen_grow_logical_line:
|
||||
|
||||
// Do not grow line if previus one is grown
|
||||
ldy TBLX
|
||||
lda LDTBL+0, y
|
||||
lda LDTB1+0, y
|
||||
bpl screen_grow_logical_line_done_scroll
|
||||
|
||||
// If last line, scroll the screen up
|
||||
@@ -34,22 +34,22 @@ screen_grow_logical_line:
|
||||
beq screen_grow_logical_line_screen_up
|
||||
|
||||
// Do not grow line if already grown
|
||||
lda LDTBL+1, y
|
||||
lda LDTB1+1, y
|
||||
bpl screen_grow_logical_line_done
|
||||
|
||||
// Preserve SAL and EAL
|
||||
|
||||
jsr screen_preserve_sal_eal
|
||||
|
||||
// Scroll LDTBL down (start from the end)
|
||||
// Scroll LDTB1 down (start from the end)
|
||||
ldy #23
|
||||
!:
|
||||
cpy TBLX
|
||||
beq !+
|
||||
bcc !+
|
||||
|
||||
lda LDTBL+0, y
|
||||
sta LDTBL+1, y
|
||||
lda LDTB1+0, y
|
||||
sta LDTB1+1, y
|
||||
|
||||
dey
|
||||
bne !-
|
||||
@@ -57,7 +57,7 @@ screen_grow_logical_line:
|
||||
// Mark current line as grown
|
||||
ldy TBLX
|
||||
lda #$00
|
||||
sta LDTBL+1, y
|
||||
sta LDTB1+1, y
|
||||
|
||||
// Now we have to scroll lines downwards to make space. We start from the end,
|
||||
// and work backwards. We cannot be as simple and efficient here as we are
|
||||
|
||||
Reference in new issue
Block a user