コンピュータを楽しもう!!

今、自分が面白くていろいろやってみたことを書き綴りたいと思います。連絡先はtarosa.yでgmail.comです。

sound.beep([周波数[,時間msec] ])

周波数、時間を指定して、ビープ音を鳴らすコマンドです。

引数

  • 周波数 : 音の周波数を指定します。(1〜10000Hz)の範囲で整数です。省略時は4000Hzになります。
  • 時間 : 音が鳴る時間をmsec単位でしていします。省略時は200msecになります。

使用例

function main()
local tm
local p = { si0=494, do0=523, re=587, mi=659, fa=698, so=784, ra=880, si=988, do1=1047 }
local mel = { p.re, p.mi, p.fa, p.so, p.mi, p.fa, p.re, p.mi, p.do0, p.re, p.si0, p.do0, p.do1, p.do0 }
local len = {  80,   128,   64,   120,  80,  120,   80,  120,    80,  120,    80,   180,    50,   320 }
local i

 for i=1, #mel do
    sound.beep( mel[i], len[i] )
    tm = system.getSec() + len[i]/1000
    while( tm>system.getSec() )do end
 end
end
main()