{黄金分割绝配(一)，改编，非原创}
DRAWGBK(1,COLORRGB(44,22,108),COLORRGB(33,0,0),0),color10000;
 input:M5(5,1,999);
 MA1:=EMA(CLOSE,M5);
多空分界線:"MA.MA1#week",LINETHICK2,colorwhite;
 {30分钟MA}
 MA4:=MA(C,4),COLORBLUE,LINETHICK4;
 A8:=MA(C,8),COLORRED;
 A24:=MA(C,24),COLORRED;
 A40:=MA(C,40);
 A80:=MA(C,80);
 A160:=MA(C,160);
 DK:=A8;
今日保护价:(REF(C,1)+REF(C,2)+O)/3;
 STICKLINE(DK<=C AND CLOSE>=OPEN,HIGH,LOW,0,1),COLORRED;
 STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,3.2,0),COLOR6600FF;
 STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,2.7,0),COLORDD33FF;
 STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,2.1,0),COLORFF55FF;
 STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,1.5,0),COLORFF88FF;
 STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,0.9,0),COLORFFAAFF;
 STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,0.3,0),COLORFFCCFF;
 STICKLINE(DK<=C AND CLOSE<OPEN,HIGH,LOW,0,1),COLORRED;
 STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,3.2,0),COLOR000033;
 STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,2.7,0),COLOR000066;
 STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,2.1,0),COLOR000099;
 STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,1.5,0),COLOR0000CC;
 STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,0.9,0),COLOR0000FF;
 STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,0.3,0),COLORCC66FF;
 STICKLINE(DK>C AND CLOSE>=OPEN,HIGH,LOW,0,1),COLORGREEN;
 STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,3.2,0 ),COLOR990000;
 STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,2.7,0 ),COLORCC0000;
 STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,2.1,0),COLORFF4400;
 STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,1.5,0 ),COLORFF8800;
 STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,0.9,0 ),COLORFFCC00;
 STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,0.3,0 ),COLORCYAN;
 STICKLINE(DK>C AND CLOSE<OPEN,HIGH,LOW,0,1),COLORWHITE;
 STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,3.2,0 ),COLOR555555;
 STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,2.7,0 ),COLOR777777;
 STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,2.1,0 ),COLOR999999;
 STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,1.5,0 ),COLOR999999;
 STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,0.9,0 ),COLORDDDDDD;
 STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,0.3,0 ),COLORFFFFFF;
 input:S1(10,1,100),M1(60,3,300),N1(0.09000000029802,0,1);
 A1:=(FFT(CLOSE,M1) * (1 + 1.2*N1));
 B1:=(FFT(CLOSE,M1) * (1 - 1.2*N1));
 PARTLINE((A1 > REF(A1,1)),A1),colorwhite,linethick2;
 PARTLINE((B1 > REF(B1,1)),B1),colorwhite,linethick2;
 PARTLINE((A1 <= REF(A1,1)),A1),colorFF00,linethick2;
 PARTLINE((B1 <= REF(B1,1)),B1),colorFF00,linethick2;
 A11:=(FFT(CLOSE,M1) * (1 + 0.7*N1));
 B11:=(FFT(CLOSE,M1) * (1 - 0.7*N1));
 PARTLINE((A11 > REF(A11,1)),A11),colorwhite,linethick2;
 PARTLINE((B11 > REF(B11,1)),B11),colorwhite,linethick2;
 PARTLINE((A11 <= REF(A11,1)),A11),colorFF00,linethick2;
 PARTLINE((B11 <= REF(B11,1)),B11),colorFF00,linethick2;
 AA11:=MA(C,5);
 BB11:=MA(C,15);
 AF:=CROSS(AA11,BB11);
 STICKLINE(AF,LLV(L,4),LLV(L,4),50,1),COLORRED,LINETHICK3;
 DRAWTEXT(AF,LLV(L,4),'止损线'),COLORYELLOW,LINETHICK3;
 N:=120;
 VAR1:=LLV(LOW,N);
 VAR2:=HHV(HIGH,N);
 VAR3:=VAR2-VAR1;
 H191: VAR3*0.191+VAR1;
 H382: VAR3*0.382+VAR1;
 H050: VAR3*0.5+VAR1;
 H618: VAR3*0.618+VAR1;
 H809: VAR3*0.809+VAR1;
低点: VAR1;
高点: VAR2;
 AA1:=AMOUNT/V;
 BB1:=L<AA1*0.9;
 CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
 DD1:=L<MA(C,5)*0.921;
 EE1:=V<MA(V,5)*1.5;
 FF1:=BB1 AND CC1 AND DD1 AND EE1;
 DRAWTEXT(FF1,(LOW* 0.96),'短进'),COLORYELLOW;
 DRAWTEXT(CROSS(ZIG(3,8),REF(ZIG(3,8),1)),LOW*0.978,'★买') ,LINETHICK2,COLORYELLOW;
 DRAWTEXT(CROSS(REF(ZIG(3,10),1),ZIG(3,10)),HIGH*1.02,'★卖'),COLORYELLOW;
 DRAWTEXT(CROSS(ZIG(3,14),REF(ZIG(3,14),1)),LOW*1.006,'底   '),COLORWHITE;
 DRAWTEXT(CROSS(REF(ZIG(3,13),1),ZIG(3,13)),HIGH*1.04,'顶   '),COLORWHITE;
 VAR01:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),25);
 VAR02:=HIGH-REF(HIGH,1);
 VAR03:=REF(LOW,1)-LOW;
 VAR04:=SUM(IF(VAR02>0 AND VAR02>VAR03,VAR02,0),25);
 VAR05:=SUM(IF(VAR03>0 AND VAR03>VAR02,VAR03,0),25);
 VAR06:=VAR04*100/VAR01;
 VAR07:=VAR05*100/VAR01;
 VAR08:=MA(ABS(VAR07-VAR06)/(VAR07+VAR06)*100,15);
 VAR09:=(VAR08+REF(VAR08,15))/2;
 A:=(VAR07>VAR06 AND VAR07>25 AND VAR06<25);
 B:=ZIG(3,50/5)*100,COLORRED,LINETHICK2;
 G:=MA(B,2),COLORGREEN,LINETHICK2;
 D:=CROSS(B,G)*1000,COLORRED;
 W:=CROSS(G,B)*1000,COLORBLUE;
 E:=REF(INDEXC,1);
 F:=SMA(MAX(INDEXC-E,0),3,1)/SMA(ABS(INDEXC-E),3,1);
 VAR10:=F AND F<8;
 VAR11:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 VAR12:=SMA(VAR11,3,1);
 VAR13:=SMA(VAR12,3,1);
 VAR14:=VAR13 AND VAR13<20;
 MM:=A AND D AND VAR10 AND VAR14 ;
 DRAWTEXT(W=1000,H*1.05,'S' ),COLOR00FF00;
 DRAWTEXT(D=1000,L*0.95,'B'),COLORWHITE;
 OO:=if(DATATYPE=6,ma(O,22),if(DATATYPE=7,ma(O,10),ma(O,6)));j:=STKINDI('','kdj.j',0,6);
 CC:=if(DATATYPE=6,ma(c,22),if(DATATYPE=7,ma(c,10),ma(c,6)));hs:=vol/CAPITAL*100;
 jj:=(H+L+C)/3;j0:=STKINDI('','kdj.j',0,4);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;
 bb:=((cross(j,0) or cross(j0,0))and ((ddx>0 and ddy>0) or DDZ>400));
主:=qj1+qj2;散:=qj3+qj4;T0:=VOL>REF(VOL,1) and MA(VOL,5)>REF(MA(VOL,5),1);
 bbd:=EMA(STKINDI('','千钧引用.总0',0,7),2)/sum(IF(CAPITAL=0,ref(INDEXA,1),ref(vol,1)),5)*100;
 XH1:=ref(bbd,1)<-15 and bbd>ref(bbd,1) and bbd>-10;
 XH2:=ref(bbd,1)>=15 and bbd<ref(bbd,1) and bbd<10;P:=SYSPARAM(1);
 Q6:=atan((MA(C,5)/ref(MA(C,5),1)-1)*100)*57.3;Q2:=atan((MA(C,13)/ref(MA(C,13),1)-1)*100)*57.3;
 Q1:=atan((MA(C,23)/ref(MA(C,23),1)-1)*100)*57.3;Q:=atan((MA(C,34)/ref(MA(C,34),1)-1)*100)*57.3;
 Q3:=atan((MA(C,68)/ref(MA(C,68),1)-1)*100)*57.3;Q5:=atan((MA(C,250)/ref(MA(C,250),1)-1)*100)*57.3;
 T1:=VOL<REF(VOL,1) and MA(VOL,5)>REF(MA(VOL,5),1);T2:=VOL>REF(VOL,1) and MA(VOL,5)<REF(MA(VOL,5),1);
 T3:=VOL<REF(VOL,1) and MA(VOL,5)<REF(MA(VOL,5),1);T4:=主>REF(主,1) and 主>散 and if(CAPITAL=0,hs>1.3,hs>5);
 T5:=主<REF(主,1) and 主>散 and if(CAPITAL=0,hs>0.5 and hs<1.3,hs>3 and hs<=5);
 T6:=主>REF(主,1) and 主<散 and if(CAPITAL=0,hs<1.3 and hs>0.5,hs<5 and hs>3);
 T7:=主<REF(主,1) and 主<散 and if(CAPITAL=0,hs<1.3,hs<3 and hs>=1);
 STICKLINE(C>=REF(c,1),H,L,0,0),COLOR0000FF;
 STICKLINE(C>=REF(c,1),C,O,8,0),COLOR0000bb;
 STICKLINE(C>=REF(c,1),C,O,5,0),COLOR0000dd;
 STICKLINE(C>=REF(c,1),C,O,3,0),COLOR0000ee;
 STICKLINE(C>=REF(c,1),C,O,1,0),COLOR0000ff;
 STICKLINE(C<REF(c,1),H,L,0,0),COLORFFFF00;
 STICKLINE(C<REF(c,1),C,O,8,0),COLOR999900;
 STICKLINE(C<REF(c,1),C,O,5,0),COLORbbbb00;
 STICKLINE(C<REF(c,1),C,O,3,0),COLORdddd00;
 STICKLINE(C<REF(c,1),C,O,1,0),COLORFFFF00;
 STICKLINE(bbd>0,CC,OO,8,0),COLORFF00FF;
 STICKLINE(bbd<0,CC,OO,8,0),COLOR00FF00;
 RSV:=(C-LLV(L,4))/(HHV(H,4)-LLV(L,4))*100;
 K:=LLV(L,4)+SMA(RSV,4,1)/100*(HHV(H,4)-LLV(L,4));
 D:=SMA(K,3,1);
 H2:=VALUEWHEN(C>=d and d>ref(D,1),D);
 L2:=VALUEWHEN(C<=d and d<ref(D,1),K);
 K1:=IF(C>H2,-3,IF(C<L2,1,0));
 K2:=VALUEWHEN(K1<>0,K1);
 G:=IF(K2>0,H2,L2);
压撑线:G,LINETHICK2,PRECISION2,COLORRED;
 aa1:=wma(c,2);//短加权均线
bb1:=ema(aa1,2);//平滑
aa0:=ma(bb1,3);//平均
aa2:=wma((h+c+o)/3,18);//长加权均线
dd3:=aa0>=aa2 and c>aa2;//短>长,且收>长
dd4:=aa0<aa2 ;//短<长
dd5:=aa0>aa2 ;//短>长
cc1:=((c-ref(ma(c,6),1))/6+ma(c,6))*1.004;//买进价
cc2:=cross(c,cc1) and cc1>ref(cc1,1);//买进条件
STICKLINE((dd4 or dd5) and o<=c ,h,l,0.5,0),Color00cc99;//跌势阳线
STICKLINE((dd4 or dd5) and o<=c ,c,o,7,0),Color00cc99;//跌势阳线
STICKLINE((dd4 or dd5) and o>=c ,h,l,0.5,0),Color3F8C3A;//跌势阴线
STICKLINE((dd4 or dd5) and o>=c ,c,o,7,0),Color3F8C3A;//跌势阴线
STICKLINE((dd3 or c>aa2) and o<=c,c,o,7,0),Colorred;//涨势阳线
STICKLINE((dd3 or c>aa2) and o<=c,h,l,0.5,0),Colorred;//涨势阳线
STICKLINE((dd3 or c>aa2) and o>=c,c,o,7,0),Colorff33ff;//涨势阴线
STICKLINE((dd3 or c>aa2) and o>=c,h,l,0.5,0),Colorff33ff;//涨势阴线
STICKLINE(cc2,h,l,0.5,0),colorwhite;//白
STICKLINE(cc2,o,c,7,0),colorwhite;//白
STICKLINE(MA(C,13)>O and C>MA(C,13) and O<c,O,C,8,0),coloryellow;//黄
STICKLINE(MA(C,13)>O and C>MA(C,13),H,L,0.5,0),coloryellow;//黄

 公式有未来，不影响趋势判断。
 用法吗，用心体会，找快速上涨的票票，呵呵。。

 飞狐的引用公式
 主图引用公式：
 名称：千钧引用(飞狐)
源码：
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(stktype=0,(a1-b1),(a-b));