mirror of
https://github.com/mach-kernel/mrbuffer.git
synced 2024-11-21 14:31:12 +00:00
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)
This commit is contained in:
parent
85da0e6b65
commit
8305686468
217
src/main.S
217
src/main.S
@ -51,24 +51,32 @@ keydown nop
|
||||
jmp dispchar
|
||||
|
||||
up clc
|
||||
cpx #1488
|
||||
beq rtsout
|
||||
rep #$30
|
||||
pha
|
||||
txa
|
||||
sbc #128
|
||||
tax
|
||||
pla
|
||||
sep #$20
|
||||
phy
|
||||
ldy #0
|
||||
jsr updown
|
||||
ply
|
||||
jmp rtsout
|
||||
|
||||
down clc
|
||||
phy
|
||||
ldy #1
|
||||
jsr updown
|
||||
ply
|
||||
jmp rtsout
|
||||
|
||||
updown clc
|
||||
cpx #1488
|
||||
beq rtsout
|
||||
rep #$30
|
||||
pha
|
||||
txa
|
||||
adc #128
|
||||
tax
|
||||
cpy #0
|
||||
beq linedown
|
||||
bne lineup
|
||||
lineup adc #128
|
||||
jmp linecont
|
||||
linedown sbc #128
|
||||
linecont tax
|
||||
pla
|
||||
sep #$20
|
||||
jmp rtsout
|
||||
@ -125,190 +133,3 @@ hithere strl "this was excruciating"
|
||||
brkboi brk
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user