找回密碼
 註冊
搜索
查看: 2337|回復: 2

[教學] 隨機音樂

[複製鏈接]
發表於 2010-1-22 00:42:21 | 顯示全部樓層 |閱讀模式
 
Push to Facebook

  1. <HEAD><SCRIPT Language="javascript">
  2. function chaBGMAc22(foName,elName) {
  3. if (document.all || document.getElementById || document.layers) {
  4. var p,v,emb;
  5. p=document.forms[foName].elements[elName];
  6. v=p.options[p.selectedIndex].value;
  7. if (v!="default") {
  8. emb='<embed src="'+v+'" width="0" height="13" loop="true" repeat="true" autostart="true">';
  9. writeAc22("BGM",emb);
  10. }
  11. }
  12. }
  13. function writeAc22(name,mes) {
  14. if (document.all) document.all(name).innerHTML=mes;
  15. else if (document.getElementById) document.getElementById(name).innerHTML=mes;
  16. else if (document.layers) {
  17. document.layers[name].document.open();
  18. document.layers[name].document.write(mes);
  19. document.layers[name].document.close();
  20. }
  21. }
  22. </SCRIPT>
  23. <style type="text/css">
  24. <!--
  25. .class1Ac22 {position:absolute;
  26. left:0px; top:0px;
  27. width:0px; height:0px;
  28. clip:rect(0px 0px 0px 0px)}
  29. -->
  30. </style></HEAD>
  31. <BODY><span id="BGM" class="class1Ac22" style="height: 0px; width: 0px; clip: rect(0px 0px 0px 0px); left: 0px; top: 0px">
  32. <script language="javascript">
  33. <!--
  34. var songFile = new Array("midi/amazing_grace.mid");
  35. var num = Math.floor(Math.random() * songFile.length);
  36. document.writeln('<embed src="' + songFile[num] + '" width="0" height="14" loop="true" repeat="true" autostart="true"></embed>');
  37. //-->
  38. </script>
  39. </span>
  40. <form name="bgmFo"><select name="bgmList" style="font:9pt 'MS UI Gothic','Verdana','Arial';color:#000000;background-color:#cccccc" onChange='chaBGMAc22("bgmFo","bgmList")'>
  41. <option value="default" selected>- BGM Jukebox -
  42. <option value="midi/amazing_grace.mid">Amazing Grace
  43. <option value="midi/happysong.mid">Happy Song
  44. <option value="midi/momopi.mid">Momopi
  45. <option value="midi/natu.mid">Natu
  46. <option value="midi/haruka.mid">Haruka
  47. <option value="midi/cosmos.mid">Cosmos
  48. <option value="midi/tiisana.mid">Tiisana
  49. <option value="midi/houyou.mid">Houyou
  50. <option value="midi/fuchan.mid">Fuchan
  51. <option value="midi/kasawo.mid">Kasawo
  52. <option value="midi/syaper.mid">Syaper
  53. <option value="midi/yasou.mid">Yasou
  54. <option value="midi/oneday.mid">Oneday
  55. <option value="midi/nogiku.mid">Nogiku
  56. <option value="" style="color:gray">NO BGM
  57. </select></form></BODY>
複製代碼
 
您需要登錄後才可以回帖 登錄 | 註冊

本版積分規則

Archiver|手機版|小黑屋|TShopping

GMT+8, 2025-5-1 04:06 , Processed in 0.020129 second(s), 17 queries .

Powered by Discuz! X3.5

© 2001-2025 Discuz! Team.

快速回復 返回頂部 返回列表