通达信能量CR指标(源码)

N:=26;
M1:=5;
M2:=20;
M3:=40;
M4:=62;
MID:=REF(HIGH+LOW,1)/2;
CRR:=SUM(MAX(0,HIGH-MID),N)/SUM(MAX(0,MID-LOW),N)*100;
RCC:=SUM(MIN(0,L-MID),N)/SUM(MIN(0,MID-H),N)*100;
CR:if(CRR>200,200,CRR),COLORWHITE;
RC:if(RCC>200,200,RCC),COLORCYAN;
STICKLINE(CR<50 AND CR>20,40,50,8,0),COLORMAGENTA;
STICKLINE(CR<40 AND CR>20,40,30,8,0),COLORYELLOW;
STICKLINE(CR<30 AND CR>20,20,30,8,0),COLORRED;
STICKLINE(RC<50 AND RC>20,180,170,8,0),COLORCYAN;
STICKLINE(RC<40 AND RC>20,190,180,8,0),COLORBLUE;
STICKLINE(RC<30 AND RC>20,200,190,8,0),COLORGREEN;