# Define variables
def A1 = Inertia(ExpAverage(close, 5), 6);
def A2 = Inertia(ExpAverage(close, 8), 6);
def A3 = Inertia(ExpAverage(close, 11), 6);
def A4 = Inertia(ExpAverage(close, 14), 6);
def A5 = Inertia(ExpAverage(close, 17), 6);
def B = A1 + A2 + A3 + A4 - 4 * A5;
def TOWERC = ExpAverage(B, 2);
# Plotting
plot Forecast1 = Inertia(ExpAverage(B, 3), 6);
Forecast1.SetPaintingStrategy(PaintingStrategy.POINTS);
Forecast1.SetDefaultColor(Color.GREEN);
plot Forecast2 = Inertia(ExpAverage(B, 4), 6);
Forecast2.SetPaintingStrategy(PaintingStrategy.POINTS);
Forecast2.SetDefaultColor(Color.GREEN);
plot Forecast3 = Inertia(ExpAverage(B, 5), 6);
Forecast3.SetPaintingStrategy(PaintingStrategy.POINTS);
Forecast3.SetDefaultColor(Color.GREEN);
plot Forecast4 = Inertia(ExpAverage(B, 6), 6);
Forecast4.SetPaintingStrategy(PaintingStrategy.POINTS);
Forecast4.SetDefaultColor(Color.GREEN);
plot Forecast5 = Inertia(ExpAverage(B, 7), 6);
Forecast5.SetPaintingStrategy(PaintingStrategy.POINTS);
Forecast5.SetDefaultColor(Color.GREEN);
plot Forecast6 = Inertia(ExpAverage(B, 8), 6);
Forecast6.SetPaintingStrategy(PaintingStrategy.POINTS);
Forecast6.SetDefaultColor(Color.GREEN);
plot Forecast7 = Inertia(ExpAverage(B, 9), 6);
Forecast7.SetPaintingStrategy(PaintingStrategy.POINTS);
Forecast7.SetDefaultColor(Color.GREEN);
plot Forecast8 = Inertia(ExpAverage(B, 10), 6);
Forecast8.SetPaintingStrategy(PaintingStrategy.POINTS);
Forecast8.SetDefaultColor(Color.GREEN);
plot Forecast9 = Inertia(ExpAverage(B, 11), 6);
Forecast9.SetPaintingStrategy(PaintingStrategy.POINTS);
Forecast9.SetDefaultColor(Color.GREEN);
plot Forecast10 = Inertia(ExpAverage(B, 12), 6);
Forecast10.SetPaintingStrategy(PaintingStrategy.POINTS);
Forecast10.SetDefaultColor(Color.GREEN);
plot Forecast11 = Inertia(ExpAverage(B, 13), 6);
Forecast11.SetPaintingStrategy(PaintingStrategy.POINTS);
Forecast11.SetDefaultColor(Color.GREEN);
plot Forecast12 = Inertia(ExpAverage(B, 14), 6);
Forecast12.SetPaintingStrategy(PaintingStrategy.POINTS);
Forecast12.SetDefaultColor(Color.GREEN);
plot Forecast13 = Inertia(ExpAverage(B, 15), 6);
Forecast13.SetPaintingStrategy(PaintingStrategy.POINTS);
Forecast13.SetDefaultColor(Color.GREEN);
plot Forecast14 = Inertia(ExpAverage(B, 16), 6);
Forecast14.SetPaintingStrategy(PaintingStrategy.POINTS);
Forecast14.SetDefaultColor(Color.GREEN);
plot Forecast15 = Inertia(ExpAverage(B, 17), 6);
Forecast15.SetPaintingStrategy(PaintingStrategy.POINTS);
Forecast15.SetDefaultColor(Color.GREEN);
# Draw sticks
def StickLineUp = if TOWERC >= TOWERC[1] then TOWERC else Double.NaN;
plot StickLine = StickLineUp;
StickLine.SetPaintingStrategy(PaintingStrategy.STICKS);
StickLine