ls3:=llv(high,240);
ls4:=100*(close-ls3)/ls3;
ls5:=ref(llv(close,480),1);
ls6:=ref(hhv(close,480),1);
ls7:=100*(close-ls5)/(ls6-ls5);ls8:=(close-llv(close,981))/(hhv(close,981)-llv(close,981))*100;
ls9:=(close-llv(close,393))/(hhv(close,393)-llv(close,393))*100;
lsa:=(close-llv(low,981))/(hhv(high,981)-llv(low,981))*100;
lsb:=(close-llv(low,393))/(hhv(high,393)-llv(low,393))*100;
lsc1:=ema(100*(close-llv(low,100))/(hhv(high,100)-llv(low,100)),5);
lsc:=lsc1/4;
lsd:=if(lsc>23.6,lsc,0);
lse:=lsc<1;
lsf:=lsd;
ls10:=ls4<ls7 and ls4<0;
ls11:=1;
ls12:=(high+low+close*2)/4*ls11;
ls13:=ema(ls12,21);
ls14:=std(ls12,21);
ls15:=((ls12-ls13)/ls14*100+200)/4*ls11;
ls161:=ema(ls15,89);
ls16:=(ls161-25)*1.56*ls11;
ls171:=ema(ls16,5);
ls17:=ls171*1.22*ls11;
ls181:=ema(ls17,3);
ls18:=ls181*ls11;
ls19:=3*ls17-2*ls18*ls11;
ls1a:=if(cross(ls19,ls17)and cross(ls19,ls18)and cross(ls17,ls18),1,0);
ls1b:=if(cross(ls17,ls19)and cross(ls18,ls19)and cross(ls18,ls17),1,0);
ls1c:=ema(100*(close-llv(low,100))/(hhv(high,100)-llv(low,100)),13)/4;
ls1d1:=ema(close,2);
ls1d2:=ema(close,89);
ls1d:=ls1d1-ls1d2;
ls1e:=ema(ls1d,30);
ls1f:=(ls1d-ls1e)*20;
ls20:=pow(ls1f,3)*0.1+pow(ls1f,2);
ls21:=sqrt(sqrt(low*high*open*close));
ls22:=ema(ls21*0.97,3);
ls23:=(high+low+close)/3;
ls24:=(ls23-ma(ls23,14))/(0.015*avedev(ls23,14));
ls25:=if(ls1f>0.015,ls20,0)/45;
ls26:=if(ls1f<0.015,ls20,0)/45;
庄拉:(ls25+ls26)/2,coloryellow;
var1ff:= 1;
var3ff:= llv(high,240);
var4ff:= 100*(close-var3ff)/var3ff*var1ff;
var5ff:= ref(llv(close,480),1)*var1ff;
var6ff:= ref(hhv(close,480),1)*var1ff;
var7ff:= 100*(close-var5ff)/(var6ff-var5ff)*var1ff;
var8ff:= (close-llv(close,981))/(hhv(close,981)-llv(close,981))*100*var1ff;
var9ff:= (close-llv(close,393))/(hhv(close,393)-llv(close,393))*100*var1ff;
vara:= (close-llv(low,981))/(hhv(high,981)-llv(low,981))*100*var1ff;
varb:= (close-llv(low,393))/(hhv(high,393)-llv(low,393))*100*var1ff;
varc:= ema(100*(close-llv(low,100))/(hhv(high,100)-llv(low,100)),5)/4*var1ff;
vard:= if(varc>23.16,varc,0)*var1ff;
vare:= varc<1*var1ff;
varf:= vard*var1ff;
var10ff:= var4ff<0 and var7ff<0;
var11ff:= 1;
var12ff:= (high+low+close*2)/4*var11ff;
var13ff:= ema(var12ff,21);
var14ff:= std(var12ff,21);
var15ff:= ((var12ff-var13ff)/var14ff*100+200)/4*var11ff;
var16ff:= (ema(var15ff,89)-25)*1.56*var11ff;
var17ff:= ema(var16ff,5)*1.22*var11ff;
var18ff:= ema(var17ff,3)*var11ff;
var19ff:= 3*var17ff-2*var18ff*var11ff;
var1a:= if(cross(var19ff,var17ff) and cross(var19ff,var18ff) and cross(var17ff,var18ff),1,0);
var1b:= if(cross(var17ff,var19ff) and cross(var18ff,var19ff) and cross(var18ff,var17ff),1,0);
var1c:= ema(100*(close-llv(low,100))/(hhv(high,100)-llv(low,100)),13)/4*var1ff;
var1d:= ema(close,2)-ema(close,89)*var1ff;
var1e:= ema(var1d,30)*var1ff;
var1f:= 2*(var1d-var1e)*10*var1ff;
var20ff:= pow(var1f,3)*0.1+pow(var1f,2)*var1ff;
var21ff:= sqrt(sqrt(low*high*open*close));
var22ff:= ema(var21ff*0.97,3)*var1ff;
var23ff:= (high+low+close)/3*var1ff;
var24ff:= (var23ff-ma(var23ff,14))/(0.015*avedev(var23ff,14))*var1ff;
var25ff:= if(year<2009 and var1f>0.015,var20ff,0)/45*var1ff;
拉资: var25ff,linethick7,color0000ff,pointdot;
var26ff:= ema(close,2)-ema(close,150);
var27ff:= ema(var26ff,100);
var28ff:= 2*(var26ff-var27ff);
var29ff:= pow(var28ff,3)*0.1+pow(var28ff,1);
var2a:= sqrt(sqrt(low*high*open*close));
var2b:= ema(var2a*0.97,3);
var2c:= (high+low+close)/3;
var2d:= (var2c-ma(var2c,14))/(0.015*avedev(var2c,14));
主资: if(var28ff>0.1,var29ff,0)*5,linethick1,colorffffff,pointdot;
pjjqtr:=dma((h + l + c * 2) / 4,0.9);
jjqtr:=ref(ema(pjjqtr,3),1);
qjjqtr:=vol / ((h - l) * 2 - abs(c - o));
xvlqtr:=if(c > o,qjjqtr * (h - l),if(c < o,qjjqtr * (h - o + (c - l)),vol / 2)) + if(c > o,0 - qjjqtr * (h - c + (o - l)),if(c < o,0 - qjjqtr * (h - l),0 - vol / 2));
zllqtr:=vol / capital;
hsl1qtr:=if(zllqtr > 10,10,zllqtr);
hslqtr:=xvlqtr / 20 / 1.15;
攻击流量a:=hslqtr * 0.55 + ref(hslqtr,1) * 0.33 + ref(hslqtr,2) * 0.22;
gjja:=ema(攻击流量a,8);
输出a:=gjja*1000;
pjj:=dma((h + l + c * 2) / 4,0.9);
jj:=ref(ema(pjj,3),1);
qjj:=vol / ((h - l) * 2 - abs(c - o));
xvl:=if(c > o,qjj * (h - l),if(c < o,qjj * (h - o + (c - l)),vol / 2)) + if(c > o,0 - qjj * (h - c + (o - l)),if(c < o,0 - qjj * (h - l),0 - vol / 2));
zll:=vol / capital;
hsl1:=if(zll > 10,10,zll);
hsl:=xvl / 20 / 1.15;力度:hsl / 1000,color9b37ff;
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(zzlkp),linethick0,colorcyan;
流强:zjlrqd,linethick0,colorred;量能度lll:=(close-ma(close,30))/ma(close,20)*120;
机构:ema(ema(量能度lll,30),3)*20,colorred,linethick2;
主流:ema(100*(c-llv(low,34))/(hhv(h,34)-llv(low,34)),3),colorred,pointdot;
非主流:ema(100*(indexc-llv(indexl,34))/(hhv(indexh,34)-llv(indexl,34)),3),
colorgreen,pointdot;
市场筹码总量:intpart(zcmzl),linethick0,colorgreen;
散户套牢系数:intpart(zshtl),linethick0,colorwhite;
tjts:=barstatus=2;
{主力动向监控}
drawtext(tjts and zcmzl>ref(zcmzl,1) and dkb=1,输出a*1.525,'主力动向监控:主力增仓 '),colorred,align2;
drawtext(tjts and zcmzl>ref(zcmzl,1) and dkb=0,输出a*1.525,'主力动向监控:主力减仓 '),colormagenta,align2;
drawtext(tjts and zcmzl=ref(zcmzl,1),输出a*1.525,'主力动向监控:多空平衡 '),colorgray,align2;
drawtext(tjts and zcmzl<ref(zcmzl,1) and dkb=1,输出a*1.525,'主力动向监控:主力回补 '),colorff9933,align2;
drawtext(tjts and zcmzl<ref(zcmzl,1) and dkb=0,输出a*1.525,'主力动向监控:主力出逃 '),colorgreen,align2;
{特别信号提示}
drawtext(tjts and zshtl>90, 输出a*1.8,'特别信号提示:筑底散兵坑 '),color66ffcc,align2;
drawtext(tjts and zzlkp>75, 输出a*1.8,'特别信号提示:铸顶风险区 '),colorcyan,align2;
drawtext(tjts and cross(zcmzl,zzljj) and zzlkp>zzljj and zzlkp>10 and zzljj>ref(zzljj,1) and zcmzl>ref(zcmzl,1), 输出a*1.8525,'特别信号提示:穿越主力 '),colorred,align2;
drawtext(tjts and cross(zcmzl,zzlkp) and zzlkp>zzljj and zzlkp<zshtl and zzlkp>10 and zzljj>ref(zzljj,1) and zcmzl>ref(zcmzl,1), 输出a*1.8,'特别信号提示:穿越主力 '),coloryellow,align2;
drawtext(tjts and cross(zcmzl,zshtl) and zshtl>zzlkp and zcmzl>ref(zcmzl,1), 输出a*1.8,'特别信号提示:穿越散户 '),colorgreen,align2;
drawtext(tjts and cross(zcmzl,100) and zcmzl>ref(zcmzl,1), 输出a*1.8,'特别信号提示:全盘穿越 '),color3399ff,align2;
drawtext(tjts and ref(zshtl,1)>90 and zshtl<90, 输出a*1.8,'特别信号提示:神秘黑洞 '),color9966ff,align2;
{☆精确风险}
{//------【参数定义】}
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;{//变异kd风险系数}
tgld:=mod(tfxxs,10);{//踏浪涨停概率点}
tglxs:=(tfxxs-ref(tfxxs,1))*10;{//变异kd乖离系数}
tycfx:=tfxxs+tglxs;{//变异kd预测风险}
drawtext(barstatus=2 and tfxxs<=50, 输出a*1.8525,'操作风险提示:买入风险'),coloryellow,align2;
drawtext(barstatus=2 and tfxxs>=160, 输出a*1.8525,'操作风险提示:卖出风险'),colorcyan,align2;
drawtext(barstatus=2 and tfxxs>50 and tfxxs<160 and tfxxs>=ref(tfxxs,1) and tfxxs<=100, 输出a*1.8525,'操作风险提示:追涨博弈'),colorred,align2;
drawtext(barstatus=2 and tfxxs>50 and tfxxs<160 and tfxxs>=ref(tfxxs,1) and tfxxs>100, 输出a*1.8525,'操作风险提示:稳健持股'),colormagenta,align2;
drawtext(barstatus=2 and tfxxs>50 and tfxxs<160 and tfxxs<ref(tfxxs,1) and tfxxs>100, 输出a*1.8525,'操作风险提示:盘跌减仓'),colorwhite,align2;
drawtext(barstatus=2 and tfxxs>50 and tfxxs<160 and tfxxs<ref(tfxxs,1) and tfxxs<=100, 输出a*1.8525,'操作风险提示:杀跌空仓'),colorgreen,align2;
攻击流量:=hsl * 0.55 + ref(hsl,1) * 0.33 + ref(hsl,2) * 0.22;
gjj:=ema(攻击流量,8);
lljx:=ema(攻击流量,3);
流量:lljx,colorc875b7;
stickline(流量 > 0,流量*1000,0,4,0),color0000ff;
stickline(流量 < 0,流量*1000,0,4,0),colorff4242;
流量基线:gjj,color00bbbb;
zjll:=ref(lljx,1);
qzjj:=(((lljx - zjll) / zjll) * 100);
stickline(hsl * 0.4 >= 0,hsl * 0.4 * 1.5*1000,0,0,1),coloryellow;
stickline(hsl * 0.4 < 0,hsl * 0.4 * 1.5*1000,0,0,1),color95ff95;
zjll:=ref(lljx,1);
qzjj:=(((lljx - zjll) / zjll) * 100);
流量幅:if(((lljx > 0) and (zjll < 0)),abs(qzjj),if((((lljx < 0) and (zjll < 0)) and (lljx < zjll)),(0 - qzjj),qzjj)),colorwhite;
周流量:sum(lljx,5),colorffbfdf;
bb:=ref(周流量,1);
zqzjj:=(周流量-bb)/bb*100;
输出:gjj*1000,color00bbbb,linethick1;
资金流量:lljx,linethick0,precis1,color0000ff;
周增幅:if(((周流量 > 0) and (bb < 0)),abs(zqzjj),if((((周流量 < 0) and (bb < 0)) and (周流量 < bb)),(0 - zqzjj),zqzjj)),linethick0,color00ff00;
p3:=(bigorder(1)-bigorder(2))*vol;
ddx:=p3/capital*100;
ddx1:=sum(ddx,0);
ddxa2:=ddx>0.1;
ddxa2:=ddx>0.4;
资金流量d:=(ref(资金流量,0)) > 15 and (ref(资金流量,1))<-10 ;
红:资金流量d=1,color00ff00,linethick0;
星:资金流量d=1 and ddxa2=1,color00ff00,linethick0;
攻击:=(hsl * 0.4) * 1.5;
攻:=((ref(资金流量,1) >10) and (ref(资金流量,1) <800) and (ref(攻击,1) <-1000) ) and ((资金流量>100 and 攻击>1000));
杀:周增幅>资金流量*3 and 资金流量>100 and ddxa2=1;
跌幅:(c/ref(c,1)-1)*100;
停:=跌幅>9;
drawtext(攻=1 ,l*40 , '攻'),color00ff00,align1;
drawtext(红=1 ,l*40 , '¤'),color00ff00,linethick1,align1;
drawtext(星=1 ,l*40 , '★'),color00ff00,linethick5,align1;
drawtext(杀=1 ,l*40 , '杀'),color00ff00,align1;
aae:= winner(close+close*15/100)*100;
bbe:= winner(close+close*0/100)*100;
cce:= aae-bbe;
dde:= (winner(close-close*0.1/100)-winner(close-close*15/100))*100;
eee:= cce<3 and dde<0.5 ;
ae1:= dynainfo(6);
ae2:= if(low>ae1,0,if(high<ae1,1,(ae1-low+0.01)/(high-low+0.01)));
ae3:= vol/winner(low);
ae4:= ref(hhv(close,120),1);
ae5:= ref(llv(close,120),1);
ae6:= 100*(close-ae5)/(ae4-ae5);
ae7:= ae2>0 or ae2=1;
ae8:= ae7 and ae3/ref(ae3,3)>=3 and ae6<80;
ae9:= ref(ae8,1) or ref(ae8,2) or ref(ae8,3) or ref(ae8,4);
ae10:= ae8 and ae9;
ae11:= if(filter(ae8,3),5,0);
ae12:= filter(if(filter(ae10,3) or eee,10,0),3);
drawtext(ae12, 输出*0.9,'资★加'),align1,colorred;
drawtext(ae11,输出,'资★进'),align1,coloryellow;
{大资金介入}
dvar1:=88;
dvar2:=68;
dvar3:=(close-llv(low, 9))/(hhv(high, 9)-llv(low, 9))*100;
dvar4:=sma(dvar3, 3, 1);
dvar5:=sma(dvar4, 3, 1);
dvar6:=3*dvar4-2*dvar5;
dvar7:=sma(close/hhv(high, 120), 3, 1)*100;
dvar8:=sma(close/hhv(high, 120), 3, 1)*100;
dvar9:=dvar7>ref(dvar7, 20) and dvar7>75 and filter(dvar7/ref(llv(low, 20), 10)>1.180, 20);
dvar10:=if(dvar7>70 and dvar7<75, 1, 0);
dvar11:=ref(close, 1);
dvar12:=sma(max(close-dvar11, 0), 6, 1)/sma(abs(close-dvar11), 6, 1)*100;
drawtext(dvar7<68 and barslast(cross(dvar2, dvar7))>2 and dvar5<30 and cross(dvar6, dvar5), 输出, '大★资'),align1,coloryellow;
var1nnn:=llv(low,36);
var2nnn:=hhv(high,20);
游资nnn:=ema((close-var1nnn)/(var2nnn-var1nnn)*4,4)*25;
游资1nnn:=ma(游资nnn,3);
drawicon(cross(游资nnn,ref(游资nnn,1)),游资nnn,7),align1;
drawicon(cross(ref(游资nnn,1),游资nnn),游资nnn,8),align1;
tsjjj:=barscount(close);
j0jjj:=(high+low)/2;
qjjjj:=ema(j0jjj,3);
j1jjj:=if(close>qjjjj,vol,0);
j2jjj:=if(close<qjjjj,vol,0);
szjjj:=(sum(j1jjj-j2jjj,5)-(vol/close<ref(close,1)))/10000;
长资金:ema(szjjj,55),color0000ff,linethick0;
长趋势:wma(长资金,360),color00cc00,linethick0;
tjts:=barstatus=2;
if(长资金>长趋势 and 长资金>ref(长资金,1) and tjts) then begin drawtextabs(300,20,'长资金趋势一直向上'),color00ddff;end
if(长资金>长趋势 and 长资金<=ref(长资金,1) and tjts) then begin drawtextabs(300,20,'长资金趋势一直向上、有走平向下的趋势'),color00ddff;end
if(长资金<长趋势 and 长资金<ref(长资金,1) and tjts) then begin drawtextabs(300,20,'长资金趋势一直向下'),color00ddff;end
if(长资金<长趋势 and 长资金>=ref(长资金,1) and tjts) then begin drawtextabs(300,20,'长资金趋势一直向下、有走平向上的趋势'),color00ddff;end;
drawtext(if(tsjjj>360,0,长资金>=ref(长资金,1)) and tjts,20, '长资金趋势一直不明、有走平向上的趋势'),color00ddff;
drawtext(if(tsjjj>360,0,长资金<ref(长资金,1)) and tjts, 20, '长资金趋势一直不明、有走平向下的趋势'),color00ddff;
drawgbklast(v>1,strip(rgb(0,0,205),rgb(60,179,113),0));
上一指标公式:筹码进场选股公式下载 大智慧选股筹码
下一指标公式:主升浪-公式下载 大智慧源码
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文资金公式下载 大智慧资金仅供学习研究。