zoukankan      html  css  js  c++  java

  • Winamp网页播放器

        哈哈，早上5点醒来睡不着，到www.real2000.org听歌，看到这个播放器不错，于是把它给扣了出来。^_^
        原先是分了几个js文件调用的，为了贴代码方便，偶都放在一个文件里了：）共有2个文件和几十个图片。
        在线演示：http://music.lzr.com.cn/Apple/Winamp
        打包下载：http://music.lzr.com.cn/Apple/File/Winamp.rar
        另外演示里放的是周杰伦的新专集《十一月的萧邦》，其中《发如雪》很好听，偶喜欢，推荐大家听听，嘻嘻。
        好了，现在开始贴代码咯：
        主文件Default.htm如下：

    <html>
    <head>
    <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
    <title>Winamp网页播放器</title>
    <meta name="Author" content="Winamp网页播放器">
    <meta name="Keywords" content="Dicky.CnBlogs.Com">
    <meta name="Description" content="Winamp网页播放器">
    <style type="text/css">
    <!-- 
        body     { background-color: #000000;}
        p     { text-align: center; }
        .title     { font-family: "宋体"; font-size: 9pt; color: #ffffff; }
        .time     { font-family: 'Tahoma','Verdana','Arial'; font-size: 9pt; color: #000000; }
    -->
    </style>
    <script type="text/javascript" language="javascript">
    <!--
    //原Exobud.js Added By Dicky 2005-11-7 7:09:21
    var objMmInfo = null;
    var intMmCnt = 0;
    var intSelMmCnt = 0;
    var intActMmCnt = 0;
    var cActIdx = 0;
    var cActTit = "nAnT";
    var strMmInfo = "媒体档案信息";
    var blnfpl = false;
    var blnEnabled = false;
    var blnEOT = false;
    var arrSelMm = null;
    var arrActMm = null;
    var intExobudStat = 0;
    var tidTLab = null;
    var tidErr = null;
    var tidMsg = null;
    var intErrCnt = 0;
    var blnRept = false;
    // 这是「自动连续播放」的设定。一般来说，播放一首音乐完毕后就会自动跳到下一首。
    //     但是如果您要播放的媒体是视讯档案(例如:MV)的话，最好将这个设定值改为 false 。
    //     true = 自动连续播放
    //     false = 不要自动连续播放，让使用者自行挑选下一首曲目
    var blnAutoProc = true;
    // 设定播放面板上所显示的时间长度，预设是以正常方式(Elapse)抑或倒数方式(Lapse)显示：
    //     true = 以正常方式显示时间长度，即动态地显示曲目已播放的时间
    //     false = 以倒数方式显示时间长度，即动态地显示曲目剩余的时间
    var blnElaps = true;
    // 设定播放每首曲目之间的延迟时间(Delay Time)，单位是毫秒(msec)。
    //     每100毫秒代表0.1秒，默认值是500毫秒(即0.5秒)，最少也要设为100毫秒。
    var intDelay = 500;
    // wmpInit() 函式: 使用 wmp-obj v7.x 链接库建立环境设定
    function wmpInit(){
    var wmps = Exobud.settings;
    var wmpc = Exobud.ClosedCaption;
    wmps.autoStart     = true;
    wmps.balance     = 0;
    wmps.enableErrorDialogs     = false;
    wmps.invokeURLs     = false;
    wmps.mute     = false;
    wmps.playCount     = 1;
    wmps.rate     = 1;
    wmps.volume     = 100;
    if(blnUseSmi){wmpc.captioningID="capText"; capText.style.display="";}
    Exobud.enabled     = true;
    }
    // mkMmPath() 函式: 准备建立 Multi-object 的数组
    function mkMmPath(u,t,f,s){
    this.mmUrl = "mms://218.75.129.247/www.ppzy.com/"+ungm(u);
    this.mmTit = t;
    this.mmDur = 0;
    this.selMm = f;
    this.actMm = f;
    if(blnUseSmi){this.mmSmi=s;}
    }
    // mkList() 函式: 建立 Multi-object 的数组
    function mkList(u,t,s,f){
    var cu = u;
    var ct = t;
    var cs = s;
    var cf = f;
    var idx = 0;
    if(objMmInfo == null){objMmInfo=new Array(); idx=0;}
    else {idx=objMmInfo.length;}
    if(u=="" || u==null){cu="mms://";}
    if(t=="" || t==null){ct="nAnT";}
    if(f=="f" || f=="F"){cf="f";}
    else {cf="t"; intSelMmCnt++;}
    if(blnUseSmi){
    objMmInfo[idx]    =new mkMmPath(cu,ct,cf,cs);
    }     else {
    objMmInfo[idx]    =new mkMmPath(cu,ct,cf);
    }
    intActMmCnt     = intSelMmCnt;
    intMmCnt     = objMmInfo.length;
    }
    // mkSel() 函式: 建立已选取播放项目(Selected Media)的数组
    function mkSel(){
    arrSelMm     = null;
    intSelMmCnt     = 0;
    var selidx = 0;
    if(intMmCnt<=0){intExobudStat=1; blnEnabled=false; return;} // 没有任何播放清单项目
    arrSelMm = new Array();
    for(var i=0; i<intMmCnt; i++){
    if(objMmInfo[i].selMm =="t"){arrSelMm[selidx]=i;selidx++;}
    }
    intSelMmCnt    =arrSelMm.length;
    if(intSelMmCnt<=0){blnEnabled=false; intExobudStat=2; arrSelMm=null; return;}
    else {blnEnabled=true; mkAct();}
    }
    // mkAct() 函式: 建立已启用播放项目(Activated Media)的数组
    function mkAct(){
    arrActMm     = null;
    intActMmCnt     = 0;
    var selidx = 0;
    var actidx = 0;
    if(blnEnabled){
    arrActMm    =new Array();
    for(var i=0; i<intSelMmCnt; i++){
    selidx    =arrSelMm[i];
    if(objMmInfo[selidx].actMm=="t"){arrActMm[actidx]=selidx; actidx++;}
    }
    intActMmCnt    =arrActMm.length;
    }
    else { return;}
    if(intActMmCnt<=0){blnEOT=true;arrActMm=null;}
    else {blnEOT=false;}
    }
    // chkAllSel() 函式: 全部选取所有的播放清单项目
    function chkAllSel(){
    for(var i=0; i<intMmCnt; i++){
    objMmInfo[i].selMm    ="t";
    objMmInfo[i].actMm    ="t";
    }
    mkSel();
    }
    // chkAllDesel() 函式: 不选取所有的播放清单项目
    function chkAllDesel(){
    for(var i=0; i<intMmCnt; i++){
    objMmInfo[i].selMm    ="f";
    objMmInfo[i].actMm    ="f";
    }
    mkSel();
    }
    // chkItemSel() 函式: 选取或不选取播放清单项目
    function chkItemSel(idx){
    if(objMmInfo[idx].selMm =="t"){
    objMmInfo[idx].selMm    ="f";objMmInfo[idx].actMm="f";
    }     else {
    objMmInfo[idx].selMm    ="t";objMmInfo[idx].actMm="t";
    }
    mkSel();
    }
    // chkItemAct() 函式: 将某个已启用播放项目(Activated Media)冻结
    function chkItemAct(idx){
    objMmInfo[idx].actMm    ="f";
    mkAct();
    }
    // mkSelAct() 函式: 将已选取播放项目(Selected Media)加入到已启用播放项目(Activated Media)
    function mkSelAct(){
    var idx=0;
    for(var i=0; i<intSelMmCnt; i++){
    idx    =arrSelMm[i];
    objMmInfo[idx].actMm    ="t";
    }
    mkAct();
    }
    // initExobud() 函式: 初始化 ExoBUD MP 媒体播放程序
    function initExobud(){
    wmpInit();
    mkSel();
    blnfpl     = false;
    if(!blnShowVolCtrl) {
    document.images['vmute'].style.display     = "none";
    document.images['vdn'].style.display     = "none";
    document.images['vup'].style.display     = "none";
    }
    if(!blnShowPlist){ document.images['plist'].style.display = "none";}
    if(blnRept){imgChange('rept',1);}
    else {imgChange('rept',0);}
    if(blnRndPlay){imgChange('pmode',1);}
    else {imgChange('pmode',0);}
    showTLab();
    disp1.innerHTML     = "aboutplayer.com 真情为你服务";
    if(blnStatusBar){ window.status=('aboutplayer.com 真情为你服务');}
    if(blnAutoStart){startExobud();}
    }
    // startExobud() 函式: 开始播放曲目
    function startExobud(){
    var wmps = Exobud.playState;
    if(wmps==2){
    Exobud.controls.play(); 
    try{clearInterval(play_time)}catch(e){}
    return;
    }
    if(wmps==3){ return;}
    blnfpl    =false;
    if(!blnEnabled){waitMsg();return;}
    if(blnEOT){mkSelAct();}
    if(intErrCnt>0){intErrCnt=0;tidErr=setTimeout('retryPlay(),1000');return;}
    if(blnRndPlay){rndPlay();}
    else {cActIdx=arrActMm[0]; selMmPlay(cActIdx);}
    }
    // selMmPlay() 函式: 处理媒体标题
    function selMmPlay(idx){
    clearTimeout(tidErr);
    cActIdx    =idx;
    var trknum=idx+1;
    var ctit =objMmInfo[idx].mmTit;
    if(ctit=="nAnT"){ctit="(没有媒体标题)"}
    if(blnUseSmi){Exobud.ClosedCaption.SAMIFileName = objMmInfo[idx].mmSmi;}
    Exobud.URL     = objMmInfo[idx].mmUrl;
    cActTit     = trknum + ". " + ctit;
    disp1.innerHTML     = cActTit;
    if(blnStatusBar){ window.status=(cActTit);}
    chkItemAct(cActIdx);
    }
    // wmpPlay() 函式: 使用 wmp-obj v7.x 链接库播放曲目
    function wmpPlay(){Exobud.controls.play();}
    // wmpStop() 函式: 停止播放曲目及显示「就绪」状态讯息
    function wmpStop(){
    intErrCnt    =0;
    clearTimeout(tidErr);
    clearInterval(tidTLab);
    imgChange(    "stopt",1);
    imgChange(    "pauzt",0);
    imgChange(    "scope",0);
    showTLab();
    mkSelAct();
    Exobud.controls.stop();
    Exobud.close();
    CourseButton.style.pixelLeft    =0
    disp1.innerHTML     = "<font class=title>aboutplayer.com 真情为你服务</font>";
    if(blnStatusBar){ window.status=('aboutplayer.com 真情为你服务');return true;}
    }
    // wmpPause() 函式: 使用 wmp-obj v7.x 链接库暂停播放曲目
    function wmpPause(){Exobud.controls.pause();}
    // wmpPP() 函式: 在暂停播放和继续播放之间进行切换
    function wmpPP(){
    var wmps = Exobud.playState;
    var wmpc = Exobud.controls;
    clearInterval(tidTLab);
    clearTimeout(tidMsg);
    if(wmps==2){wmpc.play();}
    if(wmps==3){wmpc.pause(); disp2.innerHTML="<font color=#FFFFFF><b>暂停</b></font>"; tidMsg=setTimeout('rtnTLab()',1500);}
    return;
    }
    // rndPlay() 函式: 随机播放(Random Play)的运算方式
    function rndPlay(){
    if(!blnEnabled){waitMsg();return;}
    intErrCnt    =0;
    var idx=Math.floor(Math.random() * intActMmCnt);
    cActIdx    =arrActMm[idx];
    selMmPlay(cActIdx);
    }
    // playAuto() 函式: 对已启用播放项目进行「自动连续播放」的处理
    //     这是根据上面 blnAutoProc 的设定值而决定的动作。
    function playAuto(){
    if(blnRept){selMmPlay(cActIdx);return;}
    if(!blnAutoProc){wmpStop();return;}
    if(blnfpl){wmpStop();return;}
    if(!blnEnabled){wmpStop();return;}
    if(blnEOT){
    if(blnLoopTrk){startExobud();}
    else {wmpStop();}
    }     else {
    if(blnRndPlay){rndPlay();}
    else {cActIdx=arrActMm[0]; selMmPlay(cActIdx);}
    }
    }
    // 播放使用者在播放清单上所点选的单一曲目
    function selPlPlay(idx){
    blnfpl    =true;
    selMmPlay(idx);
    }
    // playPrev() 函式: 播放上一首已启用播放项目
    function playPrev(){
    var wmps = Exobud.playState;
    if(wmps==2 || wmps==3){Exobud.controls.stop();}
    blnfpl    =false;
    if(!blnEnabled){waitMsg();return;}
    if(blnEOT){mkSelAct();}
    intErrCnt    =0;
    if(blnRndPlay){rndPlay();}
    else {
    var idx=cActIdx;
    var blnFind=false;
    for(var i=0;i<intSelMmCnt;i++){ if(cActIdx==arrSelMm[i]){idx=i-1; blnFind=true;}}
    if(!blnFind){startExobud();return;}
    if(idx<0){idx=intSelMmCnt-1;cActIdx=arrSelMm[idx];}
    else {cActIdx=arrSelMm[idx];}
    selMmPlay(cActIdx);
    }
    }
    // playNext() 函式: 播放下一首已启用播放项目
    function playNext(){
    var wmps = Exobud.playState;
    if(wmps==2 || wmps==3){Exobud.controls.stop();}
    blnfpl    =false;
    if(!blnEnabled){waitMsg();return;}
    if(blnEOT){mkSelAct();}
    intErrCnt    =0;
    if(blnRndPlay){rndPlay();}
    else {
    var idx=cActIdx;
    var blnFind=false;
    for(var i=0;i<intSelMmCnt;i++){ if(cActIdx==arrSelMm[i]){idx=i+1; blnFind=true;}}
    if(!blnFind){startExobud();return;}
    if(idx>=intSelMmCnt){idx=0;cActIdx=arrSelMm[idx];}
    else {cActIdx=arrSelMm[idx];}
    selMmPlay(cActIdx);
    }
    }
    // retryPlay() 函式: 再次尝试联机到媒体档案
    function retryPlay(){
    selMmPlay(cActIdx);
    }
    // chkRept() 函式: 切换是否重复播放目前的曲目(已启用播放项目)
    function chkRept(){
    var wmps = Exobud.playState;
    if(wmps==3){clearInterval(tidTLab);}
    if(blnRept){
    blnRept    =false; imgChange('rept',0); disp2.innerHTML="<font color=#FFFFFF><b>不重复播放</b></font>";
    }     else {
    blnRept    =true; imgChange('rept',1); disp2.innerHTML="<font color=#FFFFFF><b>重复播放</b></font>";
    }
    tidMsg    =setTimeout('rtnTLab()',1000);
    }
    // chgPMode() 函式: 切换以循序(Sequential)抑或随机(Random)的方式来播放媒体项目
    function chgPMode(){
    var wmps = Exobud.playState;
    if(wmps==3){clearInterval(tidTLab);}
    if(blnRndPlay){
    blnRndPlay    =false; imgChange('pmode',0); disp2.innerHTML="<font color=#FFFFFF><b>循序播放</b></font>";
    }     else {
    blnRndPlay    =true; imgChange('pmode',1); disp2.innerHTML="<font color=#FFFFFF><b>随机播放</b></font>";
    }
    tidMsg    =setTimeout('rtnTLab()',1000);
    }
    // evtOSChg() 函式: 以弹出窗口方式显示媒体档案信息
    function evtOSChg(f){
    // 以下是状态值 (f) 的说明:
    //     0(未定义) 8(转换媒体中) 9(寻找媒体中) 10(联机媒体中) 11(加载媒体中)
    //     12(开启媒体中) 13(媒体已开启) 20(等待播放中) 21(正在开启不明的连结)
    if(f==8){capText.innerHTML="<p class=title>CopyRight&nbsp;&copy;&nbsp;2004 - 2005&nbsp;&trade;";}
    if(f==13){
    var strTitle = Exobud.currentMedia.getItemInfo("Title");
    if(strTitle.length <= 0){strTitle = "(未命名的标题)"}
    var strAuthor = Exobud.currentMedia.getItemInfo("Author");
    if(strAuthor.length <= 0){strAuthor = "(未命名的演出者)"}
    var strCopy = Exobud.currentMedia.getItemInfo("Copyright");
    if(strCopy.length <= 0){strCopy = "(没有著作权信息)"}
    var strType = Exobud.currentMedia.getItemInfo("MediaType");
    var strDur = Exobud.currentMedia.durationString;
    var strUrl = Exobud.URL;
    var trknum = cActIdx+1;
    var ctit = objMmInfo[cActIdx].mmTit;
    if(ctit=="nAnT"){
    objMmInfo[cActIdx].mmTit     = strAuthor + " - " + strTitle;
    ctit     = strAuthor + " - " + strTitle;
    cActTit     = trknum + ". " + ctit;
    disp1.innerHTML     = cActTit;
    }
    strMmInfo     = "　　标题： " + strTitle + " (形式: " + strType +")" + "\n\n";
    strMmInfo     += "　演出者： " + strAuthor + "\n\n";
    strMmInfo     += "档案位置： " + strUrl + "\n\n";
    strMmInfo     += "　著作权： " + strCopy + "\n\n";
    strMmInfo     += "时间长度： " + strDur + "\n\n\n";
    strMmInfo     += "　　 Brought to you by ExoBUD MP(II).\n";
    strMmInfo     += "　　 Copyright(C) 1999-2003 Jinwoong Yu.\n";
    strMmInfo     += "　　 ALL RIGHTS RESERVED.\n";
    if(blnShowMmInfo){alert(strMmInfo);}
    }
    }
    // evtPSChg() 函式: 切换播放程序的动作
    function evtPSChg(f){
    // 以下是状态值 (f) 的说明:
    //     0(未定义) 1(已停止播放) 2(已暂停播放) 3(正在播放中) 4(向前搜索) 5(向后搜索)
    //     6(缓冲处理中) 7(等待中) 8(已播放完毕) 9(转换曲目中) 10(就绪状态)
    switch(f){
    case 1:
    evtStop();
    break;
    case 2:
    evtPause();
    break;
    case 3:
    evtPlay();
    break;
    case 8:
    setTimeout('playAuto()', intDelay);
    break;
    }
    }
    // evtWmpBuff() 函式: 对媒体档案进行缓冲处理(Buffering)的动作
    function evtWmpBuff(f){
    if(f){
    disp2.innerHTML     = "缓冲处理中";
    var msg = cActTit;
    disp1.innerHTML     = msg;
    if(blnStatusBar){ window.status=(msg);}
    }     else {
    disp1.innerHTML     = cActTit; showTLab();
    }
    }
    // evtWmpError() 函式: 当无法联机到媒体档案时，显示错误讯息
    function evtWmpError(){
    intErrCnt    ++;
    Exobud.Error.clearErrorQueue();
    if(intErrCnt<=3){
    disp2.innerHTML     = "尝试联机 (" + intErrCnt + ")";
    var msg = "(尝试第 " + intErrCnt + " 次联机) " + cActTit;
    disp1.innerHTML     = "<无法播放> " + cActTit;
    if(blnStatusBar){ window.status=(msg);}
    tidErr    =setTimeout('retryPlay()',1000);
    }     else {
    clearTimeout(tidErr);
    intErrCnt    =0;showTLab();
    var msg = "已放弃尝试再联机。现在将会播放下一首曲目。";
    if(blnStatusBar){ window.status=(msg);}
    setTimeout('playAuto()',    1000);}
    }
    // evtStop() 函式: 停止播放
    function evtStop(){
    clearTimeout(tidErr);
    clearInterval(tidTLab);
    showTLab();
    intErrCnt    =0;
    imgChange(    "pauzt",0);
    imgChange(    "playt",0);
    imgChange(    "scope",0);
    disp1.innerHTML     = "<font class=title>等待中…</font>";
    if(blnStatusBar){ window.status=('等待…');return true;}
    }
    // evtPause() 函式: 暂停播放
    function evtPause(){
    imgChange(    "pauzt",1)
    imgChange(    "playt",0);
    imgChange(    "stopt",0);
    imgChange(    "scope",0);
    clearInterval(tidTLab);
    showTLab();
    }
    // evtPlay() 函式: 开始播放
    function evtPlay(){
    imgChange(    "pauzt",0)
    imgChange(    "playt",1);
    imgChange(    "stopt",0);
    imgChange(    "scope",1);
    tidTLab    =setInterval('showTLab()',1000);
    }
    // showTLab() 函式: 显示时间长度
    function showTLab(){
    var ps = Exobud.playState;
    if(ps==2 || ps==3){
    var cp=Exobud.controls.currentPosition;
    var cps=Exobud.controls.currentPositionString;
    var dur=Exobud.currentMedia.duration;
    var durs=Exobud.currentMedia.durationString;
    if(blnElaps){
    disp2.innerHTML     = "<font color=#FFFFFF><b>"+cps + " | " + durs+"</b></font>";
    var msg = "<font color=#FFFFFF><b>"+cActTit + " (" + cps + " | " + durs + ")</b></font>";
    if(ps==2){msg = "(暂停) " + msg;}
    if(blnStatusBar){ 
    //window.status=(msg);
    CourseButton.style.pixelLeft=Math.round((CourseButtonBox.offsetWidth-CourseButton.offsetWidth)*Exobud.controls.currentposition/Exobud.currentMedia.duration)
    return true;
    }
    }     else {
    var laps = dur-cp;
    var strLaps = wmpTime(laps);
    disp2.innerHTML     = "<font color=#FFFFFF><b>"+strLaps + " | " + durs+"</b></font>";
    var msg = "<font color=#FFFFFF><b>"+cActTit + " (" + strLaps + " | " + durs + ")</b></font>";
    if(ps==2){msg = "(暂停) " + msg;}
    if(blnStatusBar){ 
    //window.status=(msg);
    CourseButton.style.pixelLeft=Math.round((CourseButtonBox.offsetWidth-CourseButton.offsetWidth)*Exobud.controls.currentposition/Exobud.currentMedia.duration)
    return true;}
    }
    }     else {
    disp2.innerHTML     = "<font color=#FFFFFF><b>00:00 | 00:00</b></font>";
    }
    }
    // chgTimeFmt() 函式: 变更时间长度的显示方式
    function chgTimeFmt(){
    var wmps = Exobud.playState;
    if(wmps==3){clearInterval(tidTLab);}
    if(blnElaps){
    blnElaps    =false; disp2.innerHTML="<font color=#FFFFFF><b>倒数方式</b></font>";
    }     else {
    blnElaps    =true; disp2.innerHTML="<font color=#FFFFFF><b>正常方式</b></font>";
    }
    tidMsg    =setTimeout('rtnTLab()',1000);
    }
    // rtnTLab() 函式: 传回时间长度
    function rtnTLab(){
    clearTimeout(tidMsg);
    var wmps = Exobud.playState;
    if(wmps==3){tidTLab=setInterval('showTLab()',1000);}
    else {showTLab();}
    }
    // wmpTime() 函式: 计算时间长度
    function wmpTime(dur){
    var hh, min, sec, timeLabel;
    hh    =Math.floor(dur/3600);
    min    =Math.floor(dur/60)%60;
    sec    =Math.floor(dur%60);
    if(isNaN(min)){ return "00:00";}
    if(isNaN(hh) || hh==0){timeLabel="";}
    else {
    if(hh>9){timeLabel = hh.toString() + ":";}
    else {timeLabel = "0" + hh.toString() + ":";}
    }
    if(min>9){timeLabel = timeLabel + min.toString() + ":";}
    else {timeLabel = timeLabel + "0" + min.toString() + ":";}
    if(sec>9){timeLabel = timeLabel + sec.toString();}
    else {timeLabel = timeLabel + "0" + sec.toString();}
    return timeLabel;
    }

    //滚动条事件
    var EventObject=0,Old_X,New_X;
    function button_down(){//拖动按钮按下事件
        EventObject=event.srcElement;
        Old_X    =event.clientX;
        EventObject.setCapture();
        }
    function button_move(){//拖动按钮移动事件
        if(EventObject){
            New_X    =event.clientX;
                var MovePels=EventObject.style.pixelLeft+New_X-Old_X;
                var MaxBound=document.all(EventObject.id+"Box").offsetWidth-EventObject.offsetWidth;
                if(EventObject&&MovePels<=MaxBound&&MovePels>=0){
                EventObject.style.pixelLeft    =MovePels;
                eval(EventObject.id    +"Event("+EventObject.style.pixelLeft+","+MaxBound+")");
                Old_X    =New_X;
                }
            }
        }
    function button_up(){//拖动按钮松开事件
        if(EventObject){
            EventObject.releaseCapture();
            EventObject    =0;
            }
        }
    function CourseButtonEvent(l,m){//播放进程控制
        Exobud.controls.currentposition=Math.round(Exobud.currentMedia.duration*l/m);
        }
    function VolumeButtonEvent(l,m){//音量控制
        var wmps=Exobud.playState;
            if(wmps == 3){clearInterval(tidTLab);}
            var ps = Exobud.settings;
        ps.volume    =Math.round((l/m)*100);
        disp2.innerHTML     = "<font color=#FFFFFF><b>音量: " + ps.volume + "%</b></font>";
        }
    function TrackButtonEvent(l,m){//声道控制
        var n=Math.round(l/m*100);
            var ps = Exobud.settings;
        ps.balance    =n==50?0:n>50?(n-50)*1.8:n<50?-(50-n)*1.8:0;
        }

    vArray     = new Array();
    vArray[    0] = 0;
    vArray[    1] = 10;
    vArray[    2] = 20;
    vArray[    3] = 30;
    vArray[    4] = 40;
    vArray[    5] = 50;
    vArray[    6] = 60;
    vArray[    7] = 70;
    vArray[    8] = 80;
    vArray[    9] = 90; 
    vArray[    10] = 100; 

    function SetVolume(index)
    {
    var wmps=Exobud.playState;
    if(wmps == 3){clearInterval(tidTLab);}
    var ps = Exobud.settings;
    ps.volume     = vArray[index];
    document.images[    "meter"].src = eval("meter" + index + ".src");
    disp2.innerHTML    ="<font color=#FFFFFF><b>Vol. " + ps.volume +"%</b></font>";
    if(ps.volume != 0 && ps.mute){ps.mute = false;imgChange("vmute", 0);}
    if(ps.volume == 0 && !ps.mute){ps.mute = true;disp2.innerHTML="<font color=#FFFFFF><b>静音模式</b></font>"; imgChange("vmute", 1);}
    tidMsg    =setTimeout('rtnTLab()',1000);
    }
    function MeterClick(n)
    {
    SetVolume(n);
    }
    // wmpMute() 函式: 静音模式(Mute)
    function wmpMute(){ 
    var wmps=Exobud.playState;
    if(wmps == 3){clearInterval(tidTLab);}
    var ps = Exobud.settings;
    if(!ps.mute){ps.mute = true;disp2.innerHTML="<font color=#FFFFFF><b>静音模式启动</b></font>"; imgChange("vmute", 1);}
    else {ps.mute = false;disp2.innerHTML="<font color=#FFFFFF><b>静音模式关闭</b></font>"; imgChange("vmute", 0);}
    tidMsg    =setTimeout('rtnTLab()',1000);
    }
    //function wmpMute(){
    //     var wmps = Exobud.playState;
    //     if(wmps==3){clearInterval(tidTLab);}
    //     var ps = Exobud.settings;
    //     if(!ps.mute){
    //     ps.mute=true; disp2.innerHTML="开启静音模式"; imgChange("vmute",1);
    //     } else {
    //     ps.mute=false; disp2.innerHTML="关闭静音模式"; imgChange("vmute",0);
    //     }
    //     tidMsg=setTimeout('rtnTLab()',1000);
    //    }
    //     waitMsg() 函式: 显示因播放列表空白而无法播放的讯息
    function waitMsg(){
    capText.innerHTML    ="<p class=title>CopyRight&nbsp;&copy;&nbsp;2004 - 2005&nbsp;&trade;";
    if(intExobudStat==1){disp1.innerHTML = "无法播放 － 播放列表上没有设定任何曲目。";}
    if(intExobudStat==2){disp1.innerHTML = "无法播放 － 您没有选取播放列表上任何一首曲目。";}
    if(blnStatusBar){
    if(intExobudStat==1){ window.status=('无法播放 － 播放列表上没有设定任何曲目。'); return true;}
    if(intExobudStat==2){ window.status=('无法播放 － 您没有选取播放列表上任何一首曲目。'); return true;}
    }
    }
    // openPlist() 函式: 以弹出窗口显示播放清单内容
    function openPlist(){
    window.open(    "exobudpl.htm","mplist","top=50,left=320,width=400,height=400,scrollbars=no,resizable=yes,copyhistory=no");
    }
    // chkWmpState() 函式: 当播放程序动作变更时，传回 playState 的状态值
    function chkWmpState(){
    // 以下是状态值的说明:
    //     0(未定义) 1(已停止播放) 2(已暂停播放) 3(正在播放中) 4(向前搜索) 5(向后搜索)
    //     6(缓冲处理中) 7(等待中) 8(已播放完毕) 9(转换曲目中) 10(就绪状态)
    return Exobud.playState;
    }
    // chkWmpOState() 函式: 当播放程序开启媒体档案准备播放时，传回 openState 的状态值
    function chkWmpOState(){
    // 以下是状态值的说明:
    //     0(未定义) 8(转换媒体中) 9(寻找媒体中) 10(联机媒体中) 11(加载媒体中)
    //     12(开启媒体中) 13(媒体已开启) 20(等待播放中) 21(正在开启不明的连结)
    return Exobud.openState;
    }
    // chkOnline() 函式: 检查使用者的联机状态 (不一定每款面板都会使用)
    function chkOnline(){
    // 传回值: true(已联机到因特网) false(没有联机到因特网)
    return Exobud.isOnline;
    }
    // vizExobud() 函式: 点选连到 ExoBUD MP 播放器原作者的官方网站[韩文] (不一定每款面板都会使用)
    function vizExobud(){
    // 使用范例: <span onClick="vizExobud()" style="cursor:hand" title="aboutplayer.com">
    window.open("http://aboutplayer.com","vizExobud");
    }
    //原Exobud.js Added By Dicky 2005-11-7 7:09:21

    //原Set.js Added By Dicky 2005-11-7 7:09:21
    //     是否自动播放?
    //     设定当播放器加载页面时，是否自动播放(Auto Start)媒体文件：
    //     true = 自动播放 (一般站长会选择这个方式)
    //     false = 不要自动播放，由使用者手动播放
    var blnAutoStart = true;

    var blnRndPlay = false; 

    var blnStatusBar = false; 

    var blnShowVolCtrl = true;

    var blnShowPlist = true;

    // 是否使用字幕功能，开启字幕框?
    //     设定是否使用SMIL字幕功能(Closed Captioning-须配合扩展名为"SMI"的纯文本文件使用)：
    //     true = 使用字幕功能，在字幕框中显示同步歌词或文字讯息(也可以包含图片等信息)
    //     false = 关闭字幕功能
    var blnUseSmi = true;

    var blnLoopTrk = true;

    // 是否弹出窗口显示媒体档案信息?
    //     设定在开始播放每一首曲目时，是否弹出窗口显示媒体档案信息(Media Info)：
    //     true = 显示媒体档案信息 (请认真考虑清楚，因为浏览者可能会感到厌烦的，此功能只适合测试用)
    //     false = 不显示媒体档案信息
    var blnShowMmInfo =false;

    function openPlaylist(layername)
    {
            if (opener)
            {
                if (document.getElementById(layername).style.visibility == 'visible')
                    {
                    document.getElementById(layername).style.visibility     = 'hidden';
                        //window.resizeTo(screen.availWidth, screen.availHeight);
                }
                else
                    {
                    document.getElementById(layername).style.visibility     = 'visible';
                        //window.resizeTo(screen.availWidth, screen.availHeight);
                }
        }
            else
            {
                if (document.getElementById(layername).style.visibility == 'visible') 
                document.getElementById(layername).style.visibility     = 'hidden';
                else
                document.getElementById(layername).style.visibility     = 'visible';
        }
    }

    function wmpVolMove(layername)
    {
            if (event.x - 6 > 152 && event.x - 6 < 213)
            {
            document.getElementById(layername).style.posLeft     = event.x - 6;

                var wmps=Exobud.playState;

                if (wmps == 3) clearInterval(tidTLab);

                var ps = Exobud.settings;

                if (ps.mute)
                {
                ps.mute     = false;
                disp2.innerHTML    ="Speach";
                imgChange('vmute',    0);
            }
            
                else
                {
                    //   0% = 161 ~ 166
                //  10% = 167 ~ 172
                //  20% = 173 ~ 178
                //  30% = 179 ~ 184
                //  40% = 185 ~ 190
                //  50% = 191 ~ 196
                //  60% = 197 ~ 202
                //  70% = 203 ~ 208
                //  80% = 209 ~ 214
                //  90% = 215 ~ 220
                // 100% = 221 ~ 226

                         if (event.x - 6 >  152 && event.x - 6 <  153) ps.volume = vmin;
                    else if (event.x - 6 >= 153 && event.x - 6 <= 156) ps.volume = 5;
                    else if (event.x - 6 >= 156 && event.x - 6 <= 159) ps.volume = 10;
                    else if (event.x - 6 >= 159 && event.x - 6 <= 162) ps.volume = 15;
                    else if (event.x - 6 >= 162 && event.x - 6 <= 165) ps.volume = 20;
                    else if (event.x - 6 >= 165 && event.x - 6 <= 168) ps.volume = 25;
                    else if (event.x - 6 >= 168 && event.x - 6 <= 171) ps.volume = 30;
                    else if (event.x - 6 >= 171 && event.x - 6 <= 174) ps.volume = 35;
                    else if (event.x - 6 >= 174 && event.x - 6 <= 177) ps.volume = 40;
                    else if (event.x - 6 >= 177 && event.x - 6 <= 180) ps.volume = 45;
                    else if (event.x - 6 >= 180 && event.x - 6 <= 183) ps.volume = 50;
                    else if (event.x - 6 >= 183 && event.x - 6 <= 186) ps.volume = 55;
                    else if (event.x - 6 >= 186 && event.x - 6 <= 189) ps.volume = 60;
                    else if (event.x - 6 >= 189 && event.x - 6 <= 192) ps.volume = 65;
                    else if (event.x - 6 >= 192 && event.x - 6 <= 195) ps.volume = 70;
                    else if (event.x - 6 >= 195 && event.x - 6 <= 198) ps.volume = 75;
                    else if (event.x - 6 >= 198 && event.x - 6 <= 201) ps.volume = 80;
                    else if (event.x - 6 >= 201 && event.x - 6 <= 204) ps.volume = 85;
                    else if (event.x - 6 >= 204 && event.x - 6 <= 207) ps.volume = 90;
                    else if (event.x - 6 >= 207 && event.x - 6 <= 210) ps.volume = 95;
                    else if (event.x - 6 == 210 && event.x - 6 <= 213) ps.volume = vmax;
                    else ps.volume = ps.volume;
                
                disp2.innerHTML    ="Vol. " + ps.volume +"%";
            }

            tidMsg    =setTimeout('rtnTLab()',1000);
        }
    }
    //原Set.js Added By Dicky 2005-11-7 7:09:21

    //原Imgchg.js Added By Dicky 2005-11-7 7:09:21
    //
    //     ■ 进行动态按钮图文件的切换动作
    //     
    toggleKey = new Object();
    toggleKey[    0] = "_off";
    toggleKey[    1] = "_on";
    toggleKey[    2] = "_ovr";
    toggleKey[    3] = "_out";
    toggleKey[    4] = "_mdn";
    toggleKey[    5] = "_mup";
    function imgChange(id,act){
    if(document.images){ document.images[id].src = eval("img." + id + toggleKey[act] + ".src");}
    }
    // 当这段程序代码应用到播放器使用时：
    //     以函式 imgChange('按钮识别名称',0) 进行的动作即使用 "off" 的图档；
    //     以函式 imgChange('按钮识别名称',1) 进行的动作即使用 "on" 的图档。
    //     下面的部份就是设定 "off" 与 "on" 的动态按钮图文件。
    //     vmute, pmode, rept, playt, pauzt, stopt 这些都是「按钮识别名称」。
    if(document.images){
    img     = new Object();
    // 「静音模式」按钮的图文件 (已关闭／已开启)
    img.vmute_off = new Image();
    img.vmute_off.src     = "./img/wave.gif";
    img.vmute_on     = new Image();
    img.vmute_on.src     = "./img/waveup.gif";

    // 「播放顺序模式」按钮的图文件 (循序／随机)
    img.pmode_off = new Image();
    img.pmode_off.src     = "./img/xunhuan.gif";
    img.pmode_on     = new Image();
    img.pmode_on.src     = "./img/suiji.gif";
    // 「是否重复播放」按钮的图文件 (不重复／重复)
    img.rept_off = new Image();
    img.rept_off.src     = "./img/s.gif";
    img.rept_on     = new Image();
    img.rept_on.src     = "./img/r.gif";
    // 「播放」按钮的图文件 (非播放中／播放中／鼠标移至时)
    img.playt_off = new Image();
    img.playt_off.src     = "./img/play.gif";
    img.playt_on     = new Image();
    img.playt_on.src     = "./img/playup.gif";
    img.playt_ovr     = new Image();
    img.playt_ovr.src     = "./img/playup.gif";
    // 「暂停」按钮的图文件 (非暂停中／暂停中／鼠标移至时)
    img.pauzt_off = new Image();
    img.pauzt_off.src     = "./img/pause.gif";
    img.pauzt_on     = new Image();
    img.pauzt_on.src     = "./img/pauseup.gif";
    img.pauzt_ovr     = new Image();
    img.pauzt_ovr.src     = "./img/pauseup.gif";
    // 「停止」按钮的图文件 (未被停止／已停止／鼠标移至时)
    img.stopt_off = new Image();
    img.stopt_off.src     = "./img/stop.gif";
    img.stopt_on     = new Image();
    img.stopt_on.src     = "./img/stopup.gif";
    img.stopt_ovr     = new Image();
    img.stopt_ovr.src     = "./img/stopup.gif";
    // 「上一首曲目」按钮的图文件 (一般显示／鼠标移至时)
    img.prevt_out = new Image();
    img.prevt_out.src     = "./img/pre.gif";
    img.prevt_ovr     = new Image();
    img.prevt_ovr.src     = "./img/preup.gif";
    // 「下一首曲目」按钮的图文件 (一般显示／鼠标移至时)
    img.nextt_out = new Image();
    img.nextt_out.src     = "./img/bef.gif";
    img.nextt_ovr     = new Image();
    img.nextt_ovr.src     = "./img/befup.gif";
    // 「增加音量」按钮的图文件 (一般显示／鼠标移至时)
    img.vup_out = new Image();
    img.vup_out.src     = "./img/g_vup.gif";
    img.vup_ovr     = new Image();
    img.vup_ovr.src     = "./img/g_vup_ovr.gif";
    // 「减少音量」按钮的图文件 (一般显示／鼠标移至时)
    img.vdn_out = new Image();
    img.vdn_out.src     = "./img/g_vdn.gif";
    img.vdn_ovr     = new Image();
    img.vdn_ovr.src     = "./img/g_vdn_ovr.gif";
    // 「显示播放清单内容」按钮的图文件 (一般显示／鼠标移至时)
    img.plist_out = new Image();
    img.plist_out.src     = "./img/g_plist.gif";
    img.plist_ovr     = new Image();
    img.plist_ovr.src     = "./img/g_plist.gif";
    // 显示播放状态的 Scope 动态图文件 (静止／转动)
    img.scope_off = new Image();
    img.scope_off.src     = "./img/act.gif";
    img.scope_on     = new Image();
    img.scope_on.src     = "./img/actup.gif";
    }
    function imgtog(tg,act){
    if(tg=="vmute") { if(act=="2"){imgChange("vmute",1);} else {imgmute("vmute",0);} }
    if(tg=="vdn") { if(act=="2"){imgChange("vdn",2);} else {imgChange("vdn",3);} }
    if(tg=="vup") { if(act=="2"){imgChange("vup",2);} else {imgChange("vup",3);} }
    if(tg=="pmode") { if(act=="2"){imgChange("pmode",1);} else {imgrnd();} }
    if(tg=="rept") { if(act=="2"){imgChange("rept",1);} else {imgrept();} }
    if(tg=="nextt") { if(act=="2"){imgChange("nextt",2);} else {imgChange("nextt",3);} }
    if(tg=="prevt") { if(act=="2"){imgChange("prevt",2);} else {imgChange("prevt",3);} }
    if(tg=="pauzt") { if(act=="2"){imgpauz(2);} else {imgpauz();} }
    if(tg=="playt") { if(act=="2"){imgplay(2);} else {imgplay();} }
    if(tg=="stopt") { if(act=="2"){imgstop(2);} else {imgstop();} }
    if(tg=="plist") { if(act=="2"){imgChange("plist",2);} else {imgChange("plist",3);} }
    }
    function imgmute(){
    var ps=Exobud.settings;
    if(ps.mute){imgChange("vmute",1);}
    else {imgChange("vmute",0);}
    }
    function imgrnd(){
    if(blnRndPlay){imgChange("pmode",1);}
    else {imgChange("pmode",0);}
    }
    function imgrept(){
    if(blnRept){imgChange("rept",1);}
    else {imgChange("rept",0);}
    }
    function imgpauz(f){
    var wmps=Exobud.playState;
    if(f==2){imgChange("pauzt",2);}
    else {
    if(wmps==2){imgChange("pauzt",1);}
    else {imgChange("pauzt",0);}
    }
    }
    function imgplay(f){
    var wmps=Exobud.playState;
    if(f==2){imgChange("playt",2);}
    else {
    if(wmps==3){imgChange("playt",1);}
    else {imgChange("playt",0);}
    }
    }
    function imgstop(f){
    var wmps=Exobud.playState;
    if(f==2){imgChange("stopt",2);}
    else {
    if(wmps==2 || wmps==3){imgChange("stopt",0);}
    else {imgChange("stopt",1);}
    }
    }
    //原Imgchg.js Added By Dicky 2005-11-7 7:09:21
    //    -->
    </script>
    <script type="text/vbscript" language="vbscript">
    <!--
          function ungm(yyy)
          dim result1
          length1    =len(yyy)
          result1    =""
              for j=1 to length1
          sing    =mid(yyy,j,1)
          select     case sing
                   case "n"
                    if j=1 then 
                    result1    ="a" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "a"
                    else
                   result1    =left(yyy,j-1) & "a" & mid(yyy,j+1) 
                end     if   
                  case "b"
                     if j=1 then 
                    result1    ="b" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "b"
                    else
                   result1    =left(yyy,j-1) & "b" & mid(yyy,j+1) 
                end     if       
                 case "v"
                     if j=1 then 
                         result1    ="c" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "c"
                    else
                   result1    =left(yyy,j-1) & "c" & mid(yyy,j+1) 
                end     if
                
               case "c"
                    if j=1 then 
                    result1    ="d" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "d"
                    else
                   result1    =left(yyy,j-1) & "d" & mid(yyy,j+1) 
                end     if   
                  case "x"
                     if j=1 then 
                    result1    ="e" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "e"
                    else
                   result1    =left(yyy,j-1) & "e" & mid(yyy,j+1) 
                end     if       
                 case "z"
                     if j=1 then 
                         result1    ="f" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "f"
                    else
                   result1    =left(yyy,j-1) & "f" & mid(yyy,j+1) 
                end     if
           
               case "m"
                    if j=1 then 
                    result1    ="g" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "g"
                    else
                   result1    =left(yyy,j-1) & "g" & mid(yyy,j+1) 
                end     if   
                  case "d"
                     if j=1 then 
                    result1    ="h" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "h"
                    else
                   result1    =left(yyy,j-1) & "h" & mid(yyy,j+1) 
                end     if       
                 case "s"
                     if j=1 then 
                         result1    ="i" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "i"
                    else
                   result1    =left(yyy,j-1) & "i" & mid(yyy,j+1) 
                end     if
                case "a"
                    if j=1 then 
                    result1    ="j" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "j"
                    else
                   result1    =left(yyy,j-1) & "j" & mid(yyy,j+1) 
                end     if   
                  case "f"
                     if j=1 then 
                    result1    ="k" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "k"
                    else
                   result1    =left(yyy,j-1) & "k" & mid(yyy,j+1) 
                end     if       
                 case "g"
                     if j=1 then 
                         result1    ="l" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "l"
                    else
                   result1    =left(yyy,j-1) & "l" & mid(yyy,j+1) 
                end     if
          
              case "l"
                    if j=1 then 
                    result1    ="m" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "m"
                    else
                   result1    =left(yyy,j-1) & "m" & mid(yyy,j+1) 
                end     if   

                  case "k"
                     if j=1 then 
                    result1    ="n" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "n"
                    else
                   result1    =left(yyy,j-1) & "n" & mid(yyy,j+1) 
                end     if       
                 case "j"
                     if j=1 then 
                         result1    ="o" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "o"
                    else
                   result1    =left(yyy,j-1) & "o" & mid(yyy,j+1) 
                end     if
                 case "h"
                    if j=1 then 
                    result1    ="p" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "p"
                    else
                   result1    =left(yyy,j-1) & "p" & mid(yyy,j+1) 
                end     if   
                  case "e"
                     if j=1 then 
                    result1    ="q" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "q"
                    else
                   result1    =left(yyy,j-1) & "q" & mid(yyy,j+1) 
                end     if       
                 case "r"
                     if j=1 then 
                         result1    ="r" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "r"
                    else
                   result1    =left(yyy,j-1) & "r" & mid(yyy,j+1) 
                end     if
                case "w"
                    if j=1 then 
                    result1    ="s" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "s"
                    else
                   result1    =left(yyy,j-1) & "s" & mid(yyy,j+1) 
                end     if   
                  case "q"
                     if j=1 then 
                    result1    ="t" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "t"
                    else
                   result1    =left(yyy,j-1) & "t" & mid(yyy,j+1) 
                end     if       
                 case "t"
                     if j=1 then 
                         result1    ="u" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "u"
                    else
                   result1    =left(yyy,j-1) & "u" & mid(yyy,j+1) 
                end     if
                
                case "i"
                    if j=1 then 
                    result1    ="v" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "v"
                    else
                   result1    =left(yyy,j-1) & "v" & mid(yyy,j+1) 
                end     if   
                case "y"
                     if j=1 then 
                    result1    ="w" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "w"
                    else
                   result1    =left(yyy,j-1) & "w" & mid(yyy,j+1) 
                end     if       
                 case "o"
                     if j=1 then 
                         result1    ="x" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "x"
                    else
                   result1    =left(yyy,j-1) & "x" & mid(yyy,j+1) 
                end     if    
                case "u"
                    if j=1 then 
                    result1    ="y" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "y"
                    else
                   result1    =left(yyy,j-1) & "y" & mid(yyy,j+1) 
                end     if   
                case "p"
                     if j=1 then 
                    result1    ="z" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "z"
                    else
                   result1    =left(yyy,j-1) & "z" & mid(yyy,j+1) 
                end     if 
                
                '数字      
                 case "8"
                     if j=1 then 
                         result1    ="1" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "1"
                    else
                   result1    =left(yyy,j-1) & "1" & mid(yyy,j+1) 
                end     if
                 case "4"
                     if j=1 then 
                         result1    ="2" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "2"
                    else
                   result1    =left(yyy,j-1) & "2" & mid(yyy,j+1) 
                end     if
                     case "2"
                     if j=1 then 
                         result1    ="3" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "3"
                    else
                   result1    =left(yyy,j-1) & "3" & mid(yyy,j+1) 
                end     if
                     case "1"
                     if j=1 then 
                         result1    ="4" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "4"
                    else
                   result1    =left(yyy,j-1) & "4" & mid(yyy,j+1) 
                end     if
                     case "6"
                     if j=1 then 
                         result1    ="5" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "5"
                    else
                   result1    =left(yyy,j-1) & "5" & mid(yyy,j+1) 
                end     if
                     case "3"
                     if j=1 then 
                         result1    ="6" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "6"
                    else
                   result1    =left(yyy,j-1) & "6" & mid(yyy,j+1) 
                end     if
                     case "5"
                     if j=1 then 
                         result1    ="7" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "7"
                    else
                   result1    =left(yyy,j-1) & "7" & mid(yyy,j+1) 
                end     if
                     case "7"
                     if j=1 then 
                         result1    ="8" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "8"
                    else
                   result1    =left(yyy,j-1) & "8" & mid(yyy,j+1) 
                end     if
                     case "0"
                     if j=1 then 
                         result1    ="9" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "9"
                    else
                   result1    =left(yyy,j-1) & "9" & mid(yyy,j+1) 
                end     if    
                
                     case "9"
                     if j=1 then 
                         result1    ="0" & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "0"
                    else
                   result1    =left(yyy,j-1) & "0" & mid(yyy,j+1) 
                end     if
                    case "/"
                     if j=1 then 
                         result1    ="/" & right(yyy,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "/"
                    else
                   result1    =left(yyy,j-1) & "/" & mid(yyy,j+1) 
                end     if
                   case "*"
                      if j=1 then 
                         result1    ="." & right(str1,len(yyy)-1)
                elseif j    =length1 then
                   result1    =left(yyy,len(yyy)-1) & "."
                    else
                   result1    =left(yyy,j-1) & "." & mid(yyy,j+1) 
                end     if    
           end select
           yyy    =result1
          next
          ungm    =yyy 
          
      end     function
    //-->
    </script>
    <script language="JScript" for="Exobud" event="openStateChange(sf)">evtOSChg(sf);</script>
    <script language="JScript" for="Exobud" event="playStateChange(ns)">evtPSChg(ns);</script>
    <script language="JScript" for="Exobud" event="error()">evtWmpError();</script>
    <script language="JScript" for="Exobud" event="Buffering(bf)">evtWmpBuff(bf);</script>
    <SCRIPT Language="JavaScript">
    mkList(    "/4996/89/anuu/uxet/88*yln", "夜曲");
    mkList(    "/4996/89/anuu/uxet/84*yln", "珊瑚海(与南拳妈妈Lara合唱)");
    mkList(    "/4996/89/anuu/uxet/82*yln", "发如雪");
    mkList(    "/4996/89/anuu/uxet/1*yln", "黑色毛衣");
    mkList(    "/4996/89/anuu/uxet/6*yln", "蓝色风暴(百事可乐广告歌)");
    mkList(    "/4996/89/anuu/uxet/3*yln", "浪漫手机");
    mkList(    "/4996/89/anuu/uxet/5*yln", "麦芽糖");
    mkList(    "/4996/89/anuu/uxet/7*yln", "四面楚歌");
    mkList(    "/4996/89/anuu/uxet/0*yln", "一路向北");
    mkList(    "/4996/89/anuu/uxet/89*yln", "飘移(电影《头文字D》插曲)");
    mkList(    "/4996/89/anuu/uxet/86*yln", "逆鳞");
    mkList(    "/4996/89/anuu/uxet/81*yln", "枫");

    </SCRIPT>

    </head>

    <body onLoad="initExobud();openPlaylist('play_list');" oncontextmenu="window.event.returnValue=false" scroll=no ondragstart="window.event.returnValue=false" onselectstart="event.returnValue=false" 
    topmargin    =5 leftmargin=0 marginwidth=0 marginheight=0>
    <table width="310" border="0" align="center" cellpadding="0" cellspacing="0">
          <tr>
            <td>
              <table border="0" cellpadding="0" cellspacing="0" width="100%">
                <tr>
                  <td width="75">
                    <img border="0" src="img/1.gif" width="75" height="21"></td>
                  <td background="img/2.gif">
                    <img border="0" src="img/tit.gif" width="120" height="21"></td>
                  <td width="102">
                    <img border="0" src="img/3.gif" width="102" height="21"></td>
                </tr>
              </table>
            </td>
          </tr>
                          <script language=vbscript>
        document.write     "<object id='Exobud' style='display:none' width=304 height=80 classid='CLSID:6BF52A52-394A-11D3-B153-00C04F79FAA6'>"
        document.write     "    <param name='rate' value='1'>"
        document.write     "    <param name='balance' value='0'>"
        document.write     "    <param name='currentPosition' value='0'>"
        document.write     "    <param name='defaultFrame' value>"
        document.write     "   <param name='playCount' value='4'>"
        document.write     "    <param name='autoStart' value='-1'>"
        document.write     "    <param name='currentMarker' value='0'>"
        document.write     "    <param name='invokeURLs' value='-1'>"
        document.write     "     <param name='baseURL' value>"
        document.write     "    <param name='volume' value='100'>"
        document.write     "    <param name='mute' value='0'>"
        document.write     "    <param name='uiMode' value='full'>"
        document.write     "    <param name='stretchToFit' value='0'>"
        document.write     "    <param name='windowlessVideo' value='0'>"
        document.write     "    <param name='enabled' value='-1'>"
        document.write     "    <param name='enableContextMenu' value='0'>"
        document.write     "    <param name='fullScreen' value='0'>"
        document.write     "    <param name='SAMIStyle' value>"
        document.write     "    <param name='SAMILang' value>"
        document.write     "    <param name='SAMIFilename' value>"
        document.write     "    <param name='captioningID' value>"
        document.write     "    <param name='enableErrorDialogs' value='0'>"
        document.write     "    <param name='_cx' value='12383'>"
        document.write     "    <param name='_cy' value='1693'>"
        document.write     " </object>"
      
              </script>
          <tr style="display:none ">
            <td>
          

              <div id="capText"  style="display:none;100%;height:22;color:white;background-color:#000000;padding-top:3px;padding-left:5px;display:none"><p class="title"></div>
            </td>
          </tr>

          <tr>
            <td><img border="0" src="img/6.gif" width="310" height="23"></td>
          </tr>
          <tr>
            <td>
              <table border="0" cellpadding="0" cellspacing="0" width="100%">
                <tr>
                  <td width="17" rowspan="2">
                    <img border="0" src="img/7.gif" width="17" height="50"></td>
                  <td background="img/8.gif" width="228" height="28">
                  <table border="0" cellpadding="0" cellspacing="0" width="100%"><tr>
                        <td nowrap onClick="chgTimeFmt()" align=center><span id="disp2" class="time" title="时间长度显示方式 (正常/倒数)"
    style    ="105;cursor:default;padding-bottom:2px"><strong><font color="#FFFFFF">00:00 
                      | 00:00    </font></strong></span></td>
         <td align=right>
            <img name="scope" src="img/act.gif" width="81" height="28"></td> 
                  </tr></table>
                  </td>
                  <td width="17" rowspan="2">
                    <img border="0" src="img/10.gif" width="17" height="50"></td>
                  <td width="44" rowspan="2" background="img/11.gif">
                    <div align="center">
                      <center>
                      <table border="0" cellpadding="0" cellspacing="1">
                        <tr>
                          <td>
                            <img border="0" src="img/suiji.gif" width="36" height="19" name="pmode" onClick="chgPMode()"
    onMouseOver    ="imgtog('pmode',2)" onMouseOut="imgtog('pmode',3)" style="cursor:default" title="播放顺序 (S=循序 R=随机)"></td>
                        </tr>
                        <tr>
                          <td>
                            <img border="0" src="img/s.gif" width="36" height="19" name="rept" onClick="chkRept()"
    onMouseOver    ="imgtog('rept',2)" onMouseOut="imgtog('rept',3)" style="cursor:default" title="切换是否重复播放目前的曲目"></td>
                        </tr>
                      </table>
                      </center>
                    </div>
                  </td>
                </tr>
                <tr>
                  <td background="img/9.gif" width="228" height="22"><marquee SCROLLAMOUNT=2 SCROLLDELAY=70>
                  <span id="disp1" class="title"></span></marquee></td>
                </tr>
              </table>
            </td>
          </tr>
          <tr>
            <td>
              <table border="0" cellpadding="0" cellspacing="0" width="100%">
                <tr>
                  <td width="6">
                    <img border="0" src="img/12.gif" width="6" height="24"></td>
                  <td width="210" background="img/13.gif">
                  <div id="CourseButtonBox" style="height:24;210;">
                    <img id="CourseButton" src="img/tscr.gif" style="position:relative;left:0;height:24;32" onmousedown="button_down()" onmousemove="button_move()" onmouseup="button_up()"></div>
                  </td>
                  <td width="93">
                    <img name="plist" src="img/14.gif" width=93 height=24 border=0 onClick="openPlaylist('play_list');this.blur();" style="cursor:hand" title="开关播放列表"
    ></td>
                </tr>
              </table>
            </td>
          </tr>
          <tr>
            <td>
              <table border="0" cellpadding="0" cellspacing="0" width="100%">
                <tr>
                  <td width="184" background="img/15.gif" valign="top">
                    <div align="left">
                      <table border="0" cellpadding="0" cellspacing="0" style="position: relative; left: 5; top: 0" width="184">
                        <tr>
                          <td width="28">
                            <img border="0" src="img/pre.gif" width="28" height="26" name="prevt" onClick="playPrev()"
    onMouseOver    ="imgtog('prevt',2)" onMouseOut="imgtog('prevt',3)" style="cursor:default" title="上一首曲目"></td>
                          <td width="29">
                            <img border="0" src="img/play.gif" width="29" height="29" name="playt" onClick="startExobud()"
    onMouseOver    ="imgtog('playt',2)" onMouseOut="imgtog('playt',3)" style="cursor:default" title="播放"></td>
                          <td width="28">
                            <img border="0" src="img/pause.gif" width="29" height="28" name="pauzt" onClick="wmpPP()"
    onMouseOver    ="imgtog('pauzt',2)" onMouseOut="imgtog('pauzt',3)" style="cursor:default" title="暂停．继续"></td>
                          <td width="29">
                            <img border="0" src="img/stop.gif" width="29" height="29" name="stopt" onClick="wmpStop()"
    onMouseOver    ="imgtog('stopt',2)" onMouseOut="imgtog('stopt',3)" style="cursor:default" title="停止"></td>
                          <td width="28">
                            <img border="0" src="img/bef.gif" width="28" height="26" name="nextt" onClick="playNext()"
    onMouseOver    ="imgtog('nextt',2)" onMouseOut="imgtog('nextt',3)" style="cursor:default" title="下一首曲目"></td>
                          <td valign="bottom" width="42" align=center>
                            <img border="0" src="img/wave.gif" width="19" height="20" align=absMiddle name="vmute" onClick="wmpMute()"
    onMouseOver    ="imgtog('vmute',2)" onMouseOut="imgtog('vmute',3)" style="cursor:default" title="静音模式"></td>
                        </tr>
                      </table>
                    </div>
                  </td>
                  <td width="83" background="img/16.gif">
                    <table border="0" cellpadding="0" cellspacing="0" width="100%">
                      <tr>
                        <td background="img/scr.gif" height="5">
                        <div id="VolumeButtonBox" style="height:10;83;">
                            <img id="VolumeButton" src="img/scrc.gif" style="position:relative;left:65;height:10;18" onmousedown="button_down()" onmousemove="button_move()" onmouseup="button_up()" title="控制音量"></div>
                        </td>
                      </tr>
                      <tr>
                        <td background="img/scr.gif" height="5">
                        <div id="TrackButtonBox" style="height:10;83;">
                            <img id="TrackButton" src="img/scrc.gif" style="position:relative;left:32;height:10;18" onmousedown="button_down()" onmousemove="button_move()" onmouseup="button_up()" title="控制左右声道"></div>
                        </td>
                      </tr>
                    </table>
                  </td>
                  <td width="43">
                    <img border="0" src="img/17.gif" width="43" height="33"></td>
                </tr>
              </table>
            </td>
          </tr>
          <tr>
            <td><div id="play_list" style="visibility:hidden;">
              <div align="center">
                <iframe src="Exobudpl.htm" width=100% height=332 scrolling="no" frameborder="0"></iframe>
                </div>
            </div></td>
          </tr>
    </table>
    </body>
    </html>

    播放列表文件Exobudpl.htm如下:
    <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
    <HTML>
         <HEAD>
          <TITLE>Winamp网页播放器</TITLE>
          <META name="Author" content="Winamp网页播放器">
          <META name="Keywords" content="Winamp网页播放器">
          <META name="Description" content="Winamp网页播放器">
          <META http-equiv="Content-Type" content="text/html; charset=gb2312">

    <style type="text/css">
    <!-- 
        A:visited     { color:#FFFFFF; text-decoration: none } 
        A:active     { color:#FFFFFF; text-decoration: none } 
        A:hover     {color:gold; text-decoration: none ; cursor:hand;}
        A:link     { color:#FFFFFF; text-decoration: none } 
        BODY     {
        scrollbar-face-color    :white;
        scrollbar-shadow-color    :#666666;
        scrollbar-highlight-color    :#666666;
        scrollbar-3dlight-color    :white;
        scrollbar-darkshadow-color    :white;
        scrollbar-track-color    :white;
        scrollbar-arrow-color    :#666666;
        font-size    :12px;
        background    : white;
        background-color    : #000000;
        margin-left    : 0px;
        margin-top    : 0px;
        margin-right    : 0px;
        margin-bottom    : 0px;
    }     
        .text    {font-size:9pt;} 
          TD    {font-size:9pt; }
    -->
    </style>
    <script type="text/javascript" language="javascript">
    <!--
    //原Exobudpll.js Added By Dicky 2005-11-7 7:09:21
        var via = parent;
            var write_via = "parent";
            var iLoc= self.location.href;

            function playSel(){via.wmpStop();via.startExobud();}
            function refreshPl(){ self.location=iLoc;}
            function chkSel(){via.chkAllSel();refreshPl();}
            function chkDesel(){via.chkAllDesel();refreshPl();}

            function dspList(n){
            
                var elmABlock=10;// 设定每页可显示多少个播放项目
            var totElm = via.intMmCnt;
                var totBlock= Math.floor((via.intMmCnt -1) / elmABlock)+1;
                var cblock;
                if(n==null){cblock=1;}
                else{cblock=n;}
                var seed;
                var limit;
                if(cblock < totBlock){seed= elmABlock * (cblock-1); limit =  cblock*elmABlock -1}
                else{seed=elmABlock * (cblock-1); limit= totElm-1;}

            if(via.intMmCnt >0 ){
                var list_num=0;
            mmList.innerHTML    ='';
                for (var i=seed; i <= limit; i++)
                {    list_num = i + 1;
                    if(via.objMmInfo[i].selMm=="t"){elm='&nbsp;&nbsp<input type=checkbox  style="cursor:hand;" onfocus=blur() onClick='+ write_via + '.chkItemSel('+ i +'); checked>' ;}
                    else{elm = '&nbsp;&nbsp<input type=checkbox style="cursor:hand;" onfocus=blur() onClick='+ write_via + '.chkItemSel('+ i +');>' ;}
                elm     = elm + '&nbsp;&nbsp' + list_num + '. ' 
                elm     = elm + '<a href=javascript:' + write_via + '.selPlPlay(' + i + ');'
                elm     = elm + ' onfocus=blur() onclick=\"this.blur();\">'
                    if(via.objMmInfo[i].mmTit =="nAnT"){ elm = elm + "未指定媒体标题(等待自动取得媒体信息)";}
                    else{elm = elm + via.objMmInfo[i].mmTit;}
                elm    = elm+  '</a><br>';
                mmList.innerHTML    =mmList.innerHTML+elm;
            }

                        var pmin=new Number(cblock)-3;
                var pmax=new Number(cblock)+3;
                var ppre=new Number(cblock)-1;
                var pnext=new Number(cblock)+1;
                if(pmin<=3){pmin=1;pmax=7;}
                if(pmax>totBlock){pmax=totBlock;}
                if(ppre<=1){ppre=1;}
                if(pnext>totBlock){pnext=totBlock;}

                for(var j=pmin; j<=pmax; j++){
                page    ='<a href=javascript:dspList('+j+') onFocus=blur()>['+j+']</a> ';
            }

            pageInfo.innerHTML    ='&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<a href=javascript:dspList(1) onfocus=blur() title=首页><font face="Webdings">9</font></a>&nbsp;<a href=javascript:dspList('+ppre+') onfocus=blur() title=上一页><font face="Webdings">3</font></a>&nbsp;第<font color=#3399FF><b>'+cblock+ '</b></font>页&nbsp;共'+ totBlock+'页&nbsp;共'+totElm+'首&nbsp;<a href=javascript:dspList('+pnext+') onfocus=blur() title=下一页><font face="Webdings">4</font></a>&nbsp;<a href=javascript:dspList('+totBlock+') onfocus=blur() title=尾页><font face="Webdings">:</font></a>';

        }
            else { mmList.innerHTML='<div align=center>未加载播放列表</div>'; }
         }



    // ExoBUD⑩ MP(II) List Popping Up
    function openPlaylist_i(layername)
    {
            if (parent.opener)
            {
                if (parent.document.getElementById(layername).style.visibility == 'visible')
                    {
                    parent.document.getElementById(layername).style.visibility     = 'hidden';
                    parent.resizeTo(    255,138);
                }
                else
                    {
                    parent.document.getElementById(layername).style.visibility     = 'visible';
                    parent.resizeTo(    255,388);
                }
        }
            else
            {
                if (parent.document.getElementById(layername).style.visibility == 'visible') 
                parent.document.getElementById(layername).style.visibility     = 'hidden';
                else
                parent.document.getElementById(layername).style.visibility     = 'visible';
        }
    }
    //原Exobudpll.js Added By Dicky 2005-11-7 7:09:21
    //    -->
    </script>
    </HEAD>

    <BODY onLoad="dspList();this.focus();" onmouseover="window.status=' Http://Dicky.CnBlogs.Com';return(true)" onfocus="window.status=' Http://Dicky.CnBlogs.Com';return(true)" oncontextmenu="window.event.returnValue=false" onDragStart="return false" onSelectStart="return false" text="silver" style="border: 0px solid black; margin: 0pt;">

    <table width="310" align="center" cellpadding="0" cellspacing="0">
             <tr>
                <td> 

                    <table cellspacing="0" cellpadding="0">
                        <tr>
                           <td background="img/pl1_01.gif" width="293" height="14">
    </td>
                           <td background="img/pl1_02.gif" width="27" height="14" onClick = "openPlaylist_i('play_list');" onFocus='this.blur()' title="关闭播放列表" style="cursor:hand;">
                           </td>
                        </tr>
                    </table>

                </td>
             </tr>

             <tr>
                <td> 

                    <table cellspacing="0" cellpadding="0">
                        <tr>
                           <td background="img/pl2.gif" width="310" height="26">
                           </td>
                        </tr>
                    </table>

                </td>
             </tr>

             <tr>
                <td> 

                     <table cellspacing="0" cellpadding="0">
                        <tr>
                           <td background="img/pl3.gif" width="310"  valign="top">
                             <DIV id="mmList"></DIV>
                            
    　    </div>
                          </td>
                        </tr>
                    </table>

                </td>
             </tr>

             <tr>
                <td> 

                    <table cellspacing="0" cellpadding="0">
                        <tr>
                           <td background="img/pl4.gif" width="310"  valign="top">
                               <table width="100%" cellpadding="0" cellspacing="0">
                                  <tr>
                                    <td>
                                       <DIV id="pageList"></DIV>
                                    </td>
                                  </tr>
                                    <tr>
                                    <td>
                                       <SPAN id="pageInfo"></SPAN>
                                    </td>
                                  </tr>
                             </table>                  </td>
                        </tr>
                    </table>

                </td>
             </tr>

             <tr>
                <td> 

                     <table cellspacing="0" cellpadding="0">
                        <tr>
                           <td background="img/pl5_01.gif" width="119" height="23">
                           </td>
                           <td background="img/pl5_02.gif" width="37" height="23" onClick="chkDesel()" onFocus="this.blur()" title="全部不选" style="cursor:hand;">    
                           </td>
                           <td background="img/pl5_03.gif" width="58" height="23" onClick="chkSel();" onFocus="this.blur()" title="全部选取" style="cursor:hand;">
                           </td>
                           <td background="img/pl5_04.gif" width="83" height="23" onClick="playSel();" onFocus="this.blur()" title="播放已选取的曲目" style="cursor:hand;">
                           </td>
                           <td background="img/pl5_05.gif" width="13" height="23" onClick = "openPlaylist_i('play_list');" onFocus='this.blur()' title="关闭播放列表" style="cursor:hand;">
                           </td>
                        </tr>
                    </table>

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

    </BODY>
    </HTML>

    青苹果Web应用商店 https://webapp.taobao.com/

    PHP/ASP.NET/ASP/UCHOME/DISCUZ! X系列网站开发，详细需求联系QQ:8511978
  • 相关阅读:
    线段树模板（HDU 6356 Glad You Came）
    Treap模板
    Codeforces Round #499 (Div. 2) D. Rocket题解
    Codeforces Round #499 (Div. 2) C Fly题解
    KMP与AC自动机模板
    HDU 6351 Naive Operations（线段树）
    python核心编程第六章练习6-13
    python核心编程第六章练习6-12
    [转]我为什么要学习python
    python核心编程第六章练习6-11
  • 原文地址：https://www.cnblogs.com/Dicky/p/270360.html
Copyright © 2011-2022 走看看