Apple-2gs-SW/mrbuffer
1
0
Fork 0
mirror of https://github.com/mach-kernel/mrbuffer.git synced 2024-11-22 05:31:37 +00:00
Code Issues Projects Releases Wiki Activity

DRY on up down logic, need to do the same for l/r logic, and then stepping logic for the row interleave (probably with y register)

Browse Source
This commit is contained in:
David Stancu 2018-02-05 23:11:30 -05:00
parent 85da0e6b65
commit 8305686468
1 changed files with 19 additions and 198 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

217
src/main.S
View File

@ -51,24 +51,32 @@ keydown nop
jmp dispchar jmp dispchar
up clc up clc
cpx #1488 phy
beq rtsout ldy #0
rep #$30 jsr updown
pha ply
txa
sbc #128
tax
pla
sep #$20
jmp rtsout jmp rtsout
down clc down clc
phy
ldy #1
jsr updown
ply
jmp rtsout
updown clc
cpx #1488 cpx #1488
beq rtsout beq rtsout
rep #$30 rep #$30
pha pha
txa txa
adc #128 cpy #0
tax beq linedown
bne lineup
lineup adc #128
jmp linecont
linedown sbc #128
linecont tax
pla pla
sep #$20 sep #$20
jmp rtsout jmp rtsout
@ -125,190 +133,3 @@ hithere strl "this was excruciating"
brkboi brk brkboi brk