1
0
mirror of https://github.com/cc65/cc65.git synced 2024-06-15 02:29:32 +00:00

remove old joystick code

This commit is contained in:
Christian Groessler 2017-02-15 15:53:57 +01:00
parent e6530d68dd
commit ddae920ee9

View File

@ -1,58 +0,0 @@
;*
;* Creativision Joystick Function
;*
;* unsigned char __fastcall__ joystate(unsigned char joy);
;*
;* JOY_1 -> Return Left Joystick direction
;* JOY_2 -> Return Right Joystick direction
;* JOY_3 -> Return Left Joystick buttons
;* JOY_4 -> Return Right Joystick buttons
;*
;* Will only work if interrupts are enabled.
.export _joystate
.include "creativision.inc"
_joystate:
cmp #1 ; Left Direction
bne l1
lda $11
beq l5
and #$0F
lsr a
tax
inx
txa
rts
l1: cmp #2 ; Right Direction
bne l2
lda $13
beq l5
and #$0F
lsr a
tax
inx
txa
rts
l2: cmp #3 ; Left Buttons
bne l3
lda $16
beq l5
and #$0F
rts
l3: cmp #4
bne l4
lda $17
beq l5
and #$0F
rts
l4: lda #0
l5: rts