Mobius scanner

[Not Idea What I'm Doing]

Hello,

I currently run a strategy where I watch a 2hr and 15 min chart. Both are using the Mobius Super Smooth Stochastic and Mobius supertrend. When they are in congruence i will take the trade and ride it until it breaks the super trend. Would someone be able to help me build a scanner? Could really use some help here, the strategy works but i have a hard time finding stocks where i have not already missed the move. My thought would be set up the scanner on maybe a 1hr aggregation and watch for it to verify on the 2hr, then look for entry on the 15.

Codes below:
# Super Smooth Stochastic
# Mobius
# V01.02.2018
#Hint: Suggest 13 and above for Daily and 8 or less for Intraday

input length = 8; #hint length: Good starting points 13 Daily, 8 Intraday
input Arrows = no;

declare lower;

script g {
input data = close;
def w = (2 * Double.Pi / 20);
def beta = (1 - Cos(w)) / (Power(1.414, 2.0 / 10) - 1 );
def alpha = (-beta + Sqrt(beta * beta + 2 * beta));
def G = Power(alpha, 4) * data +
4 * (1 – alpha) * G[1] – 6 * Power( 1 - alpha, 2 ) * G[2] +
4 * Power( 1 - alpha, 3 ) * G[3] - Power( 1 - alpha, 4 ) * G[4];
plot Line = G;
}

def o = g(data = open);
def h = g(data = high);
def l = g(data = low);
def c = g(data = close);
def RSV = ((c - Lowest(l, length)) / (Highest(h, length) - Lowest(l, length))) * 100;
plot K = g(data = RSV);
K.SetDefaultColor(color.green);
plot D = g(data = K);
D.SetDefaultColor(color.red);
plot OB = if isNaN(c) then double.nan else 80;
OB.SetDefaultColor(Color.Gray);
OB.HideBubble();
OB.HideTitle();
plot OS = if isNaN(c) then double.nan else 20;
OS.SetDefaultColor(Color.Gray);
OS.HideBubble();
OS.HideTitle();

AddCloud(K, D, color.green, color.red);

plot upArrow = if Arrows and K < OS and K crosses above D
then K
else double.nan;
upArrow.SetPaintingStrategy(PaintingStrategy.Arrow_UP);
upArrow.SetDefaultColor(Color.Green);
upArrow.HideBubble();
upArrow.HideTitle();
plot dnArrow = if Arrows and K > OB and K crosses below D
then K
else double.nan;
dnArrow.SetPaintingStrategy(PaintingStrategy.Arrow_DOWN);
dnArrow.SetDefaultColor(Color.Red);
dnArrow.HideBubble();
dnArrow.HideTitle();


# Mobius
# SuperTrend
# Chat Room Request
input AtrMult = 1.0;
input nATR = 4;
input AvgType = AverageType.HULL;
input PaintBars = yes;
def ATR = MovingAverage(AvgType, TrueRange(high, close, low), nATR);
def UP = HL2 + (AtrMult * ATR);
def DN = HL2 + (-AtrMult * ATR);
def ST = if close < ST[1] then UP else DN;
plot SuperTrend = ST;
SuperTrend.AssignValueColor(if close < ST then Color.RED else Color.GREEN);
AssignPriceColor(if PaintBars and close < ST

then Color.RED

else if PaintBars and close > ST

then Color.GREEN

else Color.CURRENT);

# End Code SuperTrend