以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (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=173202)
--  作者：liyuan0050
--  发布时间：2019/11/19 23:19:40
--  求助老师帮助写一个公式。
图片点击可在新窗口打开查看

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);


上面这个是老师帮我改的公式，首先谢谢老师，

我在这个的基础上要加上：K线是红色的时候KD金叉提示多，死叉不提示；

                                           K线是蓝色的时候KD死叉提示空，金叉不提示。

                                         深谢老师的帮助。
--  作者：FireScript
--  发布时间：2019/11/20 8:55:54
--  
你这里说的K线红色，蓝色。是K线本身的阴阳线的红蓝，还是你上面自己填充的颜色。你上面图中我看到有的K是被填充成实体红色和实体蓝色的。按照这个去处理？
--  作者：FireScript
--  发布时间：2019/11/20 9:03:06
--  
input:n(9,1,100,10),p1(3,2,40,4),p2(3,2,40,4)；//参数设置

RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV,P1,1);
D:=SMA(K,P2,1);
J:=3*K-2*D;
kdjjc:cross(k,d);//kdj金叉
kdjsc:cross(d,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);

DRAWTEXT( kdjjc AND （W2<0 and W1<=0）,l-1*MINDIFF ,\'多\' ,colorred,0 );
DRAWTEXT( kdjsc AND W2>0 and W1>0, l-1*MINDIFF, \'空\', colorblue,0);

这样就行了。
--  作者：liyuan0050
--  发布时间：2019/11/20 19:46:47
--  
先感谢老师，这就是我的诉求，我就是要用被填充的K线颜色做条件，但是有两个问题，1，是为什么有的K线颜色被填充是绿色了KD死叉却没有提示“空”？
                                                                                                              2，是我用KD的参数是5.3.3,老师做的是9.3.3。老师帮我改成参数是5.3.3的公式吧，谢谢老师
--  作者：FireScript
--  发布时间：2019/11/21 8:56:19
--  
 1.这个现象我没有看到么。我过了一遍，都是按照绿色+死叉 就输出“空”的。
2.参数这里改下：

Input:n(5,1,100,10),p1(3,2,40,4),p2(3,2,40,4)；//参数设置
--  作者：liyuan0050
--  发布时间：2019/11/21 11:48:35
--  
现在根据老师的说法做了，多谢老师，老师怎么才能在提示“多”“空”的时候有声音提示呢？公式怎么写入？
--  作者：wenarm
--  发布时间：2019/11/21 12:37:37
--  
PLAYSOUND函数实现。参考标记多空的条件
--  作者：liyuan0050
--  发布时间：2019/11/21 21:28:44
--  
老师这个playsound我不知道写在什么地方，写在公式最下面吗？
--  作者：liyuan0050
--  发布时间：2019/11/21 21:34:17
--  
这个playsound的加入我自己试了几下，都测试不成功，辛苦老师帮我写一下，谢谢
--  作者：wenarm
--  发布时间：2019/11/21 21:53:27
--  
请把你写的贴出来，看下是怎么不行的？