TS Bands
HighValue:=(HIGH*(1+2*(((HIGH-LOW)/((HIGH+LOW)/2))*1000)*0.001)); 

UpperBand:=Mov(HighValue,20,S); 

MidPoint:=Mov(C,20,S); 

LowValue:=(LOW*(1+2*((((HIGH-LOW)/((HIGH+LOW)/2))*1000)*0.001))); 

LowerBand:=Mov(LowValue,20,S); 

UpperBand;MidPoint;LowerBand;