mirror of
https://github.com/cookiengineer/audacity
synced 2025-05-03 17:19:43 +02:00
12 lines
264 B
Plaintext
12 lines
264 B
Plaintext
(SCALE-ALG
|
|
(NAME "normalize")
|
|
(ARGUMENTS ("sound_type" "s1"))
|
|
(STATE ("sample_type" "scale" "s1->scale"))
|
|
(CONSTANT "scale")
|
|
(START (MIN s1))
|
|
(INTERNAL-SCALING s1)
|
|
(INNER-LOOP "output = s1 * scale")
|
|
(TERMINATE (MIN s1))
|
|
(LOGICAL-STOP (MIN s1))
|
|
)
|