6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-08-08 06:25:17 +00:00
Code Issues Projects Releases Wiki Activity

remove dangling spaces

Browse Source
This commit is contained in:
Mariano Dominguez
2023-01-05 21:20:16 -08:00
parent fa05294054
commit 30df733c31
1 changed files with 5 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
libsrc/atari/sound.s
View File

@@ -5,7 +5,6 @@
; atari lib ; atari lib
; ;
.include "atari.inc" .include "atari.inc"
.export _sound .export _sound
.import popa .import popa
; play sound, arguments: voice, pitch, distortion, volume. same as BASIC ; play sound, arguments: voice, pitch, distortion, volume. same as BASIC
@@ -15,18 +14,15 @@
sta STORE1 ;save distortion sta STORE1 ;save distortion
jsr popa ;get pitch jsr popa ;get pitch
pha ;save in stack pha ;save in stack
jsr popa ;get voice jsr popa ;get voice
asl a ;adjust voice *2 for offset in x
asl a ;adjust voice *2 for offset in x
tax tax
pla ;get pitch from stack pla ;get pitch from stack
sta AUDF1,x ; store pitch sta AUDF1,x ; store pitch
lda #0 lda #0
sta AUDCTL sta AUDCTL
lda #3 lda #3
stx SKCTL ; init sound stx SKCTL ;init sound
lda STORE1 ;get distortion lda STORE1 ;get distortion
asl a ;ignore the high nibble asl a ;ignore the high nibble
asl a asl a