专业级的语音效果——期货语音时间提醒软件（含源代码）

wjlhc

专业级的语音效果——期货语音时间提醒软件（含源代码）

来自：MACD论坛(bbs.shudaoyoufang.com) 作者：wjlhc 浏览：9253 回复：13

此软件是专为期货操作而制作的，播放的语音为专业播音员播出，根据开盘和收盘的紧张程度，提醒的语调和节奏会有所不同，本人已经使用了1年多的时间，感觉效果非常好，所以基本能固定下来了。此次特用按键精灵（采用8.0版本），制作成一个小的执行程序（无广告 病毒和插件），提供给大家，希望大家喜欢。这个软件是本人原创，首次发表在MACD论坛，但是本人不反对再创作，所以特将源代码和语音包提供出来，欢迎大家使用， 同时也欢迎各期货软件公司或期货公司对语音改进和采用 应用，以提高服务质量。
如果大家怕有病毒，可直接用源代码在按键精灵8上制作。
运行时会生成一些配置文件和和库文件，这是正常的，可放心，建议采用普通模式，进程优先级宜采用较低，毕竟这只是辅助工具而已。
代码做了解释，即使新手也应当能看懂。
软件已经包含有语音，可直接使用。
语音包共有3个压缩文件组成，供大家自己来制作。分别发表在2 楼3楼和4楼

• 源代码（语法与按键精灵8兼容）：
• //获得一次当前时间
• dqsj=Time
• //预定时间
• sj=TimeValue("8:54:55")
• //判断当前时间是否小于预定时间
• sj=TimeValue("8:55:00")
• If dqsj<sj
• //调用子程序
•     Gosub dengdai
•     //播放媒体文件
•     Call Plugin.Media.Play("I:\声音\声音\离开盘还有五分钟！音乐提醒.wav")
• Else
• EndIf
• dqsj=Time
• sj=TimeValue("8:58:55")
• If dqsj<sj
•   Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\离开盘还有一分钟！音乐提醒.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("8:59:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\开盘.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("10:13:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\据小节收盘还有1分钟.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("10:14:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\收盘.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("10:24:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\离开盘还有五分钟！音乐提醒.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("10:28:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\离开盘还有一分钟！音乐提醒.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("10:29:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\开盘.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("11:24:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\距上午收盘还有5分钟.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("11:28:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\距上午收盘还有1分钟.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("11:29:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\收盘.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("13:24:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\离开盘还有五分钟！音乐提醒.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("13:28:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\离开盘还有一分钟！音乐提醒.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("13:29:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\开盘.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("14:08:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\距上海市场休息还有1分钟.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("14:09:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\上海收盘.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("14:18:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\距上海开盘还有1分钟.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("14:19:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\上海开盘.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("14:56:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\距收盘还有3分钟.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("14:58:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\距收盘还有1分钟 音乐提醒.wav")
• EndIf
• dqsj=Time
• sj=TimeValue("14:59:55")
• If dqsj<sj
•     Gosub dengdai
•     Call Plugin.Media.Play("I:\声音\声音\收盘.wav")
• EndIf
• EndScript
• //子程序
• Sub dengdai
•     //跳转标志，继续运行
•     Rem jxyx
•     //等待秒钟
•         Delay 1000
•     //捕获一次现在的时间
•     xzsj=time
•     //将现在时间和预定时间比较
•     If xzsj<sj
•         Goto jxyx
•     Else
•     EndIf
• Return dengdai

[ 本帖最后由 wjlhc 于 2010-4-26 22:58 编辑 ]

wjlhc

语音包是供大家自己来制作的软件的，有兴趣的不妨自己试试。
这是语音包的第一部分

[ 本帖最后由 wjlhc 于 2010-4-26 19:26 编辑 ]

wjlhc

语音包是供大家自己来制作的软件的，有兴趣的不妨自己试试。
这是语音包的第二部分


[ 本帖最后由 wjlhc 于 2010-4-26 19:27 编辑 ]

wjlhc

语音包是供大家自己来制作的软件的，有兴趣的不妨自己试试。
这是语音包的第三部分（已全部传完）


[ 本帖最后由 wjlhc 于 2010-4-26 19:27 编辑 ]

wjlhc

自己做软件的时候，语音的路径要自己改一下。
按键精灵的官方网站是：http://www.vrbrothers.com/cn/qmacro/

[ 本帖最后由 wjlhc 于 2010-4-26 18:11 编辑 ]

lxjdz988

#vv1# #vv1#

the

这个很简单，可以用VC++写一个，但意义不大。

wjlhc

原帖由 the 于 2010-4-26 19:18 发表
这个很简单，可以用VC++写一个，但意义不大。

关键是声音，用啥软件来做倒是次要的。为了大家自己能做，才使用按键精灵的，面向群体主要还是不懂编程的人。欢迎大家提建议和意见！

[ 本帖最后由 wjlhc 于 2010-4-26 19:31 编辑 ]

不明白的士兵

谢谢楼主，慢慢消化#vv1#

the

“关键是声音，用啥软件来做倒是次要的。”

上面一句话，合成的声音，见附件。

happyjonas

专业+热心肠！#*d1*# （我最近一直在用手机上面提供的5个闹钟来勉强应付）

虚虚实实

太专业了，佩服#*d1*#

haoqi

#*d1*# #vv1# #*)*# #*(#

limin88881

谢谢分享，试试看，怎么样