.include "joy-kernel.inc"
.include "joy-error.inc"
.include "cbm510.inc"
+ .include "extzp.inc"
.macpack generic
.byte $04 ; JOY_LEFT
.byte $08 ; JOY_RIGHT
.byte $10 ; JOY_FIRE
- .byte $00 ; Future expansion
+ .byte $00 ; JOY_FIRE2 unavailable
.byte $00 ; Future expansion
.byte $00 ; Future expansion
; Jump table.
- .word INSTALL
- .word UNINSTALL
- .word COUNT
- .word READ
+ .addr INSTALL
+ .addr UNINSTALL
+ .addr COUNT
+ .addr READ
+ .addr 0 ; IRQ entry unused
; ------------------------------------------------------------------------
; Constants
; Get the direction bits
- ldy #CIA_PRB
+ ldy #CIA::PRB
lda (cia2),y ; Read joystick inputs
sta tmp1
; Get the fire bits
- ldy #CIA_PRA
+ ldy #CIA::PRA
lda (cia2),y
; Make the result value