6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2024-11-19 21:32:19 +00:00
Code Issues Projects Releases Wiki Activity

optimize charcode conversion, shorter and faster now :)

Browse Source
This commit is contained in:
mrdudz 2015-10-12 18:53:55 +02:00
parent aed0549760
commit 4557e8d004
1 changed files with 5 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
libsrc/c64/soft80_cputc.s
View File

@ -49,7 +49,7 @@ L1: cmp #$0D ; LF?
; codes $00-$1f are control codes which are not printable and thus may ; codes $00-$1f are control codes which are not printable and thus may
; give undefined result. ; give undefined result.
tay tay
bpl L10 bpl @L10
; codes $80-$ff must get converted like this: ; codes $80-$ff must get converted like this:
; $80-$9f -> dont care (control codes) ; $80-$9f -> dont care (control codes)
@ -57,21 +57,11 @@ L1: cmp #$0D ; LF?
; $c0-$df -> $60-$7f ; $c0-$df -> $60-$7f
; $e0-$ff -> $00-$1f ; $e0-$ff -> $00-$1f
; extra check for petscii codes 160-191, these have been moved to ora #%01000000 ; $40
; 0-31 in the charset
and #%11100000
cmp #%10100000
bne @sk
tya
and #%00011111
bpl L10 ; branch always
@sk:
tya
clc clc
adc #$20 adc #%00100000 ; $20
and #$7F and #%01111111 ; $7f
L10: @L10:
; entry point for direct output of a character. the value passed in ; entry point for direct output of a character. the value passed in
; akku must match the offset in the charset. ; akku must match the offset in the charset.