Apple-2-SW/dos33fsprogs
1
0
Fork 0
mirror of https://github.com/deater/dos33fsprogs.git synced 2024-10-09 11:54:59 +00:00
Code Issues Projects Releases Wiki Activity

space_bars: add keyboard control

Browse Source
This commit is contained in:
Vince Weaver 2018-10-07 21:37:41 -04:00
parent e8514067e5
commit e81cfcffb1
1 changed files with 45 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

55
space_bars/game.s
View File

@ -260,32 +260,67 @@ sbloopF:dex ; 2
;======================================================
; do_nothing should be 4550
; -10 keypress
; -34 keypress
; -1 adjust center mark back
; ===========
; 4539
; 4515
; Try X=9 Y=89 cycles=4540
; Try X=3 Y=216 cycles=4537 R2
; Try X=11 Y=74 cycles=4515
nop
ldy #216 ; 2
sbloop1:ldx #3 ; 2
ldy #74 ; 2
sbloop1:ldx #11 ; 2
sbloop2:dex ; 2
bne sbloop2 ; 2nt/3
dey ; 2
bne sbloop1 ; 2nt/3
; no keypress = 10+(24) = 34
; left pressed = 9+8+12+(5)= 34
; right pressed = 9+8+5+12 = 34
lda KEYPRESS ; 4
bpl sb_no_keypress ; 3
jmp sb_start_over
; -1
jmp sb_handle_keypress ; 3
sb_no_keypress:
inc $0 ; 5
dec $0 ; 5
inc $0 ; 5
dec $0 ; 5
nop ; 2
nop ; 2
jmp sb_display_loop ; 3
sb_start_over:
sb_handle_keypress:
bit KEYRESET ; clear keypress ; 4
cmp #'Q'|$80 ; 2
beq sb_exit ; 3
; -1
sb_check_left:
cmp #$15|$80 ; left ; 2
bne sb_check_right ; 3
; -1
dec XPOS ; 5
nop ; nop ; 2
lda $0 ; nop ; 3
jmp sb_display_loop ; 3
sb_check_right:
cmp #$8|$80 ; 2
bne sb_exit ; 3
; -1
inc XPOS ; 5
jmp sb_display_loop ; 3
sb_exit:
rts ; 6