本人在用的极品黄金主图主图+
本人一直在用的主图,感觉还不错,趋势顶底一目了然。
源码集合了各位大大们的部分源码,清见谅~!
主图:集合135战法,顶底背离,黄金分割,还有千钧老师的弄点钱玩玩。
好了,上源码。
input:k(1,1,3);
drawgbklast(c>0,strip(rgb(90,90,90),rgb(0,0,0),0));
ema13:ema(c,13),colorblue,linethick2;
ema34:ema(c,34),colorred,linethick2;
ema55:ema(c,55),coloryellow,linethick2;
ema89:ema(c,89),colorwhite,linethick2;
t := barslast(dispstatus=1)+1;
a := dispstatus=2;
hh := hhv(h, t);
ll := llv(l, t);
hl := hh-ll;
wh := hhvbars(h, t);
wl := llvbars(l, t);
kk := wh-wl;
mhl := hh-hl*0.5;
if k=1 then begin
hl191 := (hh-ll)*0.191;
hl382 := (hh-ll)*0.382;
hl618 := (hh-ll)*0.618;
hl809 := (hh-ll)*0.809;
if kk<0 then begin
a1 := hh-hl191;
a2 := hh-hl382;
a3 := hh-hl618;
a4 := hh-hl809;
end else begin
a1 := ll+hl191;
a2 := ll+hl382;
a3 := ll+hl618;
a4 := ll+hl809;
end
end
if k=1 then begin
hl125 := (hh-ll)*0.125;
hl250 := (hh-ll)*0.25;
hl375 := (hh-ll)*0.375;
hl625 := (hh-ll)*0.625;
hl750 := (hh-ll)*0.75;
hl875 := (hh-ll)*0.875;
if kk<0 then begin
b1 := hh-hl125;
b2 := hh-hl250;
b3 := hh-hl375;
b4 := hh-hl625;
b5 := hh-hl750;
b6 := hh-hl875;
end else begin
b1 := ll+hl125;
b2 := ll+hl250;
b3 := ll+hl375;
b4 := ll+hl625;
b5 := ll+hl750;
b6 := ll+hl875;
end
end
drawtext(a and k<>3,hh, '最高价:'+hh),align2,colorgreen;
drawtext(a and k<>3,ll, '最低价:'+ll),align2,valign2,colorgreen;
drawtext(a and k<>3,mhl,'50%:'+mhl),align2,color00ffff;
drawtext(a and k=1, a1, '0.191:'+numtostrn(a1,2)),align2,color00ffff;
drawtext(a and k=1, a2, '0.382:'+numtostrn(a2,2)),align2,color00ffff;
drawtext(a and k=1, a3, '0.618:'+numtostrn(a3,2)),align2,color00ffff;
drawtext(a and k=1, a4, '0.809:'+numtostrn(a4,2)),align2,color00ffff;
drawtext(a and k=1, b1, '1/8:'+numtostrn(b1,2)),align2,colorgreen;
drawtext(a and k=1, b2, '1/4:'+numtostrn(b2,2)),align2,colorgreen;
drawtext(a and k=1, b3, ' 3/8:'+numtostrn(b3,2)),align0,colorgreen;
drawtext(a and k=1, b4, ' 5/8:'+numtostrn(b4,2)),align0,colorgreen;
drawtext(a and k=1, b5, '3/4:'+numtostrn(b5,2)),align2,colorgreen;
drawtext(a and k=1, b6, '7/8:'+numtostrn(b6,2)),align2,colorgreen;
drawtext(a and k<>3,hh, ' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),align2,colorred,linethick7;
drawtext(a and k<>3,ll, ' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),align2,colorred,linethick7;
drawtext(a and k<>3,mhl,' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),align2,colorff0000,linethick7;
drawtext(a and k=1, a1, '﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),align2,color208fff,linethick0;
drawtext(a and k=1, a2, '﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),align2,color208fff,linethick0;
drawtext(a and k=1, a3, '﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),align2,color208fff,linethick0;
drawtext(a and k=1, a4, '﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),align2,color208fff,linethick0;
drawtext(a and k=1, b1, ' ﹉﹉﹉﹉'),align2,color00ff00;
drawtext(a and k=1, b2, ' ﹉﹉﹉﹉'),align2,color00ff00;
drawtext(a and k=1, b3, '﹉﹉'),align0,color00ff00;
drawtext(a and k=1, b4, '﹉﹉'),align0,color00ff00;
drawtext(a and k=1, b5, ' ﹉﹉﹉﹉'),align2,color00ff00;
drawtext(a and k=1, b6, ' ﹉﹉﹉﹉'),align2,color00ff00;
oo:=ma(o,22);j:="kdj.j#day";
cc:=ma(c,22);hs:=vol/capital*100;
jj:=(h+l+c)/3;qj0:=vol/if(h=l,4,h-l);
qj1:=if(capital=0,qj0*(jj-min(c,o)),qj0*(min(o,c)-l));
qj2:=if(capital=0,qj0*(min(o,c)-l),qj0*(jj-min(c,o)));
qj3:=qj0*(h-max(o,c));qj4:=qj0*(max(c,o)-jj);
qj5:=qj1+qj2;qj6:=qj3+qj4;dd:=(qj5-qj6)/(qj5+qj6)*100;
ddx:=((qj1+qj2)-(qj3+qj4))/sum(vol,10)*100;ddz:=dd*17;
ddy:=((qj2+qj4)-(qj1+qj3))/sum(vol,10)*100;
bb:=(cross(j,0)and ((ddx>0 and ddy>0) or ddz>400));
bbd:=ema("总0#week",2)/sum(if(capital=0,ref(indexa,1),ref(vol,1)),5)*100;
xh1:=ref(bbd,1)<-15 and bbd>ref(bbd,1) and bbd>-10;
xh2:=ref(bbd,1)>=15 and bbd<ref(bbd,1) and bbd<10;
q6:=atan((ma(c,5)/ref(ma(c,5),1)-1)*100)*57.3;q2:=atan((ma(c,13)/ref(ma(c,13),1)-1)*100)*57.3;
q1:=atan((ma(c,23)/ref(ma(c,23),1)-1)*100)*57.3;q:=atan((ma(c,34)/ref(ma(c,34),1)-1)*100)*57.3;
q3:=atan((ma(c,68)/ref(ma(c,68),1)-1)*100)*57.3;q5:=atan((ma(c,250)/ref(ma(c,250),1)-1)*100)*57.3;
stickline(c>=ref(c,1),h,l,0,0),color0000ff;
stickline(c>=ref(c,1),c,o,8,0),color0000bb;
stickline(c>=ref(c,1),c,o,5,0),color0000dd;
stickline(c>=ref(c,1),c,o,3,0),color0000ee;
stickline(c>=ref(c,1),c,o,1,0),color0000ff;
stickline(c<ref(c,1),h,l,0,0),colorffff00;
stickline(c<ref(c,1),c,o,8,0),color999900;
stickline(c<ref(c,1),c,o,5,0),colorbbbb00;
stickline(c<ref(c,1),c,o,3,0),colordddd00;
stickline(c<ref(c,1),c,o,1,0),colorffff00;
stickline(bbd>0,cc,oo,8,0),colorff00ff;
stickline(bbd<0,cc,oo,8,0),color00ff00;
drawicon(xh1,l*0.98,7);drawicon(xh2,h*1.02,8);
drawtext(bb,l*0.98,'点钱'),color00ffff;
drawtextrel(20,0,'上涨家数:'+numtostrn(dynainfo(69),0)+' 家'),color0066ff;
drawtextrel(180,0,'下跌家数:'+numtostrn(dynainfo(70),0)+' 家'),color99ff99;
drawtextrel(340,0,'平盘家数:'+numtostrn(dynainfo(71),0)+' 家'),coloreeeeee;
drawtextrel(20,50,stklabel+' '+stkname+' '+strleft(bkname,40)),colorffb060;
x:=barslast(dispstatus=1)+1;
ah:=hhvall(hhv(h,x));
al:=llvall(llv(l,x));
x1:=(c+l+h)/3;
bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10;
ema8:=ema(c,8);
x1:=(c+l+h)/3;
bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10;
ema8:=ema(c,8);
aa1:=amount/v;
bb1:=l<aa1*0.9;
cc1:=(c-ref(c,1))/ref(c,1)*100>1.2;
dd1:=l<ma(c,5)*0.921;
ee1:=v<ma(v,5)*1.5;
ff1:=bb1 and cc1 and dd1 and ee1;
drawtext(ff1,(low* 0.99),'老鼠仓'),color4080ff;
a51:=3*sma((c-llv(l,55))/(hhv(h,55)-llv(l,55))*100,5,1)-2*sma((c-llv(l,55))/(hhv(h,55)-llv(l,55))*100,5,1);
黑马线:=ema(a51,5);
a54:=((c-llv(l,21))/(hhv(h,21)-llv(l,21)))*100;
趋势线:=(ma(3*sma(a54,6,1)-2*sma(sma(a54,5,1),5,1),2));
drawtext(cross(趋势线,0)and 黑马线<40,(high* 0.97),'▲大黑马'),coloryellow;
lc:=ref(close,1);
rsi:=((sma(max((close - lc),0),3,1) / sma(abs((close - lc)),3,1)) * 100);
ff:=ema(close,3);
ma15:=ema(close,21);
drawtext(cross(ff,ma15),(low * 0.99),'底背离'),colora6e500;
drawtext(cross(88,rsi),(high * 1.02),'顶背离'),color1880ff;
var2:=llv(low,27);
var3:=hhv(high,34);
var4:=ema((close-var2)/(var3-var2)*4,4)*25;
注意买:=if((var4<10),80,100);
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;
超跌:=if(j<0,10,0);
bddd:=llv(j,2)=llv(j,8);
买入:=if(cross(j,ref(j+0.01,1)) and bddd and j<20,30,0);
drawtext(买入 and 注意买=100 and 超跌=0,low,'短线'),color8000ff;
mtm:=c-ref(c,1);
dx:=100*ema(ema(mtm,6),6)/ema(ema(abs(mtm),6),6);
买:=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,'点钱'),colorffde00;
上一指标公式:筹码空间*L2公式下载 大智慧空间大智慧
下一指标公式:发一个时分时分买入加密不限时附图公式下载 大智慧附图买入
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文本人在用的极品黄金主图主图+公式下载 大智慧贴图黄金仅供学习研究。