技术资料 > ASP技术 > 脚本编码 : 一个很酷的程序JavaScript做的MID歌曲搜索播放器[IE](

一个很酷的程序JavaScript做的MID歌曲搜索播放器[IE](

March 25,2004

html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>MID点歌器</title>
<style>.f{font-size:9pt;width:190pt}</style>
<script>
//程序设计虹雨
path="http://card4.yinsha.com/midi/"
var stext=new Array()
stext[0]='angels we have heard on high'
stext[1]='away in a manger'
stext[2]='beginning to look a lot like christmas'
stext[3]='carol bells'
stext[4]='chestnuts roasting on an open fire'
stext[5]='deck the halls'
stext[6]='do you hear what i hear'
stext[7]='frosty'
stext[8]='god rest ye merry gentlemen'
stext[9]='grandma got run over'
stext[10]='happy christmas'
stext[11]='hark the herald angels sing'
stext[12]='have a holly jolly christmas'
stext[13]='holy night'
stext[14]='i saw mommy kissing santa claus'
stext[15]='jingle bells'
stext[16]='the first noel'
stext[17]='the holly and thi iny'
stext[18]='101次求婚'
stext[19]='阿lam日记'
stext[20]='阿尔汉布拉宫的回忆'
stext[21]='阿根廷不要为我哭泣'
stext[22]='阿拉伯跳舞女郎'
stext[23]='阿拉伯绮想曲'
stext[24]='阿拉丁'
stext[25]='阿斯图利亚斯的传奇'
stext[26]='爱出个未来'
stext[27]='爱的很小心'
stext[28]='爱的呼唤'
stext[29]='爱火烧不尽'
stext[30]='爱那么重'
stext[31]='爱那麽重'
stext[32]='爱你到永远'
stext[33]='爱你一定快乐'
stext[34]='爱你一万年'
stext[35]='爱你这样傻'
stext[36]='爱念'
stext[37]='爱拼才会赢'
stext[38]='爱情白皮书'
stext[39]='爱情故事'
stext[40]='爱情傀儡'
stext[41]='爱情影画戏'
stext[42]='爱人'
stext[43]='爱如潮水'
stext[44]='爱上一个不回家的人'
stext[45]='爱是永恒'
stext[46]='爱我到今生'
stext[47]='爱我的人和我爱的人'
stext[48]='爱我好吗'
stext[49]='爱无止境'
stext[50]='爱相随'
stext[51]='爱相随2'
stext[52]='爱与愁'
stext[53]='安妮'
stext[54]='八月桂花遍地开'
stext[55]='八月桂花香'
stext[56]='巴西华尔兹'
stext[57]='拜年'
stext[58]='半点心'
stext[59]='半梦半醒之间'
stext[60]='包青天'
stext[61]='悲伤朱丽叶'
stext[62]='悲伤茱丽叶'
stext[63]='北方的狼'
stext[64]='北国之春'
stext[65]='北京'
stext[66]='被动'
stext[67]='彼特和狼'
stext[68]='变心的翅膀'
stext[69]='别爱我'
stext[70]='别怕我伤心'
stext[71]='别让情两难'
stext[72]='别让我恨你'
stext[73]='别让我最后知道'
stext[74]='别问我是谁'
stext[75]='别以为我懂'
stext[76]='冰雨'
stext[77]='勃兰登堡协奏曲'
stext[78]='不会哭于你面前'
stext[79]='不可能的任务'
stext[80]='不老的传说'
stext[81]='不了情'
stext[82]='不留余情'
stext[83]='不拖不'
stext[84]='不要对他说'
stext[85]='不要在乎我是谁'
stext[86]='不知不觉想起你'
stext[87]='布雷舞曲'
stext[88]='步步高'
stext[89]='财神到'
stext[90]='采茶扑蝶'
stext[91]='缠绵'
stext[92]='长城'
stext[93]='长流不息'
stext[94]='长夜多浪漫'
stext[95]='超人'
stext[96]='城里的月光'
stext[97]='橙路'
stext[98]='赤裸裸'
stext[99]='冲开一切'
stext[100]='初恋'
stext[101]='初恋情人'
stext[102]='出场'
stext[103]='出水莲'
stext[104]='楚留香'
stext[105]='处处留情'
stext[106]='传奇'
stext[107]='船歌'
stext[108]='吹散为你留下的梦'

stt=0
k=0
var otxt=new Array()
otxt[0]='[>    ]'
otxt[1]='[>>    ]'
otxt[2]='[ >> ]'
otxt[3]='[  >> ]'
otxt[4]='[  >>  ]'
otxt[5]='[ >>  ]'
otxt[6]='[ >> ]'
otxt[7]='[    >>]'
otxt[8]='[    >]'
function findc(obj){
   j=1
   for(i=0;i<stext.length;i++){
         temp=""+stext
         if(temp.indexOf(obj.find.value)!=-1)
         {
               var no = new Option()
            no.value = stext
            no.text = stext
            obj.music.options[j++]=no
         }
   }
   obj.music.options.length =j
   obj.midopen.value="       "
   obj.txt.value="找到歌共"+obj.music.options.length+"首"
}

function auto(obj){
   if(obj.midopen.value=="停止播放"){
         clearInterval(stt)
         obj.midopen.value="播放歌曲"
         midon=document.mid.dynsrc
         document.mid.dynsrc="about:blank"
   }else{
         clearInterval(stt)
         obj.midopen.value="停止播放"
         document.mid.dynsrc=midon
         obj.txt.value="第"+obj.music.selectedIndex+"首、曲名是："+mid
         stt=setInterval("atxt()",200)
   }
}
function x(obj){
   mid=obj.music.options[obj.music.selectedIndex].value;
   if (mid!=""){
         clearInterval(stt)
         document.mid.dynsrc="about:blank"
         obj.midopen.value="停止播放"
         document.mid.dynsrc=path+mid+".mid";
         obj.txt.value="第"+obj.music.selectedIndex+"首、曲名是："+mid
         stt=setInterval("atxt()",200)
   }
}
function atxt(){
k++
if(k==otxt.length)k=0
document.forms[0].otx.value=otxt[k]
}
</script>
<link rel="stylesheet" href="../hy.css">
</head>

<body background="../gif/mbg.gif" bgcolor="#FFFFFF">

   <form>
<div align="center">
      <center>
      <table border="0" bgcolor="#FCE01B" cellspacing="5">
      <tr>
         <td><table border="1" bordercolorlight="#000000" cellspacing="0" bordercolordark="#FFFFFF"
background="../gif/tb.gif">
  <tr>
<td><font color="#FF0000">彩虹细雨MID播放机</font></td>
  </tr>
  <tr>
<td>

<input type="button" value="快速搜索" onclick="findc(this.form)" style="background-image: url
('../gif/tb.gif')">

歌曲名称：<input type="text" name="find" size="20">[虹雨设计]

</td>
  </tr>
  <tr>
<td>

      <p> <input type="button" value="       " onclick="auto(this.form)" name="midopen"
style="background-image: url('../gif/tb.gif')"><img name="mid" dynsrc="about:blank" width="1"
height="1">
      <script>
      document.write("<select size=1 name=music onChange=x(this.form) class=f>")
      document.write("<option value="">选择音乐")
      for(i=0;i<stext.length;i++)document.write("<OPTION value=""+stext+"">"+stext)
      document.write("</select>")
      </script></p>

</td>
  </tr>
  <tr>
<td><input type="text" name="otx" size="10" onFocus="blur()"> <input type="text" name="txt" size="40"
onFocus="blur()"></td>
  </tr>
</table> </td>
      </tr>
      </table>
      </center>
   </div>
   </form
   　
</body>

</html>