融大和金昌九老师的作品整合成为一个主图(主图源码.附实测图.用法说明)
祝大家节日快乐。。。刚上论坛,发现金老师的kdj-金主图大有学习借鉴的作用,突发奇想,借用融大的轨道线来融合一下,节日期间,金老师放弃宝贵的休息时间,给大家奉献了不少的精品指标,无私的精神值得我们学习,在此向两位老师致敬。。。。。
说明:用法请参考两位老师的说明,能不能给大家一点参考的意见,请各位同学自取所需。。。
wj:=' ';
yy1:=weekday;
if c>0 then begin;
wj:=' 星期';
if yy1=5 then wj:= wj+'五';
if yy1=4 then wj:= wj+'四';
if yy1=3 then wj:= wj+'三';
if yy1=2 then wj:= wj+'二';
if yy1=1 then wj:= wj+'一';
end;
wl:='';
wh:='';
yy2:=lmonth;
yy3:=lday;
if barstatus=2 then ww:=' 农历 '+numtostrn(yy2,0)+'月 '+numtostrn(yy3,0)+'日';
if barstatus=2 then wh:=numtostrn(date+1000000,0);
if barstatus=2 then wl:=wj;
yy2:=lmonth;
yy3:=lday;
drawtextrel(280 ,80 ,' '+stklabel+' '+stkname+' '+wh+wl+ww),linethick2,color0080ff;
cc:=abs((2*close+high+low)/4-ma(close,20))/ma(close,20);
dd:=dma(close,cc);
上:(1+7/100)*dd,colorff00ff;
下:(1-7/100)*dd,colorff00ff;
中:(上+下)/2,colorf0f000,linethick2;
危:(1+14/100)*dd,dotline,colorgray;
机:(1-14/100)*dd,dotline,colorgray;
{涨停天数}
varzt:=barslast(c/ref(c,1)>1.094);
drawtext(varzt=2,l*0.95,'3t'),coloryellow;
drawtext(varzt=4,h*1.06,'5t'),coloryellow;
drawtext(varzt=7,l*0.95,'8t'),coloryellow;
drawtext(varzt=12,h*1.06,'13t'),coloryellow;
drawtext(varzt=20,l*0.95,'21t'),coloryellow;
drawtext(varzt=33,h*1.06,'34t'),coloryellow;
drawtext(varzt=54,l*0.95,'55t'),coloryellow;
drawtext(varzt=88,h*1.06,'89t'),coloryellow;
drawtext(varzt=143,l*0.95,'144t'),coloryellow;
drawtext(varzt=232,h*1.06,'233t'),coloryellow;
drawtext(varzt=376,l*0.95,'377t'),coloryellow;
vc:=(2*close+high+low)/4;
k: slope(wma(vc,5),9)*5+vc,color00ffff,linethick0;
d: wma(k,3),color00ff00,linethick0;
j: 2.8*k-1.8*d,color0099ff,linethick1;
partline(j,(j>ref(j,1))-1,rgb(0,100,200),1,rgb(200,100,0) ),linethick3,layer0;
ma13:wma(c,13),precis2;
partline(ma13,(ma13>ref(ma13,1))-1,rgb(0,255,0),1,rgb(255,0,0) ),linethick2,layer0;
{高抛.低吸}
重心:(2*c+h+l)/4,color00ffff,linethick0;
sj:=wma((重心-llv(l,5))/(hhv(h,5)-llv(l,5))*100,2);
zj:=wma(0.667*ref(sj,1)+0.333*sj,2);
drawtext(cross(sj,zj) and sj<30,j,'←低吸'),color00ffff,linethick1;
drawtext(cross(zj,sj) and sj>70,j,'←高抛'),color0044ff,linethick1;
{涨跌幅度}
x:=barslast(dispstatus=1)+1;
ah1:hhv(h,x),color0077ff,dotline,linethick0;
al2:llv(l,x),colorff9900,dotline,linethick0;
hlz:(ah1+al2)/2,color00ffff,dotline,linethick0;
下跌:last(ah1>h),precis0 ,linethick0;
上涨:last(al2<l),precis0 ,linethick0;
drawtext(dispstatus=2,ah1,'----【'+numtostrn(ah1,2)+'元:跌'+numtostrn((c-ah1)/ah1*100,1)+'%.'+numtostrn(下跌,0)+'天】---- '),align1,color00ffff,linethick1,layer0;
drawtext(dispstatus=2,al2,'----【'+numtostrn(al2,2)+'元:涨'+numtostrn((c-al2)/al2*100,1)+'%.'+numtostrn(上涨,0)+'天】---- '),align1,valign2,color00ffff,linethick1,layer0;
{以下设置个股信息}
drawtextrel(10,35,'所属板块:'+bkname),colorffffff;
drawtextrel(10,150,'总股本【亿】:'+finance2(35)/10000),color00ff00;
drawtextrel(190,150,'流通盘【亿】:'+capital/100/10000),color00ff00;
drawtextrel(10,110,'总市值【亿】:'+dynainfo(56)/100000000),color00ff00;
drawtextrel(190,110,'流通市值【亿】:'+dynainfo(57)/100000000),color00ff00;
drawtextrel(10,75,'市盈率:' + dynainfo(39) + '倍' + ' 每股收益:' + finance2(3) + '元' + ' 每股公积金:' + finance2(7) + '元'),color00ffff;
drawtextrel(10,200,'上涨家数:'+numtostrn(dynainfo(69),0)+' 家'),color0000ff;
drawtextrel(120,200,'下跌家数:'+numtostrn(dynainfo(70),0)+' 家'),color00ff00;
drawtextrel(230,200,'平盘家数:'+numtostrn(dynainfo(71),0)+' 家'),colorffffff;
通达信版源码:
vc:=(2*close+high+low)/4;
k: slope(wma(vc,5),9)*5+vc,color00ffff,linethick0;
d: wma(k,3),color00ff00,linethick0;
j: 2.8*k-1.8*d,color0099ff,linethick1;
ma5:ma(c,5),color00ff00,linethick1;
drawband(j,rgb(0,0,255),ma5,rgb(80,80,80));
if(ma5>ref(ma5,1),ma5,drawnull),color0077ff,linethick3;
2.8*k-1.8*d,colorff9900,linethick1;
if(j>ref(j,1),j,drawnull),color0000ff,linethick3;
{高抛.低吸}
重心:(2*c+h+l)/4,color00ffff,linethick0;
sj:=wma((重心-llv(l,5))/(hhv(h,5)-llv(l,5))*100,2);
zj:=wma(0.667*ref(sj,1)+0.333*sj,2);
drawtext(cross(sj,zj) and sj<30,j,'←低吸'),color00ffff,linethick2;
drawtext(cross(zj,sj) and sj>70,j,'←高抛'),color0044ff,linethick2;
{k线}
stickline(close>open or close=open and close>ref(close,1),low,high,0.0,0),colorred;
stickline(close<open or close=open and close<=ref(close,1),low,high,0.0,0),colorcyan;
stickline(open>=close ,close ,open,3,0 ),color008800;
stickline(open>=close ,close ,open,2,0 ),color00aa00;
stickline(open>=close ,close ,open,1,0 ),color00dd00;
stickline(open>=close ,close ,open,0,0 ),color00ff00;
stickline(close>open,close,open,3,0) ,color000088;
stickline(close>open,close,open,2,0) ,color0000aa;
stickline(close>open,close,open,1,0) ,color0000dd;
stickline(close>open,close,open,0,0) ,color0000ff;
cc:=abs((2*close+high+low)/4-ma(close,20))/ma(close,20);
dd:=dma(close,cc);
上:(1+7/100)*dd,colorff00ff;
下:(1-7/100)*dd,colorff00ff;
中:(上+下)/2,colorf0f000,linethick2;
危:(1+14/100)*dd,dotline,colorgray;
机:(1-14/100)*dd,dotline,colorgray;
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文融大和金昌九老师的作品整合成为一个主图(主图源码.附实测图.用法说明)公式下载 大智慧指标源码整合源码仅供学习研究。