[LegacyColorValue = true]; 

{ TSMDoubleMavg: Simple double smoothing of average
  Copyright 1999, P.J.Kaufman. All rights reserved. }

	input:	price(numericseries), length1(numericsimple),length2(numericsimple);
	var:	avg(0), davg(0);

	avg = average(price,length1);
   davg = average(avg,length2);
	TSMDoubleMavg = davg;