大半个月没上网,刚打开有几个消息,有朋友问我搬到别网了?有朋友问我为啥没新帖。谢谢挂念,只是没时间上网而已。
刚花了点时间把以前的几个指标改了改送给朋友们。
(主图)
{////////////////////////////////////}
{平均价格}
a:=(3*c+h+l+o)/6;
xj:=(a+0.618*ref(a,1)+0.382*ref(a,2)+0.236*ref(a,3)+0.146*ref(a,4))/2.382;
yczxh:=(ma(hhv(a,2),5)+ma(hhv(a,2),13)+ma(hhv(a,2),21)+ma(hhv(a,2),32))/4;
yczxl:=(ma(llv(a,2),5)+ma(llv(a,2),13)+ma(llv(a,2),21)+ma(llv(a,2),32))/4;
smh:=ema(yczxh,21);
sml:=ema(yczxl,21);
smj:=(sml+smh)/2;
pj:=(10*a+9*ref(a,1)+8*ref(a,2)+7*ref(a,3)+6*ref(a,4)+5*ref(a,5)+4*ref(a,6)+3*ref(a,7)+2*ref(a,8)+ref(a,9))/55;
a1:=ema(pj,3),color004000;a2:=ema(pj,5),color004000;
a3:=ema(pj,7),color004000;a4:=ema(pj,9),color004000;
a5:=ema(pj,11),color004000;
lx:=ref(xj,1);
zd:=(sma(max(xj-lx,0),5,1)/sma(abs(xj-lx),5,1))*100;
kx1:=(close>=open) and zd>=50;
kx2:=(close<open) and zd>=50;
kx3:=(close>=open) and zd<50;
kx4:=(close<open) and zd<50;
{////////////////////////////////////}
partline(1,smh),color004000;
partline(1,sml),color004000;
partline(1,smj),color004000;
partline(a5<ref(a5,1),a5),color820000,linethick2;
partline(a5>ref(a5,1),a5),color00005b,linethick2;
partline(a4<ref(a4,1),a4),color8c0000,linethick1;
partline(a4>ref(a4,1),a4),color000055,linethick1;
partline(a3<ref(a3,1),a3),color9b0000,linethick1;
partline(a3>ref(a3,1),a3),color00006c,linethick1;
partline(a2<ref(a2,1),a2),colorbb0000,linethick1;
partline(a2>ref(a2,1),a2),color00007d,linethick1;
partline(a1<ref(a1,1),a1),colorcc0000,linethick1;
partline(a1>ref(a1,1),a1),color00009b,linethick1;
stickline(kx1,c,o,4,1),color4440ff;
stickline(kx1,c,h,0.5,1),color4440ff;
stickline(kx1,o,l,0.5,1),color4440ff;
stickline(kx2,c,o,4,0),color4440ff;
stickline(kx2,o,h,0.5,0),color4440ff;
stickline(kx2,c,l,0.5,0),color4440ff;
stickline(kx3,c,o,4,1),colorffff33;
stickline(kx3,c,h,0.5,1),colorffff33;
stickline(kx3,o,l,0.5,1),colorffff33;
stickline(kx4,c,o,4,0),colorffff33;
stickline(kx4,o,h,0.5,0),colorffff33;
stickline(kx4,c,l,0.5,0),colorffff33;
(副图
{////////////////////////////////////////////////}
a:=(c*3+o+h+l)/6;
xj:=(a+0.618*ref(a,1)+0.382*ref(a,2)+0.236*ref(a,3)+0.146*ref(a,4))/2.382;
lx:=ref(xj,1);
zd1:=(sma(max(xj-lx,0),5,1)/sma(abs(xj-lx),5,1))*100;
zd2:=(sma(max(xj-lx,0),7,1)/sma(abs(xj-lx),7,1))*100;
lsc:=ref(c,4);
rmi:=sma(max(c-lsc,0),7,1)/sma(abs(c-lsc),7,1)*100;
rmim:=sma(rmi,3,1);rmima:=sma(rmim,3,1);frmim:=rmima-100;
{/////////////////////////////////////////////////}
refline:100,50,0,-100;
fillrgn(1,35,20),color000040;
fillrgn(1,65,80),color002000;
partline(1,zd1),color0000ff;
partline(1,zd2),color00ffff;
stickline(rmima>=50,-50,frmim,4,0),color000080;
stickline(rmima>=50,-50,frmim,3,0),color0000a6;
stickline(rmima>=50,-50,frmim,2,0),color0000ce;
stickline(rmima>=50,-50,frmim,1,0),color0000ff;
stickline(rmima<50,-50,frmim,4,0),color800000;
stickline(rmima<50,-50,frmim,3,0),colorb00000;
stickline(rmima<50,-50,frmim,2,0),colord50000;
stickline(rmima<50,-50,frmim,1,0),colorff0000;
stickline(frmim<-80,-80,frmim,0.5,1),color008080;
stickline(frmim>-20,-20,frmim,0.5,1),color0080ff;
上一指标公式:布林乖离选股通用公式 飞狐选股源码指标 源码
下一指标公式:孤城顶底-公式 飞狐公式孤城顶底指标 源码
☉ 好公式网发布的指标公式主要用于软件技术面分析,仅供参考,勿用于实际操作,据此操作风险自负!
☉ 解压密码:www.goodgongshi.com 就是好公式网域名,希望大家看清楚,切勿输错。
☉ tnc和tni格式指标公式,仅可以用通达信软件引入使用,例如可以用通达信软件引入使用指标公式;
☉ tne格式指标公式,仅可以用通达信软件公式编辑器5.0版导入,高版本兼容低版本;
☉ fnc格式指标公式,可以用大智慧软件新一代高速行情分析系统股票软件使用,少部分可以用分析家软件引入使用;
☉ alg格式指标公式,仅仅可以用飞狐交易师软件引入使用;exp格式指标公式,仅可以用大智慧经典版软件引入使用;
☉ hxf格式指标公式,仅可以用同花顺软件引入使用。
☉ 如果您发现下载软件链接错误,请联系管理员报告错误。
☉ 好公式网欢迎各位网友帮忙宣传转发本站网址,有您的支持,我们会做得更好!
☉ 本文主副套装公式 飞狐套装指标 源码仅供学习研究。