通达信龙宫顶底未加密选股指标公式源码

源码正文：

VAR1:=ma(CLOSE,27){XG51};
VAR2:=(CLOSE-VAR1)/VAR1*100{XG51};
RSV1:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100{XG51};
RSV2:=(CLOSE-LLV(LOW,37))/(HHV(HIGH,37)-LLV(LOW,37))*100{XG51};
RSV3:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100{XG51};
VARA:=MA(VAR2,2){XG51};
VARB:=BArslAst(crOSS(-10,VARA)=1){XG51};
VARC:=BARSLAST(CROSS(VARA,10)=1){XG51};
VARD:=VARA<-10 AND VARB>3{XG51};
VARE:=VARA>10 AND VARC>3{XG51};
短线:SMA(SMA(RSV1,3,1),3,1)+3*STD(CLOSE,21),COLOR00FF00{XG51};
中线:SMA(RSV2,5,1)+2*STD(CLOSE,37),COLORWHITE{XG51};
中长线:=-100*(HHV(HIGH,40)-CLOSE)/(HHV(HIGH,40)-LLV(LOW,40)){XG51};
长线:SMA(RSV3,5,1),COLORBLUE{XG51};
看底:STICKLINE(中线<15,中线,15,6,0),COLORF00FF0{XG51};
黄金:STICKLINE(短线<20 AND 中线<20 AND 长线<20,MAX(长线,MAX(短线,中线)),20,3,0),COLOR00CCFF{XG51};
看顶:STICKLINE(中线>80,80,中线,3,0),COLORFFF000{XG51};
DRAWICON(CROSS(长线,15),中线,1){XG51};
DRAWTEXT(LONGCROSS(中线,20,15),20,'反弹'){XG51};
DRAWTEXT(CROSS(短线,长线)AND 长线<18 AND 长线>REF(长线,1)OR CROSS(长线,5),20,'绝佳机会'),COLORBLUE{XG51};
底:DRAWTEXT(CROSS(中长线,-90) AND (长线<中线 AND 长线>REF(长线,1)OR 短线<20 AND 中线<20 AND 长线 <20),长线,'底'),COLORFF00FF{XG51};
DR:=IF(COUNT(CROSS(中长线,-90),12)=3,30,5){XG51};
KH1:=IF(VARD,VARA,0){XG51};
KH2:=REF(KH1,1)<0{XG51};
龙宫藏宝:短线<20 AND 中线<20 AND 长线<20{XG51};
天宫藏宝:中线>80 AND 中线>80 AND 长线>80{XG51};
触底:CROSS(中长线,-90) AND (长线<中线 AND 长线>REF(长线,1)OR 短线<20 AND 中线<20 AND 长线 <20){XG51};
反弹:LONGCROSS(中线,20,15) OR CROSS(长线,15){XG51};
绝佳机会:CROSS(短线,长线)AND 长线<18 AND 长线>REF(长线,1)OR CROSS(长线,5),COLORBLUE{X_G_5!1_C_N_{};

源码正文：

VAR1:=ema(Ema(CLOSE,9),9){XG51};
控盘:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000{XG51};
stICKLINE(控盘<0,控盘,0,1,0),COLORRED{XG51};
A10:=crOSS(控盘,0){XG51};
无庄控盘:IF(控盘<0,控盘,0),COLORRED,NODRAW{XG51};
开始控盘:IF(A10,5,0),LINETHICK1,COLORBLUE{XG51};
STICKLINE(控盘>REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLORWHITE{XG51};
有庄控盘:IF(控盘>REF(控盘,1) AND 控盘>0,控盘,0),COLORWHITE,NODRAW{XG51};
VAR2:=100*WINNER(CLOSE*0.95){XG51};
STICKLINE(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0,1,0),COLORFF00FF{XG51};
高度控盘:IF(VAR2>50 AND COST(85)<CLOSE AND 控盘>0,控盘,0),COLORFF00FF,NODRAW{XG51};
STICKLINE(控盘<REF(控盘,1) AND 控盘>0,控盘,0,1,0),COLOR00FF00{XG51};
主力出货:IF(控盘<REF(控盘,1) AND 控盘>0,控盘,0),COLOR00FF00,NODRAW{XG51};
N3:=BArslAST(CROSS(C,MA(C,20))){XG51};
N4:=BARSLAST(CROSS(MA(C,20),C)){XG51};
黑马跟踪:IF(N3<N4,N3+1,0),COLOR00FF00,LINETHICK1{XG51};
买线:=EMA(C,2){XG51};
卖线:=EMA(SLOPE(C,21)*20+C,42){XG51};
选股1:IF(开始控盘=5 AND 黑马跟踪<5 AND 黑马跟踪>0 AND 买线>卖线,28,0),COLOR0000FF,LINETHICK2{X=G_5.1=C=N={};