通达信洗盘结束公式副图源码

100,DOTLINE;

VAR1:=REF((L+O+C+H)/4,1);

VAR2:=SMA(ABS(L-VAR1),13,1)/SMA(MAX(L-VAR1,0),10,1);

VAR3:=EMA(VAR2,34);

VAR4:=LLV(L,5);

VAR5:=EMA(IF(L<=VAR4,VAR3,0),24),NODRAW;

STICKLINE(VAR5>REF(VAR5,1),0,VAR5,3,0),COLORRED;

STICKLINE(VAR5<REF(VAR5,1),0,0,0,0),COLORGREEN;

XP:=REF(VAR5>REF(VAR5,1),1);

XPLS:=COUNT(VAR5>REF(VAR5,1),10)>=8 AND (XP AND VAR5<REF(VAR5,1));

DRAWTEXT(XPLS,VAR5<REF(VAR5,1),'洗完'),COLORYELLOW;

VAR12:=REF(L,1);

VAR13:=SMA(ABS(L-VAR12),3,1)/SMA(MAX(L-VAR12,0),3,1)*100;

VAR14:=EMA(VAR13*10,3);

VAR15:=LLV(L,13);

VAR6:=HHV(VAR14,13);

VAR7:=EMA(IF(L<=VAR15,(VAR14+VAR6*2)/2,0),3)/618;

VAR8:=IF(VAR7>500,200,VAR7);

 

STICKLINE(VAR8>1 AND "KDJ.J">REF("KDJ.J",1) AND REF("KDJ.J",1)<REF("KDJ.J",2),0,VAR5*1.2,2,1),COLORYELLOW;

STICKLINE(VAR8>0.1 AND VAR8<1 AND "KDJ.J">REF("KDJ.J",1) AND REF("KDJ.J",1)<REF("KDJ.J",2),0,VAR5*1.2,2,0),COLORFF00FF;

 

DRAWTEXT(VAR8>1 AND "KDJ.J">REF("KDJ.J",1) AND REF("KDJ.J",1)<REF("KDJ.J",2),VAR5,'建仓'),COLORLIBLUE;

DRAWTEXT(VAR8>0.1 AND VAR8<1 AND "KDJ.J">REF("KDJ.J",1) AND REF("KDJ.J",1)<REF("KDJ.J",2),VAR5,'加仓'),COLORRED;

 

提款:COUNT(VAR5>REF(VAR5,1),10)>=8 AND VAR5>REF(VAR5,4) AND C>REF(C,1),COLORFFFF00;

 

DRAWTEXT(提款 AND VAR5>70,VAR5,'吃'),COLORYELLOW;

 

TK:=VAR8>1 AND "KDJ.J">REF("KDJ.J",1) AND REF("KDJ.J",1)<REF("KDJ.J",2);

 

DRAWICON((TK AND VAR5>100) OR XPLS,VAR5,23);

 

股东占流通比:100*FINVALUE(244)/FINVALUE(239),NODRAW;

 

历史衰退系数:100/(100-股东占流通比),NODRAW;