通达信精妙指标(源码)

VARR3:=LLV(HIGH,240);
VARR4:=100*(CLOSE-VARR3)/VARR3;
VARR5:=(CLOSE-LLV(LOW,528))/(HHV(HIGH,528)-LLV(LOW,528))*100;
VARR6:=(CLOSE-LLV(CLOSE,530))/(HHV(CLOSE,530)-LLV(CLOSE,530))*100;
VARR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
VARR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
VARRA:=BARSCOUNT(CLOSE);
VARRB:=VARR8<20 AND VARR9<23 AND VARRA>35;
VARRC:=VARRB AND COUNT(VARRB,1)=1;
VARRD:=EMA(CLOSE,21)-EMA(CLOSE,8);
VARRE:=EMA(VARRD,5);
VARRF:=TROUGHBARS(3,6,1)<4 AND CROSS(VARRD,VARRE);
VARR10:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,4,0);
VARR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
VARR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
VARR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
VARR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
VARR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
VARR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
VARR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
VARR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
VARR19:=EMA(CLOSE,2)-EMA(CLOSE,150);
VARR1A:=EMA(VARR19,100);
VARR1B:=2*(VARR19-VARR1A);
VARR1C:=POW(VARR1B,3)*0.1+POW(VARR1B,1);
VARR1D:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE));
VARR1E:=EMA(VARR1D*0.97,3);
VARR1F:=(HIGH+LOW+CLOSE)/3;
VARR20:=(VARR1F-MA(VARR1F,14))/(0.015*AVEDEV(VARR1F,14));
VARR21:=CROSS(VARR1E,LOW);
选股买点:VARR10;VARR10=4,0,20,1,0,COLORMAGENTA;
组合买:(VARR11+VARR13+VARR15+VARR17),STICK,COLORRED,LINETHICK2;
IF((VARR11+VARR13+VARR15+VARR17)=1,38,00),STICK,COLORMAGENTA,LINETHICK2;
组合卖: (VARR12+VARR14+VARR16+VARR18),STICK,COLORGREEN,LINETHICK2;
IF((VARR12+VARR14+VARR16+VARR18)=1 ,38,0),STICK,COLORGREEN,LINETHICK2;
IF((VARR12+VARR14+VARR16+VARR18)=2 ,48,0),STICK,COLORGREEN,LINETHICK2;
IF((VARR12+VARR14+VARR16+VARR18)=3 ,58,0),STICK,COLORGREEN,LINETHICK2;
IF((VARR12+VARR14+VARR16+VARR18)=4 ,68,0),STICK,COLORGREEN,LINETHICK2;
{黑马线2:-25+黑马线,STICK ,COLOR008364,LINETHICK1;}
黑马线:= 30+IF(MONTH<2008 AND VARR1B>0.1,VARR1C,0), COLOR6699CC,LINETHICK2;
黑马入点: 选股买点 AND VARRF AND VARRC AND VARR21 AND VARR4<0 AND VARR5<2 AND VARR6=0, , COLORFFFF99;
DRAWTEXT(VARR13,18,"★黑马\买入点"), COLORMAGENTA;
IF((VARR13)=1,13,0),STICK,COLORMAGENTA,LINETHICK2;
DRAWTEXT(组合买,38,"★短买"),COLORRED;
DRAWTEXT(组合卖,68,"★短卖"),COLORGREEN;
{IF((组合卖)=1,58,0),STICK,COLORGREEN,LINETHICK2;}
DRAWTEXT(黑马入点>0,58,"●黑马入"), COLORRED;
DRAWTEXT(选股买点>0,28,"●有马"), COLORRED;
IF((选股买点>0)=1,28,0),STICK,COLORRED,LINETHICK5;

上一页  [1] [2]