通达信精准买卖提示选股指标公式源码

通达信精准买卖提示选股指标公式源码

源码正文：

VAR1:=(HHV(HIGH,9)-LLV(LOW,9));
VAR2:=(HHV(HIGH,9)-CLOSE);
VAR3:=(CLOSE-LLV(LOW,9));
VAR4:=VAR2/VAR1*100-70 ;
VAR5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR6:=(2*C+H+L)/4;
VAR7:=SMA((VAR3/VAR1*100),3,1);
VAR8:=LLV(LOW,34);
VAR9:=Sma(VAR7,3,1)-SMA(VAR4,9,1);
VAR10:= IF(VAR9>100,VAR9-100,0);
VARA:=HHV(HIGH,34);
防线B:=ema((VAR6-VAR8)/(VARA-VAR8)*100,8),COLORRED{XG51};
B1:=EMA(防线B,5);


STICKLINE(防线B>0 AND 防线B-B1>=0,19,20,3,0),COLORBLUE{XG51};
STICKLINE(防线B>0 AND 防线B-B1<0,19,20,3,1),COLORWHITE{XG51};
一进一出:防线B-B1,COLORGREEN{XG51};
妙趣横生:-一进一出,COLORWHITE{XG51};
卖出:(REF(一进一出,1)>0 AND 一进一出<=0) OR (一进一出<1 AND 一进一出>=0 AND C<O),COLORWHITE{XG51};
DRAWICON(卖出,36,1){XG51};
STICKLINE(卖出,0,28,1,0),COLORWHITE{XG51};
DRAWTEXT(卖出,30,'卖'),COLORLIMAGENTA{XG51};
买入:卖出=0 AND REF(一进一出,1)<0 AND 一进一出>0,COLORWHITE;
STICKLINE(买入,0,28,2,0),COLORBLUE{XG51};
DRAWICON(买入,40,1){XG51};
DRAWTEXT(买入,30,'买'),COLORBLUE{X~G!5-1~C~N~{};