通达信CR带状能量线未加密选股指标公式源码

通达信CR带状能量线未加密选股指标公式源码

源码正文：

DRAWGBK(C>0, RGB(1,0,1),RGB(1,0,1),0,'0',0){XG51};
NN:=26;M1:=10;M2:=20;M3:=40;M4:=62{XG51};
MID:=REF(HIGH+LOW,1)/2{XG51};
cr:SUM(maX(0,HIGH-MID),NN)/SUM(MAX(0,MID-LOW),NN)*100,NODRAW,COLORRED{XG51};
stICKLINE(C>0,REFDATE(LLV(CR,120),DATE),90,28,-1)COLORLIRED{XG51};
STICKLINE(C>0,REFDATE(LLV(CR,120),DATE),40,28,-1)COLORBLUE{XG51};
DRAWTEXT(ISLASTBAR,90,' ██'),COLORBLacK{XG51};
DRAWTEXT(ISLASTBAR,90,' 90')COLORGREEN{XG51};
MA1:REF(MA(CR,M1),M1/2.5+1)NODRAW,COLORBLUE{XG51};
MA2:REF(MA(CR,M2),M2/2.5+1)NODRAW,COLORLIMAGENTA{XG51};
MA3:REF(MA(CR,M3),M3/2.5+1)NODRAW,COLORCYAN{XG51};
MA4:REF(MA(CR,M4),M4/2.5+1)NODRAW,COLORGREEN{XG51};
DRAWBAND(MA3,RGB(80,16,0),MA4,RGB(80,64,64)){XG51};
DRAWBAND(MA1,RGB(150,50,50),MA2,RGB(0,50,150)){XG51};
NOTEXT:SUM(MAX(0,HIGH-MID),NN)/SUM(MAX(0,MID-LOW),NN)*100,COLORRED,LINETHICK2{XG51};
DRAWTEXT(ISLASTBAR,CR,' ←CR'),COLORRED{XG51};
STICKLINE(CROSS(CR,MA1),REFDATE(HHV(CR,120),DATE),REFDATE(LLV(CR,120),DATE),0,-1)COLORBLUE{XG51};
AA1:=CR>MA1 AND CR>MA2 AND CR>MA3 AND CR>MA4{XG51};
AA2:=AA1 AND AA1!=REF(AA1,1){XG51};
STICKLINE(AA2,REFDATE(HHV(CR.CR,120),DATE),CR,0,-1)COLORWHITE{XG51};
DRAWTEXT_FIX(1,0.40,0.00,0,'黄虚线--CR上穿MA1(可能有行情)；红虚线--CR同时大于4线(强势)；'),COLORRED{X_G_5_1_C_N_{};

通达信入库必赚未加密选股指标公式源码

源码正文：

VAR3:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100{XG51};
VAR4:=SMA(Sma(VAR3,3,1),3,1){XG51};
VAR5:=ema(VAR4,5){XG51};
VAR7:=3*VAR4-2*VAR5{XG51};
选股:crOSS(VAR7,VAR4) AND VAR7<21,COLORBLUE{X-G?5^1-C-N-{};