6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-01-03 16:33:19 +00:00
Code Issues Projects Releases Wiki Activity

removed obsolete readjoy function (replaced by modular joystick driver - both static and dynamic)

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@1984 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
izydorst 2003-02-14 15:33:47 +00:00
parent 75e2ff1cec
commit d7257fb5bd
2 changed files with 1 additions and 49 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
libsrc/geos/mousesprite/Makefile
View File

@ -12,7 +12,7 @@ S_OBJS = startmousemode.o clearmousemode.o mouseup.o mouseoff.o\
drawsprite.o possprite.o enablsprite.o disablsprite.o\ drawsprite.o possprite.o enablsprite.o disablsprite.o\
ismseinregion.o inittextprompt.o promptoff.o prompton.o\ ismseinregion.o inittextprompt.o promptoff.o prompton.o\
getnextchar.o\ getnextchar.o\
mouse.o readjoy.o mouse.o
all: $(S_OBJS) all: $(S_OBJS)

48
libsrc/geos/mousesprite/readjoy.s
View File

@ -1,48 +0,0 @@
;
; Ullrich von Bassewitz, 23.09.1998
;
; unsigned readjoy (unsigned char joy);
;
.export _readjoy
.include "../inc/geossym.inc"
.proc _readjoy
php
sei ; disable IRQ
lda $01
pha
lda #$35
sta $01 ; enable I/O
tax ; Joystick number into X
bne joy2
; Read joystick 1
joy1:
lda #$7F
sta cia1base
lda cia1base+1
back: tax
pla
sta $01
plp
txa
and #$1F
eor #$1F
ldx #0
rts
; Read joystick 2
joy2: lda #$E0
ldy #$FF
sta cia1base+2
lda cia1base+1
sty cia1base+2
jmp back
.endproc