Removed (pretty inconsistently used) tab chars from source code base.

[cc65] / libsrc / geos-cbm / joy / geos-stdjoy.s

diff --git a/libsrc/geos-cbm/joy/geos-stdjoy.s b/libsrc/geos-cbm/joy/geos-stdjoy.s
index 106209a9e6780e5d29d912a51893001a68ceb612..7cfd0ad08a5d6f7359086dec9d7b80bbcc298a35 100644 (file)
--- a/libsrc/geos-cbm/joy/geos-stdjoy.s
+++ b/libsrc/geos-cbm/joy/geos-stdjoy.s
@@ -5,45 +5,45 @@
 ; Ullrich von Bassewitz, 2002-12-20
 ;
 
-           .include "zeropage.inc"
-           .include "joy-kernel.inc"
-           .include "joy-error.inc"
-           .include "geossym.inc"
+            .include "zeropage.inc"
+            .include "joy-kernel.inc"
+            .include "joy-error.inc"
+            .include "geossym.inc"
 
-           .macpack generic
+            .macpack generic
 
 ; ------------------------------------------------------------------------
 ; Header. Includes jump table
 
-.segment       "JUMPTABLE"
-                                            
+.segment        "JUMPTABLE"
+                                             
 ; Driver signature
 
-       .byte $6A, $6F, $79     ; "joy"
-       .byte JOY_API_VERSION   ; Driver API version number
+        .byte $6A, $6F, $79     ; "joy"
+        .byte JOY_API_VERSION   ; Driver API version number
 
 ; Button state masks (8 values)
 
-       .byte $01               ; JOY_UP
-       .byte $02               ; JOY_DOWN
-       .byte $04               ; JOY_LEFT
-       .byte $08               ; JOY_RIGHT
-       .byte $10               ; JOY_FIRE
-       .byte $00               ; Future expansion
-       .byte $00               ; Future expansion
-       .byte $00               ; Future expansion
+        .byte $01               ; JOY_UP
+        .byte $02               ; JOY_DOWN
+        .byte $04               ; JOY_LEFT
+        .byte $08               ; JOY_RIGHT
+        .byte $10               ; JOY_FIRE
+        .byte $00               ; Future expansion
+        .byte $00               ; Future expansion
+        .byte $00               ; Future expansion
 
 ; Jump table.
 
-       .word INSTALL
-       .word UNINSTALL
-       .word COUNT
-       .word READ
+        .word INSTALL
+        .word UNINSTALL
+        .word COUNT
+        .word READ
 
 ; ------------------------------------------------------------------------
 ; Constants
 
-JOY_COUNT      = 2             ; Number of joysticks we support
+JOY_COUNT       = 2             ; Number of joysticks we support
 
 ; ------------------------------------------------------------------------
 ; Data.
@@ -58,9 +58,9 @@ JOY_COUNT     = 2             ; Number of joysticks we support
 ;
 
 INSTALL:
-       lda #<JOY_ERR_OK
-       ldx #>JOY_ERR_OK
-;      rts                     ; Run into UNINSTALL instead
+        lda #<JOY_ERR_OK
+        ldx #>JOY_ERR_OK
+;       rts                     ; Run into UNINSTALL instead
 
 ; ------------------------------------------------------------------------
 ; UNINSTALL routine. Is called before the driver is removed from memory.
@@ -68,54 +68,54 @@ INSTALL:
 ;
 
 UNINSTALL:
-       rts
+        rts
 
 ; ------------------------------------------------------------------------
 ; COUNT: Return the total number of available joysticks in a/x.
 ;
 
 COUNT:
-       lda #<JOY_COUNT
-       ldx #>JOY_COUNT
-       rts
+        lda #<JOY_COUNT
+        ldx #>JOY_COUNT
+        rts
 
 ; ------------------------------------------------------------------------
 ; READ: Read a particular joystick passed in A.
 ;
 
 READ:
-       tax
-       php
-       sei                     ; disable IRQ
-       lda $01
-       pha
-       lda #$35
-       sta $01                 ; enable I/O
+        tax
+        php
+        sei                     ; disable IRQ
+        lda $01
+        pha
+        lda #$35
+        sta $01                 ; enable I/O
 
-       txa                     ; Joystick number into X
-       bne joy2
+        txa                     ; Joystick number into X
+        bne joy2
 
 ; Read joystick 1
 
 joy1:
-       lda #$7F
-       sta cia1base
-       lda cia1base+1
-back:  tay
-       pla
-       sta $01
-       plp
-       tya
-       and #$1F
-       eor #$1F
-       rts
+        lda #$7F
+        sta cia1base
+        lda cia1base+1
+back:   tay
+        pla
+        sta $01
+        plp
+        tya
+        and #$1F
+        eor #$1F
+        rts
 
 ; Read joystick 2
 
-joy2:  ldx #0
-       lda #$E0
-       ldy #$FF
-       sta cia1base+2
-       lda cia1base+1
-       sty cia1base+2
-       jmp back
+joy2:   ldx #0
+        lda #$E0
+        ldy #$FF
+        sta cia1base+2
+        lda cia1base+1
+        sty cia1base+2
+        jmp back