LC := REF(CLOSE,1);   

VID := SUM(VOL,2)/(((HHV(HIGH,2)-LLV(LOW,2)))*100);   

RC := (CLOSE-LC)*VID;   

LONG := SUM(RC,0);   

DIFF := SMA(LONG,10,1);   

DEA := SMA(LONG,20,1);   

LON := (DIFF-DEA)*10,COLOR00DD00,LINETHICK1;   

LONMA : MA(LON,10),COLORFFFFFF,LINETHICK2;   

LONT : LON,COLORSTICK;   

VAR1:=MA((VOL-REF(VOL,1))/REF(VOL,1),5);   

VAR2:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;   

MY:=VAR2*(1+VAR1);   

SHT:= MY;   

SHTMA:= MA(SHT,5);   

LONT1:=MA(LONT,3);   

STICKLINE(SHTMA>MY,LONT,LONT1,2,0),COLOR55FF22;   

STICKLINE(SHTMA<MY,LONT,LONT1,2,0),COLOR9900FF;