通达信易经主图未加密选股指标公式源码

源码正文：

会:HHV(FORCAst(CLOSE,7),7),COLORRED{XG51};
用:HHV(FORCAST(CLOSE,7),14),COLORLIGREEN{XG51};
会用:HHV(FORCAST(CLOSE,7),21),COLORCYAN{XG51};
HJ_1:=HHV(FORCAST(CLOSE,7),28){XG51};
IF(HJ_1,HJ_1,DRAWNULL),DOTLINE,COLORBLUE{XG51};
IF(HJ_1=REF(HJ_1,1) AND BArslAST(HJ_1>REF(HJ_1,1) OR HJ_1<REF(HJ_1,1))>3,HJ_1,DRAWNULL),COLORCYAN{XG51};
DRAWKLINE(H,O,L,C){XG51};
阳:=C-REF(C,1)>0 OR (C-REF(C,1)=0 AND C>O){XG51};
阴:=C-REF(C,1)<0 OR (C-REF(C,1)=0 AND C<=O){XG51};
乾:=阳 AND REF(阳,1) AND REF(阳,2){XG51};
兑:=阳 AND REF(阳,1) AND REF(阴,2){XG51};
离:=阳 AND REF(阴,1) AND REF(阳,2){XG51};
震:=阳 AND REF(阴,1) AND REF(阴,2){XG51};
巽:=阴 AND REF(阳,1) AND REF(阳,2){XG51};
坎:=阴 AND REF(阳,1) AND REF(阴,2){XG51};
艮:=阴 AND REF(阴,1) AND REF(阳,2){XG51};
坤:=阴 AND REF(阴,1) AND REF(阴,2){XG51};
DRAWTEXT( (震 AND REF(乾,3)) OR (震 AND REF(兑,3)), L*0.99,'雷四'),COLOR0066FF{XG51};
DRAWTEXT( (震 AND REF(离,3)) OR (震 AND REF(震,3)), L*0.99,'雷三'),COLOR0066FF{XG51};
DRAWTEXT( (震 AND REF(巽,3)) OR (震 AND REF(坎,3)), L*0.99,'雷二'),COLOR0066FF{XG51};
DRAWTEXT( (震 AND REF(艮,3)) OR( 震 AND REF(坤,3)), L*0.99,'雷一'),COLOR0066FF{XG51};
DRAWTEXT( (兑 AND REF(乾,3)) OR (兑 AND REF(兑,3)), L*0.99,'泽四'),COLORWHITE{XG51};
DRAWTEXT( (兑 AND REF(离,3)) OR (兑 AND REF(震,3)), L*0.99,'泽三'),COLORWHITE{XG51};
DRAWTEXT( (兑 AND REF(巽,3)) OR (兑 AND REF(坎,3)), L*0.99,'泽二'),COLORWHITE{XG51};
DRAWTEXT( (兑 AND REF(艮,3)) OR( 兑 AND REF(坤,3)), L*0.99,'泽一'),COLORWHITE{XG51};
DRAWTEXT( (乾 AND REF(乾,3)) OR (乾 AND REF(兑,3)), L*0.99,'天四'),COLORCC66FF{XG51};
DRAWTEXT( (乾 AND REF(离,3)) OR (乾 AND REF(震,3)), L*0.99,'天三'),COLORCC66FF{XG51};
DRAWTEXT( (乾 AND REF(巽,3)) OR (乾 AND REF(坎,3)), L*0.99,'天二'),COLORCC66FF{XG51};
DRAWTEXT( (乾 AND REF(艮,3)) OR( 乾 AND REF(坤,3)), L*0.99,'天一'),COLORCC66FF{XG51};
DRAWTEXT( (巽 AND REF(乾,3)) OR (巽 AND REF(兑,3)), H*1.01,'风4'),COLORFF9933{XG51};
DRAWTEXT( (巽 AND REF(离,3)) OR (巽 AND REF(震,3)), H*1.01,'风3'),COLORFF9933{XG51};
DRAWTEXT( (巽 AND REF(巽,3)) OR (巽 AND REF(坎,3)), H*1.01,'风2'),COLORFF9933{XG51};
DRAWTEXT( (巽 AND REF(艮,3)) OR( 巽 AND REF(坤,3)), H*1.01,'风1'),COLORFF9933{XG51};
DRAWTEXT( (艮 AND REF(乾,3)) OR (艮 AND REF(兑,3)), H*1.01,'山4'),COLORCYAN{XG51};
DRAWTEXT( (艮 AND REF(离,3)) OR (艮 AND REF(震,3)), H*1.01,'山3'),COLORCYAN{XG51};
DRAWTEXT( (艮 AND REF(巽,3)) OR (艮 AND REF(坎,3)), H*1.01,'山2'),COLORCYAN{XG51};
DRAWTEXT( (艮 AND REF(艮,3)) OR( 艮 AND REF(坤,3)), H*1.01,'山1'),COLORCYAN{XG51};
DRAWTEXT( (坤 AND REF(乾,3)) OR (坤 AND REF(兑,3)), H*1.01,'地4'),COLORFF3366{XG51};
DRAWTEXT( (坤 AND REF(离,3)) OR (坤 AND REF(震,3)), H*1.01,'地3'),COLORFF3366{XG51};
DRAWTEXT( (坤 AND REF(巽,3)) OR (坤 AND REF(坎,3)), H*1.01,'地2'),COLORFF3366{XG51};
DRAWTEXT( (坤 AND REF(艮,3)) OR( 坤 AND REF(坤,3)), H*1.01,'地1'),COLORFF3366{XG51};
DRAWTEXT( (离 AND REF(乾,3)) OR (离 AND REF(兑,3)), L*0.99,'火四'),COLORFFFFFF{XG51};
DRAWTEXT( (离 AND REF(离,3)) OR (离 AND REF(震,3)), L*0.99,'火三'),COLORFFFFFF{XG51};
DRAWTEXT( (离 AND REF(巽,3)) OR (离 AND REF(坎,3)), L*0.99,'火二'),COLORFFFFFF{XG51};
DRAWTEXT( (离 AND REF(艮,3)) OR (离 AND REF(坤,3)), L*0.99,'火一'),COLORFFFFFF{XG51};
DRAWTEXT( (坎 AND REF(乾,3)) OR (坎 AND REF(兑,3)), H*1.01,'水4'),COLOR888888{XG51};
DRAWTEXT( (坎 AND REF(离,3)) OR (坎 AND REF(震,3)), H*1.01,'水3'),COLOR888888{XG51};
DRAWTEXT( (坎 AND REF(巽,3)) OR (坎 AND REF(坎,3)), H*1.01,'水2'),COLOR888888{XG51};
DRAWTEXT( (坎 AND REF(艮,3)) OR (坎 AND REF(坤,3)), H*1.01,'水1'),COLOR888888{X*G-5~1*C*N*{};

源码正文：

ma05:MA(C,5)LINETHICK3,COLOR00CCFF{XG51};
MA10:=MA(C,10){XG51};
MA20:=MA(C,20){XG51};
MA30:=MA(C,30){XG51};
五日乖离率:=(C-MA05)/MA05*100{XG51};
BB05:=ATAN((MA05/REF(MA05,1)-1)*100)*180/3.1416{XG51};
速度5:=SMA(ema((MA05-REF(MA05,1))/REF(MA05,1),3)*100,3,1){XG51};
加速度5:=EMA((速度5-REF(速度5,1)),3),NODRAW{XG51};
IF(BB05>30 AND MA05>REF(MA05,1), MA05,DRAWNULL),LINETHICK3,COLORWHITE{XG51};
BB10:=ATAN((MA10/REF(MA10,1)-1)*100)*180/3.1416{XG51};
IF(BB05<0 AND MA05<REF(MA05,1), MA05,DRAWNULL),LINETHICK3,COLORCYAN{XG51};
三拾日乖离率:=(C-MA30)/MA30*100,NODRAW{XG51};
VAR1:=(MA20-MA30)>REF((MA20-MA30),1) AND MA20>REF(MA20,1) AND MA30>REF(MA30,1){XG51};
VAR2:=(MA30-MA20)<REF((MA30-MA20),1) AND MA20<REF(MA20,1) AND MA30<REF(MA30,1){XG51};
BB30:=ATAN((MA30/REF(MA30,1)-1)*100)*180/3.1416{XG51};
强势狙击:=FILTER(BB30>30 AND BB10>45 AND crOSS(BB05,60),10){XG51};
加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND MA05>REF(MA05,1) AND 三拾日乖离率>REF(三拾日乖离率,1) AND MA10>REF(MA10,1)
AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) {XG51};
清仓:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>MA30 OR O>MA30) AND MA05<REF(MA05,1) AND 三拾日乖离率<REF(三拾日乖离率,1) AND MA10<REF(MA10,1),10){XG51};
DRAWTEXT(加仓 ,LOW*0.98,'←加仓'),COLORWHITE{XG51};
JC:=CROSS(0,五日乖离率) AND 三拾日乖离率<REF(三拾日乖离率,1) AND MA10>REF(MA10,1) {XG51};
减仓:=FILTER(JC,10){XG51};
MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND MA05>REF(MA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<MA30{XG51};
买入:=FILTER(MR,10){XG51};
DRAWTEXT(减仓,HIGH*1.02,'←风险'),COLORGREEN{XG51};
DRAWTEXT(买入,LOW*0.98,'←买入'),COLORBLUE{XG51};
DRAWTEXT(清仓 ,HIGH*1.02,'←清仓'),COLORCYAN{XG51};
DRAWTEXT(强势狙击,LOW*0.98,'←强势狙击'),COLORBLUE{XG51};
VAR21:=MAX(Abs(HIGH-AMOUNT/vol/100),ABS(AMOUNT/VOL/100-LOW)){XG51};
VAR3:=ABS((OPEN+CLOSE)/2-AMOUNT/VOL/100){XG51};
MV:=(VAR21+VAR3)/AMOUNT*VOL*100*50{XG51};
压力:MA(REF(HHV(C,30),1),2),COLOR9DFFFF,DOTLINE{XG51};
支撑:MA(REF(LLV(C,30),1),2),COLORABFF46,DOTLINE{XG51};
Z1:=stRCAT(HYBLOCK,' '){XG51};
Z2:=STRCAT(Z1,DYBLOCK){XG51};
Z3:=STRCAT(Z2,' '){XG51};
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORWHITE{XG51};
大盘涨家数:INDEXADV,NODRAW,COLORWHITE{XG51};
大盘跌家数:INDEXDEC,NODRAW,COLORCYAN;
涨停:=IF((C-REF(C,1))*100/REF(C,1)>=(10-0.01*100/REF(O,1)),1,0){XG51};
N:=89;M1:=3;M2:=3{XG51};
AA:=100*(C-REF(C,1))/REF(C,1){XG51};
BB:=100*(H-C)/REF(C,1){XG51};
HH:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100{XG51};
EE:=SMA(HH,M1,1){XG51};
FF:=SMA(EE,M2,1){XG51};
GG:=3*EE-2*FF{XG51};
V5:=EMA(CLOSE,1){XG51};
AE:=EMA(V5,5) ;
AB:=EMA(HHV(AE,5),1){XG51};
{XG51};
ZDT:=(C-REF(C,1))/REF(C,1)*100{XG51};
STICKLINE(ZDT>6,O,C,0.5,0),COLORBLUE{XG51};
STICKLINE(ZDT<-9.8,O,C,0.5,0),COLOR00FF00{XG51};
V五:=EMA(CLOSE,1);主线:=EMA(V五,5) ;
本:=EMA(HHV(主线,5),1){XG51};
急进:=EMA(HHV(本,17),1){XG51};
稳健:=EMA(HHV(急进,17),2){XG51};
主升浪:EMA(HHV(稳健,17),3),LINETHICK2,COLORYELLOW{X_G+5_1_C_N_{};