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
|
||||
iny
|
||||
sty param_index
|
||||
|
||||
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
|
||||
jsr fasttiles
|
||||
beq ?loop1
|
||||
|
||||
|
||||
|
|
|
@ -383,9 +383,11 @@ draw_to_page1 lda #$00
|
|||
; copy addresses for functions that write to one page or the other
|
||||
lda #<FASTFONT_H1
|
||||
sta fastfont_smc+1
|
||||
sta fasttiles_smc+1
|
||||
sta copytexthgr_dest_smc+1
|
||||
lda #>FASTFONT_H1
|
||||
sta fastfont_smc+2
|
||||
sta fasttiles_smc+2
|
||||
sta copytexthgr_dest_smc+2
|
||||
rts
|
||||
|
||||
|
@ -413,9 +415,11 @@ draw_to_page2 lda #$60
|
|||
|
||||
lda #<FASTFONT_H2
|
||||
sta fastfont_smc+1
|
||||
sta fasttiles_smc+1
|
||||
sta copytexthgr_dest_smc+1
|
||||
lda #>FASTFONT_H2
|
||||
sta fastfont_smc+2
|
||||
sta fasttiles_smc+2
|
||||
sta copytexthgr_dest_smc+2
|
||||
rts
|
||||
|
||||
|
@ -432,3 +436,28 @@ fastfont nop
|
|||
bne fastfont_smc
|
||||
?1 lda #12
|
||||
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