d6
/
uxn
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Corrected audio example pitch constants.

This commit is contained in:
Andrew Alderwick 2021-04-05 11:16:43 +01:00
parent 818ade6db1
commit c7c237895a
1 changed files with 5 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
projects/examples/dev.audio.usm
View File

@ -153,24 +153,21 @@ BRK
DUP #ff NEQ ^$skip1 JNZ DUP #ff NEQ ^$skip1 JNZ
POP ^$listen2 JMP POP ^$listen2 JMP
$skip1 $skip1
#00 SWP ,notes ADD2 PEK2 #00 SWP ,notes ADD2 PEK2 =Audio.ch1pitch
#0c #03 MUL SUB =Audio.ch1pitch
$listen2 $listen2
,track.ch2 #00 ~head.pos #08 DIV ADD2 PEK2 ,track.ch2 #00 ~head.pos #08 DIV ADD2 PEK2
#01 SUB #01 SUB
DUP #ff NEQ ^$skip2 JNZ DUP #ff NEQ ^$skip2 JNZ
POP ^$listen3 JMP POP ^$listen3 JMP
$skip2 $skip2
#00 SWP ,notes ADD2 PEK2 #00 SWP ,notes ADD2 PEK2 =Audio.ch2pitch
#0c #03 MUL SUB =Audio.ch2pitch
$listen3 $listen3
,track.ch3 #00 ~head.pos #08 DIV ADD2 PEK2 ,track.ch3 #00 ~head.pos #08 DIV ADD2 PEK2
#01 SUB #01 SUB
DUP #ff NEQ ^$skip3 JNZ DUP #ff NEQ ^$skip3 JNZ
POP ^$end JMP POP ^$end JMP
$skip3 $skip3
#00 SWP ,notes ADD2 PEK2 #00 SWP ,notes ADD2 PEK2 =Audio.ch3pitch
#0c #03 MUL SUB =Audio.ch3pitch
$end $end
RTN RTN
@ -438,8 +435,8 @@ RTN
@head_icn [ 0018 1818 7e3c 1800 ] @head_icn [ 0018 1818 7e3c 1800 ]
@notes [ @notes [
60 62 64 65 67 69 71 3c 3e 40 41 43 45 47
72 74 76 77 79 81 83 48 4a 4c 4d 4f 51 53
] ]
@knob_icns [ @knob_icns [