全方位黄金分割+FH数浪自动划线公式下载 飞狐划线公式指标 源码

指标公式详细说明

全方位黄金分割+数浪（自动划线公式源码）

{时间黄金分割}{☆殊途同归☆ by天津 x1835}
{☆§提示：1计算机画线不能代替手工作图。
2确定历史数据完整。}
{精确的黄金分割是二分之根号五减一,即0.618=(sqrt(5)-1)/2}
{注释里有黄金分割的解释}
input:左侧右移(0),右侧左移(0),开关(1,1,2);
t1:=barpos=sysparam(2)+左侧右移;
t2:=barpos=sysparam(3)-右侧左移;
t11:=sysparam(2)+左侧右移;
t21:=sysparam(3)-右侧左移;
ymd:=date;
d1:ymd[t11],linethick0;
d2:ymd[t21],linethick0;
{d2:hhv(if(t2,date,0),0),linethick0;}
vertline(t1),color00ffff,linedot;
vertline(t2),color00ffff,linedot;
{d1:=if(t1 or t2,barpos,0);
dd:=d1;
x835:=sortpos(dd,1,1,datacount);
间隔:abs(d1[dd[1]]-d1[dd[2]]),linethick0;}
间隔:t21-t11,linethick0;
{ccc:ref(barstatus=2,右侧左移);}
x1:=间隔*(0.191);
x8:=间隔*(0.382);
x05:=间隔*(0.5);
x3:=间隔*(0.618);
x5:=间隔*(0.809);

x1831:=sysparam(2)+左侧右移+round(x1);
tx1:=barpos=x1831;
vertline(tx1),colorffff33,linedot;
d191:ymd[x1831],linethick0;

x1838:=t11+round(x8);
tx8:=barpos=x1838;
vertline(tx8),color00aaaa,linedot;
d382:ymd[x1838],linethick0;

x18305:=t11+round(x05);
tx05:=barpos=x18305;
vertline(tx05),color0000ff,linedot;
d05:ymd[x18305],linethick0;

x1833:=t11+round(x3);
tx3:=barpos=x1833;
vertline(tx3),color00aaaa,linedot;
d618:ymd[x1833],linethick0;

x1835:=t11+round(x5);
tx5:=barpos=x1835;
vertline(tx5),colorffff33,linedot;
d809:ymd[x1835],linethick0;

ph:=sysparam(4);
pl:=sysparam(5);
drawtext(t1,pl,strleft(numtostr(d1+19000000,0),4)+strright(numtostr(d1,0),4)),color00ffff;
drawtext(t2,pl,strleft(numtostr(d2+19000000,0),4)+strright(numtostr(d2,0),4)),color00ffff,align2;
drawtext(tx1,pl,strleft(numtostr(d191+19000000,0),4)+strright(numtostr(d191,0),4)),colorffff33;
drawtext(tx8,pl,strleft(numtostr(d382+19000000,0),4)+strright(numtostr(d382,0),4)),color00aaaa;
drawtext(tx05,pl,strleft(numtostr(d05+19000000,0),4)+strright(numtostr(d05,0),4)),color0000ff;
drawtext(tx3,pl,strleft(numtostr(d618+19000000,0),4)+strright(numtostr(d618,0),4)),color00aaaa;
drawtext(tx5,pl,strleft(numtostr(d809+19000000,0),4)+strright(numtostr(d809,0),4)),colorffff33;

drawtext(t1,ph*0.99,'0点'),color00ffff;
drawtext(t2,ph*0.99,'100%'),color00ffff,align2;
drawtext(tx1,ph*0.99,'0.191'),colorffff33;
drawtext(tx8,ph*0.99,'0.382'),color00aaaa;
drawtext(tx05,ph*0.99,'0.5'),color0000ff;
drawtext(tx3,ph*0.99,'0.618'),color00aaaa;
drawtext(tx5,ph*0.99,'0.809'),colorffff33;

if 开关=2 then
begin

x236:=间隔*(0.236);
x764:=间隔*(0.764);
x236:=sysparam(2)+左侧右移+round(x236);
tx236:=barpos=x236;
vertline(tx236),coloraaaaaa,linedot;
d236:ymd[x236],linethick0;

x764:=t11+round(x764);
tx764:=barpos=x764;
vertline(tx764),coloraaaaaa,linedot;
d764:ymd[x764],linethick0;
pllh:=(pl*4+ph)/5;
phhl:=(pl+ph*4)/5;
drawtext(tx236,pllh,strleft(numtostr(d236+19000000,0),4)+strright(numtostr(d236,0),4)),coloraaaaaa;
drawtext(tx764,pllh,strleft(numtostr(d764+19000000,0),4)+strright(numtostr(d764,0),4)),coloraaaaaa;
drawtext(tx236,phhl,'0.236'),coloraaaaaa;
drawtext(tx764,phhl,'0.764'),coloraaaaaa;

end;

{§历史影响现在，现在影响未来。§}

input:n(30,1,1000);
hh:hhv(h,n);
ll:llv(l,n);

<%

vh=ffl.vardata("hh")

vl=ffl.vardata("ll")

vn=ffl.vardata("n")

last=ubound(vh)

if vn>last then vn=last+1

for i=last to last-vn+1 step-1

vh(i)=vh(last)

vl(i)=vl(last)

next

ffl.vardata("hh")=vh

ffl.vardata("ll")=vl

ffl.varstartindex("hh")=last-vn+1

ffl.varstartindex("ll")=last-vn+1

%>

hh,color009999;
drawtext(c>0 and islastbar=1,hh,'【黄金分割】↑'),color009999;
drawnumber(barscount(ll)=n-(n-1),hh,hh,2),align2,color009999;
ll+((hh-ll)*0.809),pointdot,linethick1,coloryellow;
drawtext(c>0 and islastbar=1,ll+((hh-ll)*0.809),' 0.809↑'),color009999;
drawnumber(barscount(ll)=n-(n-1),ll+((hh-ll)*0.809),ll+((hh-ll)*0.809),2),align2,color009999;
ll+((hh-ll)*0.764),pointdot,linethick1,coloryellow;
drawtext(c>0 and islastbar=1,ll+((hh-ll)*0.764),' 0.764↑'),color009999;
drawnumber(barscount(ll)=n-(n-1),ll+((hh-ll)*0.764),ll+((hh-ll)*0.764),2),align2,color009999;
ll+((hh-ll)*0.618),pointdot,linethick1,coloryellow;
drawtext(c>0 and islastbar=1,ll+((hh-ll)*0.618),' 0.618↑'),color009999;
drawnumber(barscount(ll)=n-(n-1),ll+((hh-ll)*0.618),ll+((hh-ll)*0.618),2),align2,color009999;
ll+((hh-ll)*0.500),pointdot,linethick1,coloryellow;
drawtext(c>0 and islastbar=1,ll+((hh-ll)*0.500),' 0.500↑'),color009999;
drawnumber(barscount(ll)=n-(n-1),ll+((hh-ll)*0.500),ll+((hh-ll)*0.500),2),align2,color009999;
ll+((hh-ll)*0.382),pointdot,linethick1,coloryellow;
drawtext(c>0 and islastbar=1,ll+((hh-ll)*0.382),' 0.382↑'),color009999;
drawnumber(barscount(ll)=n-(n-1),ll+((hh-ll)*0.382),ll+((hh-ll)*0.382),2),align2,color009999;
ll+((hh-ll)*0.333),pointdot,linethick1,coloryellow;
drawtext(c>0 and islastbar=1,ll+((hh-ll)*0.333),' 0.333↑'),color009999;
drawnumber(barscount(ll)=n-(n-1),ll+((hh-ll)*0.333),ll+((hh-ll)*0.333),2),align2,color009999;
ll+((hh-ll)*0.236),pointdot,linethick1,coloryellow;
drawtext(c>0 and islastbar=1,ll+((hh-ll)*0.236),' 0.236↑'),color009999;
drawnumber(barscount(ll)=n-(n-1),ll+((hh-ll)*0.236),ll+((hh-ll)*0.236),2),align2,color009999;
ll+((hh-ll)*0.191),pointdot,linethick1,coloryellow;
drawtext(c>0 and islastbar=1,ll+((hh-ll)*0.191),' 0.191↑'),color009999;
drawnumber(barscount(ll)=n-(n-1),ll+((hh-ll)*0.191),ll+((hh-ll)*0.191),2),align2,color009999;
ll,color009999;
drawtext(c>0 and islastbar=1,ll,'〖底部起点〗↑'),color009999;
drawnumber(barscount(ll)=n-(n-1),ll,ll,2),align2,coloryellow;

fbars:=sysparam(0);
f5:=barssince(c)=fbars-1;
vertline(f5),pointdot,color996666,linethick1,shift5;
drawnumber(f5,sysparam(4),5,0),shift5;
ff5:=barssince(c)=fbars-5;
vertline(ff5),pointdot,color996666,linethick1;
drawnumber(ff5,sysparam(4),5,0);
f8:=barssince(c)=fbars-1;
ff8:=barssince(c)=fbars-8;
vertline(f8),pointdot,color996666,linethick1,shift8;
drawnumber(f8,sysparam(4),8,0),shift8;
vertline(ff8),pointdot,color996666,linethick1;
drawnumber(ff8,sysparam(4),8,0);
f13:=barssince(c)=fbars-1;
ff13:=barssince(c)=fbars-13;
vertline(f13),pointdot,color996666,linethick1,shift13;
drawnumber(f13,sysparam(4),13,0),shift13;
vertline(ff13),pointdot,color996666,linethick1;
drawnumber(ff13,sysparam(4),13,0);
f21:=barssince(c)=fbars-1;
ff21:=barssince(c)=fbars-21;
vertline(f21),pointdot,color996666,linethick1,shift21;
drawnumber(f21,sysparam(4),21,0),shift21;
vertline(ff21),pointdot,color996666,linethick1;
drawnumber(ff21,sysparam(4),21,0);
f34:=barssince(c)=fbars-1;
ff34:=barssince(c)=fbars-34;
vertline(f34),pointdot,color996666,linethick1,shift34;
drawnumber(f34,sysparam(4),34,0),shift34;
vertline(ff34),pointdot,color996666,linethick1;
drawnumber(ff34,sysparam(4),34,0);
f55:=barssince(c)=fbars-1;
ff55:=barssince(c)=fbars-54;
vertline(f55),pointdot,color996666,linethick1,shift55;
drawnumber(f55,sysparam(4),55,0)shift55;
vertline(ff55),pointdot,color996666,linethick1;
drawnumber(ff55,sysparam(4),55,0);
f89:=barssince(c)=fbars-1;
ff89:=barssince(c)=fbars-88;
vertline(f89),pointdot,color996666,linethick1,shift89;
drawnumber(f89,sysparam(4),89,0),shift89;
vertline(ff89),pointdot,color996666,linethick1;
drawnumber(ff89,sysparam(4),89,0);
f134:=barssince(c)=fbars+20;
ff134:=barssince(c)=fbars-144;
vertline(f134),pointdot,color996666,linethick1,shift124;
drawnumber(f134,sysparam(4),144,0),shift124;
vertline(ff134),pointdot,color996666,linethick1;
drawnumber(ff134,sysparam(4),144,0);

{}
{m 5}
v1:=ma(high,30)*1.15;
v2:=ma(high,3)*1.03;
v3:=ma(low,3)*0.97;
v4:=ma(low,30)*0.85;
{}
get:zig(3,m),coloryellow;
pl5:=zig(3,5);
en1:=zig(3,5)>ref(zig(3,5),1) and ref(zig(3,5),1)<=ref(zig(3,5),2) and ref(zig(3,5),2)<=ref(zig(3,5),3);
ex1:=zig(3,5)<ref(zig(3,5),1) and ref(zig(3,5),1)>=ref(zig(3,5),2) and ref(zig(3,5),2)>=ref(zig(3,5),3);
pl10:=zig(3,10);
en2:=zig(3,10)>ref(zig(3,10),1) and ref(zig(3,10),1)<=ref(zig(3,10),2) and ref(zig(3,10),2)<=ref(zig(3,10),3);
ex2:=zig(3,10)<ref(zig(3,10),1) and ref(zig(3,10),1)>=ref(zig(3,10),2) and ref(zig(3,10),2)>=ref(zig(3,10),3);
pl20:=zig(3,20);
en3:=zig(3,20)>ref(zig(3,20),1) and ref(zig(3,20),1)<=ref(zig(3,20),2) and ref(zig(3,20),2)<=ref(zig(3,20),3);
ex3:=zig(3,20)<ref(zig(3,20),1) and ref(zig(3,20),1)>=ref(zig(3,20),2) and ref(zig(3,20),2)>=ref(zig(3,20),3);
pl40:=zig(3,40);
走强1:=barslast(pl5<ref(pl5,1));
走弱1:=barslast(pl5>ref(pl5,1));
走强2:=barslast(pl10<ref(pl10,1));
走弱2:=barslast(pl10>ref(pl10,1));
走强3:=barslast(pl20<ref(pl20,1));
走弱3:=barslast(pl20>ref(pl20,1));
ztjz5:=if(pl10>ref(pl10,1),count(en1,走强2),0);
ztjd5:=if(pl10>ref(pl10,1),count(ex1,走强2),0);
dtjz5:=if(pl10<ref(pl10,1),count(en1,走弱2),0);
dtjd5:=if(pl10<ref(pl10,1),count(ex1,走弱2),0);
ztjz10:=if(pl20>ref(pl20,1),count(en2,走强3),0);
ztjd10:=if(pl20>ref(pl20,1),count(ex2,走强3),0);
dtjz10:=if(pl20<ref(pl20,1),count(en2,走弱3),0);
dtjd10:=if(pl20<ref(pl20,1),count(ex2,走弱3),0);
drawtext(en1 and dtjz5=1,l*0.98,'㈠'),colorffff00;
drawtext(ex1 and dtjd5=2,h*1.02,'㈡'),colorffff00;
drawtext(en2 and ztjz5=1,l*0.98,'㈢'),colorffff00;
drawtext(ex1 and pl10>ref(pl10,1) and ztjd5=1,h*1.02,'⑴'),color0000ff;
drawtext(en1 and pl10>ref(pl10,1) and ztjz5=2,l*0.98,'⑵'),color0000ff;
drawtext(ex1 and pl10>ref(pl10,1) and ztjz5=2,h*1.02,'⑶'),color0000ff;
drawtext(en1 and pl10>ref(pl10,1) and ztjz5=3,l*0.98,'⑷'),color0000ff;
drawtext(ex2 and pl20>ref(pl20,1) and ztjd10=1,h*1.02,'⑸'),color0000ff;
drawtext(en2 and dtjz10=1,l*0.94,'ⅰ'),colorff6000;
drawtext(ex2 and dtjd10=2,h*1.06,'ⅱ'),colorff6000;
drawtext(en3 and ztjz10=1,l*0.94,'ⅲ'),colorff6000;
drawtext(ex2 and pl20>ref(pl20,1) and ztjd10=1,h*1.06,'①'),linethick3,color00ffff;
drawtext(en2 and pl20>ref(pl20,1) and ztjz10=2,l*0.94,'②'),linethick3,color00ffff;
drawtext(ex2 and pl20>ref(pl20,1) and ztjd10=2 or (ztjd10=0 or ztjd10=2) and ex2,h*1.06,'③'),linethick3,color00ffff;
drawtext(en2 and pl20>ref(pl20,1) and ztjz10=3,l*0.94,'④'),linethick3,color00ffff;

指标公式下载地址

上一指标公式：自己在用的较全面成交量公式下载 飞狐成交量指标 源码

下一指标公式：三明治1号公式下载 飞狐明治指标 源码

相关飞狐公式推荐

指标公式下载注意

☉ 好公式网发布的指标公式主要用于软件技术面分析，仅供参考，勿用于实际操作，据此操作风险自负！

☉ 解压密码：www.goodgongshi.com 就是好公式网域名，希望大家看清楚，切勿输错。

☉ tnc和tni格式指标公式，仅可以用通达信软件引入使用，例如可以用通达信软件引入使用指标公式；

☉ tne格式指标公式，仅可以用通达信软件公式编辑器5.0版导入，高版本兼容低版本；

☉ fnc格式指标公式，可以用大智慧软件新一代高速行情分析系统股票软件使用，少部分可以用分析家软件引入使用；

☉ alg格式指标公式，仅仅可以用飞狐交易师软件引入使用；exp格式指标公式，仅可以用大智慧经典版软件引入使用；

☉ hxf格式指标公式，仅可以用同花顺软件引入使用。

☉ 如果您发现下载软件链接错误，请联系管理员报告错误。

☉ 好公式网欢迎各位网友帮忙宣传转发本站网址，有您的支持，我们会做得更好！

☉ 本文全方位黄金分割+FH数浪自动划线公式下载 飞狐划线公式指标 源码仅供学习研究。