I am just wandering if anyone could help to convert moxie indicator and scanner from TOS (think of swim) to PRT.
Code as below
indicator
# ST_Moxie_Hourly Indicator
declare lower;DefineGlobalColor("UpTrend" , Color.GREEN);DefineGlobalColor("DownTrend" , Color.RED);DefineGlobalColor("NoTrend" , Color.LIGHT_GRAY);def hP1a = AggregationPeriod.Day ;def s5v = 12 ;def ul = Average ( High * (1 + 4 * (High - Low ) / (High + Low )), length = 14 );def s5r = 26 ;def s5g = 9 ;def vc1 = ExpAverage(close (period = hP1a) , s5v) - ExpAverage(close (period = hP1a) , s5r);def m2 = AbsValue((close - Lowest (low , s5r)) - (Highest (high , s5g) - close )) / (Highest (high , s5g) - Lowest (low , s5g));def va1 = ExpAverage(vc1, s5g);plot Moxie = (vc1 - va1) * 3 ; def g1 = Cos (1.32 * 2 * Double.Pi / (s5g / 0.1 ));Moxie.SetStyle(Curve.FIRM);Moxie.SetLineWeight(2 );Moxie.HideTitle();def l1 = Moxie < Moxie[ 1 ] ;def h1 = Moxie > Moxie[ 1 ] ;def sig = if l1 then yes else if sig[ 1 ] = = yes and h1 = = no then yes else no;Moxie.AssignValueColor(if sig then Color.RED else Color.UPTICK);plot zeroLine = if close [ - 1 ] > 0 then 0 else Double.NaN;zeroLine.setDefaultColor(Color.gray);zeroLine.SetStyle(Curve.FIRM);zeroLine.SetLineWeight(2 );zeroLine.HideBubble();zeroLine.HideTitle();
Trade Signal
# ST_MoxiePriceSignal_Hourly
def hP1a = AggregationPeriod.Day ;def s5v = 12 ;def ul = Average ( High * (1 + 4 * (High - Low ) / (High + Low )), length = 14 );def s5r = 26 ;def s5g = 9 ;def vc1 = ExpAverage(close (period = hP1a) , s5v) - ExpAverage(close (period = hP1a) , s5r);def m2 = AbsValue((close - Lowest (low , s5r)) - (Highest (high , s5g) - close )) / (Highest (high , s5g) - Lowest (low , s5g));def va1 = ExpAverage(vc1, s5g);def Moxie = (vc1 - va1); plot crossingAbove = if Moxie[ 1 ] < 0 and Moxie > 0 then low (period = AggregationPeriod.DAY ) else Double.NaN;plot crossingBelow = if Moxie[ 1 ] > 0 and Moxie < 0 then high (period = AggregationPeriod.DAY ) else Double.NaN;crossingAbove.SetDefaultColor(Color.GREEN);crossingAbove.SetPaintingStrategy(PaintingStrategy.ARROW_UP);crossingBelow.SetDefaultColor(Color.RED);crossingBelow.SetPaintingStrategy(PaintingStrategy.ARROW_DOWN);
Scanner
# ST_Moxie_Scan Scanner
declare lower;def s5v = 12 ;def ul = Average ( High * (1 + 4 * (High - Low ) / (High + Low )), length = 14 );def s5r = 26 ;def s5g = 9 ;def vc1 = ExpAverage(close , s5v) - ExpAverage(close , s5r);def m2 = AbsValue((close - Lowest (low , s5r)) - (Highest (high , s5g) - close )) / (Highest (high , s5g) - Lowest (low , s5g));def g1 = Cos (1.32 * 2 * Double.Pi / (s5g / 0.1 ));def va1 = ExpAverage(vc1, s5g);plot MoxieScan = ((vc1 - va1) * 3 ) > 0 ;
.
