Apple-2-Tools/4cade
1
0
Fork 0
mirror of https://github.com/a2-4am/4cade.git synced 2025-01-15 20:30:11 +00:00
Code Issues Projects Releases Wiki Activity

shave a byte

Browse Source
This commit is contained in:
4am 2020-08-11 14:55:38 -04:00
parent 6f7f8f7aa5
commit 2929be8f2c
2 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/constants.a
View File

@ -144,7 +144,7 @@ CHEATS_ENABLED = %00001000
; shared symbols ; shared symbols
iProDOS_enter = $D66E iProDOS_enter = $D66E
LoadFileDirect = $DAFB LoadFileDirect = $DAFA
launchpatch = $D613 launchpatch = $D613
iAddToPath = $FEC3 iAddToPath = $FEC3
itraverse = $D8D9 itraverse = $D8D9

8
src/ui.font.lc2.a
View File

@ -16,16 +16,16 @@ DrawPageInternal
; drawing starts at VTAB 0 ; drawing starts at VTAB 0
; each line starts at column X which was passed in (0-indexed) ; each line starts at column X which was passed in (0-indexed)
; clobbers PTR ; clobbers PTR
; clobbers $FF
; clobbers A/X/Y ; clobbers A/X/Y
; preserves all flags, by a quirk of implementation ; preserves all flags, by a quirk of implementation
php php
stx @leftMargin stx $FF
ldx #0 ldx #0
stx VTAB stx VTAB
+ST16 PTR +ST16 PTR
@drawLine @drawLine
@leftMargin=*+1 lda $FF
lda #$FD ; SMC
sta HTAB sta HTAB
ldy #0 ldy #0
@parseLine @parseLine
@ -75,7 +75,7 @@ DrawPageInternal
Draw40CharsInternal Draw40CharsInternal
; A/Y contains address of character buffer ; A/Y contains address of character buffer
; carry bit clear -> draw on page 1 ; carry bit clear -> draw on page 1
; carry bit set -> draw on page 2 ;v carry bit set -> draw on page 2
; $25 contains textpage line (0..23) (this is the standard VTAB address) ; $25 contains textpage line (0..23) (this is the standard VTAB address)
; drawing starts at HTAB 0 ; drawing starts at HTAB 0
; increments VTAB ; increments VTAB