Hi Guys
I think this may be what you want, it is Alan Hulls ROAR indicator from his book "Active investing"
'Rate of Return' lndicator
Variablec: ord(o),LD(o),Roar(0),cuto ff(o),Enter(0c)o, unter(52),P eriod(26);
For Counter = 52 downto 13 Begin
' "^ --;
I"""rRegValue(clos.,io.r. rt.r,0) > linearRegValue(close,Peri od,t0h)e n Period
= Counter;
End;
Cord = linearRegValue(close,Peri od,0);
iO = Co.a - Q.618 * Cord * AvgTiueRange(52)/Average(close,5)2

If LD < LD[l] then LD = LD[l];
If Cord < LD then LD = Cord;
ii i-."rn"gV"fue(close,26,0 )>O then Roar = IntPortion (5200 * linearRegslope(close,26)/
LinearRegValue(c1ose,26)e ,0ls)e R oar = 0;
iin";t t= 30 and IntPortion (LinearRegValue(roar,5,0) >)= 30 then Roar = IntPortion
(LinearRegValue(roar,5), )0;
Cutoff = 20;
Enter = 30;
if Roar < Cutoff then Roar = 0;
if Roar < Enter and Roar[l] = 0 then Roar = 0;
if Roarll] = 0 and summation(volume * MedianPrice'l3) < 120000 then Roar = 0 ;
iin.-ifj > 0 and summationivolume * MedianPrice,l3) < 100000 then Roar = 0 ;
if Cord = LD then Roar=O;
plotl (Roar,"Roar", darkgray,b lack' I );
plot2 (Cutoff, "Cutoff' , black , black , I );
This is supposed to work on
tradestation, Which I don't have.
I do have a bull charts version but have not messed with it much
if you want to know more just google Alan Hull or alan hull.com.au