工具完善供新手学习
今天把我的这个【工具公式】完善,供新手学习
本公式主要功能:
⑴ 各种立体彩色k线的绘制方法。
⑵ 变色线的绘制方法。
⑶ 彩带的绘制方法。
⑷ 引用公式的运用。
⑸ 上下箭头的标注方法。
⑹ 财务数据的引用。
⑺ 文字提示说明。
⑻ 输出修饰函数的说明。
⑼ 还有更多功能等您去发掘。
授人以鱼不如授人以渔,
弄清了此公式您就是一个指标老手了。
{公式名称:【工具公式】-【主图】}
input: p1(5,0,100),p2(10,0,100),p3(20,0,100),p4(30,0,600),p5(120,0,600);
{input:p1(60),p2(5),p3(10);只限最大为100}
drawgbklast(v>1,strip(rgb(00,0,0),rgb(90,90,90),0));
{drawgbklast(date>900101,strip(rgb(5,125,5),rgb(5,25,5),0));绿色渐变背景}
drawtextabs(12,25,'总股本:'+numtostrn(finance2(35),0)+'万股' +' 流通a股:'+numtostrn(finance2(37),0)+'万股'+' 市盈率:'+numtostrn(dynainfo(39),2)+' 倍'+' 每股收益:'+numtostrn(finance2(3),3)+' 元'),color00ff00;
drawtextabs(12,40,bkname),color00ffff;
rh:=h-l;
r:=dynainfo(13)*100;
drawtextrel(95,25,' 当天振幅:'+numtostrn(r,2)+'% ['+numtostrn(rh,2)+'元 ]'),color00ff00;
x1:=(c+l+h)/3;
bb13:=atan(ema(x1,13)-ref(ema(x1,13),1))*3.1416*10;
ema8:=ema(c,8);
drawtext(filter(bb13>1 and ema(x1,13)>ref(ema(x1,8),1),10),
ema8,'∠45上升'),colorwhite;
{均线色}
ma1:ma(close,p1),colorffffff;{白色}
ma2:ma(close,p2),color00ffff;{黄色}
ma3:ma(close,p3),colorff00ff;{洋红色}
ma4:ma(close,p4),color00ff00;{绿色}
ma5:ma(close,p5),colorffff00;{淡蓝色}
安全线: ema(close,55),circledot{小园圈画线},color0000ff;
{画变色线}
partline(ma5,ma5<c),linethick3{输出线宽控制符},color0000ff;
partline(ma5,ma5>c),linethick3{输出线宽控制符},color00ff00;
partline(安全线,安全线<c),circledot{小园圈画线},color0000ff;
partline(安全线,安全线>c),circledot{小园圈画线},color00ff00;
{画变色彩带}
fillrgn(ma3,ma1,ma3<ma1,rgb(250,0,0),ma3>ma1,rgb(0,100,200));
{画箭头符号}
lc:=ref(close,1);
rsi:=((sma(max((close - lc),0),3,1) / sma(abs((close - lc)),3,1)) * 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;bd:=llv(j,2)=llv(j,8);
抄底选股:(cross(j,ref(j+0.01,1)) and bd and j<20),linethick0{不在图中显示此线};
drawicon(cross(j,ref(j+0.01,1)) and bd and j<20,l*0.98,7),layer0{箭头符号居上层},align1;{箭头符号居中}
drawicon(cross(88,rsi),h*1.02,8),layer0{箭头符号居上层},align1;{箭头符号居中}
drawtextrel(6,25,'⊙蓝抛,银灰跌,绿买,粉变,红持⊙'),colorff11ff,linethick3;
{看色买卖}
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,8,0 ),colorff6600;
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,8,0) ,color000033;
stickline(close>open,close,open,6,0) ,color000066;
stickline(close>open,close,open,4,0) ,color000099;
stickline(close>open,close,open,3,0) ,color0000bb;
stickline(close>open,close,open,1,0) ,color0000dd;
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);
红持:var9q,color0000ff,linethick0;
{立体柱子:红色}
stickline(var9q,c,(o+c)/2,8,0),color000044;
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:=c=hhv(c,4) and ref(c,1)=llv(c,4);
粉变:varaq,colorff99ff,linethick0;
stickline(varaq,c,(o+c)/2,8,0),colorff11ff;
stickline(varaq,c,(o+c)/2,7,0),colorff22ff;
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:=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);
银灰跌:varbq,color888888,linethick0;
{立体柱子:银色}
stickline(varbq,c,(o+c)/2,8,0),color333333;
stickline(varbq,c,(o+c)/2,7,0),color444444;
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:=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);
绿买:varcq,color00ff00,linethick0;
{立体柱子:绿色}
stickline(varcq,o,(o+c)/2,8,0),color004400;
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:=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);
蓝抛:vardq,colorff9900,linethick0;
{立体柱子:深蓝色}
stickline(vardq,o,(o+c)/2,8,0),colorff1100;
stickline(vardq,o,(o+c)/2,7,0),colorff2200;
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;
{立体柱子:金色}
zdf:=(close-ref(close,1))/ref(close,1)*100;
stickline(zdf>9.8,open,close,8,0),color004444;
stickline(zdf>9.8,open,close,7,0),color005555;
stickline(zdf>9.8,open,close,6,0),color006666;
stickline(zdf>9.8,open,close,5,0),color007777;
stickline(zdf>9.8,open,close,4,0),color009999;
stickline(zdf>9.8,open,close,3,0),color00bbbb;
stickline(zdf>9.8,open,close,2,0),color00dddd;
stickline(zdf>9.8,open,close,1,0),color00ffff;
{公式引用示范}
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;
弄点钱:(cross(j,0)and ((ddx>0 and ddy>0) or ddz>400)),linethick0{不在图中显示此线};
bbd:=ema("千钧引用.总0#week",2)/sum(if(capital=0,ref(indexa,1),ref(vol,1)),5)*100;
stickline(bbd>0,cc,oo,8,0),colorff00ff;
stickline(bbd<0,cc,oo,8,0),color00ff00;
drawtext(弄点钱,l*0.98,'弄点钱玩玩'),color00ffff;
*********************************************
{引用公式名称:千钧引用}
zz:=(ref(hhv(h,3),1)+ref(llv(l,3),1))/2;
a:=if(c>zz,vol,0);
b:=if(c<zz,vol,0);
a1:=if(c>zz,indexa,0);
b1:=if(c<zz,indexa,0);
总0:if(finance2(35)=0,(a1-b1),(a-b));
**********************************************
下面放入:指标用法注释中:
特殊符号: '←★' '【】' '《》'
※ ↑ ↓ → ← ↖ ↗ ↙ ↘ ◆ ◇ ▲▼ ▽ △ ■ □ ● ★ ☆ ● ○ ◎ ⊙ ¤ ㊣★☆╰☆╮◆◇◢ ◣ ◤ ◥
⒈ ⒉ ⒊ ⒋ ⒌ ⒍ ⒎ ⒏ ⒐ ⒑ ⒒ ⒓ ⒔ ⒕ ⒖ ⒗ ⒘ ⒙ ⒚ ⒛
⑴ ⑵ ⑶ ⑷ ⑸ ⑹ ⑺ ⑻ ⑼ ⑽ ⑾ ⑿ ⒀ ⒁ ⒂ ⒃ ⒄ ⒅ ⒆ ⒇
ⅰ ⅱ ⅲ ⅳ ⅴ ⅵ ⅶ ⅷ ⅸ ⅹ
常用函数
alignx:对齐方式,x=0表示左对齐,1表示中对齐,2表示右对齐,缺省左对齐。
color3d:表示绘制3d阴阳柱,
colorstick:表示绘制涨跌阴阳柱线
dotline;制成虚线。
layerx:可以为0-7,数字越小表示越靠上层,将会遮盖其下层的图形,缺省为第4层。
linethickx;绘制指标线宽度,x可以为0-7,0则表示不显示。
precisx,数值精确到小数点后多少位,x可以为0-6。
pointdot;将该输出绘制成点线。
根据需要自己添减。
【工具公式】源码 公式—公式引入—全部引入
上一指标公式:丰赢资金dzhl2修改版公式下载 大智慧dzhl2资金
下一指标公式:动态买卖改进版公式下载 大智慧动态买卖
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文工具完善供新手学习公式下载 大智慧新手完善仅供学习研究。