大智慧黄金分割线主图选股指标公式源码

大智慧黄金分割线主图选股指标公式源码

源码正文：

DRAWGBKLAst(v>1,STRIP(RGB(0,0,0),RGB(90,90,90),0)){XG51};
ah:hhvall(h);  al:llvall(l);  
ahl:=ah-al{XG51};
a19:al+ahl*0.191,coloraaaaaa;
a38:al+ahl*0.382,color00aaaa{XG51};
a50:al+ahl*0.500,LINETHICK1,POINTDOT,COLORCYAN{XG51};
a61:al+ahl*0.618,color00aaaa{XG51};
a80:al+ahl*0.809,coloraaaaaa{XG51};
y:=999{XG51};
DRAWTEXTREL(0,0,'100%  '+ah),coloraaaaaa{XG51};
DRAWTEXTREL(0,y*0.191,'0.809%  '+a80),coloraaaaaa{XG51};
DRAWTEXTREL(0,y*0.382,'0.618%  '+a61),color00aaaa{XG51};
DRAWTEXTREL(0,y*0.500,'0.50%  '+a50),color00aaaa{XG51};
DRAWTEXTREL(0,y*0.618,'0.382%  '+a38),color00aaaa{XG51};
DRAWTEXTREL(0,y*0.809,'0.191%  '+a19),coloraaaaaa{XG51};
DRAWTEXTREL(0,y-30,'最高  '+ah),coloraaaaaa{XG51};
DRAWTEXTREL(900,0,'100%  '+ah),coloraaaaaa{XG51};
DRAWTEXTREL(900,y*0.191,'0.809%  '+a80),coloraaaaaa{XG51};
DRAWTEXTREL(900,y*0.382,'0.618%  '+a61),color00aaaa{XG51};
DRAWTEXTREL(900,y*0.500,'0.50%  '+a50),color00aaaa{XG51};
DRAWTEXTREL(900,y*0.618,'0.382%  '+a38),color00aaaa{XG51};
DRAWTEXTREL(900,y*0.809,'0.191%  '+a19),coloraaaaaa{XG51};
DRAWTEXTREL(900,y-30,'最高  '+ah),coloraaaaaa{XG51};
W:=BArslAST(DISPSTATUS=1){XG51};
P:=BacKSET(DISPSTATUS=2,W/2+1){XG51};
VERTLINE(crOSS(P,0.5),4),COLOR889999{XG51};
DRAWTEXTREL(500,0,'最高' ),COLORWHITE{XG51};
DRAWTEXTREL(500,900+76,'最低'),color00ff00{XG51};
DRAWTEXTREL(500,0.50*(900+76),'0.5'),color0099ff{XG51};
DRAWTEXTREL(500,0.191*(900+76),'0.809'),COLORBLUE{XG51};
DRAWTEXTREL(500,0.382*(900+76),'0.618'),COLORBLUE{XG51};
DRAWTEXTREL(500,0.618*(900+76),'0.382'),COLORBLUE{XG51};
DRAWTEXTREL(500,0.809*(900+76),'0.191'),COLORBLUE{XG51};
RSV:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100){XG51};
K:=SMA(RSV,3,1){XG51};
D:=Sma(K,3,1){XG51};
J:=((3 * K) - (2 * D)){XG51};
RSV24:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100){XG51};
K24:=SMA(RSV24,3,1){XG51};
D24:=SMA(K24,3,1){XG51};
J24:=((3 * K24) - (2 * D24)){XG51};
压力位:=IF(CROSS(J24,J),HIGH,REF(HIGH,BARSLAST(CROSS(J24,J)))){XG51};
支撑位:=IF(CROSS(J,J24),LOW,REF(LOW,BARSLAST(CROSS(J,J24)))){XG51};
TJ:=IF((C-REF(C,1))/REF(C,1)>0.025,1,0){XG51};
yl:=IF(C>REF(O,BARSLAST(TJ =1)),REF(O,BARSLAST(TJ =1)),0){XG51};
FT:=BARSLAST(yl){XG51};
YLX:=REF(yl,FT){XG51};
bt:=IF(C<OPEN and ref(C,1)>ref(OPEN,1),ref(C,1),0){XG51};
XFT:=BARSLAST(bt){XG51};
XYLX:=REF(bt,XFT){XG51};
平台调下:=CROSS(XYLX,C){XG51};
平台突破:=CROSS(C,YLX){XG51};
VAR2:=REF(LOW,1);
VAR3:=SMA(Abs(LOW-VAR2),13,1)/SMA(MAX(LOW-VAR2,0),13,1)*100;
VAR4:=ema(IF(CLOSE*1.2,VAR3*13,VAR3/13),13);
VAR5:=LLV(LOW,34);
VAR6:=HHV(VAR4,34);
VAR7:=IF(LLV(LOW,56),1,0);
VAR8:=EMA(IF(LOW<=VAR5,(VAR4+VAR6*2)/2,0),3)/618*VAR7{XG51};
主力进场:=VAR8>REF(VAR8,1){XG51};
进场:=ref(主力进场,1){XG51};
DRAWTEXT(进场 and  平台突破 ,L * 0.97,'进'),ALIGN1,COLOR0000FF{XG51};
DRAWTEXT(进场 and  平台突破 ,L * 0.94,'场'),ALIGN1,COLOR0000FF{XG51};
DRAWICON(进场 and 平台突破 and L=支撑位,L* 0.93,1),ALIGN1,VALIGN2{X.G!5_1.C.N.{};