the10thwiz/cc65
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Revert atr5200std.s

Browse Source
This commit is contained in:
Stefan
2025-03-24 21:27:55 +01:00
committed by GitHub
parent 774e275965
commit 5ceb4f0d68
1 changed files with 5 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
libsrc/atari5200/joy/atr5200std.s
View File

@@ -79,7 +79,7 @@ COUNT:
; ;
CENTER = 228 / 2 CENTER = 228 / 2
SENSITIVITY = 16 SENSIVITY = 16
READJOY: READJOY:
and #3 ; put joystick number in range, just in case and #3 ; put joystick number in range, just in case
@@ -96,27 +96,27 @@ READJOY:
; Read joystick ; Read joystick
@notrg: ldy PADDL0,x ; get horizontal position @notrg: ldy PADDL0,x ; get horizontal position
cpy #CENTER-SENSITIVITY cpy #CENTER-SENSIVITY
bcs @chkleft bcs @chkleft
ora #4 ; JOY_LEFT ora #4 ; JOY_LEFT
bne @updown bne @updown
@chkleft: @chkleft:
cpy #CENTER+SENSITIVITY cpy #CENTER+SENSIVITY
bcc @updown bcc @updown
ora #8 ; JOY_RIGHT ora #8 ; JOY_RIGHT
@updown:ldy PADDL0+1,x ; get vertical position @updown:ldy PADDL0+1,x ; get vertical position
cpy #CENTER-SENSITIVITY cpy #CENTER-SENSIVITY
bcs @chkdown bcs @chkdown
ora #1 ; JOY_UP ora #1 ; JOY_UP
bne @done bne @done
@chkdown: @chkdown:
cpy #CENTER+SENSITIVITY cpy #CENTER+SENSIVITY
bcc @done bcc @done
ora #2 ; JOY_DOWN ora #2 ; JOY_DOWN