通达信波段顶底主图选股指标公式源码

通达信波段顶底主图选股指标公式源码

源码正文：

DRAWGBK(O>0,RGB(33,47,58),RGB(0,0,0),0,'02',0){XG51};
现价:CONst(C),COLORGREEN,DOTLINE{XG51};
持币:=ma(C,5);持股:IF(持币>=REF(持币,1),持币,DRAWNULL),COLORWHITE{XG51};
LL:=REF(L,1);HH:=REF(H,1);上跳:=L>HH;下跳:=H<LL{XG51};
STICKLINE(L>REF(H,1),L,REF(H,1),2.1,-1),COLORWHITE{XG51};
STICKLINE(REF(L,1)>H,REF(L,1),H,1.8,-1),COLORCYAN{XG51};
买线:=ema(C,2);多空:EMA(SLOPE(C,30)*20+C,51),COLORRED{XG51};
涨家数:INDEXADV,NODRAW,COLORMAGENTA{XG51};
跌家数:INDEXDEC,NODRAW,COLORCYAN{XG51};
STICKLINE(买线>=多空,L,H,0,0),COLORRED{XG51};
STICKLINE(买线>=多空,C,O,2.1,1),COLORRED{XG51};
STICKLINE(买线<多空,L,H,0,0),COLOR668800{XG51};
STICKLINE(买线<多空,C,O,2.1,1),COLOR668800{XG51};
STICKLINE(crOSS(买线,多空*0.991),O,C,2.1,0),COLOR000066{XG51};
STICKLINE(CROSS(买线,多空*0.991),O,C,1.9,0),COLOR000088{XG51};
STICKLINE(CROSS(买线,多空*0.991),O,C,1.6,0),COLOR0000AA{XG51};
STICKLINE(CROSS(买线,多空*0.991),O,C,1.2,0),COLOR0000BB{XG51};
STICKLINE(CROSS(买线,多空*0.991),O,C,0.6,0),COLOR0000CC{XG51};
STICKLINE(CROSS(买线,多空*0.991),O,C,0.1,0),COLOR0000DD{XG51};
STICKLINE(CROSS(多空*1.009,买线),O,C,2.1,0),COLOR006600{XG51};
STICKLINE(CROSS(多空*1.009,买线),O,C,1.9,0),COLOR008800{XG51};
STICKLINE(CROSS(多空*1.009,买线),O,C,1.6,0),COLOR00AA00{XG51};
STICKLINE(CROSS(多空*1.009,买线),O,C,1.2,0),COLOR00BB00{XG51};
STICKLINE(CROSS(多空*1.009,买线),O,C,0.6,0),COLOR00CC00{XG51};
STICKLINE(CROSS(多空*1.009,买线),O,C,0.1,0),COLOR00DD00{XG51};
STICKLINE(CROSS(买线,多空*0.999),O,C,2.1,0),COLOR000066{XG51};
STICKLINE(CROSS(买线,多空*0.999),O,C,1.9,0),COLOR000088{XG51};
STICKLINE(CROSS(买线,多空*0.999),O,C,1.6,0),COLOR0000AA{XG51};
STICKLINE(CROSS(买线,多空*0.999),O,C,1.2,0),COLOR0000BB{XG51};
STICKLINE(CROSS(买线,多空*0.999),O,C,0.6,0),COLOR0000CC{XG51};
STICKLINE(CROSS(买线,多空*0.999),O,C,0.1,0),COLOR0000DD{XG51};
STICKLINE(CROSS(多空*1.001,买线),O,C,2.1,0),COLOR006600{XG51};
STICKLINE(CROSS(多空*1.001,买线),O,C,1.9,0),COLOR008800{XG51};
STICKLINE(CROSS(多空*1.001,买线),O,C,1.6,0),COLOR00AA00{XG51};
STICKLINE(CROSS(多空*1.001,买线),O,C,1.2,0),COLOR00BB00{XG51};
STICKLINE(CROSS(多空*1.001,买线),O,C,0.6,0),COLOR00CC00{XG51};
STICKLINE(CROSS(多空*1.001,买线),O,C,0.1,0),COLOR00DD00{XG51};
DRAWTEXT_FIX(1,0.6,0.02,0,'【名称】'),COLORCYAN{XG51};
DRAWTEXT_FIX(1,0.675,0.02,0,STKNAME),COLORBLUE{XG51};
DRAWTEXT_FIX(1,0.6,0.07,0,'【代码】'),COLORCYAN{XG51};
DRAWTEXT_FIX(1,0.675,0.07,0,CODE),COLOR0080FF{XG51};
DRAWTEXT_FIX(1,0.6,0.12,0,'【现价】'),COLORCYAN{XG51};
DRAWNUMBER_FIX(1,0.675,0.12,0,现价),COLORGREEN{XG51};
DRAWTEXT_FIX(1,0.6,0.17,0,'【均价】'),COLORCYAN{XG51};
DRAWNUMBER_FIX(1,0.675,0.17,0,DYNAINFO(11)),COLORRED{XG51};
FX1:=100*(HHV(H,25)-C)/(HHV(H,25)-LLV(L,25));FX2:=100*(HHV(H,60)-C)/(HHV(H,60)-LLV(L,60)){XG51};
VARBT:=EMA((C-LLV(L,15))/(HHV(H,25)-LLV(L,15))*4,5);DY:=CROSS(90,FX1) AND CROSS(90,FX2)
AND COUNT(Abs(FX1-FX2)/FX2<0.15,1)=1,NODRAW{XG51};
STICKLINE(CROSS(3,VARBT),O,(O+C)/2,2.1,0),COLOR5E005E{XG51};
STICKLINE(CROSS(3,VARBT),O,(O+C)/2,1.9,0),COLOR750075{XG51};
STICKLINE(CROSS(3,VARBT),O,(O+C)/2,1.6,0),COLOR930093{XG51};
STICKLINE(CROSS(3,VARBT),O,(O+C)/2,1.2,0),COLORAE00AE{XG51};
STICKLINE(CROSS(3,VARBT),O,(O+C)/2,0.6,0),COLORD200D2{XG51};
STICKLINE(CROSS(3,VARBT),O,(O+C)/2,0.1,0),COLORE800E8{XG51};
STICKLINE(DY,O,(O+C)/2,1.9,0),COLOR000055{XG51};
STICKLINE(DY,O,(O+C)/2,1.6,0),COLOR000077{XG51};
STICKLINE(DY,O,(O+C)/2,1.3,0),COLOR000099{XG51};
STICKLINE(DY,O,(O+C)/2,0.9,0),COLOR0000BB{XG51};
STICKLINE(DY,O,(O+C)/2,0.6,0),COLOR0000DD{XG51};
STICKLINE(DY,O,(O+C)/2,0.1,0),COLOR0000FF{XG51};
N2:=7;LC:=REF(C,1);rsi:=SMA(MAX(C-LC,0),N2,1)/SMA(ABS(C-LC),N2,1)*100{XG51};
STICKLINE((REF(RSI,1)>=80 AND RSI<80),H,(O+H)/2,2.1,0),COLOR999900{XG51};
STICKLINE((REF(RSI,1)>=80 AND RSI<80),H,(O+H)/2,1.6,0),COLORAAAA00{XG51};
STICKLINE((REF(RSI,1)>=80 AND RSI<80),H,(O+H)/2,1.2,0),COLORBBBB00{XG51};
STICKLINE((REF(RSI,1)>=80 AND RSI<80),H,(O+H)/2,0.8,0),COLORCCCC00{XG51};
STICKLINE((REF(RSI,1)>=80 AND RSI<80),H,(O+H)/2,0.2,0),COLORDDDD00{XG51};
STICKLINE((REF(RSI,1)<=20 AND RSI>20),L,(O+L)/2,1.9,0),COLOR002288{XG51};
STICKLINE((REF(RSI,1)<=20 AND RSI>20),L,(O+L)/2,1.6,0),COLOR0033AA{XG51};
STICKLINE((REF(RSI,1)<=20 AND RSI>20),L,(O+L)/2,1.2,0),COLOR0044CC{XG51};
STICKLINE((REF(RSI,1)<=20 AND RSI>20),L,(O+L)/2,0.8,0),COLOR0055EE{XG51};
STICKLINE((REF(RSI,1)<=20 AND RSI>20),L,(O+L)/2,0.2,0),COLOR0088FF{XG51};
ZXX:=(H+L+O+C*3)/6;NX:=(3*C+L+O+H)/6;  
ZNX:=(20*NX+19*REF(NX,1)+18*REF(NX,2)+17*REF(NX,3)+16*REF(NX,4)  
+15*REF(NX,5)+14*REF(NX,6)+13*REF(NX,7)+12*REF(NX,8)+11*REF(NX,9)  
+10*REF(NX,10)+9*REF(NX,11)+8*REF(NX,12)+7*REF(NX,13)+6*REF(NX,14)  
+5*REF(NX,15)+4*REF(NX,16)+3*REF(NX,17)+2*REF(NX,18)+REF(NX,20))/210{XG51};
NXX:=MA(ZNX,6){XG51};
GD:=H>REF(H,1) AND REF(H,1)<REF(H,2) AND L>REF(L,1) AND REF(L,1)<REF(L,2){XG51};
GT:=H<REF(H,1) AND REF(H,1)>REF(H,2) AND L<REF(L,1) AND REF(L,1)>REF(L,2){XG51};
BH1:=REF(H,1)>=REF(H,2) AND REF(L,1)<=REF(L,2){XG51};
BH2:=REF(H,1)<=REF(H,2) AND REF(L,1)>=REF(L,2){XG51};
BD1:=H>REF(H,2) AND REF(H,2)<REF(H,3) AND L>REF(L,1) AND REF(L,1)<REF(L,3){XG51};
BD2:=H>REF(H,1) AND REF(H,1)<REF(H,3) AND L>REF(L,2) AND REF(L,2)<REF(L,3){XG51};
BT1:=H<REF(H,1) AND REF(H,1)>REF(H,3) AND L<REF(L,2) AND REF(L,2)>REF(L,3){XG51};
BT2:=H<REF(H,2) AND REF(H,2)>REF(H,3) AND L<REF(L,1) AND REF(L,1)>REF(L,3){XG51};
FD:=IF(BH1,BD1,IF(BH2,BD2,GD));FT:=IF(BH1,BT1,IF(BH2,BT2,GT)){XG51};
DFX:=IF(BArslAST(CROSS(NXX,ZXX))>3,FILTER(BacKSET(FILTER(FD AND ZXX<NXX,3),2),1),0){XG51};
TFX:=IF(BARSLAST(CROSS(ZXX,NXX))>3,FILTER(BACKSET(FILTER(FT AND ZXX>NXX,3),2),1),0){XG51};
STICKLINE(TFX,H,L,0,0),COLOR668800{XG51};
STICKLINE(TFX,C,O,2.1,10),COLOR113300{XG51};
STICKLINE(TFX,C,O,1.9,10),COLOR224400{XG51};
STICKLINE(TFX,C,O,1.6,10),COLOR335500{XG51};
STICKLINE(TFX,C,O,1.2,10),COLOR446600{XG51};
STICKLINE(TFX,C,O,0.6,10),COLOR557700{XG51};
STICKLINE(TFX,C,O,0.1,0),COLOR668800{XG51};
STICKLINE(DFX,H,L,0,0),COLOR4499CC{XG51};
STICKLINE(DFX,O,C,1.9,10),COLOR225588{XG51};
STICKLINE(DFX,O,C,1.6,10),COLOR226699{XG51};
STICKLINE(DFX,O,C,1.2,10),COLOR3377AA{XG51};
STICKLINE(DFX,O,C,0.6,10),COLOR3388BB{XG51};
STICKLINE(DFX,O,C,0.1,0),COLOR4499CC{XG51};
VAR1111:=BACKSET(REF(H,2)=HHV(H,5),3){XG51};
VAR2222:=CROSS(VAR1111,0.9){XG51};
VAR3333:=BACKSET(REF(L,2)=LLV(L,5),3){XG51};
VAR4444:=CROSS(VAR3333,0.9){XG51};
波段顶:= REF(H,BARSLAST(VAR2222)){XG51};
STICKLINE(C,REF(H,BARSLAST(VAR2222)),REF(H,BARSLAST(VAR2222)),0.5,1),COLORCYAN{XG51};
波段底:= REF(L,BARSLAST(VAR4444)){XG51};
STICKLINE(C,REF(L,BARSLAST(VAR4444)),REF(L,BARSLAST(VAR4444)),0.5,1),COLORWHITE{X=G*5*1=C=N={};