the10thwiz/cc65
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Moved common symbol names out of sources, and into a global include file.

Browse Source
This commit is contained in:
Greg King
2013-07-16 00:30:56 -04:00
parent c9c66dcfdd
commit 641a609cf3
6 changed files with 105 additions and 92 deletions
Download Patch File Download Diff File Expand all files Collapse all files

31
libsrc/atmos/joy/atmos-pase.s
View File

@@ -1,14 +1,15 @@
;
; P.A.S.E. joystick driver for the Atmos
; May be used multiple times when linked to the statically application.
; Can be used multiple times when statically linked to the application.
;
; Stefan Haubenthal, 2009-12-21
; Based on Ullrich von Bassewitz, 2002-12-20
; 2002-12-20, Based on Ullrich von Bassewitz's code.
; 2009-12-21, Stefan Haubenthal
; 2013-07-15, Greg King
;
.include "joy-kernel.inc"
.include "joy-error.inc"
; .include "atmos.inc"
.include "atmos.inc"
; ------------------------------------------------------------------------
@@ -49,10 +50,6 @@
JOY_COUNT = 2 ; Number of joysticks we support
PRA = $0301
DDRA = $0303
PRA2 = $030F
; ------------------------------------------------------------------------
; Data.
@@ -99,24 +96,24 @@ COUNT:
READ:
tay
lda PRA
lda VIA::PRA
pha
lda DDRA
lda VIA::DDRA
pha
lda #%11000000
sta DDRA
sta VIA::DDRA
lda #%10000000
sta PRA2
lda PRA2
sta VIA::PRA2
lda VIA::PRA2
sta temp1
lda #%01000000
sta PRA2
lda PRA
sta VIA::PRA2
lda VIA::PRA
sta temp2
pla
sta DDRA
sta VIA::DDRA
pla
sta PRA2
sta VIA::PRA2
ldx #0
tya