mirror of
https://github.com/robmcmullen/fujirun.git
synced 2024-06-08 02:29:28 +00:00
Moved another font drawing routine to platform file
This commit is contained in:
parent
ac27db193f
commit
38c286876e
13
background.s
13
background.s
|
@ -404,18 +404,7 @@ restoretext nop
|
||||||
sta param_count
|
sta param_count
|
||||||
iny
|
iny
|
||||||
sty param_index
|
sty param_index
|
||||||
|
jsr fasttiles
|
||||||
ldy param_row
|
|
||||||
lda textrows_h,y
|
|
||||||
sta ?row_smc+2
|
|
||||||
lda textrows_l,y
|
|
||||||
sta ?row_smc+1
|
|
||||||
ldx param_col
|
|
||||||
?row_smc lda $ffff,x
|
|
||||||
jsr fastfont
|
|
||||||
inx
|
|
||||||
dec param_count
|
|
||||||
bne ?row_smc
|
|
||||||
beq ?loop1
|
beq ?loop1
|
||||||
|
|
||||||
|
|
||||||
|
|
|
@ -383,9 +383,11 @@ draw_to_page1 lda #$00
|
||||||
; copy addresses for functions that write to one page or the other
|
; copy addresses for functions that write to one page or the other
|
||||||
lda #<FASTFONT_H1
|
lda #<FASTFONT_H1
|
||||||
sta fastfont_smc+1
|
sta fastfont_smc+1
|
||||||
|
sta fasttiles_smc+1
|
||||||
sta copytexthgr_dest_smc+1
|
sta copytexthgr_dest_smc+1
|
||||||
lda #>FASTFONT_H1
|
lda #>FASTFONT_H1
|
||||||
sta fastfont_smc+2
|
sta fastfont_smc+2
|
||||||
|
sta fasttiles_smc+2
|
||||||
sta copytexthgr_dest_smc+2
|
sta copytexthgr_dest_smc+2
|
||||||
rts
|
rts
|
||||||
|
|
||||||
|
@ -413,9 +415,11 @@ draw_to_page2 lda #$60
|
||||||
|
|
||||||
lda #<FASTFONT_H2
|
lda #<FASTFONT_H2
|
||||||
sta fastfont_smc+1
|
sta fastfont_smc+1
|
||||||
|
sta fasttiles_smc+1
|
||||||
sta copytexthgr_dest_smc+1
|
sta copytexthgr_dest_smc+1
|
||||||
lda #>FASTFONT_H2
|
lda #>FASTFONT_H2
|
||||||
sta fastfont_smc+2
|
sta fastfont_smc+2
|
||||||
|
sta fasttiles_smc+2
|
||||||
sta copytexthgr_dest_smc+2
|
sta copytexthgr_dest_smc+2
|
||||||
rts
|
rts
|
||||||
|
|
||||||
|
@ -432,3 +436,28 @@ fastfont nop
|
||||||
bne fastfont_smc
|
bne fastfont_smc
|
||||||
?1 lda #12
|
?1 lda #12
|
||||||
fastfont_smc jmp $ffff
|
fastfont_smc jmp $ffff
|
||||||
|
|
||||||
|
; restore a horizontal segment from the text page to the current screen
|
||||||
|
; param_col = text column
|
||||||
|
; param_row = text screen row
|
||||||
|
; param_count = number of characters to copy to hgr screen
|
||||||
|
fasttiles ldx param_col
|
||||||
|
ldy param_row
|
||||||
|
lda textrows_h,y
|
||||||
|
sta fasttiles_row_smc+2
|
||||||
|
lda textrows_l,y
|
||||||
|
sta fasttiles_row_smc+1
|
||||||
|
fasttiles_row_smc lda $ffff,x
|
||||||
|
cmp #12
|
||||||
|
bne fasttiles_smc
|
||||||
|
txa
|
||||||
|
and #1
|
||||||
|
bne ?1
|
||||||
|
lda #15
|
||||||
|
bne fasttiles_smc
|
||||||
|
?1 lda #12
|
||||||
|
fasttiles_smc jsr $ffff
|
||||||
|
inx
|
||||||
|
dec param_count
|
||||||
|
bne fasttiles_row_smc
|
||||||
|
rts
|
||||||
|
|
Loading…
Reference in New Issue
Block a user