(piano.tal) Support new volume port

This commit is contained in:
neauoire 2023-10-20 10:52:13 -04:00
parent c26c27a730
commit 328f52128b
1 changed files with 10 additions and 3 deletions

View File

@ -91,10 +91,17 @@ BRK
#1000
&loop
.adsr-view/x2 LDZ2 #003a SUB2 .Screen/x DEO2
#10 OVR SUB .Audio0/output DEI
DUP2 #0f AND LTH .Screen/pixel DEO
( left )
#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
#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
INC GTHk ?&loop
POP2