//@version=5
indicator(title="Isaac", shorttitle="Isaac", overlay=true)
serieshigh = (([Link] (10,0) and (((high-open)/(high-low))>0.1) and
(close<open))) //or (((high-open)/(high-low))>0.6)
serieslow = [Link] (10,0) and (((close-low)/(high-low))>0.1) and (close>open)
fastema = [Link] (10, minval=1, title="Fast EMA")
slowema = [Link] (30, minval=1, title="Slow EMA")
fastEMA = [Link](close, fastema)
slowEMA = [Link](close, slowema)
EMAhigh = [Link](fastEMA, slowEMA)
EMAlow = [Link](fastEMA, slowEMA)
fastvwma = [Link] (5, minval=1, title="Fast VWMA")
slowvwma = [Link] (20, minval=1, title="Slow VWMA")
fastVWMA = [Link](close, fastvwma)
slowVWMA = [Link](close, slowvwma)
vHigh = [Link](fastVWMA, slowVWMA)
vLow = [Link](fastVWMA, slowVWMA)
atr50 = [Link](50)
atr60 = [Link](60)
buy = EMAhigh or vHigh //
sell =EMAlow or vLow //
if (buy)
lbl = [Link](bar_index, low, "buy")
label.set_color(lbl, [Link])
label.set_yloc(lbl, [Link])
label.set_style(lbl, label.style_label_up)
if (sell)
lbl = [Link](bar_index,high, "sell")
label.set_color(lbl, [Link])
label.set_yloc(lbl, [Link])
label.set_style(lbl, label.style_label_down)
plotshape(serieshigh, style=[Link], location=[Link],
color=[Link])
plotshape(serieslow, style=[Link], location=[Link],
color=[Link])
plot(fastEMA, "Fast EMA", color=[Link], linewidth=3)
plot(slowEMA, "Slow EMA", color=[Link], linewidth=3)
plot(fastVWMA, "Fast EMA", color=[Link], linewidth=3)
plot(slowVWMA, "Slow EMA", color=[Link], linewidth=3)
plot(atr50, "ATR 50", color=[Link], linewidth=3)