大智慧非常实用主图选股指标公式源码

大智慧非常实用主图选股指标公式源码

源码正文：

H均线:=Wma(H,5){XG51};
L均线:=WMA(L,5){XG51};
转折线:=IF(C>REF(H均线,1),L均线-(MA(H,5)-WMA(H,5)),IF(C<REF(L均线,1),H均线+(MA(H,5)-WMA(H,5)),L)){XG51};
看多:=C>转折线{XG51};
看空:=C<=转折线{XG51};
看空期:=BArslAst(看多){XG51};
看多期:=BARSLAST(看空){XG51};
预买:看多期=1,color00ffff,linethick0{XG51};
清仓:看空期=1,colorblue,linethick0{XG51};
STICKLINE(预买,O,(C+O)/2,6,0),color00ffff{XG51};
STICKLINE(清仓,O,(C+O)/2,6,0),colorblue{XG51};
cci:MA(CLOSE,5){XG51};
工作线:MA(CLOSE,13),LINETHICK2,COLORYELLOW{XG51};
价角度:ATAN((cci/REF(cci,1)-1)*100)*180/3.1416,COLOR0000FF,LINETHICK0{XG51};
DRAWTEXTAbs(160,12,'价角度:'+价角度+'度 '),LINETHICK1,Colorffffff{XG51};
乖离率 : (CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100,LINETHICK0,colorbbbbbb{XG51};
长期: (WMA(c,2)-WMA(c,780))/WMA(c,780)*100,LINETHICK0,colorbbbbbb{XG51};
中期:(CLOSE-MA(CLOSE,78))/MA(CLOSE,48)*100,LINETHICK0,colorbbbbbb{XG51};
中长期: (WMA(c,2)-WMA(c,280))/WMA(c,280)*100,LINETHICK0,colorbbbbbb{XG51};
DRAWTEXTABS(160,24,'乖离率:'+乖离率+'率 '),LINETHICK1,Colorffffff{XG51};
DRAWTEXTABS(160,36,'中期:'+中期+'率 '),LINETHICK1,Colorffffff{XG51};
DRAWTEXTABS(160,48,'中长期:'+中长期+'率 '),LINETHICK1,Colorffffff{XG51};
DRAWTEXTABS(160,60,'长期:'+长期+'率 '),LINETHICK1,Colorffffff{XG51};
获利比例:=(WINNER(C)*1000)/10{XG51};
平均成本:=(COST(50)*100)/100{XG51};
穿透力:=(winner(C)-winner(ref(C,1)))/v*capital{XG51};
９０％成本:=FLOOR(COST(50-90/2)*100)/100{XG51};
～:=CEILING(COST(50+90/2)*100)/100{XG51};
９０集中度:=INTPART((～-９０％成本)/(～+９０％成本)*1000)/10{XG51};
７０％成本:=FLOOR(COST(50-70/2)*100)/100{XG51};
～～:=CEILING(COST(50+70/2)*100)/100{XG51};
７０集中度:=INTPART((～～-７０％成本)/(～～+７０％成本)*1000)/10{XG51};
DRAWTEXTABS(0,12,'  获利比例:'+STR(获利比例)),COLOR44bbff{XG51};
DRAWTEXTABS(0,24,'  平均成本:'+STR(平均成本)),COLOR44bbff{XG51};
DRAWTEXTABS(0,36,'    穿透力:'+STR(穿透力)),COLOR44bbff{XG51};
DRAWTEXTABS(0,48,'９０％成本:'+STR(９０％成本)+'-'+STR(～)),COLOR44bbff{XG51};
DRAWTEXTABS(0,60,'９０集中度:'+STR(９０集中度)),COLOR44bbff{XG51};
DRAWTEXTABS(0,72,'７０％成本:'+STR(７０％成本)+'-'+STR(～～)),COLOR44bbff{XG51};
DRAWTEXTABS(0,84,'７０集中度:'+STR(７０集中度)),COLOR44bbff{XG51};
partline(工作线,工作线>=ref(工作线,1),rgb(255,0,0),工作线<ref(工作线,1),rgb(0,255,0)),linethick1{XG51};
partline(cci,cci>=ref(cci,1),rgb(255,0,0),cci<ref(cci,1),rgb(0,255,0)),linethick3{XG51};
MID:  MA(CLOSE,26),LINETHICK1,coloryellow{XG51};
UPPER: MID + 2*STD(CLOSE,26),LINETHICK1,Color7F00FF,DOTLINE{XG51};
LOWER: MID - 2*STD(CLOSE,26),LINETHICK1,Color7F00FF,DOTLINE{XG51};
PARTLINE(MID,(MID>=REF(MID,1))),LINETHICK1,color00ffff{XG51};
PARTLINE(MID,(MID<REF(MID,1))),LINETHICK1,COLORRED{X+G_5_1+C+N+{};