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