横軸が時間で、縦軸が頻度??
s = 30 '周期(s)
dt = 2 * pi() / (s * 60): t0 = pi() * 3 / 2 'sin(t0)=0
i = 0: j = 0
while 1:vsync
p=(sin(t0 + i * dt) + 1) / 2 'p=[0..1]
spofs 0,i mod 400, 200 - p * 200
j = j + 1
if (j >= (120 - p * 60) then ' j >= [120 .. 60]
j = 0: ? "ふう・・・";
endif
i = i + 1
wend
p を 0 から 1 の範囲にしとくと、2秒から1秒の周期でふうふういいます。
0そうだね プレイ済み