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=falsereturn;} // 没有任何播放清单项目
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=nullreturn;}
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"><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

原文地址:https://www.cnblogs.com/Dicky/p/270360.html