paddles: add a an ORCA C exposes method to call the paddle reader

This commit is contained in:
dwsJason 2019-09-07 22:21:39 -04:00
parent 4e8ba78272
commit e32e959aa7
1 changed files with 33 additions and 0 deletions

View File

@ -10,6 +10,39 @@
DummyPaddles start ASMCODE
end
*PEEK 49249 - PADDLE 0 BUTTON (>127 IF BUTTON PRESSED)
*PEEK 49250 - PADDLE 1 BUTTON (>127 IF BUTTON PRESSED)
*PEEK 49251 - PADDLE 2 BUTTON (>127 IF BUTTON PRESSED)
*
* XRick GS C Interface to read
* the joystick, and the button
*
paddle0 start ASMCODE
ds 2
paddle1 entry
ds 2
paddle_button_0 entry
ds 2
ReadPaddles entry
phb
phk
plb
jsr GetJoyXY
stx paddle0
sty paddle1
lda >$E0C061
and #$0080
sta paddle_button_0
plb
rtl
end
*
*-------------------------------
* IIGS 1MHz single-pass GetJoyXY