Need help - TSI - Function in ACSIL

Hello - Can any one help with converting this function to ACSIL? There is built in True strength indicator(scsf_TrueStrengthIndex) available in Sierra but - I would like to have it in more generic form - where it can be called multiple times with various parameters.

Thanks in advance.

Here is the TS Code:

TSI Function:
----------------

 

Code

{TSI function = True Strength Index by Bill Blau} {FORMAT: TSI(Price,r,s,u) Where: r = length of first EMA smoothing of 1 day momentum, s = length of second EMA smoothing of 1 day smooting, u = length of third EMA smooting of 1 daymomentum.} Inputs: Price(NumericSeries), r(NumericSimple), s(NumericSimple), u(NumericSimple); Value1= 100*TXAverage(Price-Price[1],r,s,u) ; { Numerator } Value2=TXAverage(AbsValue(Price-Price[1]),r,s,u) ; { Denominator } If Value2 <> 0 then TSI = Value1 / Value2 else TSI = 0;

TXAverage Function:
--------------------------

 

Code

{TXAverage function FORMAT: TXAverage(Price,r,s,u) } Inputs: Price(NumericSeries), r(NumericSimple),s(NumericSimple), u(NumericSimple); TXAverage = XAverage(XAverage(XAverage(Price,r),s),u) ;

Indicator code (to demonstrate the repeat use of the function - Which I am unable to replicate in Sierra):
-------------------

 

Code

plot1(xaverage(TSI(High,10,20,30),5)); plot2(xaverage(TSI(Low,10,20,30),5));