brooke/mandel-6502
1
0
Fork 1
Code Issues Pull requests Projects Releases Packages Wiki Activity

fix panning for 32-bi

Browse source
This commit is contained in:
Brooke Vibber 2024-12-31 14:45:38 -08:00
parent cc83c76706
commit 7985ea9a39
1 changed files with 23 additions and 16 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

39
mandel.s
View file

@ -1341,12 +1341,15 @@ skip_luma:
cpy #KEY_MINUS
beq minus
; temp = $0010 << (8 - zoom)
lda #$10
sta temp
; temp+temp2 = $00010000 << (8 - zoom)
lda #$00
sta temp
sta temp + 1
scale_zoom temp
lda #$01
sta temp + 2
lda #$00
sta temp + 3
scale_zoom temp + 2
cpy #KEY_UP
beq up
@ -1356,14 +1359,7 @@ skip_luma:
beq left
cpy #KEY_RIGHT
beq right
cpy #KEY_1
beq one
cpy #KEY_2
beq two
cpy #KEY_3
beq three
cpy #KEY_4
beq four
jmp number_keys
skip_char:
lda #0
@ -1382,17 +1378,28 @@ minus:
dec zoom
jmp done
up:
sub16 oy, oy, temp
sub32 oy, oy, temp
jmp done
down:
add16 oy, oy, temp
add32 oy, oy, temp
jmp done
left:
sub16 ox, ox, temp
sub32 ox, ox, temp
jmp done
right:
add16 ox, ox, temp
add32 ox, ox, temp
jmp done
number_keys:
cpy #KEY_1
beq one
cpy #KEY_2
beq two
cpy #KEY_3
beq three
cpy #KEY_4
beq four
one:
ldx #0
jmp load_key_viewport