]> git.sur5r.net Git - cc65/commitdiff
Use new joystick decls
authorcuz <cuz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Tue, 16 Dec 2003 22:38:12 +0000 (22:38 +0000)
committercuz <cuz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Tue, 16 Dec 2003 22:38:12 +0000 (22:38 +0000)
git-svn-id: svn://svn.cc65.org/cc65/trunk@2777 b7a2c559-68d2-44c3-8de9-860c34a00d81

libsrc/apple2/apple2-stdjoy.s
libsrc/atari/atari-stdjoy.s
libsrc/c128/c128-ptvjoy.s
libsrc/c128/c128-stdjoy.s
libsrc/c64/c64-hitjoy.s
libsrc/c64/c64-ptvjoy.s
libsrc/c64/c64-stdjoy.s
libsrc/cbm510/cbm510-stdjoy.s
libsrc/joystick/joy-kernel.s
libsrc/plus4/plus4-stdjoy.s
libsrc/vic20/vic20-stdjoy.s

index 14bb5fd83d5de3819932d6bd8638811424abbcc2..a6e7fc9dc1c70e3237751003e4596aeee2940a94 100644 (file)
@@ -28,7 +28,7 @@ OFFS            = 10
 ; Driver signature
 
         .byte   $6A, $6F, $79          ; "joy"
-        .byte   $00                     ; Driver API version number
+        .byte   JOY_API_VERSION                ; Driver API version number
 
 ; Button state masks (8 values)
 
@@ -70,8 +70,7 @@ JOY_COUNT       = 2             ; Number of joysticks we support
 INSTALL:
         lda     #<JOY_ERR_OK
         ldx     #>JOY_ERR_OK
-
-;      rts                     ; Run into DEINSTALL instead
+;      rts                     ; Run into UNINSTALL instead
 
 ; ------------------------------------------------------------------------
 ; UNINSTALL routine. Is called before the driver is removed from memory.
index b0f9c0cdd317c9d581e82e88edeb6455409d693c..c89044b19cae4e6a9596bf0d5ab3d04dd2582847 100644 (file)
@@ -23,7 +23,7 @@
 ; Driver signature
 
         .byte   $6A, $6F, $79          ; "joy"
-        .byte   $00                     ; Driver API version number
+        .byte   JOY_API_VERSION                ; Driver API version number
 
 ; Button state masks (8 values)
 
@@ -65,8 +65,7 @@ JOY_COUNT       = 4             ; Number of joysticks we support
 INSTALL:
         lda     #<JOY_ERR_OK
         ldx     #>JOY_ERR_OK
-
-;      rts                     ; Run into DEINSTALL instead
+;      rts                     ; Run into UNINSTALL instead
 
 ; ------------------------------------------------------------------------
 ; UNINSTALL routine. Is called before the driver is removed from memory.
index af9be13de988da8c8acac99fe82a614686100d40..c188cc177d3c3d017c78125c7ec27b6aa8e0846d 100644 (file)
@@ -1,6 +1,6 @@
 ;
 ; PTV-4 Player joystick driver for the C128
-;                                          
+;
 ; Ullrich von Bassewitz, 2003-09-28, using the C64 driver from
 ; Groepaz/Hitmen, 2002-12-23, which is
 ; obviously based on Ullrichs driver :)
@@ -21,8 +21,8 @@
 
 ; Driver signature
 
-        .byte   $6A, $6F, $79   ; "joy"
-        .byte   $00             ; Driver API version number
+        .byte   $6A, $6F, $79           ; "joy"
+        .byte   JOY_API_VERSION         ; Driver API version number
 
 ; Button state masks (8 values)
 
@@ -38,7 +38,7 @@
 ; Jump table.
 
         .word   INSTALL
-        .word   DEINSTALL
+        .word   UNINSTALL
         .word   COUNT
         .word   READ
 
@@ -60,15 +60,14 @@ JOY_COUNT       = 4             ; Number of joysticks we support
 INSTALL:
         lda     #<JOY_ERR_OK
         ldx     #>JOY_ERR_OK
-
-;      rts                     ; Run into DEINSTALL instead
+;      rts                     ; Run into UNINSTALL instead
 
 ; ------------------------------------------------------------------------
-; DEINSTALL routine. Is called before the driver is removed from memory.
+; UNINSTALL routine. Is called before the driver is removed from memory.
 ; Can do cleanup or whatever. Must not return anything.
 ;
 
-DEINSTALL:
+UNINSTALL:
         rts
 
 
index ba00187012590ba38e52a2217a19126628ca3e0d..38e740a1ad8d6e625ebffe49f5783573092106a6 100644 (file)
@@ -23,7 +23,7 @@
 ; Driver signature
 
         .byte   $6A, $6F, $79          ; "joy"
-        .byte   $00                     ; Driver API version number
+        .byte   JOY_API_VERSION                ; Driver API version number
 
 ; Button state masks (8 values)
 
@@ -65,8 +65,7 @@ JOY_COUNT       = 2             ; Number of joysticks we support
 INSTALL:
         lda     #<JOY_ERR_OK
         ldx     #>JOY_ERR_OK
-
-;      rts                     ; Run into DEINSTALL instead
+;      rts                     ; Run into UNINSTALL instead
 
 ; ------------------------------------------------------------------------
 ; UNINSTALL routine. Is called before the driver is removed from memory.
index cb5dde3d9335995a8dc3951af4e682c31359564e..72e2ff13d672511db0a24525fc3e6a86f9c977fe 100755 (executable)
@@ -21,7 +21,7 @@
 ; Driver signature
 
         .byte   $6A, $6F, $79  ; "joy"
-        .byte   $00             ; Driver API version number
+        .byte   JOY_API_VERSION        ; Driver API version number
 
 ; Button state masks (8 values)
 
@@ -103,11 +103,9 @@ pollirq:
          ldy #$00  ; port b direction
          sty $dd03 ; => input
 
-;         ldy #$00
          sty $dd05 ; cia2 timer a highbyte
          sty $dc05 ; cia1 timer a highbyte
          iny
-;         lda #$01
          sty $dd04 ; cia2 timer a lowbyte
          sty $dc04 ; cia1 timer a lowbyte
 
@@ -119,10 +117,6 @@ pollirq:
                    ; serial port: input
 
          ; cia 1 setup
-
-;         lda #%00000001
-;         sty $dc0d ; irq ctrl reg
-
          lda #%01010001
          sta $dc0e ; control register a
                    ; timer: start
@@ -132,13 +126,11 @@ pollirq:
 
 
          ; read directions 3
-
          lda $dd01 ;read cia 2 port b
          and #$0f
          sta temp3
 
          ; read button 3
-
          lda $dd02      ;cia 2 port a
          and #%11111011 ;data direction
          sta $dd02      ;=> bit 2 input
@@ -151,7 +143,6 @@ pollirq:
          sta temp3
 
          ; read directions 4
-
          lda $dd01 ;read cia 2 port b
          lsr a
          lsr a
@@ -160,7 +151,6 @@ pollirq:
          sta temp4
 
          ; read button 4
-
          ldx #$ff ;serial data register
          stx $dc0c;=> writing $ff causes
                   ;cia to output some
index 9c5db39f0aef72c036ceb666963f58525d91c2a0..60950ff5920ebc47e675e04d16c98faef2bfcb17 100755 (executable)
@@ -21,7 +21,7 @@
 ; Driver signature
 
         .byte   $6A, $6F, $79   ; "joy"
-        .byte   $00             ; Driver API version number
+        .byte   JOY_API_VERSION        ; Driver API version number
 
 ; Button state masks (8 values)
 
@@ -37,7 +37,7 @@
 ; Jump table.
 
         .word   INSTALL
-        .word   DEINSTALL
+        .word   UNINSTALL
         .word   COUNT
         .word   READ
 
@@ -59,15 +59,14 @@ JOY_COUNT       = 4             ; Number of joysticks we support
 INSTALL:
         lda     #<JOY_ERR_OK
         ldx     #>JOY_ERR_OK
-
-;      rts                     ; Run into DEINSTALL instead
+;      rts                     ; Run into UNINSTALL instead
 
 ; ------------------------------------------------------------------------
-; DEINSTALL routine. Is called before the driver is removed from memory.
+; UNINSTALL routine. Is called before the driver is removed from memory.
 ; Can do cleanup or whatever. Must not return anything.
 ;
 
-DEINSTALL:
+UNINSTALL:
         rts
 
 
index 4b4ae0c682f080eb4eb59ff9f044452c73f9cccb..bfad0af0a7a598fa7e6ef7c35a0a9529bd4a6d6e 100644 (file)
@@ -22,7 +22,7 @@
 ; Driver signature
 
         .byte   $6A, $6F, $79          ; "joy"
-        .byte   $00                     ; Driver API version number
+        .byte   JOY_API_VERSION                ; Driver API version number
 
 ; Button state masks (8 values)
 
@@ -65,7 +65,7 @@ INSTALL:
         lda     #<JOY_ERR_OK
         ldx     #>JOY_ERR_OK
 
-;      rts                     ; Run into DEINSTALL instead
+;      rts                     ; Run into UNINSTALL instead
 
 ; ------------------------------------------------------------------------
 ; UNINSTALL routine. Is called before the driver is removed from memory.
index 20d8c30df1f9fa3926147b8a16d9fba024b53e41..5f5a26b15b60075f9cf6d53bc75c7e6485009a9c 100644 (file)
@@ -23,7 +23,7 @@
 ; Driver signature
 
         .byte   $6A, $6F, $79          ; "joy"
-        .byte   $00                     ; Driver API version number
+        .byte   JOY_API_VERSION         ; Driver API version number
 
 ; Button state masks (8 values)
 
@@ -65,7 +65,6 @@ JOY_COUNT       = 2             ; Number of joysticks we support
 INSTALL:
         lda     #<JOY_ERR_OK
         ldx     #>JOY_ERR_OK
-
 ;      rts                     ; Run into UNINSTALL instead
 
 ; ------------------------------------------------------------------------
index fbed5ce0a581c85929e5f04ef0b42fdc044e9f6e..7b8c878e5646048fe061519906469b027d24caaf 100644 (file)
@@ -6,7 +6,7 @@
 
         .export         _joy_install, _joy_uninstall, _joy_masks
         .export         joy_clear_ptr
-              
+
         .importzp       ptr1
 
         .include        "joy-kernel.inc"
@@ -20,7 +20,7 @@
 .bss
 _joy_drv:       .res    2                      ; Pointer to driver
 
-_joy_masks:     .res    JOY_MASK_COUNT
+_joy_masks:     .res    .sizeof(JOY_HDR::MASKS)
 
 ; Jump table for the driver functions.
 .data
@@ -32,8 +32,7 @@ joy_read:       jmp     $0000
 
 ; Driver header signature
 .rodata
-joy_sig:        .byte   $6A, $6F, $79, $00      ; "joy", version
-joy_sig_len     = * - joy_sig
+joy_sig:        .byte   $6A, $6F, $79, JOY_API_VERSION ; "joy", version
 
 
 ;----------------------------------------------------------------------------
@@ -49,7 +48,7 @@ _joy_install:
 
 ; Check the driver signature
 
-        ldy     #joy_sig_len-1
+        ldy     #.sizeof(joy_sig)-1
 @L0:    lda     (ptr1),y
         cmp     joy_sig,y
         bne     inv_drv
@@ -58,8 +57,8 @@ _joy_install:
 
 ; Copy the mask array
 
-        ldy     #JOY_MASKS + JOY_MASK_COUNT - 1
-        ldx     #JOY_MASK_COUNT-1
+        ldy     #JOY_HDR::MASKS + .sizeof(JOY_HDR::MASKS) - 1
+        ldx     #.sizeof(JOY_HDR::MASKS)-1
 @L1:    lda     (ptr1),y
         sta     _joy_masks,x
         dey
@@ -68,12 +67,12 @@ _joy_install:
 
 ; Copy the jump vectors
 
-        ldy     #JOY_HDR_JUMPTAB
+        ldy     #JOY_HDR::JUMPTAB
         ldx     #0
 @L2:    inx                             ; Skip the JMP opcode
         jsr     copy                    ; Copy one byte
         jsr     copy                    ; Copy one byte
-        cpx     #(JOY_HDR_JUMPCOUNT*3)
+        cpy     #(JOY_HDR::JUMPTAB + .sizeof(JOY_HDR::JUMPTAB))
         bne     @L2
 
         jmp     joy_install             ; Call driver install routine
index ed5af58ebfebcba8c7149c2379ef28c0275b17db..45282bbda059ae8ede821dc25e5399050272313a 100644 (file)
@@ -22,7 +22,7 @@
 ; Driver signature
 
         .byte   $6A, $6F, $79          ; "joy"
-        .byte   $00                     ; Driver API version number
+        .byte   JOY_API_VERSION                ; Driver API version number
 
 ; Button state masks (8 values)
 
@@ -43,7 +43,7 @@
         .word   READ
 
 ; ------------------------------------------------------------------------
-; Constants                     
+; Constants
 
 JOY_COUNT       = 2             ; Number of joysticks we support
 
@@ -64,8 +64,7 @@ JOY_COUNT       = 2             ; Number of joysticks we support
 INSTALL:
         lda     #<JOY_ERR_OK
         ldx     #>JOY_ERR_OK
-
-;      rts                     ; Run into DEINSTALL instead
+;      rts                     ; Run into UNINSTALL instead
 
 ; ------------------------------------------------------------------------
 ; UNINSTALL routine. Is called before the driver is removed from memory.
index 313f69410ce3fbc68050e423d360db3e7794af29..80d51d13601aa5e98a5cf047af968cced3a07245 100644 (file)
@@ -23,7 +23,7 @@
 ; Driver signature
 
         .byte   $6A, $6F, $79          ; "joy"
-        .byte   $00                     ; Driver API version number
+        .byte   JOY_API_VERSION         ; Driver API version number
 
 ; Button state masks (8 values)
 
@@ -65,8 +65,7 @@ JOY_COUNT       = 1             ; Number of joysticks we support
 INSTALL:
         lda     #<JOY_ERR_OK
         ldx     #>JOY_ERR_OK
-
-;      rts                     ; Run into DEINSTALL instead
+;      rts                     ; Run into UNINSTALL instead
 
 ; ------------------------------------------------------------------------
 ; UNINSTALL routine. Is called before the driver is removed from memory.