通达信持仓增减指标公式源码

X_1:=1;
X_2:=(WINNER(CLOSE)-REF(WINNER(CLOSE),1))/REF(WINNER(CLOSE),1);
X_3:=vol/CAPITAL;
X_4:=X_2/X_3;
X_5:=1-WINNER(CLOSE);
X_6:=(X_5-REF(X_5,1))/REF(X_5,1);
X_7:=X_6/X_3;
机构筹码:SUM(IF(X_4=REF(X_4,1),0,X_4),0),NODRAW,COLORYELLOW;
X_8:=SUM(IF(X_7=REF(X_7,1),0,X_7),0);
昨天机构筹码:REF(机构筹码,1),NODRAW,COLORGREEN;
机构筹码增减:机构筹码-昨天机构筹码,NODRAW,COLORYELLOW;
散户筹码增减:X_8-REF(X_8,1),NODRAW,COLORCYAN;
X_9:=MIN(REF(机构筹码,1),REF(机构筹码,2));
X_10:=MIN(REF(机构筹码,3),REF(机构筹码,4));
X_11:=MIN(REF(机构筹码,5),REF(机构筹码,6));
X_12:=MIN(REF(机构筹码,7),REF(机构筹码,8));
X_13:=MIN(REF(机构筹码,9),REF(机构筹码,10));
X_14:=MIN(REF(机构筹码,11),REF(机构筹码,12));
X_15:=MIN(REF(机构筹码,13),REF(机构筹码,14));
X_16:=MIN(REF(机构筹码,15),REF(机构筹码,16));
X_17:=MIN(MIN(X_9,X_10),MIN(X_11,X_12));
X_18:=MIN(MIN(X_13,X_14),MIN(X_15,X_16));
X_19:=MIN(X_17,X_18);
X_20:=X_19*X_1;
STICKLINE(机构筹码>X_20,REF(机构筹码,1),机构筹码,3,0),COLOR005555;
STICKLINE(机构筹码>X_20,REF(机构筹码,1),机构筹码,2,0),COLOR007777;
STICKLINE(机构筹码>X_20,REF(机构筹码,1),机构筹码,1,0),COLOR009999;
STICKLINE(机构筹码>X_20,REF(机构筹码,1),机构筹码,0,0),COLOR00CCCC;
STICKLINE(机构筹码<=X_20,REF(机构筹码,1),机构筹码,3,0),COLOR005500;
STICKLINE(机构筹码<=X_20,REF(机构筹码,1),机构筹码,2,0),COLOR007700;
STICKLINE(机构筹码<=X_20,REF(机构筹码,1),机构筹码,1,0),COLOR009900;
STICKLINE(机构筹码<=X_20,REF(机构筹码,1),机构筹码,0,0),COLOR00CC00;
STICKLINE(机构筹码<REF(机构筹码,1) AND 机构筹码<=X_20,REF(机构筹码,1),机构筹码,3,0),COLOR555500;
STICKLINE(机构筹码<REF(机构筹码,1) AND 机构筹码<=X_20,REF(机构筹码,1),机构筹码,2,0),COLOR777700;
STICKLINE(机构筹码<REF(机构筹码,1) AND 机构筹码<=X_20,REF(机构筹码,1),机构筹码,1,0),COLOR999900;
STICKLINE(机构筹码<REF(机构筹码,1) AND 机构筹码<=X_20,REF(机构筹码,1),机构筹码,0,0),COLORCCCC00;
X_21:=MAX(REF(机构筹码,1),REF(机构筹码,2));
X_22:=MAX(REF(机构筹码,3),REF(机构筹码,4));
X_23:=MAX(REF(机构筹码,5),REF(机构筹码,6));
X_24:=MAX(REF(机构筹码,7),REF(机构筹码,8));
X_25:=MAX(REF(机构筹码,9),REF(机构筹码,10));
X_26:=MAX(REF(机构筹码,11),REF(机构筹码,12));
X_27:=MAX(REF(机构筹码,13),REF(机构筹码,14));
X_28:=MAX(REF(机构筹码,15),REF(机构筹码,16));
X_29:=MAX(MIN(X_21,X_22),MIN(X_23,X_24));
X_30:=MAX(MIN(X_25,X_26),MIN(X_27,X_28));
X_31:=MAX(X_29,X_30);
X_32:=X_31*X_1;
STICKLINE(机构筹码>=X_32,机构筹码,REF(机构筹码,1),2.6,0),COLOR990099;
STICKLINE(机构筹码>=X_32,机构筹码,REF(机构筹码,1),2,0),COLORAA00AA;
STICKLINE(机构筹码>=X_32,机构筹码,REF(机构筹码,1),1,0),COLORDD00DD;
STICKLINE(机构筹码>=X_32,机构筹码,REF(机构筹码,1),0,0),COLORFF33DD;
STICKLINE(机构筹码>=REF(机构筹码,1) AND 机构筹码>=X_32,机构筹码,REF(机构筹码,1),2.6,0),COLOR000099;
STICKLINE(机构筹码>=REF(机构筹码,1) AND 机构筹码>=X_32,机构筹码,REF(机构筹码,1),2,0),COLOR0000AA;
STICKLINE(机构筹码>=REF(机构筹码,1) AND 机构筹码>=X_32,机构筹码,REF(机构筹码,1),1,0),COLOR0000DD;
STICKLINE(机构筹码>=REF(机构筹码,1) AND 机构筹码>=X_32,机构筹码,REF(机构筹码,1),0,0),COLORAA33DD;
DRAWTEXT_FIX(1,0,0,0,'青芯-机构低位深度洗盘或高位出货坚决'),COLORCYAN;
DRAWTEXT_FIX(1,0,0.06,0,'绿芯-机构在做高抛低吸或低吸高抛'),COLORGREEN;
DRAWTEXT_FIX(1,0,0.12,0,'黄芯-机构洗盘'),COLORYELLOW;
DRAWTEXT_FIX(1,0,0.18,0,'粉芯-机构吸筹进货'),COLORMAGENTA;
DRAWTEXT_FIX(1,0,0.24,0,'红芯-机构吸筹进货积极主动'),COLORRED;