6502/C02
1
0
Fork 0
mirror of https://github.com/RevCurtisP/C02.git synced 2025-02-17 21:30:34 +00:00
Code Issues Projects Releases Wiki Activity

Fixed bugs, updated docs in Apple 2 module paddle

Browse Source
This commit is contained in:
Curtis F Kaylor 2020-04-27 12:41:16 -04:00
parent 58bc426886
commit 1986abf96a
2 changed files with 19 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
include/apple2/paddle.a02
View File

@ -1,19 +1,28 @@
;Paddle Controller Constants and Functions for Apple II ;Paddle Controller Constants and Functions for Apple II
PADDLS EQU #4 ;Maximum Numbers of Paddles PADDLS EQU 4 ;Maximum Numbers of Paddles
;Read Paddle ;paddle(n) - Read Paddle n
;Args: A = Paddle Number (0-3)
;Returns: A, Y = Paddle Value (0-255)
; Carry Set if P
PADDLE: LDY #0 ;Set Result to 0 PADDLE: LDY #0 ;Set Result to 0
CMP #PADDLS ;If Paddle# >= Max CMP #PADDLS ;If Paddle# >= Max
BCS PADDLZ ; Return # of Paddles & Carry Set BCS PADDLZ ; Return 0 & Carry Set
TAX ;Copy Paddle# to X Register TAX ;Copy Paddle# to X Register
JSR $FB1E ;Execute Monitor PREAD Routine JSR $FB1E ;Execute Monitor PREAD Routine
PADDLZ: TYA ;Copy Result to Accumulator PADDLZ: TYA ;Copy Result to Accumulator
RTS RTS
BUTTNS EQU #2 ;Maximum Numbers of Buttons BUTTNS EQU 2 ;Maximum Numbers of Buttons
;Read Paddle Button ;button(n) - Read Paddle Button n
;Args: A = Button Number (0-1)
;Returns: A, Y = Button State
; 0 = Not Pressed
; $FF = Pressed
; X = Button Number
; Carry Set if P
BUTTON: LDY #0 ;Set Result to 0 BUTTON: LDY #0 ;Set Result to 0
CMP #BUTTNS ;If Button# >= Max CMP #BUTTNS ;If Button# >= Max
BCS BUTTOZ ; Return Zero & Carry Set BCS BUTTOZ ; Return Zero & Carry Set

7
include/apple2/paddle.h02
View File

@ -4,9 +4,10 @@
#define BUTTNS $02 //Number of Paddle Buttons #define BUTTNS $02 //Number of Paddle Buttons
/* Get Paddle Button Status * /* Get Paddle Button Status *
* Args: p = Paddle Number * * Args: n = Button Number *
* Returns: $FF if Button Pressed * * Returns: char p = Button Status *
* $00 if Not Pressed */ * $FF if Pressed *
* $00 if Not */
void button(); void button();
/* Get Paddle Status * /* Get Paddle Status *