[摘要]html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title>MID点歌器</title>...
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[i]
if(temp.indexOf(obj.find.value)!=-1)
{
var no = new Option()
no.value = stext[i]
no.text = stext[i]
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[i]+"\">"+stext[i])
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>
……