Style changes.

[cc65] / libsrc / pce / psg.s

diff --git a/libsrc/pce/psg.s b/libsrc/pce/psg.s
index ebf35d952e3a163589564f52dd947ea1760f1ba4..4e212dd3dfa6c0411d5d05350f25c6c43c36bed4 100644 (file)
--- a/libsrc/pce/psg.s
+++ b/libsrc/pce/psg.s
@@ -1,29 +1,30 @@
-                         
-                                               .include "pcengine.inc"
+        .export         psg_init
 
-            .export psg_init
+        .include        "pce.inc"
 
+        .segment        "ONCE"
 psg_init:
-                        clx
-                        stx     $0800   ; Select channel
+        clx
+        stz     PSG_GLOBAL_PAN          ; Clear global balance
+
 psg_clear_loop:
-                        stz     $0801   ; Clear global balance
-                        stz     $0802   ; Clear frequency LSB
-                        stz     $0803   ; Clear frequency MSB
-                        stz     $0804   ; Clear volume
-                        stz     $0805   ; Clear balance
-                        stz     $0807   ; Clear noise control
-                        stz     $0808   ; Clear LFO frequency
-                        stz     $0809   ; Clear LFO control
+        stx     PSG_CHAN_SELECT         ; Select channel
+        stz     PSG_FREQ_LO             ; Clear frequency LSB
+        stz     PSG_FREQ_HI             ; Clear frequency MSB
+        stz     PSG_CHAN_CTRL           ; Clear volume
+        stz     PSG_CHAN_PAN            ; Clear balance
+        stz     PSG_NOISE               ; Clear noise control
+        stz     PSG_LFO_FREQ            ; Clear LFO frequency
+        stz     PSG_LFO_CTRL            ; Clear LFO control
 
-                        cly
-psg_clear_waveform:     stz     $0806   ; Clear waveform byte
-                        iny
-                        cpy     #$20
-                        bne     psg_clear_waveform
+        cly
+psg_clear_waveform:
+        stz     PSG_CHAN_DATA           ; Clear waveform byte
+        iny
+        cpy     #$20
+        bne     psg_clear_waveform
 
-                        inx
-                        cpx     #$06
-                        bne     psg_clear_loop
-                        rts
-                          
+        inx
+        cpx     #$06
+        bne     psg_clear_loop
+        rts