recip.alg

来自「Audacity是一款用於錄音和編輯聲音的、免費的開放源碼軟體。它可以執行於Ma」· ALG 代码 · 共 12 行

(RECIP-ALG
  (NAME "recip")
  (ARGUMENTS ("sound_type" "s1"))
  (STATE ("double" "scale" "s1->scale"))
  (INTERNAL-SCALING s1)
  (CONSTANT "scale")
  (START (MIN s1))
  (INNER-LOOP "output = (sample_type) (scale / s1)")
  (TERMINATE (MIN s1))
  (LOGICAL-STOP (MIN s1))
)