obj.getaudioが急に来たのでテスト的なもの。
無駄に60fpsです(ﾉ∀`)

使ったスクリプト。
使うならマジックナンバーをテキトーに弄ってください。
シークでは上手く動いてる気がしません(ﾉ∀`)

buf={}
if obj.frame == 0 then
zoom=0.5
end
r=obj.getaudio(buf,"audiobuffer","spectrum",100)
if (buf[1] > 700) then
zoom=1
end
if (zoom > 0.5) then
zoom = zoom - 0.04
end
obj.zoom = zoom

一枚絵：遠心力P