etc/uxn
0
0
Fork 0
mirror of https://git.sr.ht/~rabbits/uxn synced 2024-11-22 22:05:11 +00:00
Code Issues Projects Releases Wiki Activity

(piano.tal) Support new volume port

Browse source
This commit is contained in:
neauoire 2023-10-20 10:52:13 -04:00
parent 36d6e99a75
commit 94c57e9bc5
1 changed files with 10 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
projects/software/piano.tal
View file

@ -91,10 +91,17 @@ BRK
#1000 #1000
&loop &loop
.adsr-view/x2 LDZ2 #003a SUB2 .Screen/x DEO2 .adsr-view/x2 LDZ2 #003a SUB2 .Screen/x DEO2
#10 OVR SUB .Audio0/output DEI ( left )
DUP2 #0f AND LTH .Screen/pixel DEO #10 OVR SUB
#00 .Audio0/output DEI
#00 .Audio0/volume DEI #04 SFT
MUL2 #08 SFT2 NIP LTH .Screen/pixel DEO
.Screen/x DEI2k INC2 INC2 ROT DEO2 .Screen/x DEI2k INC2 INC2 ROT DEO2
#04 SFT LTH .Screen/pixel DEO ( right )
#10 OVR SUB
#00 .Audio0/output DEI
#00 .Audio0/volume DEI #0f AND
MUL2 #08 SFT2 NIP LTH .Screen/pixel DEO
.Screen/y DEI2k INC2 INC2 ROT DEO2 .Screen/y DEI2k INC2 INC2 ROT DEO2
INC GTHk ?&loop INC GTHk ?&loop
POP2 POP2