以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  请老师帮我写个声音提示码  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=182154)

--  作者:liyuan0050
--  发布时间:2020/9/12 20:20:10
--  请老师帮我写个声音提示码

下面是原码,这个原码的作用是K线涨跌能变色,我的诉求是:在K线变色的时候有声音提示,我基础很差请老师帮我写一下原码,谢谢!

HH1:=IFELSE(H<REF(H,1)&&REF(H,1)<REF(H,2),REF(H,2),0);

LL1:=IFELSE(L>REF(L,1)&&REF(L,1)>REF(L,2),REF(L,2),0);

HH2:=VALUEWHEN(HH1>0,HH1);

LL2:=VALUEWHEN(LL1>0,LL1);

K1:=IFELSE(CLOSE>HH2,-3,IFELSE(CLOSE<LL2,1,0));

K2:=VALUEWHEN(K1<>0,K1);

G:=IFELSE(K2=1,HH2,LL2);

G1:=VALUEWHEN(ISLASTBAR,G);

DRAWNUMBER(L>0,G1,G1,0,COLORCYAN);

W1:=K2;

W2:=OPEN-CLOSE;

HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE);

LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE);

 

STICKLINE(W1>0 ,OPEN,CLOSE,25,1,colorgreen);

STICKLINE(W1<=0 ,OPEN,CLOSE,25,1,colorred);

STICKLINE( W2>0&&W1<=0,OPEN,CLOSE,25,0,colorred);

STICKLINE( W2>0&&W1>0 ,OPEN,CLOSE,25,0,colorgreen);


--  作者:FireScript
--  发布时间:2020/9/14 8:47:13
--  
 直接用SPEAK函数处理即可。


--  作者:wenarm
--  发布时间:2020/9/14 8:55:35
--  
PLAYSOUND(ref(W1>0,1)and W1<=0 ,\'D:\\xxx.MP3\');//自己指定声音文件的路径
PLAYSOUND(ref(W1<=0,1)and W1>0 ,\'D:\\yyy.MP3\');//自己指定声音文件的路径

--  作者:liyuan0050
--  发布时间:2020/9/14 11:25:20
--  
老师好,我这样设置:PLAYSOUND(ref(W1>0,1)and W1<=0 ,\'D:\\生日快乐.MP3\');
                                 PLAYSOUND(ref(W1<=0,1)and W1>0 ,\'D:\\生日快乐.MP3\');
       生日快乐MP3文件放在了D盘里,为什么有的K线变色了有声音提示,有的K线变色了没有提示呢?

--  作者:liyuan0050
--  发布时间:2020/9/14 12:37:48
--  
老师我弄好了,非常感谢老师。