通达信主力控盘度

V1:=LLV(H,20); 
飞鱼:100*(C-V1)/V1,COLORRED,LINETHICK1; 
V2:=HHV(H,20); 
海洋:100*(V2-C)/C,COLORWHITE,LINETHICK1; 
V3:=SUM(VOL,5)/CAPITAL; 
CYF5:=100-(100/(1+V3));
DRAWICON(CROSS(飞鱼,海洋),海洋+0,1);
DRAWICON(CROSS(海洋,飞鱼),海洋+0,2);


{空转强}
买点准备: IF((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,50,0);
VAR18:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
VAR28:=SMA(ABS(LOW-VAR18),13,1)/SMA(MAX(LOW-VAR18,0),10,1);
VAR38:=EMA(VAR28,10);
VAR48:=LLV(LOW,33);
VAR58:=EMA(IF(LOW<=VAR48,VAR38,0),3);
主力进场8:STICKLINE(VAR58>REF(VAR58,1),0,VAR58,7,1 ),COLORRED;
洗盘8:STICKLINE(VAR58<REF(VAR58,1),0,VAR58,7,1),COLORGREEN;
VAR1:=EMA(EMA(CLOSE,9),9);
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;
STICKLINE(控盘<0,控盘,0,1,0),COLORWHITE;
A10:=CROSS(控盘,0);
无庄控盘:IF(控盘<0,控盘,0),COLORWHITE,NODRAW;
开始控盘:IF(A10,50,0),LINETHICK1,COLORYELLOW,LINETHICK1;
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORRED;
有庄控盘:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORRED,NODRAW;
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),COLORFF00FF,NODRAW;
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLOR00FF00;
主力出货:IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLOR00FF00,NODRAW;
VAR3:=AMOUNT/VOL/7;
VAR4:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
VAR7:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);
VAR8:=SMA(ABS(LOW-VAR7),13,1)/SMA(MAX(LOW-VAR7,0),20,1);
VAR9:=EMA(VAR8,10);
VAR10:=LLV(LOW,33);
VAR11:=EMA(IF(LOW<=VAR10,VAR9,0),3);
进场:IF(VAR11>REF(VAR11,1),VAR11,0),COLORBLUE,NODRAW;
STICKLINE(VAR11>REF(VAR11,1),0,VAR11,1,0 ),COLORBLUE;
洗盘:IF(VAR11<REF(VAR11,1),VAR11,0),COLORFFFF00,NODRAW;
STICKLINE(VAR11<REF(VAR11,1),0,VAR11,1,0),COLORFFFF00;

原理解析：
V1赋值:20日内H最低值

输出飞鱼:100*(C-V1)/V1,画红色,LINETHICK1

V2赋值:20日内H最高值

输出海洋:100*(V2-C)/C,画白色,LINETHICK1

V3赋值:5的成交量日累和/当前流通股本

CYF5赋值:100-(100/(1+V3))
DRAWICON(飞鱼上穿海洋,海洋+0,1)
DRAWICON(海洋上穿飞鱼,海洋+0,2)

输出{空转强}
买点准备: IF((3*SMA((收盘价-27日内最低价最低值)/(27日内最高价最高值-27日内最低价最低值)*100,5,1)-2*SMA(SMA((收盘价-27日内最低价最低值)/(27日内最高价最高值-27日内最低价最低值)*100,5,1),3,1))<=10,50,0)
VAR18赋值:REF((最低价+开盘价+收盘价+最高价)/4,1)
VAR28赋值:SMA(最低价-VAR18的绝对值,13,1)/SMA(最低价-VAR18和0较大值,10,1)
VAR38赋值:VAR28的10日指数移动平均
VAR48赋值:33日内最低价最低值
如果最低价<=VAR48返回VAR38否则返回0
输出主力进场8:STICKLINE(VAR58>1日前的VAR58,0,VAR58,7,1 ),画红色
输出洗盘8:STICKLINE(VAR58<1日前的VAR58,0,VAR58,7,1),画绿色
VAR1赋值:收盘价的9日指数移动平均,9)
控盘赋值:(VAR1-1日前的VAR1)/1日前的VAR1*1000
当满足条件控盘<0时,在控盘和0之间画柱状线
A10赋值:控盘上穿0
如果控盘<0返回控盘否则返回0
如果A10返回50否则返回0
STICKLINE(控盘>1日前的控盘 AND 控盘>0,控盘,0,1,0),画红色
有庄输出控盘:IF(控盘>1日前的控盘 AND 控盘>0,控盘,0),画红色,NODRAW
VAR2赋值:100*收盘价*0.95计算的获利盘比例
STICKLINE(VAR2>50 AND 获利盘为85%的成本分布<收盘价 AND 控盘>0,控盘,0,1,0),COLORFF00FF
高度输出控盘:IF(VAR2>50 AND 获利盘为85%的成本分布<收盘价 AND 控盘>0,控盘,0),COLORFF00FF,NODRAW
STICKLINE(控盘<1日前的控盘 AND 控盘>0,控盘,0,1,0),COLOR00FF00
输出主力出货:IF(控盘<1日前的控盘 AND 控盘>0,控盘,0),COLOR00FF00,NODRAW
VAR3赋值:成交额/成交量/7
VAR4赋值:(3*最高价+最低价+开盘价+2*收盘价)/7
VAR7赋值:REF((最低价+开盘价+收盘价+最高价)/4,1)
VAR8赋值:SMA(最低价-VAR7的绝对值,13,1)/SMA(最低价-VAR7和0较大值,20,1)
VAR9赋值:VAR8的10日指数移动平均
VAR10:=33日内最低价最低值
如果最低价<=VAR10返回VAR9否则返回0
输出进场:IF(VAR11>1日前的VAR11,VAR11,0), 画蓝色,NODRAW
STICKLINE(VAR11>1日前的VAR11,0,VAR11,1,0 ), 画蓝色
输出洗盘:IF(VAR11<1日前的VAR11,VAR11,0),COLORFFFF00,NODRAW
STICKLINE(VAR11<1日前的VAR11,0,VAR11,1,0),COLORFFFF00