通达信进洗拉出指标公式源码

z:0,colorblack;
VAR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
XVAR1:=REF(LOW,1);
XVAR2:=SMA(Abs(LOW-XVAR1),3,1)/SMA(MAX(LOW-XVAR1,0),3,1)*100;
XVAR3:=EMA(IF(CLOSE*1.2,XVAR2*10,XVAR2/10),3);
XVAR4:=LLV(LOW,38);
XVAR5:=HHV(XVAR3,38);
XVAR6:=IF(LLV(LOW,90),1,0);
XVAR7:=EMA(IF(LOW<=XVAR4,(XVAR3+XVAR5*2)/2,0),3)/618*XVAR6;
XVAR8:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
XVAR9:=SMA(XVAR8,13,8);
进场:IF(XVAR7>REF(XVAR7,1),XVAR7*2,0),COLORFF33FF,NODRAW;
洗盘:IF(XVAR7<REF(XVAR7,1),XVAR7*2,0),colorred,NODRAW;
STICKLINE(XVAR7<REF(XVAR7,1),0,XVAR7*2,3,0), colorred;
STICKLINE(XVAR7>REF(XVAR7,1),0,XVAR7*2,3,0 ),COLORFF33FF;
VAR21:=SMA(ABS(HIGH-VAR1),13,1)/SMA(MIN(HIGH-VAR1,0),10,1);
VAR31:=EMA(VAR21,10);
VAR41:=HHV(HIGH,33);
VAR51:=-(EMA(IF(HIGH>=VAR41,VAR31,0),3));
拉升:IF(VAR51>REF(VAR51,1),VAR51,0),coloryellow,NODRAW;
STICKLINE(VAR51>REF(VAR51,1),0,VAR51,3,0),coloryellow;
出货:IF(VAR51<REF(VAR51,1),VAR51,0),colorgreen,NODRAW;
STICKLINE(VAR51<REF(VAR51,1),0,VAR51,3,0 ),colorgreen;