飞狐静动态黄金分割主图选股指标公式源码

飞狐静动态黄金分割主图选股指标公式源码

源码正文：

n:=15{XG51};
z:=zig(4,n){XG51};
H1:=Z<REF(Z,1) AND REF(Z,1)=HHV(Z,3){XG51};
H2:=FILTER(BacKSET(H1,2),1){XG51};
L1:=Z>REF(Z,1) AND REF(Z,1)=LLV(Z,3){XG51};
L2:=FILTER(BACKSET(L1,2),1){XG51};
H3:=BArslAst(H2){XG51};
L3:=BARSLAST(L2){XG51};
h4:=REF(H,REF(h3,1)+1){XG51};
l4:=REF(L,REF(l3,1)+1){XG51};
h5:=COUNT(h2,0)/2<>FLOOR(COUNT(h2,0)/2){XG51};
l5:=COUNT(l2,0)/2<>FLOOR(COUNT(l2,0)/2){XG51};
var1:=(h4-REF(L,l3))/10{XG51};
var2:=(H-REF(L,l3))/var1>2 AND (H-REF(L,l3))/var1<5{XG51};
var3:=(REF(h3,1)-l3)/10{XG51};
var4:=l3>var3*2 AND l3<var3*5 AND l3>10{XG51};
var5:=h2 AND NOT(h5) AND var2 AND var4{XG51};
var6:=h2 AND h5 AND var2 AND var4{XG51};
var7:=REF(var5,h3) AND l3=h3*2{XG51};
var8:=REF(var5,h3) AND h3=REF(h3,h3+1){XG51};
var9:=REF(var6,h3) AND l3=h3*2{XG51};
vara:=REF(var6,h3) AND h3=REF(h3,h3+1){XG51};
varb:=BARSLAST(var5 OR var6){XG51};
varc:=REF(H,h3+REF(h3,h3+1)+1){XG51};
vard:=REF(L,l3)+(H-varc)/(REF(h3,1)+1)*l3{XG51};
vare:=REF(L,l3)+(REF(L,l3)-varc)/REF(h3,l3)*l3{XG51};
varf:=COUNT(var7,h3) AND var8{XG51};
varg:=COUNT(var9,h3) AND vara{XG51};
varh:=(varf OR varg) AND C<REF(vare,varb){XG51};
STICKLINE(varb>=0 AND varb<100,REF(L,varb+REF(l3,varb)),REF(L,varb+REF(l3,varb)),10,0),
colorffff00{XG51};
STICKLINE(varb>=0 AND varb<100,REF(vard,varb),REF(vard,varb),10,0),
colorffff00{XG51};
STICKLINE(varb>=0 AND varb<100,REF(vare,varb),REF(vare,varb),10,0),
colorffff00{XG51};
A1:=REF(H,3)=HHV(H,2*3+1); B1:=FILTER(A1,3); C1:=BACKSET(B1,3+1); D1:=FILTER(C1,3){XG51};
A2:=REF(L,3)=LLV(L,2*3+1); B2:=FILTER(A2,3); C2:=BACKSET(B2,3+1); D2:=FILTER(C2,3){XG51};
E1:=(REF(LLV(L,2*3),1)+REF(HHV(H,2*3),1))/2; E2:=(H+L)/2{XG51};
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR BARSTATUS=2 OR BARSCOUNT(C)=1{XG51};
L1:=(D2 AND NOT(D1 AND E1=E2)){XG51};
X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,L,10000),X1)){XG51};
G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:=I1>REF(I1,1){XG51};
L2:=LD OR BARSTATUS=2 OR BARSCOUNT(C)=1{XG51};
X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H1,X2)>0,HHVBARS(IF(H1,H,0),X2)){XG51};
G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:=I2>REF(I2,1){XG51};
DRAWLINE(LD,L,HD,H,0),colorred,LINETHICK1{XG51};
DRAWLINE(HD,H,LD,L,0),colorred,LINETHICK1{XG51};
J1:=BACKSET(BARSTATUS=2,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1){XG51};
DRAWLINE(J2,IF(HD,H,L),BARSTATUS=2,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORRED,LINETHICK1,POINTDOT{XG51};
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)){XG51};
D3:=A3 AND B3 AND HD; E3:=BACKSET(D3,REF(BARSLAST(HD),1)+2); HH:=E3>REF(E3,1){XG51};
A4:=L>REF(L,REF(BARSLAST(LD),1)+1){XG51};
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){XG51};
DRAWICON(HH,H,10),ALIGN1;      DRAWICON(LL,L,12),ALIGN1{XG51};
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)){XG51};
G3:=F3>REF(F3,1);  I3:=BACKSET(G3,2);  LZ:=I3>REF(I3,1);
L4:=LZ OR BARSTATUS=2 OR BARSCOUNT(C)=1{XG51};
X4:=REF(BARSLAST(L4),1)+1; F4:=BACKSET(L4 AND COUNT(HH,X4)>0,HHVBARS(IF(HH,H,-POW(10,20)),X4)){XG51};
G4:=F4>REF(F4,1);  I4:=BACKSET(G4,2);  HZ:=I4>REF(I4,1){XG51};
PARTLINE(C>ema(H,144),Ema(H,144)),colorred{XG51};
PARTLINE(C<EMA(H,144),EMA(H,144)),colorgreen{XG51};
PARTLINE(C>EMA(L,144),EMA(L,144)),colorred{XG51};
PARTLINE(C<EMA(L,144),EMA(L,144)),colorgreen{XG51};
N:=SYSPARAM(3)-SYSPARAM(1)+10{XG51};
A:=BACKSET(ISLASTBAR,HHVBARS(H,N)+1){XG51};
B:=COUNT(A,N)=1{XG51};
前高:=IF(N>0,REF(H,BARSLAST(B)),0),COLORRED{XG51};
A2:=BACKSET(ISLASTBAR,LLVBARS(L,N)+1){XG51};
B2:=A2>REF(A2,1){XG51};
前低:=REF(L,BARSLAST(B2)),COLORRED{XG51};
hh:= 前高{XG51};
ll:= 前低{XG51};
HL:=hh-ll{XG51};
wH := BARSLAST(H=hh){XG51};
wL :=BARSLAST(L=ll){XG51};
K := wH-wL{XG51};
a2 :=IF(k<0,hh- HL*0.382,ll+HL*0.382){XG51};
a3 :=IF(k<0,hh- HL*0.618,ll+HL*0.618){XG51};
F3:=A2,COLORCYAN,LINETHICK{XG51};
F5:=A3,COLORBLUE,LINETHICK{XG51};
mHL:= hh-HL*0.5{XG51};
A := ISLASTBAR{XG51};
DRAWTEXT(A  AND K<>3, a2, '  F3：'+NUMTOSTR(a2,2)),ALIGN2,COLORBLUE{XG51};
DRAWTEXT(A  AND K<>3, a3, '  F5：'+NUMTOSTR(a3,2)),ALIGN2,COLORBLUE{XG51};
DRAWTEXT(A AND K<>3,HH, ' ￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorred,linethick7{XG51};
DRAWTEXT(A AND K<>3,LL, ' ￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣'),ALIGN2,colorred,linethick7{XG51};
STICKLINE(C>=O,C,O,8,0),COLOR0000AA{XG51};
STICKLINE(C>=O,C,O,6,0),COLOR0000bb {XG51};
STICKLINE(C>=O,C,O,4,0),COLOR0000cc {XG51};
STICKLINE(C>=O,C,O,2,0),COLOR0000ee{XG51};
STICKLINE(C>=O,H,L,0,0),COLOR0000ff{XG51};
STICKLINE(C<=O,C,O,8,0),Color7B7b00{XG51};
STICKLINE(C<=O,C,O,6,0),Color909000{XG51};
STICKLINE(C<=O,C,O,4,0),ColorA8a800{XG51};
STICKLINE(C<=O,C,O,2,0),COLORcece00{XG51};
STICKLINE(C<=O,H,L,0,0),COLORffff00{XG51};
A1:=HHV(H,50){XG51};
A2:=LLV(L,10){XG51};
A3:=(A1-A2)*0.618+A2{XG51};
A5:=(A1-A2)*0.382+A2{XG51};
PD:=ISLASTBAR{XG51};
F3:=A3,LINEDOT{XG51};
F5:=A5,LINEDOT{XG51};
DRAWNUMBER(BARPOS=DATACOUNT, A3, A3,2),colorff{XG51};
DRAWTEXT(BARPOS=DATACOUNT, A3,'F5'),PXDN12,colorff{XG51};
DRAWNUMBER(BARPOS=DATACOUNT, A5, A5,2),colorff{XG51};
DRAWTEXT(BARPOS=DATACOUNT, A5,'F3'),PXDN12,colorff{XG51};
A1:=HHV(HIGH,5){XG51};
A2:=LLV(LOW,10){XG51};
A3:=(A1-A2)*0.618+A2{XG51};
A5:=(A1-A2)*0.382+A2{XG51};
PD:=ISLASTBAR{XG51};
F3:=A3,LINEDOT{XG51};
F5:=A5,LINEDOT{XG51};
DRAWNUMBER(BARPOS=DATACOUNT, A5, A5,2),Color00FF00{XG51};
DRAWTEXT(BARPOS=DATACOUNT, A5,'F5'),PXDN12,Color00FF00{XG51};
DRAWNUMBER(BARPOS=DATACOUNT, A3, A3,2),Color00FF00{XG51};
DRAWTEXT(BARPOS=DATACOUNT, A3,'F3'),PXDN12,Color00FF00{X_G~5^1_C_N_{};