mirror/sointu
1
0
Fork 0
mirror of https://github.com/vsariola/sointu.git synced 2026-04-01 03:33:12 -04:00
Code Issues Packages Projects Releases Wiki Activity

fix: center value 64 for the exp_ parameters

Browse Source
This commit is contained in:
qm210
2024-10-22 00:08:23 +02:00
parent f4742cb02d
commit 15c1126d11
2 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
vm/compiler/templates/amd64-386/sources.asm
View File

@ -149,7 +149,8 @@ su_op_envelopexp_applyexp:
; qm210: NOW THE ACTUAL EXPONENTIAL SCALING ; qm210: NOW THE ACTUAL EXPONENTIAL SCALING
; - scale the exponent in [0; 1] to [0.125; 8], call that kappa = 2^(6*(expo-0.5)) ; - scale the exponent in [0; 1] to [0.125; 8], call that kappa = 2^(6*(expo-0.5))
fld dword [r10] ; stack: [ expo, x' ] fld dword [r10] ; stack: [ expo, x' ]
fld qword [{{.Use (.Float 0.5)}}] ; stack: [ 0.5, expo, x' ] {{.Prepare (.Float 0.5)}}
fld dword [{{.Use (.Float 0.5)}}] ; stack: [ 0.5, expo, x' ]
fsubp st1, st0 ; stack: [ expo-0.5, x' ] fsubp st1, st0 ; stack: [ expo-0.5, x' ]
{{.Prepare (.Int 6)}} {{.Prepare (.Int 6)}}
fimul dword [{{.Use (.Int 6)}}] ; stack: [ 6*(expo-0.5), x' ] fimul dword [{{.Use (.Int 6)}}] ; stack: [ 6*(expo-0.5), x' ]

0
write_envelexp_wav.ps1 Normal file
View File