1
0
mirror of https://github.com/cc65/cc65.git synced 2025-04-06 20:37:16 +00:00

Revert atr5200std.s

This commit is contained in:
Stefan 2025-03-24 21:27:55 +01:00 committed by GitHub
parent 774e275965
commit 5ceb4f0d68
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194

View File

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