dd:="xh-z.dd";//(n);
gg:="xh-z.gg";//(n);
gd:=filter(dd+gg,4);
dg:=barslast(gd);
p1:=sysparam(1)-1;
p:=if(0>=p1,sysparam(1),p1);
sgd:=sum(gd,0);
gds:=sgd[p]-sgd+1;
w1:=barssince(gds=gds[p]);
if w1[p]>1 then begin
bx:=p=barpos;
by:=forcast(c,w1[p]+1);
ax:=w1=0;
ay:=by[p]-refx(slope(c,w1[p]+1),w1[p])*w1[p];
zx:linevalue(ax,ay,bx,by,0,0)colorgreen,linethick1;
sh:=hhv(h-zx,w1+1);
sl:=hhv(zx-l,w1+1);
sx:linevalue(ax,ay+sh[p],bx,by+sh,0,0)color008eff,linethick1;
xx:linevalue(ax,ay-sl[p],bx,by-sl,0,0)colorff9963,linethick1;end;
stickline(ax or bx,sx,xx,0.01,0)colorff9963,pointdot;
k:=(by[p]-ay[p-w1[p]])/w1[p];
斜:k*100,linethick0;
宽:abs((sx-xx)*cos(atan(k)*5.73)),linethick0;
宽%:宽/zx[p]*100,linethick0;
bc:=w1+1;
点石成金h:=if(close>100,sum(h*vol,bc)/sum(vol,bc),sum(amount,bc)/sum(v,bc)/100*sum(h,bc)/sum(c,bc));
点石成金l:=if(close>100,sum(l*vol,bc)/sum(vol,bc),sum(amount,bc)/sum(v,bc)/100*sum(l,bc)/sum(c,bc));
点石成金:if(斜<=0 ,点石成金h,点石成金l),colorred,linethick2;
bc1:=barslast(sysparam(1)=barpos)+1;
金h:=if(close>100,sum(h*vol,bc1)/sum(vol,bc1),sum(amount,bc1)/sum(v,bc1)/100*sum(h,bc1)/sum(c,bc1));
金l:=if(close>100,sum(l*vol,bc1)/sum(vol,bc1),sum(amount,bc1)/sum(v,bc1)/100*sum(l,bc1)/sum(c,bc1));
点石成金1:if(ref(h,bc1-1)>ref(h,bc1) and ref(h,bc1-1)>ref(h,bc1-2) ,金h,金l),colorblue,linethick2;
e:=(h+l+o+2*c)/5;
zl:=2*e-l;
zc:=2*e-h;
fz:=e-(h-l);
ma5:ma(c,5),colorf4e202;
ma6:=ma(close,6);
ma18:=ma(close,18);
ma13:ma(c,13),colorred;
balance:=ema(c,30);
up:=balance + 2*std(c,30);
down:=balance- 2*std(c,30);
var9q:=c= hhv(c,4)and (ref(c,1)>=ref(c,2) or ref(c,1)>=ref(c,3)) or ref(c,1)=hhv(c,4) and close>=ref(c,2) or ref(c,2)=hhv(c,4) and ref(c,3)=llv(c,4) and c>=ref(c,1) or ref(c,3)=hhv(c,4) and c>=ref(c,1) and c>=ref(c,2);
varaq:=c=hhv(c,4) and ref(c,1)=llv(c,4);
varbq:=c=llv(c,4) and (ref(c,1)<ref(c,2) or ref(c,1)<ref(c,3)) or ref(c,1)=llv(c,4) and c<ref(c,2) or ref(c,2)=llv(c,4) and ref(c,1)<>hhv(c,4) and c<ref(c,1) or ref(c,3)=llv(c,4) and c<ref(c,1) and c<ref(c,2);
varcq:=ref(c,1)=llv(c,4) and c>=ref(c,2) or ref(c,2)=llv(c,4) and ref(c,1)<=ref(c,3) and ref(c,2)<ref(c,4) and c>=ref(c,1);
vardq:=ref(c,1)=hhv(c,4) and c<ref(c,2) or (ref(c,2)=hhv(c,4) and ref(c,1)>ref(c,3) or ref(c,3)=hhv(c,4) and ref(c,1)>ref(c,2)) and ref(c,2)>=ref(c,4) and c<ref(c,1);
y1:=ref(ema(dma((((high + low) + (close * 2)) / 4.15),0.9),3),1);
var1w:=(100 - ((90 * (hhv(high,21) - close)) / (hhv(high,21) - llv(low,21))));
var2w:=(100 - ((90 * (hhv(high,21) - close)) / (hhv(high,21) - llv(low,21))));
var3w:=(100 - ma(((100 * (hhv(high,6) - close)) / (hhv(high,6) - llv(low,6))),34));
var3p:=if(close/ref(close,1)>1.050 and high/close<1.010 and if(close>ref(close,1),88,0)>0, 91, 0);
ss:=ma((low+high+close)/3,5)>ref(ma((low+high+close)/3,5),1) and ref(ma((low+high+close)/3,5),1)<ref(ma((low+high+close)/3,5),2);
sc:=l<hhv(ma((low+high+close)/3,5),13) and h>hhv(ma((low+high+close)/3,5),13) and c>ref(c,1) and c>o;
mr:=sc and count(ss,2);
买:=mr and not(ref(mr,1));
多方:=7*sma((close-llv(low,27))/(hhv(high,27)-llv(low,27))*30,4,1)
-3*sma(sma((close-llv(low,27))/(hhv(high,27)-llv(low,27))*30,4,1),3,1)
-sma(sma(sma((close-llv(low,27))/(hhv(high,27)-llv(low,27))*30,4,1),3,1),2,1);
var1:=(close-llv(low,24))/(hhv(high,24)-llv(low,24))*1;
var2:=sma(var1,3,1)*100;
趋势线:=sma((sma(var2,3,1)*var1),3,1)*1;
var9:=cross(趋势线,(sma(var2,3,1)*var1)) and (sma(var2,3,1)*var1)>8;
aax:=amount/vol;
bbx:=l<aax*0.9;
ccx:=(c-ref(c,1))/ref(c,1)*100>1.2;
ddx:=l<ma(c,5)*0.921;
eex:=vol<ma(v,5)*1.5;
ffx:=bbx and ccx and ddx and eex;
a:=(3*c+l+o+h)/6;
x:=(20*a+19*ref(a,1)+18*ref(a,2)+17*ref(a,3)+16*ref(a,4)+15*ref(a,5)+
14*ref(a,6)+13*ref(a,7)+12*ref(a,8)+11*ref(a,9)+10*ref(a,10)+9*ref(a,11)+8*ref(a,12)
+7*ref(a,13)+6*ref(a,14)+5*ref(a,15)+4*ref(a,16)+3*ref(a,17)+2*ref(a,18)+
ref(a,20))/210;
mtm:=c-ref(c,1);
dx:=100*ema(ema(mtm,6),6)/ema(ema(abs(mtm),6),6);
cb:=ema(x,13);
stickline((close >balance),balance,balance,1,0),linethick2,color0000ff;
stickline((balance > close),balance,balance,1,0),linethick2,colorff6600;
stickline(close>open,open,low,0.5,0 ),color0000ff;
stickline(close>open,close,high,0.5 ,0 ),color0000ff;
stickline(open>=close,close,low,0.5 ,0 ),color00ff00;
stickline(open>=close,open,high,0.5 ,0 ),color00ff00;
stickline(open>=close ,close ,open,7,0 ),colorff7700;
stickline(open>=close ,close ,open,6,0 ),colorff9900;
stickline(open>=close ,close ,open,5,0 ),colorffbb00;
stickline(open>=close ,close ,open,4,0 ),colorffcc00;
stickline(open>=close ,close ,open,3,0 ),colorffdd00;
stickline(open>=close ,close ,open,2,0 ),colorffee00;
stickline(open>=close ,close ,open,1,0 ),colorffff00;
stickline(close>open,close,open,7,0) ,color000055;
stickline(close>open,close,open,6,0) ,color000066;
stickline(close>open,close,open,5,0) ,color000077;
stickline(close>open,close,open,4,0) ,color000099;
stickline(close>open,close,open,3,0) ,color0000bb;
stickline(close>open,close,open,2,0) ,color0000dd;
stickline(close>open,close,open,1,0) ,color0000ff;
红:=var9q;
stickline(var9q,c,(o+c)/2,7,0),color000055;
stickline(var9q,c,(o+c)/2,6,0),color000066;
stickline(var9q,c,(o+c)/2,5,0),color000077;
stickline(var9q,c,(o+c)/2,4,0),color000099;
stickline(var9q,c,(o+c)/2,3,0),color0000bb;
stickline(var9q,c,(o+c)/2,2,0),color0000dd;
stickline(var9q,c,(o+c)/2,1,0),color0000ff;
粉:=varaq;
stickline(varaq,c,(o+c)/2,7,0),colorff11ff;
stickline(varaq,c,(o+c)/2,6,0),colorff33ff;
stickline(varaq,c,(o+c)/2,5,0),colorff55ff;
stickline(varaq,c,(o+c)/2,4,0),colorff77ff;
stickline(varaq,c,(o+c)/2,3,0),colorff99ff;
stickline(varaq,c,(o+c)/2,2,0),colorffbbff;
stickline(varaq,c,(o+c)/2,1,0),colorffddff;
灰:=varbq;
stickline(varbq,c,(o+c)/2,7,0),color333333;
stickline(varbq,c,(o+c)/2,6,0),color555555;
stickline(varbq,c,(o+c)/2,5,0),color777777;
stickline(varbq,c,(o+c)/2,4,0),color999999;
stickline(varbq,c,(o+c)/2,3,0),colorbbbbbb;
stickline(varbq,c,(o+c)/2,2,0),colordddddd;
stickline(varbq,c,(o+c)/2,1,0),colorffffff;
绿:=varcq;
stickline(varcq,o,(o+c)/2,7,0),color003300;
stickline(varcq,o,(o+c)/2,6,0),color005500;
stickline(varcq,o,(o+c)/2,5,0),color007700;
stickline(varcq,o,(o+c)/2,4,0),color009900;
stickline(varcq,o,(o+c)/2,3,0),color00bb00;
stickline(varcq,o,(o+c)/2,2,0),color00dd00;
stickline(varcq,o,(o+c)/2,1,0),color00ff00;
蓝:=vardq;
stickline(vardq,o,(o+c)/2,7,0),colorff1100;
stickline(vardq,o,(o+c)/2,6,0),colorff3300;
stickline(vardq,o,(o+c)/2,5,0),colorff5500;
stickline(vardq,o,(o+c)/2,4,0),colorff7700;
stickline(vardq,o,(o+c)/2,3,0),colorff9900;
stickline(vardq,o,(o+c)/2,2,0),colorffbb00;
stickline(vardq,o,(o+c)/2,1,0),colorffdd00;
卖:=if(hhv(dx,2)=hhv(dx,7) and count(dx>50,2) and cross(ma(dx,2),dx),1,0);
drawtext(filter(卖=1,1),high*1.02,'卖'),colorwhite;
买:=if(llv(dx,2)=llv(dx,7) and count(dx<0,2) and cross(dx,ma(dx,2)),1,0);
drawtext(filter(买=1,5),low-0.03,'买'),colorred;
rsv:=(c-llv(l,9))/(hhv(h,9)-llv(l,9))*100;
k:=sma(rsv,3,1);
d:=sma(k,3,1);
j:=3*k-2*d;
bdgd:=hhv(j,2)=hhv(j,8) and j>80;
注意:=if(cross(ref(j-0.01,1),j) and ref(bdgd,1),1,0);
drawtext(注意 and 卖<>1,high*1.02,'减'),colorffff50;
加仓a:=sma(ema((c-ref(c,1))/ref(c,1),5)*100,3,1)*10;
drawtext(filter((cross(加仓a,0) or cross(close,cb)) and 买<>1,3),low-0.03,'加'),color0080ff;
跟:=if(ma18>=ref(ma18,3) and cross(close,ma18),1,0);
drawtext(ma18>=ref(ma18,3) and cross(close,ma18),low*0.96,'跟'),color7f52af;
{飞狐用下面这段显示阻力支撑}
drawtextex(c,0,10,15,'上升阻力:' +numtostr(zl,2)),colorred;
drawtextex(c,0,10,35,'下跌支撑:' +numtostr(zc,2)),colorgreen;
drawtextex(c,0,10,55,'下跌反转:' +numtostr(fz,2)),colorwhite;
cbl1:=if(ref(h,2)>ref(h,3),ref(h,2),ref(h,3));
cbl3:=if(ref(l,2)<ref(l,3),ref(h,2),cbl1);
cbl2:=if(ref(h,3)>=ref(h,2),ref(h,2),ref(h,3));
cbl4:=if(h<ref(h,2 or l<ref(l,2)),ref(h,2),cbl2);
cb5:=if(h>=ref(h,1) and l>ref(l,1 ),cbl4,cbl3);
cbl6:=if(h>ref(h,1) and ref(h,1)>ref(h,2) and l<ref(h,2) and o>c,h,cb5);
cbl7:=if(l<ref(l,1) and ref(l,1)<ref(l,2)and ref(l,2)<ref(l,3) and c>o and (ref(l,1)-l)/l>0.015,l,cbl6);
cbl:if(ref(l,1)<ref(l,2) and ref(l,2)<ref(l,3) and ref(l,3)<ref(l,4) and ref(c,1)>ref(o,1),ref(l,2),cbl7),,colorff9963,linethick0;
stickline((barpos = (sysparam(1) - 0)and cbl<c),cbl,cbl,240,0),colorred;
stickline((barpos = (sysparam(1) - 0)and cbl>=c),cbl,cbl,240,0),colorblue;
[下载错误已经修改,谢谢网友指正]
上一指标公式:宝宝测庄公式 飞狐宝宝指标 源码
下一指标公式:庄家动向公式 飞狐庄家指标 源码
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文自动画线点石成金+SUPER主图公式 飞狐画线主图指标 源码仅供学习研究。