php 循环播放音乐,背景音乐的连续播放 - 按键网资源站

UserVar YYBF=1 "//定义要播放背景音乐时等于1"

If YYBF=1                  //如果要播放背景音乐

Call BJYY           //则执行子程序

End If                        //否则条件结束

//-----------------------你的代码指令

//在你的代码指令里加入下面的语句

If YYBF=1

Call FanYinYue

End If

//-----------------------你的代码指令

//在频繁用到的代码里加入下面的语句

If YYBF=1

Call FanYinYue

End If

//-----------------------你的代码指令

//下面为子程序

Sub BJYY

Ksyy = Plugin.Sys.GetTime()         //获得现在系统的原始时间

yy=yy+1                             //这里有8首背景音乐

If yy=1                                      //第一首背景音乐

Call Plugin.Media.Play(".\plugin\M2M.wma")    //音乐名及地址

Bfsj=280                        //定义这首背景音乐的长度

End If

If yy=2                                     //第二首背景音乐

Call Plugin.Media.Play(".\plugin\Don't Say You Love Me .wma")  //音乐名及地址

Bfsj=230                       //定义这首背景音乐的长度

End If

If yy=3                                     //第三首背景音乐

Call Plugin.Media.Play(".\plugin\Everything you do.wma")  //音乐名及地址

Bfsj=245                       //定义这首背景音乐的长度

End If

If yy=4

Call Plugin.Media.Play(".\plugin\Girl in your dreams.wma")

Bfsj=230

End If

If yy=5

Call Plugin.Media.Play(".\plugin\Our song.wma")

Bfsj=240

End If

If yy=6

Call Plugin.Media.Play(".\plugin\THE DAY YOU WENT AWAY.wma")

Bfsj=230

End If

If yy=7

Call Plugin.Media.Play(".\plugin\郭采洁-笨的可以.wma")

Bfsj=275

End If

If yy=8

Call Plugin.Media.Play(".\plugin\林妙可-妙妙妙.wma")

Bfsj=220

End If

End Sub

Sub FanYinYue

hyy = Plugin.Sys.GetTime()        //获得系统运行的现在时间

xyq=((hyy-Ksyy)/1000)      //计算系统现在时间与系统原始时间之时间差

If Bfsj

Call BJYY                        //则调用子程序来检测下首背景音乐的播放时间长度

End If

End Sub