Var2:=(2*CLOSE+HIGH+LOW)/4;
Var3:=IF(YEAR>=2099 AND MONTH>2,0,1);
Var4:=LLV(LOW,5);
Var5:=HHV(HIGH,4);
庄家:= EMA((Var2-Var4)/(Var5-Var4)*100,4)*Var3{, ,colorff9933};
散户:= EMA(0.667*REF(庄家,1)+0.333*庄家,2)*Var3{, ,COLORWHITE};
Var6:=(HHV(HIGH,4)-Var2)/(HHV(HIGH,4)-LLV(LOW,4))*100-72;
Var7:=(Var2-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100;
Var8:=SMA(Var7,2,1);
减磅:if(CROSS(散户,庄家) AND 庄家>70,89,76),stick,LINETHICK2,COLORred; 76,stick,LINETHICK2,COLOR000000;
短出:if(CROSS(散户,庄家) AND 庄家>40 AND 71>庄家,75,62),stick,LINETHICK2,COLOR00ff00;62,stick,LINETHICK2,COLOR000000;
短进:if(CROSS(庄家,散户) AND 庄家<50 AND 29<庄家,61,49),stick,LINETHICK2,COLORf000ff;49,stick,LINETHICK2,COLOR000000;
低吸:if(CROSS(庄家,散户) AND 庄家<30,48,35),stick,LINETHICK2,COLORyellow;35,stick,LINETHICK2,COLOR000000;
80, ,pointdot,COLORFFFF00;
20, ,pointdot ,color9933ff;
12, ,pointdot,COLORff3399;
庄家线:庄家,,colorwhite;
散户线:散户,,colorfff000;
{萃富网-股票公式网站 www.cuiv.com}
{DRAWICON(CROSS(庄家,散户) AND 庄家<30,20,1);
DRAWICON(CROSS(散户,庄家) AND 庄家>70,80,2); }
Var9:=CLOSE-REF(CLOSE,5);
VarA:=EMA(EMA(Var9,5),5)/EMA(EMA(ABS(Var9),5),5)*100;
VarB:=EMA(EMA(Var9,10),10)/EMA(EMA(ABS(Var9),10),10)*100;
VarC:=EMA(EMA(Var9,20),20)/EMA(EMA(ABS(Var9),20),20)*100;
警戒: IF(VarA>0 AND CROSS(VarC,VarA),10,0),LINETHICK1,COLORRED;
{DRAWTEXT(警戒,6,'！'),LINETHICK1,COLORRED;
DRAWICON(警戒<0,25,2); }