Trend Regularity Adaptive Moving Average [LUX] For ThinkOrSwim

[dobeezy]

https://www.tradingview.com/script/p8wGCPi6-Trend-Regularity-Adaptive-Moving-Average-LUX/
Any help converting this to ToS would be amazing

 

[Joshua]

#https://www.tradingview.com/script/p8wGCPi6-Trend-Regularity-Adaptive-Moving-Average-LUX/
#study("Trend Regularity Adaptive Moving Average","TRAMA",overlay=true)
#@Joshua 5/30/22 for @dobeezy
input length = 20;
input Src = Close;
def H = highest(high,length);
def L = Lowest(low,length);
def HH = Max(Sign(H - H[1]),0);
def LL = Max(Sign(L - L[1])*-1,0);
def TC = Power(Average(if HH or LL then 1 else 0,Length),2);
def ama = ama[1]+tc*(src-ama[1]);
plot x = ama;

 

[desiben]

Here is a try:

input length = 99;
input src = close;

def hh = if high == Highest(high, length) then 1 else 0;
def ll = if low == Lowest(low, length) then 1 else 0;
def tc = Sqr(SimpleMovingAvg(if hh or ll then 1 else 0, length));

rec ama = if IsNaN(ama[1]) then src else ama[1] + tc * (src - ama[1]);

plot amaPlot = ama;
amaPlot.SetDefaultColor(Color.RED);
amaPlot.SetLineWeight(2);