GUP0:=(2*CLOSE+HIGH+LOW)/4;
GUP1:=(HHV(HIGH,24)-CLOSE)/(HHV(HIGH,24)-LLV(LOW,24))*100;
GUP2:=(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100;
B0:=EMA((GUP0-LLV(LOW,26))/(HHV(HIGH,34)-LLV(LOW,26))*100,16);
AA:=SMA(SMA(GUP2,2,1)+3,2,1),COLORRED,LINETHICK1;
浮动筹码:=EMA(B0,4),LINETHICK1,DOTLINE,COLORYELLOW;
BB:=SMA(GUP1,3,1),COLORGREEN,LINETHICK1;
STICKLINE(AA>BB,6,90,5,0),COLOR000044;
STICKLINE(BB>AA,6,90,5,0),COLOR422D00;
多头:SMA(SMA(GUP2,2,1)+3,2,1),COLOR0000FF,LINETHICK2;
空头:SMA(GUP1,3,1),COLORFFFF00,LINETHICK1,DOTLINE;
强势:90,COLORMAGENTA,DOTLINE;
中位:50,COLOR0080FF,DOTLINE;
弱势:10,COLORLICYAN,DOTLINE;
STICKLINE(多头>强势,多头,强势,1,0),COLOR0000FF;
STICKLINE(多头<弱势,多头,弱势,1,0),COLOR0000FF;
STICKLINE(空头<弱势,空头,弱势,1,0),COLORGREEN;
STICKLINE(空头>强势,空头,强势,1,0),COLORGREEN;
趋势:=3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);
见底:=10;
见顶:=90;
短线底部:=CROSS(趋势,见底),COLORRED;
STICKLINE(短线底部,4,40,1,0),COLORRED;
DRAWTEXT(CROSS(趋势,见底),40,'');
短线顶部:=CROSS(见顶,趋势),COLORGREEN;
STICKLINE(短线顶部,4,40,1,0),COLORGREEN;
DRAWTEXT(CROSS(见顶,趋势),40,''),COLORYELLOW;
散户:= EMA(((2*CLOSE+HIGH+LOW)/4-LLV(LOW,5))/(HHV(HIGH,4)-LLV(LOW,5))*100,4);
庄家:= EMA(0.667*REF(散户,1)+0.333*散户,2);
顶出:100*(CROSS(庄家,散户) AND 散户>50),COLOR333333,STICK,LINETHICK1;
DRAWTEXT(顶出>0,0.99,''),COLORFFFF00;
DRAWICON(顶出>0,顶出,2 );
STICKLINE(顶出,0,2,0,1),COLOR0000FF,NODRAW;
A1:=(C-REF(C,1))/REF(C,1)*100;
MA5:=BARSLAST(A1>3);
Z1:=MA(C,13);
ZX:=REF(Z1,13/2+1);
MA20:=IF(MA5>0,1,0);
抄底:CROSS(C,ZX) AND MA20=0,COLOR464646,STICK,LINETHICK1;
DRAWTEXT(抄底>0,抄底,'');
STICKLINE(抄底,0,2,0,9),COLOR0000FF;
主力:EMA(100*(C-LLV(LOW,34))/(HHV(H,34)-LLV(LOW,34)),3),COLORRED,LINETHICK1,NODRAW;
即将起爆:65,COLOR00FF00,NODRAW;
起爆线:80,COLORWHITE,LINETHICK1,NODRAW;
起爆警戒:50,COLOR00FF00,NODRAW;
抄底线:20,COLORWHITE,LINETHICK2,NODRAW;
DRAWTEXT(CROSS(主力,起爆警戒),主力,''),COLORWHITE;
DRAWTEXT(CROSS(主力,即将起爆),主力,''),COLORWHITE;
AA05:=MA(C,5);
五日乖离率:=(C-AA05)/AA05*100;
AA30:=MA(C,30);
三拾日乖离率:=(C-AA30)/AA30*100;
MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA05>REF(AA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<AA30;
涨:IF(FILTER(MR,10),1,0),STICK,COLOR464646;
DRAWTEXT(涨>0,0.1,' '),COLORFFFFFF;
