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;