五何公式最牛通达信量化副图指标公式源码 (2)

2020年9月23日发(作者：梅兆荣)
最牛通达信量化副图指标公式源码
M1:=5;
M2:=10;
ZLCM:=EMA(WINNER(CLOSE)*70,3);{主力筹码估算}
SHC M:=EMA((WINNER(CLOSE*-WINNER(CLOSE*)*80,3)
;{小筹 码估算}
ZSHTL:=SHCM(ZLCM+SHCM)*100;{小股民套牢筹码比
率}
ZZLKP:=ZLCM(ZLCM+SHCM)*100;{主力控盘筹码比率}
ZCMZL:=MA(ZLCM+SHCM,13);{市场筹码总量}
ZZNTS:=BARSLAST(ZSHTL90);{走牛天数}
ZSHJJ:=EMA(ZSHTL,89);{小股民警戒}
ZZLJJ:=EMA(ZZLKP,89);{主力警戒}
ZJLRQD:=INTPART(ZZLKP-ZZLJJ);{资金流入强度}
SH8:=EMA(ZSHTL,8);
DKB:=IF(ZZLKP- REF(ZZLKP,1)>ZSHTL-REF(ZSHTL,1),1,0
);
{------【数值显示】}
散户套牢系数:INTPART(ZSHTL),NODRAW;
主力控盘系数:INTPART(ZZLKP),COLOR4080FF,NODRAW;
资金流入强度:ZJLRQD,NODRAW,COLOR00FFFF;
{☆精确风险}
{【参数定义】}
RSV:=(CLOSE- LLV(LOW,15))(HHV(HIGH,15)-LLV(LOW,1
5))*100;
K1:=SMA(RSV,10,1);
D1:=SMA(K1,5,1);
KK:=INTPART(K1);
DD0:=INTPART(D1);
TFXXS:=KK+DD0;{变异KD风险系数}
TGLD:=MOD(TFXXS,10);{踏浪涨停概率点}
TGLXS:=(TFXXS-REF(TFXXS,1))*10;{变异KD乖离系数}
TYCFX:=TFXXS+TGLXS;{变异KD预测风险}
乖离系数:TGLXS,LINETHICK0,COLORGREEN,NODRAW;
{【图解模板】}
{级别拐点}
{乖离系数}
STICKLINE(T GLXS>0,100,100+TGLXS,3,0),COLOR000088;
STICKLI NE(TGLXS>0,100,100+TGLXS,,0),COLOR000099;
STIC KLINE(TGLXS>0,100,100+TGLXS,2,0),COLOR0000A
A;
STICKLINE(TGLXS>0,100,100+TGLXS,,0),COLOR0000B B;
{STICKLINE(TGLXS>0,100,100+TGLXS,,0),COLOR0 000CC
;}
STICKLINE(TGLXS>0,100,100+TGLXS,,0 ),COLOR0000DD;
{STICKLINE(TGLXS>0,100,100+TGLX S,,0),COLOR0000EE
;}
STICKLINE(TGLXS>0,100, 100+TGLXS,,0),COLOR0000FF;{
红柱}
STICKLINE(T GLXS<0,100,100+TGLXS,3,0),COLOR008800;
{STICKL INE(TGLXS<0,100,100+TGLXS,,0),COLOR009900;
} STICKLINE(TGLXS<0,100,100+TGLXS,,0),COLOR00AA00;
STICKLINE(TGLXS<0,100,100+TGLXS,2,0),COLOR00BB 00
;
{STICKLINE(TGLXS<0,100,100+TGLXS,,0),C OLOR00CC00
;}
STICKLINE(TGLXS=0,100,100+TGLXS,8,0),COLORRED;
STICKLINE(TGLXS=0 AND REF(TGLXS,1)REF(ZCMZL,1)
AND DKB=0);
T3:=CONST( ZCMZL=REF(ZCMZL,1));
T4:=CONST( ZCMZL50 AND TFXXS=REF(TFXXS,1) AND
TFXXS>100);
T10:=CONST(TFXXS>50 AND TFXXS100 );
T11:=CONST(TFXXS>50 AND TFXXSREF(ZCMZL,1) );
T15:=CONST(CROSS(ZCMZL,ZZLKP) AND ZZLKP>ZZLJJ
AND ZZLKP10 AND ZZLJJ>REF(ZZLJJ,1) AND
ZCMZL>REF(ZCMZL,1) );
T16:=CONST( CROSS(ZCMZL,ZSHTL) AND
ZSHTL>ZZLKP AND ZCMZL>REF(ZCMZL,1));
T17:=CONST( CROSS(ZCMZL,100) AND
ZCMZL>REF(ZCMZL,1));
T18:=CONST(REF(ZSHTL,1)>90 AND ZSHTL<90 );
TS1:=IF(T1=1,0+,0);
TS2:=IF(T2=1,TS1+,TS1);
TS3:=IF(T3=1,TS2+,TS2);
TS4:=IF(T4=1,TS3+,TS3);
TS5:=IF(T5=1,TS4+,TS4);
TS6:=IF(T6=1,0+,0);
TS7:=IF(T7=1,TS6+,TS6);
TS8:=IF(T8=1,TS7+,TS7);
TS9:=IF(T9=1,TS8+,TS8);
TS10:=IF(T10=1,TS9+,TS9);
TS11:=IF(T11=1,TS10+,TS10);
TS12:=IF(T12,0+,0);
TS13:=IF(T13=1,TS12+,TS12);
TS14:=IF(T14=1,TS13+,TS13);
TS15:=IF(T15=1,TS14+,TS14);
TS16:=IF(T16=1,TS15+,TS15);
TS17:=IF(T17=1,TS16+,TS16);
TS18:=IF(T8=1,TS17+,TS17);
DRAWTEXT_FIX(T1 ,,TS1,0,'★监控：主力增仓
'),COLOR8080FF;
DRAWTEXT_ FIX(T2,,TS2,0,'★监控：主力减仓
'),COLORFFFF00;
DRA WTEXT_FIX(T3,,TS3,0,'★监控：多空平衡
'),COLORGRAY;
DRAWTEXT_FIX(T4,,TS4,0,'★监控：主力回补
'),COLORFF993 3;
DRAWTEXT_FIX(T5,,TS5,0,'★监控：主力出逃
'),COLO RFFFF00;
DRAWTEXT_FIX(T6,,TS6,0,'★操作：买入风险
' ),COLORYELLOW;
DRAWTEXT_FIX(T7,,TS7,0,'★操作：卖出风 险
'),COLORFFFF00;
DRAWTEXT_FIX(T8,,TS8,0,'★ 操作：追涨博弈
'),COLOR8080FF;
DRAWTEXT_FIX(T9,,TS 9,0,'★操作：稳健持股
'),COLOR8080FF;
DRAWTEXT_FIX( T10,,TS10,0,'★操作：盘跌减仓
'),COLORFFFF00;
DRAWT EXT_FIX(T11,,TS11,0,'★操作：杀跌空仓
'),COLORFFFF00;
DRAWTEXT_FIX(T12,,TS12,0,'☆特别提示：筑底散兵坑
'),COLOR66FFCC;
DRAWTEXT_FIX(T13,,TS13,0,' ☆特别提示：铸顶风险区
'),COLORFFFF00;
DRAWTEXT_FIX(T14,,TS14,0,'☆特别提示：穿越主力
'),COLOR8080FF;
DRAWTEXT_FIX(T15,,TS15,0,'☆特别提示：穿越主力
'),COLORYELLOW;
DRAWTEXT_FIX(T16,,TS16,0,'☆特别提示：穿越散户
'),COLORGREEN;
DRAWTEXT_FIX(T17,,TS17,0,'☆特别提示：全盘穿越
'),COLOR3399FF;
DRAWTEXT_FIX(T18,,TS18,0,'☆特别提示：神秘黑洞
'),COLOR9966FF;
{AAA:=REFDATE(HHV(H,30),DATE);
T1A:=CONST(IF(ZZNTS,1,0));
TS1A:=IF(T1A=1,0+,0);}
{DRAWTEXT(T1A=1 AND CURRBARSCOUNT=45 AND
PERIOD=5,AAA-(AAA*TS1A),' 【走牛天数判断】
'),COLORRED,LINETHICK6;}
{DRAWNUMBER(T1A=1 AND CURRBARSCOUNT=45-12
AND
PERIOD=5,AAA-(AAA*TS1A),CONST(ZZNTS)), COLORRE
D,LINETHICK6;};
三日最低:=EMA((REF(L,4)+REF(L,3)+REF(L,2))3,3); < br>三日最
高:=EMA((REF(H,4)+REF(H,3)+REF(H,2))3,3), COLORWHI
TE;
高:=CROSS(CROSS(三日最高,C),,STICK,COLORWHITE;
DRAWICON(高>0,高,2);
F:=100*(C-REF(C,1))REF(C,1);
博尔:=IF(C0,P1=0,1);
量:V,VOLSTICK;
PJJ:=DMA((((HIGH + LOW) + (CLOSE * 2)) 4),;
JJ:=REF(EMA(PJJ,3),1);
QJJ:=(VOL (((HIGH - LOW) * 2) - ABS((CLOSE - OPEN))));
XVL:=(IF((CLOSE > OPEN),(QJJ * (HIGH -
LOW)),IF((CLOSE OPEN)
,(0 - (QJJ * ((HIGH - CLOSE) + (OPEN - LOW)))),IF((CLOSE
10),10,ZLL);
HSL:=((XVL 20)
进攻流量:=(((HSL * + (REF(HSL,1) * ) + (REF(HSL,2) * );
GJJ:=EMA(进攻流量,8); LLJX:=EMA(进攻流量,3);
动态天
量:=CONST(IF(V=HHV(V, 20),V,REF(V,BARSLAST(V=HHV
(V,20))))),COLOR00FF 00,POINTDOT;
STICKLINE(((HSL * >= 0),动态天量+((HSL * +LLJX)*20,
动态天量,3,0),COLORYELLOW;
STICKLINE(((HSL *
0,(HSL*+LLJX),DRAWNULL),COLORRED;
资金流出:=IF ((HSL*+LLJX)0,资金流入,资金流
出),COLORWHITE,POINTDOT;
收支比例%:IF((HSL*+LLJX)>0,资金流入万元*100,资金流
出万元*1 00),COLORYELLOW;
连红天1:=BARSLASTCOUNT(资金净收
支 >0),,COLORA20FFD,NODRAW;
连红天2:=IF(连红天1=0,REF(连 红天1,1),连红天
1),,COLORA20FFD,NODRAW;
连红天3:=IF (连红天2=0,REF(连红天1,2),连红天
2),,COLORA20FFD,NODRAW;
连红天4:=IF(连红天3=0,REF(连红天1,3),连红天
3),,COLORA2 0FFD,NODRAW;
近期连红天:IF(连红天4=0,REF(连红天1,4),连红天4),COLORYELLOW,NODRAW;
三日资金:SUM(资金收支,3),COLORWHITE,NODRAW;
五日资金:SUM(资金收支,5),COLORFF00FF,NODRAW;
十日资金:SUM(资金收支,10),COLOR0000FF,NODRAW;
资金流量:=LLJX,LINETHICK0,COLOR0000FF;
STICKLINE((资金流量 > 0),动态天量+资金流量*20,动态天
量,3,0),COLOR0000FF;
STICKLINE((资金流量 < 0),动态天量+资金流量*20,动态天
量,3,0),COLOR008000;
万手:VOL10000,LINETHICK0;
BB:=VOL((HIGH- LOW)*2-ABS(CLOSE-OPEN));
TOTAL:=IF(PERIOD=1,5 ,IF(PERIOD=2,15,IF(PERIOD=3,30,
IF(PERIOD=4,60, IF(PERIOD=5,TOTALFZNUM,1)))));
MTIME:=MOD(FROMOPEN,TOTAL);
CTIME:=IF(MTIME<,TOTAL,MTIME);
VVOL:IF(CUR RBARSCOUNT=1,VOL*TOTALCTIME,DRA
WNULL),NODRAW;
STICKLINE(CURRBARSCOUNT=1,VVOL,0,-1,-1),COLOR0
0C0C0;
VOLUME:VOL,VOLSTICK;
MAVOL1:MA(VOLUME,M1),COLOR80FFFF,LINETHICK1;
MAVOL2:MA(VOLUME,M2),COLORFF00FF,LINETHICK1;
{变色彩带}
VAR1:=(2*CLOSE+HIGH+LOW)4;
操盘线:
(EMA(VAR1,2)+EMA(VAR1,3)+EMA(VAR1,5)+ EMA(VAR1,
8)+EMA(VAR1,11)+EMA(VAR1,13)),COLORFF FF00,LINET
HICK1,CIRCLEDOT;
IF(操盘线>REF(操盘线, 1),操盘
线,DRAWNULL),COLOR0000FF,LINETHICK1,CIRCLE DOT
;