通达信周末也来凑个热闹,发一个“凤头”指标公式

[复制链接]
查看69 | 回复0 | 2021-8-20 02:49:15 | 显示全部楼层 |阅读模式

以下是通达信周末也来凑个热闹,发一个“凤头”指标公式(无源码的请下载附件导入)

ST:=NOT(NAMELIKE('ST')) AND NOT(NAMELIKE('S')) AND NOT(NAMELIKE('*')) AND
 NOT(DYNAINFO(4)=0);
 A:=(3*CLOSE+OPEN+LOW+HIGH)/6;
 B:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)
 +13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
 +7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
 REF(A,20))/210;
 D:=EMA(B,5);
 EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3);
 PL20:=ZIG(3,20);
 EN3:=ZIG(3,20)>REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)<=REF(ZIG(3,20),3);
 TJ:=BARSLAST(PL20<REF(PL20,1));
 ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,TJ),0);
 TJ1:=EN3 AND ZTJZ10=1;
 PL10:=ZIG(3,10);
 EX1:=ZIG(3,5)<REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)>=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3);
 TJ2:=BARSLAST(PL10<REF(PL10,1));
 EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3);
 EN2D:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)<=REF(ZIG(3,10),3);
 ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,TJ2),0);
 TJ3:=EN2D AND ZTJZ5=1;
 COUNT(EN3 AND ZTJZ10=1 AND TJ3,15)>=1 AND C>=O AND L<=B
 AND C>=D;

625100335.png

625100335.png

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则