相關(guān)標(biāo)簽:黃金分割比例指標(biāo)公式 、 黃金分割買入指標(biāo)公式 、 黃金分割指標(biāo)公式源碼 、 黃金分割指標(biāo)源碼 、 通達(dá)信黃金分割指標(biāo) 、 mt4黃金分割指標(biāo) 、 文華黃金分割指標(biāo) 、 黃金分割比例公式 、 黃金分割點(diǎn)公式 、 通達(dá)信黃金分割公式 、 黃金分割選股公式 、 黃金分割計(jì)算公式 、 雙色球黃金分割公式 、 股票黃金分割公式 、 求黃金分割公式 、

?

靜動(dòng)態(tài)黃金分割.大家共享.希望喜歡
對比下兩張圖是不是一樣的數(shù)字和方向
說明下.紅色向上.綠色向下.黃色動(dòng)態(tài)

?

?

?

原理解析：
N賦值:15 Z賦值:4N%的之字轉(zhuǎn)向 H1賦值:Z<1日前的Z AND 1日前的Z=3日內(nèi)Z的最高值 H2賦值:若H1則將最近2周期置為1的1日過濾 L1賦值:Z>1日前的Z AND 1日前的Z=3日內(nèi)Z的最低值 L2賦值:若L1則將最近2周期置為1的1日過濾 H3賦值:上次H2距今天數(shù) L3賦值:上次L2距今天數(shù) H4賦值:1日前的H3+1日前的最高價(jià) L4賦值:1日前的L3+1日前的最低價(jià) H5賦值:統(tǒng)計(jì)0日中滿足H2的天數(shù)/2不等于統(tǒng)計(jì)0日中滿足H2的天數(shù)/2的向下舍入 L5賦值:統(tǒng)計(jì)0日中滿足L2的天數(shù)/2不等于統(tǒng)計(jì)0日中滿足L2的天數(shù)/2的向下舍入 VAR1賦值:(H4-L3日前的最低價(jià))/10 VAR2賦值:(最高價(jià)-L3日前的最低價(jià))/VAR1>2 AND (最高價(jià)-L3日前的最低價(jià))/VAR1<5 VAR3賦值:(1日前的H3-L3)/10 VAR4賦值:L3>VAR3*2 AND L3<VAR3*5 AND L3>10 VAR5賦值:H2 AND 取反 AND VAR2 AND VAR4 VAR6賦值:H2 AND H5 AND VAR2 AND VAR4 VAR7賦值:H3日前的VAR5 AND L3=H3*2 VAR8賦值:H3日前的VAR5 AND H3=H3+1日前的H3 VAR9賦值:H3日前的VAR6 AND L3=H3*2 VARA賦值:H3日前的VAR6 AND H3=H3+1日前的H3 VARB賦值:上次VAR5ORVAR6距今天數(shù) VARC賦值:H3+H3+1日前的H3+1日前的最高價(jià) VARD賦值:L3日前的最低價(jià)+(最高價(jià)-VARC)/(1日前的H3+1)*L3 VARE賦值:L3日前的最低價(jià)+(L3日前的最低價(jià)-VARC)/L3日前的H3*L3 VARF賦值:統(tǒng)計(jì)H3日中滿足VAR7的天數(shù) AND VAR8 VARG賦值:統(tǒng)計(jì)H3日中滿足VAR9的天數(shù) AND VARA VARH賦值:(VARF OR VARG) AND 收盤價(jià)<VARB日前的VARE 當(dāng)滿足條件VARB>=0ANDVARB<100時(shí),在VARB+VARB日前的L3日前的最低價(jià)和VARB+VARB日前的L3日前的最低價(jià)位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,COLORFFFF00 當(dāng)滿足條件VARB>=0ANDVARB<100時(shí),在VARB日前的VARD和VARB日前的VARD位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,COLORFFFF00 當(dāng)滿足條件VARB>=0ANDVARB<100時(shí),在VARB日前的VARE和VARB日前的VARE位置之間畫柱狀線,寬度為10,0不為0則畫空心柱.,COLORFFFF00 A1賦值:3日前的最高價(jià)=2*3+1日內(nèi)最高價(jià)的最高值 B1賦值:A1的3日過濾 C1賦值:若B1則將最近3+1周期置為1 D1賦值:C1的3日過濾 A2賦值:3日前的最低價(jià)=2*3+1日內(nèi)最低價(jià)的最低值 B2賦值:A2的3日過濾 C2賦值:若B2則將最近3+1周期置為1 D2賦值:C2的3日過濾 E1賦值:(1日前的2*3日內(nèi)最低價(jià)的最低值+1日前的2*3日內(nèi)最高價(jià)的最高值)/2 E2賦值:(最高價(jià)+最低價(jià))/2 H1賦值:(D1 AND 取反) OR 數(shù)據(jù)位置狀態(tài)=2 OR 收盤價(jià)的有效數(shù)據(jù)周期數(shù)=1 L1賦值:(D2 AND 取反) X1賦值:1日前的上次H1距今天數(shù)+1 F1賦值:若H1ANDCOUNT(L1,X1)>0則將最近X1日內(nèi)如果L1,返回最低價(jià),否則返回10000距今天數(shù)周期置為1 G1賦值:F1>1日前的F1 I1賦值:若G1則將最近2周期置為1 LD賦值:I1>1日前的I1 L2賦值:LD OR 數(shù)據(jù)位置狀態(tài)=2 OR 收盤價(jià)的有效數(shù)據(jù)周期數(shù)=1 X2賦值:1日前的上次L2距今天數(shù)+1 F2賦值:若L2ANDCOUNT(H1,X2)>0則將最近X2日內(nèi)如果H1,返回最高價(jià),否則返回0距今天數(shù)周期置為1 G2賦值:F2>1日前的F2 I2賦值:若G2則將最近2周期置為1 HD賦值:I2>1日前的I2 當(dāng)滿足條件LD時(shí),在最低價(jià)位置畫直線起點(diǎn)，當(dāng)滿足條件HD時(shí),在最高價(jià)位置畫直線終點(diǎn),0表示是否延長.,畫紅色,線寬為1 當(dāng)滿足條件HD時(shí),在最高價(jià)位置畫直線起點(diǎn)，當(dāng)滿足條件LD時(shí),在最低價(jià)位置畫直線終點(diǎn),0表示是否延長.,畫紅色,線寬為1 J1賦值:若數(shù)據(jù)位置狀態(tài)=2則將最近上次HD距今天數(shù)和上次LD距今天數(shù)的較小值+1周期置為1 J2賦值:J1>1日前的J1 當(dāng)滿足條件J2時(shí),在如果HD,返回最高價(jià),否則返回最低價(jià)位置畫直線起點(diǎn)，當(dāng)滿足條件數(shù)據(jù)位置狀態(tài)=2時(shí),在如果上次HD距今天數(shù)>上次LD距今天數(shù),返回最高價(jià),否則返回最低價(jià)位置畫直線終點(diǎn),0表示是否延長.,畫白色,線寬為1,POINTDOT A3賦值:最高價(jià) B3賦值:1日前的上次HD距今天數(shù)+1日前的最高價(jià)>1日前的上次HD距今天數(shù)+2+1日前的上次HD距今天數(shù)+2日前的上次HD距今天數(shù)日前的最高價(jià) D3賦值:A3 AND B3 AND HD E3賦值:若D3則將最近1日前的上次HD距今天數(shù)+2周期置為1 HH賦值:E3>1日前的E3 A4賦值:最低價(jià)>1日前的上次LD距今天數(shù)+1日前的最低價(jià) B4賦值:1日前的上次LD距今天數(shù)+1日前的最低價(jià) D4賦值:A4 AND B4 AND LD E4賦值:若D4則將最近1日前的上次LD距今天數(shù)+2周期置為1 LL賦值:E4>1日前的E4 當(dāng)滿足條件HH時(shí),在最高價(jià)位置畫10號圖標(biāo),ALIGN1 當(dāng)滿足條件LL時(shí),在最低價(jià)位置畫12號圖標(biāo),ALIGN1 H3賦值:HH OR 數(shù)據(jù)位置狀態(tài)=2 OR 收盤價(jià)的有效數(shù)據(jù)周期數(shù)=1 X3賦值:1日前的上次H3距今天數(shù)+1 F3賦值:若H3ANDCOUNT(LL,X3)>0則將最近X3日內(nèi)如果LL,返回最低價(jià),否則返回10的20乘冪距今天數(shù)周期置為1 G3賦值:F3>1日前的F3 I3賦值:若G3則將最近2周期置為1 LZ賦值:I3>1日前的I3 L4賦值:LZ OR 數(shù)據(jù)位置狀態(tài)=2 OR 收盤價(jià)的有效數(shù)據(jù)周期數(shù)=1 X4賦值:1日前的上次L4距今天數(shù)+1 F4賦值:若L4ANDCOUNT(HH,X4)>0則將最近X4日內(nèi)如果HH,返回最高價(jià),否則返回-10的20乘冪距今天數(shù)周期置為1 G4賦值:F4>1日前的F4 I4賦值:若G4則將最近2周期置為1 HZ賦值:I4>1日前的I4 PARTLINE(收盤價(jià)>最高價(jià)的144日指數(shù)移動(dòng)平均,最高價(jià)的144日指數(shù)移動(dòng)平均),畫紅色 PARTLINE(收盤價(jià)<最高價(jià)的144日指數(shù)移動(dòng)平均,最高價(jià)的144日指數(shù)移動(dòng)平均),畫綠色 PARTLINE(收盤價(jià)>最低價(jià)的144日指數(shù)移動(dòng)平均,最低價(jià)的144日指數(shù)移動(dòng)平均),畫紅色 PARTLINE(收盤價(jià)<最低價(jià)的144日指數(shù)移動(dòng)平均,最低價(jià)的144日指數(shù)移動(dòng)平均),畫綠色 N賦值:SYSPARAM(3)-SYSPARAM(1)+10 A賦值:若是否最后一個(gè)周期則將最近N日內(nèi)最高價(jià)距今天數(shù)+1周期置為1 B賦值:統(tǒng)計(jì)N日中滿足A的天數(shù)=1 前高賦值:如果N>0,返回上次B距今天數(shù)日前的最高價(jià),否則返回0,畫白色 A2賦值:若是否最后一個(gè)周期則將最近N日內(nèi)最低價(jià)距今天數(shù)+1周期置為1 B2賦值:A2>1日前的A2 前低賦值:上次B2距今天數(shù)日前的最低價(jià),畫白色 HH賦值: 前高 LL賦值: 前低 HL賦值:HH-LL 賦值: 上次最高價(jià)=HH距今天數(shù) 賦值:上次最低價(jià)=LL距今天數(shù)

?

?來源:程序化99（ www.tumamayizhan.com ）

源碼：

?

n:=15;
z:=ZIG(4,n);
H1:=Z<REF(Z,1) AND REF(Z,1)=HHV(Z,3);
H2:=FILTER(BACKSET(H1,2),1);
L1:=Z>REF(Z,1) AND REF(Z,1)=LLV(Z,3);
L2:=FILTER(BACKSET(L1,2),1);
H3:=BARSLAST(H2);
L3:=BARSLAST(L2);
h4:=REF(H,REF(h3,1)+1);
l4:=REF(L,REF(l3,1)+1);
h5:=COUNT(h2,0)/2<>FLOOR(COUNT(h2,0)/2);
l5:=COUNT(l2,0)/2<>FLOOR(COUNT(L2,0)/2);
var1:=(h4-REF(L,l3))/10;
var2:=(H-REF(L,l3))/var1>2 AND (H-REF(L,l3))/var1<5;
var3:=(REF(h3,1)-l3)/10;
var4:=l3>var3*2 AND l3<var3*5 AND l3>10;
var5:=h2 AND NOT(h5) AND var2 AND var4;
var6:=h2 AND h5 AND var2 AND var4;
var7:=REF(var5,h3) AND l3=h3*2;
var8:=REF(var5,h3) AND h3=REF(h3,h3+1);
var9:=REF(var6,h3) AND l3=h3*2;
vara:=REF(var6,h3) AND h3=REF(h3,h3+1);
varb:=BARSLAST(var5 OR var6);
varc:=REF(H,h3+REF(h3,h3+1)+1);
vard:=REF(L,l3)+(H-varc)/(REF(h3,1)+1)*l3;
vare:=REF(L,l3)+(REF(L,l3)-varc)/REF(h3,l3)*l3;
varf:=COUNT(var7,h3) AND var8;
varg:=COUNT(var9,h3) AND vara;
varh:=(varf OR varg) AND C<REF(vare,varb);
STICKLINE(varb>=0 AND varb<100,REF(L,varb+REF(l3,varb)),REF(L,varb+REF(l3,varb)),10,0),
colorffff00;
STICKLINE(varb>=0 AND varb<100,REF(vard,varb),REF(vard,varb),10,0),
colorffff00;
STICKLINE(varb>=0 AND varb<100,REF(vare,varb),REF(vare,varb),10,0),
colorffff00;


A1:=REF(H,3)=HHV(H,2*3+1); B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1); D1:=FILTER(C1,3);
A2:=REF(L,3)=LLV(L,2*3+1); B2:=FILTER(A2,3); C2:=BACKSET(B2,3+1); D2:=FILTER(C2,3);
E1:=(REF(LLV(L,2*3),1)+REF(HHV(H,2*3),1))/2; E2:=(H+L)/2;
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR BARSTATUS=2 OR BARSCOUNT(C)=1;
L1:=(D2 AND NOT(D1 AND E1=E2));
X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,L,10000),X1));
G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1);
L2:=LD OR BARSTATUS=2 OR BARSCOUNT(C)=1;
X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H1,X2)>0,HHVBARS(IF(H1,H,0),X2));
G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1);
DRAWLINE(LD,L,HD,H,0),colorred,LINETHICK1;
DRAWLINE(HD,H,LD,L,0),colorred,LINETHICK1;
J1:=BACKSET(BARSTATUS=2,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
DRAWLINE(J2,IF(HD,H,L),BARSTATUS=2,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORWHITE,LINETHICK1,POINTDOT;
A3:=H; B3:=REF(H,REF(BARSLAST(HD),1)+1)>REF(H,REF(BARSLAST(HD),1)+2+REF(BARSLAST(HD),REF(BARSLAST(HD),1)+2));
D3:=A3 AND B3 AND HD; E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2); HH:=E3>REF(E3,1);
A4:=L>REF(L,REF(BARSLAST(LD),1)+1);
B4:=REF(L,REF(BARSLAST(LD),1)+1); D4:=A4 AND B4 AND LD; E4:=BACKSET(D4,REF(BARSLAST(LD),1)+2); LL:=E4>REF(E4,1);{找出全部長期低點(diǎn)}
DRAWICON(HH,H,10),ALIGN1; DRAWICON(LL,L,12),ALIGN1;
H3:=HH OR BARSTATUS=2 OR BARSCOUNT(C)=1;
X3:=REF(BARSLAST(H3),1)+1; F3:=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3));
G3:=F3>REF(F3,1); I3:=BACKSET(G3,2); LZ:=I3>REF(I3,1);
L4:=LZ OR BARSTATUS=2 OR BARSCOUNT(C)=1;
X4:=REF(BARSLAST(L4),1)+1; F4:=BACKSET(L4 AND COUNT(HH,X4)>0,HHVBARS(IF(HH,H,-POW(10,20)),X4));
G4:=F4>REF(F4,1); I4:=BACKSET(G4,2); HZ:=I4>REF(I4,1);PARTLINE(C>EMA(H,144),EMA(H,144)),colorred;
PARTLINE(C<EMA(H,144),EMA(H,144)),colorgreen;
PARTLINE(C>EMA(L,144),EMA(L,144)),colorred;
PARTLINE(C<EMA(L,144),EMA(L,144)),colorgreen;N:=SYSPARAM(3)-SYSPARAM(1)+10;
A:=BACKSET(ISLASTBAR,HHVBARS(H,N)+1);
B:=COUNT(A,N)=1;
前高:=IF(N>0,REF(H,BARSLAST(B)),0),COLORWHITE;
A2:=BACKSET(ISLASTBAR,LLVBARS(L,N)+1);
B2:=A2>REF(A2,1);
前低:=REF(L,BARSLAST(B2)),COLORWHITE;
hh:= 前高;
ll:= 前低;
HL:=hh-ll;
wH := BARSLAST(H=hh);
wL :=BARSLAST(L=ll);
K := wH-wL;
a2 :=IF(k<0,hh- HL*0.382,ll+HL*0.382);
a3 :=IF(k<0,hh- HL*0.618,ll+HL*0.618);
F3:=A2,COLORGREEN,LINETHICK;
F5:=A3,COLORYELLOW,LINETHICK;
mHL:= hh-HL*0.5;
A := ISLASTBAR;
DRAWTEXT(A AND K<>3, a2, ' F3：'+NUMTOSTR(a2,2)),ALIGN2,COLORYELLOW;
DRAWTEXT(A AND K<>3, a3, ' F5：'+NUMTOSTR(a3,2)),ALIGN2,COLORYELLOW;
DRAWTEXT(A AND K<>3,HH, ' ￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorred,linethick7;
DRAWTEXT(A AND K<>3,LL, ' ￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorred,linethick7;STICKLINE(C>=O,C,O,8,0),COLOR0000AA;
STICKLINE(C>=O,C,O,6,0),COLOR0000bb ;
STICKLINE(C>=O,C,O,4,0),COLOR0000cc ;
STICKLINE(C>=O,C,O,2,0),COLOR0000ee;
STICKLINE(C>=O,H,L,0,0),COLOR0000ff;
STICKLINE(C<=O,C,O,8,0),Color7B7b00;
STICKLINE(C<=O,C,O,6,0),Color909000;
STICKLINE(C<=O,C,O,4,0),ColorA8a800;
STICKLINE(C<=O,C,O,2,0),COLORcece00;
STICKLINE(C<=O,H,L,0,0),COLORffff00;A1:=HHV(H,50);
A2:=LLV(L,10);
A3:=(A1-A2)*0.618+A2;
A5:=(A1-A2)*0.382+A2;
PD:=ISLASTBAR;
F3:=A3,LINEDOT;
F5:=A5,LINEDOT;
DRAWNUMBER(BARPOS=DATACOUNT, A3, A3,2),colorff;
DRAWTEXT(BARPOS=DATACOUNT, A3,'F5'),PXDN12,colorff;
DRAWNUMBER(BARPOS=DATACOUNT, A5, A5,2),colorff;
DRAWTEXT(BARPOS=DATACOUNT, A5,'F3'),PXDN12,colorff;
A1:=HHV(HIGH,5);
A2:=LLV(LOW,10);
A3:=(A1-A2)*0.618+A2;
A5:=(A1-A2)*0.382+A2;
PD:=ISLASTBAR;
F3:=A3,LINEDOT;
F5:=A5,LINEDOT;
DRAWNUMBER(BARPOS=DATACOUNT, A5, A5,2),Color00FF00;
DRAWTEXT(BARPOS=DATACOUNT, A5,'F5'),PXDN12,Color00FF00;
DRAWNUMBER(BARPOS=DATACOUNT, A3, A3,2),Color00FF00;
DRAWTEXT(BARPOS=DATACOUNT, A3,'F3'),PXDN12,Color00FF00;{程序化交易 www.tumamayizhan.com }
{程序化交易 www.tumamayizhan.com }

?

公式導(dǎo)入教程: 【通達(dá)信公式源碼導(dǎo)入方法教程】 【同花順公式源碼導(dǎo)入方法教程】 【大智慧新一代公式源碼導(dǎo)入方法教程】

?