易语言定时播放(一)

.版本 2

.程序集 窗口程序集1

.子程序 __启动窗口_创建完毕

时钟1.时钟周期 ＝ 1000
时钟1.激活 ()

.子程序 _时钟1_周期事件
.局部变量 xs, 整数型
.局部变量 fz, 整数型
.局部变量 mz, 整数型

xs ＝ 取小时 (取现行时间 ())
fz ＝ 取分钟 (取现行时间 ())
mz ＝ 取秒 (取现行时间 ())
.如果 (xs ＝ 8 且 fz ＝ 53 且 mz ＝ 0)
    播放MP3 (1, “e:\ssn.mp3”)
.否则

.如果结束

　　

 网站没有提供易语言格式源码功能，截图如下：