博客
关于我
JavaScript 1 播放器
阅读量:292 次
发布时间:2019-03-01

本文共 1186 字,大约阅读时间需要 3 分钟。

<html>
<head>
</head>
<body>
<Script Language="JavaScript">
song = new Array()
var x = 0
song[1] = "007主题曲之一 "
song[2] = "007主题曲之二 "
song[3] = "999朵玫瑰 "
song[4] = "X-档案主题曲"
song[5] = "用心良苦"
song[6] = "泰坦尼克主题曲"
function prev(){
if (x>1)
{
    x--
    document.midi.typein.value=song [x]
}
}
function next()
{
    var max= song.length-1
    if (x<max)
    {
        x++
        document.midi.typein.value=song [x]
    }
}
function go()
{
    if (x != 0)
    {
        location.href='song'+x+'.mid'
        //以上指定播放的是当前路径的midi文件,文件名分别是song1.mid-song6.mid //
    }
}
function start()
{
    x=1
    document.midi.typein.value=song [x]
}
function end()
{
    x=song.length-1
    document.midi.typein.value=song [x]
}
function cls()
{
    document.midi.typein.value="选曲"
}
</Script>
<!--====2、将以下代码加入HTML的<body></body>之间区:-->
<BODY οnlοad="cls()">
<FORM Name="midi">
<INPUT NAME="typein" TYPE="text" SIZE="25" ALIGN=top><BR>
<font size=3>
<INPUT TYPE=Button Value="|<<" Align=left οnclick="start()">
<INPUT TYPE=Button Value="<<" Align=left οnclick="prev()">
<input type=Button value="PLAY" align=left onClick="go()" name="Button">
<INPUT TYPE=Button Value=">>" Align=left οnclick="next()">
<INPUT TYPE=Button Value=">>|" Align=left οnclick="end()">
</font>
</FORM>
</body>
</html> 

转载地址:http://ygzo.baihongyu.com/

你可能感兴趣的文章
Multicast1
查看>>
MySQL Cluster 7.0.36 发布
查看>>
Multimodal Unsupervised Image-to-Image Translation多通道无监督图像翻译
查看>>
MySQL Cluster与MGR集群实战
查看>>
multipart/form-data与application/octet-stream的区别、application/x-www-form-urlencoded
查看>>
mysql cmake 报错,MySQL云服务器应用及cmake报错解决办法
查看>>
Multiple websites on single instance of IIS
查看>>
mysql CONCAT()函数拼接有NULL
查看>>
multiprocessing.Manager 嵌套共享对象不适用于队列
查看>>
multiprocessing.pool.map 和带有两个参数的函数
查看>>
MYSQL CONCAT函数
查看>>
multiprocessing.Pool:map_async 和 imap 有什么区别?
查看>>
MySQL Connector/Net 句柄泄露
查看>>
multiprocessor(中)
查看>>
mysql CPU使用率过高的一次处理经历
查看>>
Multisim中555定时器使用技巧
查看>>
MySQL CRUD 数据表基础操作实战
查看>>
multisim变压器反馈式_穿过隔离栅供电:认识隔离式直流/ 直流偏置电源
查看>>
mysql csv import meets charset
查看>>
multivariate_normal TypeError: ufunc ‘add‘ output (typecode ‘O‘) could not be coerced to provided……
查看>>