m1:=5;m2:=10;
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);
{}
{//------【数值显示】}
散户套牢系数:intpart(zshtl),nodraw;
主力控盘系数:intpart(zzlkp),color4080ff,nodraw;
资金流入强度:zjlrqd,nodraw,color00ffff;
{☆精确风险}
{【参数定义】}
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);
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(tglxs>0,100,100+tglxs,3,0),color000088;
stickline(tglxs>0,100,100+tglxs,2.5,0),color000099;
stickline(tglxs>0,100,100+tglxs,2,0),color0000aa;
stickline(tglxs>0,100,100+tglxs,1.5,0),color0000bb;
{stickline(tglxs>0,100,100+tglxs,1.2,0),color0000cc;}
stickline(tglxs>0,100,100+tglxs,1.0,0),color0000dd;
{stickline(tglxs>0,100,100+tglxs,0.8,0),color0000ee;}
stickline(tglxs>0,100,100+tglxs,0.5,0),color0000ff;{//红柱}
stickline(tglxs<0,100,100+tglxs,3,0),color008800;
{stickline(tglxs<0,100,100+tglxs,2.8,0),color009900;}
stickline(tglxs<0,100,100+tglxs,2.5,0),color00aa00;
stickline(tglxs<0,100,100+tglxs,2,0),color00bb00;
{stickline(tglxs<0,100,100+tglxs,1.8,0),color00cc00;}
stickline(tglxs<0,100,100+tglxs,1.5,0),color00dd00;
{stickline(tglxs<0,100,100+tglxs,1.2,0),color00ee00;}
stickline(tglxs<0,100,100+tglxs,1,0),color00ff00;{//绿柱}
stickline(tglxs=0 and ref(tglxs,1)>=0,100,100+tglxs,8,0),colorred;
stickline(tglxs=0 and ref(tglxs,1)<0,100,100+tglxs,8,0),colorffffff;
{【数值显示】}
风险系数:tfxxs,linethick2,coloryellow,nodraw;
预测风险:tycfx,linethick1,colorffffff,nodraw;
t1:=const( zcmzl>ref(zcmzl,1) and dkb=1);
t2:=const( zcmzl>ref(zcmzl,1) and dkb=0);
t3:=const( zcmzl=ref(zcmzl,1));
t4:=const( zcmzl<ref(zcmzl,1) and dkb=1);
t5:=const( zcmzl<ref(zcmzl,1) and dkb=0);
t6:=const(tfxxs<=50 );
t7:=const(tfxxs>=160 );
t8:=const(tfxxs>50 and tfxxs<160 and tfxxs>=ref(tfxxs,1) and tfxxs<=100 );
t9:=const( tfxxs>50 and tfxxs<160 and tfxxs>=ref(tfxxs,1) and tfxxs>100);
t10:=const(tfxxs>50 and tfxxs<160 and tfxxs<ref(tfxxs,1) and tfxxs>100 );
t11:=const(tfxxs>50 and tfxxs<160 and tfxxs<ref(tfxxs,1) and tfxxs<=100 );
t12:=const( zshtl>90 );
t13:=const( zzlkp>75 );
t14:=const(cross(zcmzl,zzljj) and zzlkp>zzljj and zzlkp>10 and zzljj>ref(zzljj,1) and zcmzl>ref(zcmzl,1) );
t15:=const(cross(zcmzl,zzlkp) and zzlkp>zzljj and zzlkp<zshtl and zzlkp>10 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.03,0);
ts2:=if(t2=1,ts1+0.03,ts1);
ts3:=if(t3=1,ts2+0.03,ts2);
ts4:=if(t4=1,ts3+0.03,ts3);
ts5:=if(t5=1,ts4+0.03,ts4);
ts6:=if(t6=1,0+0.73,0);
ts7:=if(t7=1,ts6+0.03,ts6);
ts8:=if(t8=1,ts7+0.03,ts7);
ts9:=if(t9=1,ts8+0.03,ts8);
ts10:=if(t10=1,ts9+0.03,ts9);
ts11:=if(t11=1,ts10+0.03,ts10);
ts12:=if(t12,0+0.03,0);
ts13:=if(t13=1,ts12+0.03,ts12);
ts14:=if(t14=1,ts13+0.03,ts13);
ts15:=if(t15=1,ts14+0.03,ts14);
ts16:=if(t16=1,ts15+0.03,ts15);
ts17:=if(t17=1,ts16+0.03,ts16);
ts18:=if(t8=1,ts17+0.03,ts17);
三日最低:=ema((ref(l,4)+ref(l,3)+ref(l,2))/3,3);
三日最高:=ema((ref(h,4)+ref(h,3)+ref(h,2))/3,3),colorwhite;
高:=cross(cross(三日最高,c),0.6),stick,colorwhite;
drawicon(高>0,高,2);
f:=100*(c-ref(c,1))/ref(c,1);
博尔:=if(c<ref(o,1) and f<0,1,0);
p1:=博尔;{}
量化:=if(c<ref(o,2) and f<0,1,0);
p2:=量化;{}
p1=0 and ref(p1,1)=1 and p2=0 and ref(p2,1)=1,stick,colorff00ff,linethick1;
drawicon(p1=0>0,p1=0,1);
量:v,volstick;
pjj:=dma((((high + low) + (close * 2)) / 4),0.9);
jj:=ref(ema(pjj,3),1);
qjj:=(vol / (((high - low) * 2) - abs((close - open)))); xvl:=(if((close > open),(qjj * (high - low)),if((close < open),(qjj * ((high - open) + (close - low))),(vol / 2))) + if((close > open)
,(0 - (qjj * ((high - close) + (open - low)))),if((close < open),(0 - (qjj * (high - low))),(0 - (vol / 2)))));
zll:=(vol / capital);
hsl1:=if((zll > 10),10,zll);
hsl:=((xvl / 20) / 1.15);
进攻流量:=(((hsl * 0.55) + (ref(hsl,1) * 0.33)) + (ref(hsl,2) * 0.22));
gjj:=ema(进攻流量,8); lljx:=ema(进攻流量,3);
动态天量:=const(if(v=hhv(v,20),v,ref(v,barslast(v=hhv(v,20))))),color00ff00,pointdot;
stickline(((hsl * 0.4) >= 0),动态天量+((hsl * 0.4) +lljx)*20,动态天量,3,0),coloryellow;
stickline(((hsl * 0.4) < 0),动态天量+((hsl * 0.4) +lljx)*20,动态天量,3,0),color00ff00;
资金流入:=if((hsl*0.4+lljx)>0,(hsl*0.4+lljx),drawnull),colorred;
资金流出:=if((hsl*0.4+lljx)<0,(hsl*0.4+lljx),drawnull),color00ff00;
资金收支:=(hsl*0.4+lljx),linethick0;
万元:=amount/10000{0000},volstick,colorff00ff;
资金净收支:if((hsl*0.4+lljx)>0,资金流入,资金流出),colorwhite,pointdot;
收支比例%:if((hsl*0.4+lljx)>0,资金流入/万元*100,资金流出/万元*100),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),,colora20ffd,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;
万手:vol/10000,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<0.5,total,mtime);
vvol:if(currbarscount=1,vol*total/ctime,drawnull),nodraw;
stickline(currbarscount=1,vvol,0,-1,-1),color00c0c0;
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))/6.4,colorffff00,linethick1,circledot;
if(操盘线>ref(操盘线,1),操盘线,drawnull),color0000ff,linethick1,circledot;
drawtext_fix(t1,0.66,ts1,0,'★监控:主力增仓'),color8080ff;
drawtext_fix(t2,0.66,ts2,0,'★监控:主力减仓'),colorffff00;
drawtext_fix(t3,0.66,ts3,0,'★监控:多空平衡'),colorgray;
drawtext_fix(t4,0.66,ts4,0,'★监控:主力回补'),colorff9933;
drawtext_fix(t5,0.66,ts5,0,'★监控:主力出逃'),colorffff00;
drawtext_fix(t6,0.86,ts6,0,'★操作:买入风险'),coloryellow;
drawtext_fix(t7,0.86,ts7,0,'★操作:卖出风险'),colorffff00;
drawtext_fix(t8,0.86,ts8,0,'★操作:追涨博弈'),color8080ff;
drawtext_fix(t9,0.86,ts9,0,'★操作:稳健持股'),color8080ff;
drawtext_fix(t10,0.86,ts10,0,'★操作:盘跌减仓'),colorffff00;
drawtext_fix(t11,0.86,ts11,0,'★操作:杀跌空仓'),colorffff00;
drawtext_fix(t12,0.36,ts12,0,'☆特别提示:筑底散兵坑 '),color66ffcc;
drawtext_fix(t13,0.36,ts13,0,'☆特别提示:铸顶风险区'),colorffff00;
drawtext_fix(t14,0.36,ts14,0,'☆特别提示:穿越主力 '),color8080ff;
drawtext_fix(t15,0.36,ts15,0,'☆特别提示:穿越主力 '),coloryellow;
drawtext_fix(t16,0.36,ts16,0,'☆特别提示:穿越散户 '),colorgreen;
drawtext_fix(t17,0.36,ts17,0,'☆特别提示:全盘穿越 '),color3399ff;
drawtext_fix(t18,0.36,ts18,0,'☆特别提示:神秘黑洞 '),color9966ff;
上一指标公式:副图:macd顶底背离副图指标下载 通达信指标贴图
下一指标公式:被动止盈 通达信被动
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文量化 通达信量化仅供学习研究。