大智慧控盘力度副图指标
源码
Var3:=(CLOSE+HIGH+LOW)/3;
Var4:=EMA(EMA(EMA(Var3,1),13),21);
控盘度:(Var4-REF(Var4,1))/REF(Var4,1)*100,COLORSTICK,LINETHICK3;
强弱分界:0,COLORYELLOW,LINETHICK3;
Var5:=LLV(LOW,33);
Var6:=HHV(HIGH,17);
Var7:=EMA((CLOSE-Var5)/(Var6-Var5)*100,20)*0.998;
Var8:=EMA(0.667*REF(Var7,1)+0.333*Var7,1);
Var9:=EMA(100*(HHV(HIGH,20)-CLOSE)/(HHV(HIGH,20)-LLV(LOW,33)),20);
VarA:=EMA(Var9,1);
VarB:=VOL/CAPITAL*100;
VarC:=SUM(VarB,5)>=3;
VarD:=VarC/REF(VarB,10)>=2;
VarE:=HHV(CLOSE,5);
VarF:=VarE/REF(CLOSE,5)>=1.01;
Var10:=VarA > 20;
Var11:=HIGH/REF(LOW,20) < 1.2;
Var12:=WINNER(CLOSE)*100;
Var13:=VarC AND Var10 AND VarD AND Var11 AND VarF;
Var14:=FILTER(Var13,20);
DRAWTEXT(Var14,-0.15,'进'),linethick3,colormagenta;
Var15:=EMA(WINNER(CLOSE),20);
Var16:=Var15 > 0.85 AND
{Var16:=Var15 > 0.85 AND CLOSE 0.2 OR SUM(VOL,3)/CAPITAL > 0.1) OR CLOSE/REF(CLOSE,20)>=1.9; }
DRAWTEXT(Var16,0.5,'出'),COLORYELLOW,LINETHICK3;