根据横刀立马改编的，将原来大智慧分时指标跟庄和主力扫盘制作成选股和预警，方便大家选股了，并把分时图中原来红字的“有庄”改成白色字体，便于辨认
{分时跟庄}
N:=5;
VAR1:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),N);
VAR2:=HIGH-REF(HIGH,1);
VAR3:=REF(LOW,1)-LOW;
VAR4:=SUM(IF(VAR2>0 AND VAR2>VAR3,VAR2,0),N);
VAR5:=SUM(IF(VAR3>0 AND VAR3>VAR2,VAR3,0),N);
VAR6:=VAR4*100/VAR1;
VAR7:=VAR5*100/VAR1;
VAR8:=MA(ABS(VAR7-VAR6)/(VAR7+VAR6)*100,3);
VAR9:=(VAR8+REF(VAR8,1))/2;
A:=VAR6>VAR7 AND VAR6>25 AND VAR7<25;
B:=VAR7>VAR6 AND VAR7>25 AND VAR6<25;
STICKLINE(A,0,VAR6,2,0),COLORRED;
STICKLINE(B,0,VAR7,2,0),COLORGREEN;
跟庄:IF(A,VAR6,IF(B,VAR7,0)),NODRAW;
DRAWTEXT(A,VAR6*1.02,'跟庄'),COLORRED;
DRAWTEXT(B,VAR7*1.02,'洗盘'),COLORGREEN;
{主力扫盘}
VAR11:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
主买:=IF(CLOSE>OPEN,VAR11*(HIGH-LOW),IF(CLOSE<OPEN,VAR11*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
主卖:=IF(CLOSE>OPEN,0-VAR11*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR11*(HIGH-LOW),0-VOL/2));
净流入:=主买+主卖;
扫盘:净流入>REF(净流入,1)*2 AND 净流入>0,NODRAW;
STICKLINE(扫盘,0,净流入,2,0),COLORYELLOW;
DRAWTEXT(扫盘,净流入*1.02,'扫盘'),COLORYELLOW;
