大智慧黄金分割+MA+数浪+买卖点主图选股指标公式源码

大智慧黄金分割+MA+数浪+买卖点主图选股指标公式源码

源码正文：

ma1:MA(CLOSE,P1){XG51};
MA2:MA(CLOSE,P2){XG51};
MA3:MA(CLOSE,P3),COLORWHITE{XG51};
MA4:MA(CLOSE,P4){XG51};
MA5:MA(CLOSE,P5){XG51};
DRAWTEXT(crOSS(MA1,MA3),MA3,'●买'),COLORBLUE{XG51};
DRAWTEXT(CROSS(MA3, MA1), MA1,'●卖'),COLORCYAN{XG51};
DRAWTEXT(CROSS(MA1,MA4),MA4,'★买'),COLORLIMAGENTA{XG51};
DRAWTEXT(CROSS(MA4, MA1), MA1,'★卖'),COLORYELLOW{XG51};
x:=BARPOS-hhv(if(DISPstATUS=1,BARPOS,0),0)+1;
hh:=hhv(h,x);  ll:=llv(l,x);   hl:=hh-ll{XG51};
a80:=.809*hl+ll;a61:=.618*hl+ll;a38:=.382*hl+ll{XG51};
a19:=.191*hl+ll;   a5:=.5*hl+ll{XG51};
DRAWTEXTREL(0,0,'最高￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣￣' ),COLORBLUE{XG51};
DRAWTEXTREL(0,900+76,'最低.................................................................................................................................'),color00ff00{XG51};
DRAWTEXTREL(0,0.50*(900+76),'0.5..................................................................................................................................'),color0099ff{XG51};
DRAWTEXTREL(0,0.191*(900+76),'0.809................................................................................................................................'),colorred{XG51};
DRAWTEXTREL(0,0.382*(900+76),'0.618................................................................................................................................'),colorred{XG51};
DRAWTEXTREL(0,0.618*(900+76),'0.382................................................................................................................................'),colorred{XG51};
DRAWTEXTREL(0,0.809*(900+76),'0.191................................................................................................................................'),colorred{XG51};
DRAWTEXTREL(999,0.809*(900+76),'19.1%:'+NUMTOSTR(a19)),VALIGN2,ALIGN2,colorwhite{XG51};
DRAWTEXTREL(999,0.618*(900+76),'38.2%:'+NUMTOSTR(a38)),VALIGN2,ALIGN2,colorwhite{XG51};
DRAWTEXTREL(999,0.5*(900+76),'50%:'+NUMTOSTR(a5)),VALIGN2,ALIGN2,color0099ff{XG51};
DRAWTEXTREL(999,0.382*(900+76),'61.8%:'+NUMTOSTR(a61)),VALIGN2,ALIGN2,colorwhite{XG51};
DRAWTEXTREL(999,0.191*(900+76),'80.9%:'+NUMTOSTR(a80)),VALIGN2,ALIGN2,colorwhite{XG51};
GET:zig(3,5),LINETHICK1,COLORLIMAGENTA{XG51};
PL5:=ZIG(3,5){XG51};
EN1:=pl5>REF(pl5,1) AND REF(pl5,1)<=REF(pl5,2) AND REF(pl5,2)<=REF(pl5,3){XG51};
EX1:=pl5<REF(pl5,1) AND REF(pl5,1)>=REF(pl5,2) AND REF(pl5,2)>=REF(pl5,3){XG51};
PL10:=ZIG(3,10){XG51};
EN2:=pl10>REF(pl10,1) AND REF(pl10,1)<=REF(pl10,2) AND REF(pl10,2)<=REF(pl10,3){XG51};
EX2:=pl10<REF(pl10,1) AND REF(pl10,1)>=REF(pl10,2) AND REF(pl10,2)>=REF(pl10,3){XG51};
PL20:=ZIG(3,20){XG51};
EN3:=pl20>REF(pl20,1) AND REF(pl20,1)<=REF(pl20,2) AND REF(pl20,2)<=REF(pl20,3){XG51};
EX3:=pl20<REF(pl20,1) AND REF(pl20,1)>=REF(pl20,2) AND REF(pl20,2)>=REF(pl20,3){XG51};
走强1:=BArslAST(PL5<REF(PL5,1)){XG51};
走弱1:=BARSLAST(PL5>REF(PL5,1)){XG51};
走强2:=BARSLAST(PL10<REF(PL10,1)){XG51};
走弱2:=BARSLAST(PL10>REF(PL10,1)){XG51};
走强3:=BARSLAST(PL20<REF(PL20,1)){XG51};
走弱3:=BARSLAST(PL20>REF(PL20,1)){XG51};
ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0){XG51};
ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0){XG51};
DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0){XG51};
DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0){XG51};
ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0){XG51};
ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0){XG51};
DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0){XG51};
DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0){XG51};
DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,'㈠'),COLORFFFF00{XG51};
DRAWTEXT(EX1 AND DTJD5=2,H*1.02,'㈡'),COLORFFFF00{XG51};
DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,'㈢'),COLORFFFF00{XG51};
DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.02,'⑴'),COLOR0000FF{XG51};
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,'⑵'),COLOR0000FF{XG51};
DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.02,'⑶'),COLOR0000FF{XG51};
DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,'⑷'),COLOR0000FF{XG51};
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.02,'⑸'),COLOR0000FF{XG51};
DRAWTEXT(EN2 AND DTJZ10=1,L*0.9,'Ⅰ'),colorred{XG51};
DRAWTEXT(EX2 AND DTJD10=2,H*0.9,'Ⅱ'),colorred{XG51};
DRAWTEXT(EN3 AND ZTJZ10=1,L*0.9,'Ⅲ'),colorred{XG51};
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.06,'①'),LINETHICK3,COLOR00FFFF{XG51};
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.94,'②'),LINETHICK3,COLOR00FFFF{XG51};
DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.06,'③'),LINETHICK3,COLOR00FFFF{XG51};
DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=3,L*0.94,'④'),LINETHICK3,COLOR00FFFF{X~G~5+1~C~N~{};