通达信主力资金副图指标源码
该公式包含两大功能模块：
1. 筹码与资金分析：通过计算散户套牢系数、主力控盘系数、资金流入强度，判断主力与散户的筹码分布及资金动向。
2. 风险与乖离指标：基于KDJ变种计算风险系数、预测风险、乖离系数，并用彩色柱状线显示乖离方向与强度。
使用方法：观察散户套牢系数与主力控盘系数的数值及交叉，判断主力控盘程度；结合乖离系数柱状线的颜色（蓝涨、绿跌）和风险系数趋势，辅助判断买卖时机。
ZLCM:=EMA(WINNER(CLOSE)*70,3);
SHCM:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,3);
ZSHTL:=SHCM/(ZLCM+SHCM)*100;
ZZLKP:=ZLCM/(ZLCM+SHCM)*100;
ZCMZL:=MA(ZLCM+SHCM,13);
ZZNTS:=BARSLAST(ZSHTL<90 AND REF(ZSHTL,1)>90);
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);
STICKLINE(REF(ZSHTL,1)>90 AND ZSHTL<90,ZSHTL,0,4,0),COLOR9966FF;
STICKLINE(C>0,ZSHTL,ZZLKP,0,0),COLOREEEEEE;
STICKLINE(ZSHJJ>REF(ZSHJJ,1),ZSHTL,ZSHJJ,1,0),COLORAAAAAA;
STICKLINE(C>0,ZZLKP,0,3,0),COLORBLUE;
STICKLINE(ZZLKP>75,ZZLKP,0,3,0),COLORFFFFFF;
STICKLINE(ZZLJJ>REF(ZZLJJ,1),ZZLKP,ZZLJJ,3,0),COLORRED;
STICKLINE(ZSHTL>=90,ZZLKP,0,3,0),COLORYELLOW;
散户套牢系数:INTPART(ZSHTL),NODRAW;
主力控盘系数:INTPART(ZZLKP),COLORCYAN,NODRAW;
资金流入强度:ZJLRQD,NODRAW;
RSV:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
K1:=SMA(RSV,10,1);
D1:=SMA(K1,5,1);
KK:=INTPART(K1);
DD:=INTPART(D1);
TFXXS:=KK+DD;
TGLD:=MOD(TFXXS,10);
TGLXS:=(TFXXS-REF(TFXXS,1))*10;
TYCFX:=TFXXS+TGLXS;
乖离系数:TGLXS,NODRAW,COLORGREEN;
STICKLINE(TGLXS>0,150,150+TGLXS,3,0),COLOR000088;
STICKLINE(TGLXS>0,150,150+TGLXS,2.5,0),COLOR000099;
STICKLINE(TGLXS>0,150,150+TGLXS,2,0),COLOR0000AA;
STICKLINE(TGLXS>0,150,150+TGLXS,1.5,0),COLOR0000BB;
STICKLINE(TGLXS>0,150,150+TGLXS,1.0,0),COLOR0000DD;
STICKLINE(TGLXS>0,150,150+TGLXS,0.5,0),COLOR0000FF;
STICKLINE(TGLXS<0,150,150+TGLXS,3,0),COLOR008800;
STICKLINE(TGLXS<0,150,150+TGLXS,2.5,0),COLOR00AA00;
STICKLINE(TGLXS<0,150,150+TGLXS,2,0),COLOR00BB00;
STICKLINE(TGLXS<0,150,150+TGLXS,1.5,0),COLOR00DD00;
STICKLINE(TGLXS<0,150,150+TGLXS,1,0),COLOR00FF00;
STICKLINE(TGLXS=0 AND REF(TGLXS,1)>=0,150,150+TGLXS,8,0),COLORRED;
STICKLINE(TGLXS=0 AND REF(TGLXS,1)<0,150,150+TGLXS,8,0),COLORGREEN;
风险系数:TFXXS,LINETHICK2,COLORYELLOW;
预测风险:TYCFX,LINETHICK1,COLORCYAN;
市场筹码总量:ZCMZL,COLORGREEN,LINETHICK1;
上市:FINANCE(42)/10000,NODRAW,COLORYELLOW;
STICKLINE(TGLXS>0 AND 100+TGLXS<TYCFX AND 100+REF(TGLXS,1)>=REF(TYCFX,1),0,(100+ABS(TGLXS)),0,0),COLORYELLOW;
STICKLINE(TGLXS<0 AND 100+TGLXS>=TYCFX AND 100+REF(TGLXS,1)<REF(TYCFX,1),0,(100+ABS(TGLXS)),0,0),COLORYELLOW;
来函数检测结果如下：
该公式包含未来函数:WINNER
该公式包含未来函数:FINANCE
定制、编写指标公式请联系QQ或微信同号：88652583
ZLCM赋值:以收盘价计算的获利盘比例*70的3日指数移动平均
SHCM赋值:(以收盘价*1.1计算的获利盘比例-以收盘价*0.9计算的获利盘比例)*80的3日指数移动平均
ZSHTL赋值:SHCM/(ZLCM+SHCM)*100
ZZLKP赋值:ZLCM/(ZLCM+SHCM)*100
ZCMZL赋值:ZLCM+SHCM的13日简单移动平均
ZZNTS赋值:上次ZSHTL<90ANDREF(ZSHTL,1)>90距今天数
ZSHJJ赋值:ZSHTL的89日指数移动平均
ZZLJJ赋值:ZZLKP的89日指数移动平均
ZJLRQD赋值:ZZLKP-ZZLJJ的整数部分
SH8赋值:ZSHTL的8日指数移动平均
DKB赋值:如果ZZLKP-1日前的ZZLKP>ZSHTL-1日前的ZSHTL,返回1,否则返回0
当满足条件1日前的ZSHTL>90ANDZSHTL<90时,在ZSHTL和0位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR9966FF
当满足条件收盘价>0时,在ZSHTL和ZZLKP位置之间画柱状线,宽度为0,0不为0则画空心柱.,COLOREEEEEE
当满足条件ZSHJJ>1日前的ZSHJJ时,在ZSHTL和ZSHJJ位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLORAAAAAA
当满足条件收盘价>0时,在ZZLKP和0位置之间画柱状线,宽度为3,0不为0则画空心柱.,画蓝色
当满足条件ZZLKP>75时,在ZZLKP和0位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFFFFFF
当满足条件ZZLJJ>1日前的ZZLJJ时,在ZZLKP和ZZLJJ位置之间画柱状线,宽度为3,0不为0则画空心柱.,画红色
当满足条件ZSHTL>=90时,在ZZLKP和0位置之间画柱状线,宽度为3,0不为0则画空心柱.,画黄色
输出散户套牢系数:ZSHTL的整数部分,NODRAW
输出主力控盘系数:ZZLKP的整数部分,画青色,NODRAW
输出资金流入强度:ZJLRQD,NODRAW
RSV赋值:(收盘价-15日内最低价的最低值)/(15日内最高价的最高值-15日内最低价的最低值)*100
K1赋值:RSV的10日[1日权重]移动平均
D1赋值:K1的5日[1日权重]移动平均
KK赋值:K1的整数部分
DD赋值:D1的整数部分
TFXXS赋值:KK+DD
TGLD赋值:TFXXS关于10的模
TGLXS赋值:(TFXXS-1日前的TFXXS)*10
TYCFX赋值:TFXXS+TGLXS
输出乖离系数:TGLXS,NODRAW,画绿色
当满足条件TGLXS>0时,在150和150+TGLXS位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR000088
当满足条件TGLXS>0时,在150和150+TGLXS位置之间画柱状线,宽度为2.5,0不为0则画空心柱.,COLOR000099
当满足条件TGLXS>0时,在150和150+TGLXS位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR0000AA
当满足条件TGLXS>0时,在150和150+TGLXS位置之间画柱状线,宽度为1.5,0不为0则画空心柱.,COLOR0000BB
当满足条件TGLXS>0时,在150和150+TGLXS位置之间画柱状线,宽度为1.0,0不为0则画空心柱.,COLOR0000DD
当满足条件TGLXS>0时,在150和150+TGLXS位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR0000FF
当满足条件TGLXS<0时,在150和150+TGLXS位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR008800
当满足条件TGLXS<0时,在150和150+TGLXS位置之间画柱状线,宽度为2.5,0不为0则画空心柱.,COLOR00AA00
当满足条件TGLXS<0时,在150和150+TGLXS位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00BB00
当满足条件TGLXS<0时,在150和150+TGLXS位置之间画柱状线,宽度为1.5,0不为0则画空心柱.,COLOR00DD00
当满足条件TGLXS<0时,在150和150+TGLXS位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR00FF00
当满足条件TGLXS=0ANDREF(TGLXS,1)>=0时,在150和150+TGLXS位置之间画柱状线,宽度为8,0不为0则画空心柱.,画红色
当满足条件TGLXS=0ANDREF(TGLXS,1)<0时,在150和150+TGLXS位置之间画柱状线,宽度为8,0不为0则画空心柱.,画绿色
输出风险系数:TFXXS,线宽为2,画黄色
输出预测风险:TYCFX,线宽为1,画青色
输出市场筹码总量:ZCMZL,画绿色,线宽为1
输出上市:上市的天数/10000,NODRAW,画黄色
当满足条件TGLXS>0AND100+TGLXS=1日前的TYCFX时,在0和(100+TGLXS的绝对值)位置之间画柱状线,宽度为0,0不为0则画空心柱.,画黄色
当满足条件TGLXS<0AND100+TGLXS>=TYCFXAND100+1日前的TGLXS<1日前的TYCFX时,在0和(100+TGLXS的绝对值)位置之间画柱状线,宽度为0,0不为0则画空心柱.,画黄色
