Teknologi 3D pada Halaman WEB
Sabtu, 06 Februari 2010
Membuat suara menggunakan Direct Animation
Copy kode di bawah ini pada notepad, dan paste pada notepad simpan dengan nama file (suara.html)
<br /><!--????--><br /><OBJECT id="DACtl" style="LEFT: 0px; WIDTH: 1px; TOP: 0px; HEIGHT: 1px" classid="CLSID:B6FFC24C-7E13-11D0-9B47-00C04FC2F51D" VIEWASTEXT><br /><PARAM NAME="OpaqueForHitDetect" VALUE="1"><br /><PARAM NAME="UpdateInterval" VALUE="0.033"><br /></OBJECT><br /><br /><script id="clientEventHandlersJS" language="javascript"><br /><!--<br />var k=false;<br />DACtl.image = DACtl.MeterLibrary.solidColorImage(DACtl.MeterLibrary.White);<br />function Button1_onclick() {<br />makesnd(1)<br />}<br /><br />function Button2_onclick() {<br />makesnd(2)<br />}<br /><br />function Button3_onclick() {<br />makesnd(3)<br />}<br /><br />function makesnd(v){<br />var snd, snd2, snd3;<br />if(k)DACtl.Stop();<br />snd = DACtl.MeterLibrary.SinSynth.Rate(800); // 800khz sine wave.<br />if(v==1){<br />snd=snd;}<br />else if(v==2){<br />snd=snd.RateAnim(DACtl.MeterLibrary.Add(DACtl.MeterLibrary.DANumber(3),DACtl.MeterLibrary.Cos(DACtl.MeterLibrary.localTime)));}<br />else if(v==3){<br />snd=snd.RateAnim(DACtl.MeterLibrary.Div(DACtl.MeterLibrary.Sin(DACtl.MeterLibrary.localTime),DACtl.MeterLibrary.Cos(DACtl.MeterLibrary.localTime)));}<br /><br />DACtl.Sound=snd;<br />DACtl.Start();<br />k=true;<br />}<br /><br />//--><br /></script><br /><br /><INPUT type="button" value="800kHz" name="Button1" onclick="return Button1_onclick()"> <br /><INPUT id="Button2" type="button" value="Alarm" name="Button2" onclick="return Button2_onclick()"> <br /><INPUT id="Button3" type="button" value="Robot" name="Button3" onclick="return Button3_onclick()"><br />
Tidak ada komentar:
Posting Komentar
Posting Lebih Baru
Posting Lama
Beranda
Langganan:
Posting Komentar (Atom)
Tidak ada komentar:
Posting Komentar