{分时升突}
N:=5;
M:=13;
VAR1:=EMA(EMA(CLOSE,13),13);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(控盘<0,控盘,0,1,0),COLORWHITE;
A10:=CROSS(控盘,0);
无庄控盘:=IF(控盘<0,控盘,0);
开始控盘:=IF(A10,5,0);
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORRED;
有庄控盘:=IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0);
VAR2:=100*WINNER(CLOSE*0.95);
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,0),COLORFF00FF;
高度控盘:=IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0);
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLOR00FF00;
主力出货:=IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0);
AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主买:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
主卖:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2));
当日量比:VOL/REF(MA(VOL,5),1);
换手率:VOL/CAPITAL*100;
流通盘:CAPITAL/1000000;
净买率:(主买+主卖)/VOL*100;
总买:主买;
总卖:-主卖;
差:主买+主卖;
五日净买:SUM(主买+主卖,5);
十日净买:SUM(主买+主卖,10);
N1:=BARSLAST(CROSS(控盘,0));
N2:=BARSLAST(CROSS(0,控盘));
N3:=IF(N1<N2,N1+1,0);
N4:=IF(N2<N1,N2+1,0);
N5:=IF(N3>0,REF(N4,N3)+N3,N4);
N6:=IF(N4>0,REF(N3,N4)+N4,N3);
控盘周期:=IF(N5>N6,N5,N6);
控盘天数:=IF(控盘>0,控盘周期,0);
STICKLINE(控盘天数>REF(控盘天数,1) AND 控盘天数>0,控盘天数,0,1,0),COLORRED;
STICKLINE(控盘天数<REF(控盘天数,1) AND 控盘天数>0,控盘天数,0,1,0),COLOR00FF00;
STICKLINE(控盘天数=REF(控盘天数,1) AND 控盘天数>0,控盘天数,0,1,0),COLORWHITE;
A:=MA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),19);
B:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
D:=EMA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),4);
长期线:=A+100;
短期线:=B+100;
中期线:=D+100;
见顶:=((REF(中期线,1)>85 AND REF(短期线,1)>85 AND REF(长期线,1)>65) AND CROSS(长期线,短期线));
顶部区域:=(中期线<REF(中期线,1) AND REF(中期线,1)>80) AND (REF(短期线,1)>95 OR REF(短期线,2)>95 ) AND 长期线>60 AND 短期线<83.5
AND 短期线<中期线 AND 短期线<长期线+4;
顶部:=FILTER(顶部区域,4);
底部区域:=(长期线<5 AND 中期线<8 AND 短期线<12 AND 长期线>REF(长期线,1) AND 中期线>REF(中期线,1)) OR (长期线<2 AND 中期线<3 AND 短期线=5);
底部:=FILTER(底部区域,4);
空头:=(长期线<中期线 AND 长期线<12 AND 中期线<16 AND 短期线<20) OR (长期线<8 AND 中期线<10 AND 短期线<7);
多头:=(长期线>REF(长期线,1) AND 中期线>REF(中期线,1) AND 短期线>REF(短期线,1) AND 长期线>中期线 AND 中期线>短期线);
STICKLINE(多头,0,5,6,0),COLORRED;
STICKLINE(空头,0,5,6,0),COLOR00FF00;
STICKLINE(底部,0,10,6,0),COLORYELLOW;
STICKLINE(顶部,0,10,6,0),COLORFF00FF;
DRAWICON(见顶,短期线,2);
DRAWICON(底部,短期线,1);
DRAWTEXT(控盘>REF(控盘,1) AND 控盘>0,控盘,'●'),COLORRED;
DRAWTEXT(控盘<REF(控盘,1) AND 控盘>0,控盘,'●'),COLOR00FF00;
DRAWTEXT(REF(控盘,1)<0 AND 控盘>0,控盘,'●'),COLORWHITE;
DRAWTEXT(REF(控盘,1)>0 AND 控盘<0,控盘,'●'),COLORWHITE;
DRAWTEXT(控盘<REF(控盘,1) AND 控盘<0,控盘,'●'),COLORWHITE;
DRAWTEXT(控盘>REF(控盘,1) AND 控盘<0,控盘,'●'),COLORWHITE;
DRAWTEXT(控盘>REF(控盘,1) AND 控盘>0,控盘,'●'),COLORRED;
DRAWTEXT(控盘<REF(控盘,1) AND 控盘>0,控盘,'●'),COLOR00FF00;
DRAWTEXT(REF(控盘,1)<0 AND 控盘>0,控盘,'●'),COLORWHITE;
DRAWTEXT(REF(控盘,1)>0 AND 控盘<0,控盘,'●'),COLORWHITE;
DRAWTEXT(控盘<REF(控盘,1) AND 控盘<0,控盘,'●'),COLORWHITE;
DRAWTEXT(控盘>REF(控盘,1) AND 控盘<0,控盘,'●'),COLORWHITE;
DRAWTEXT(控盘>REF(控盘,1) AND 控盘>0,控盘,'●'),COLORRED;
DRAWTEXT(控盘<REF(控盘,1) AND 控盘>0,控盘,'●'),COLOR00FF00;
DRAWTEXT(REF(控盘,1)<0 AND 控盘>0,控盘,'●'),COLORWHITE;
DRAWTEXT(REF(控盘,1)>0 AND 控盘<0,控盘,'●'),COLORWHITE;
DRAWTEXT(控盘<REF(控盘,1) AND 控盘<0,控盘,'●'),COLORWHITE;
DRAWTEXT(控盘>REF(控盘,1) AND 控盘<0,控盘,'●'),COLORWHITE;
DRAWTEXT(控盘>REF(控盘,1) AND 控盘>0,控盘,'●'),COLORRED;
