N:=26;
AR :SUM(HIGH-OPEN,N)/SUM(OPEN-LOW,N)*100,STICK,COLORWHITE,LINETHICK4;
STICKLINE(AR<50,50,0,6,0),COLORBLUE;
STICKLINE(AR>50,50,AR,6,0),COLORLIRED;
STICKLINE(AR>70,70,AR,6,0),COLORMAGENTA;
STICKLINE(AR>150,150,AR,6,0),COLORLIMAGENTA;
STICKLINE(AR>300,100,AR,6,0),COLORRED;
