// This Pine Script® code is subject to the terms of the Mozilla Public License 2.
0
at https://mozilla.org/MPL/2.0/
// © traderschatroom88
//@version=5
indicator("Infinity Algo", overlay=true, precision=0, explicit_plot_zorder=true,
max_labels_count=500)
// Get user input
emaEnergy = false
sensitivity = input.float(6, " Sensitivity (0.5 - 10)", 0.5, 10, step=0.1)
keltner_length = 10
atrPeriod = 10
factor = 3.5
// Keltner Channel function
keltner_channel(src, length) =>
ma = ta.sma(src, length)
rangec = high - low
upper = ma + rangec
lower = ma - rangec
[upper, lower]
// Modified Supertrend function using Keltner Channel
supertrend(_src, factor, atrLen, kel_length) =>
[upperKeltner, lowerKeltner] = keltner_channel(_src, kel_length)
rangec = upperKeltner - lowerKeltner
upperBand = _src + factor * rangec
lowerBand = _src - factor * rangec
prevLowerBand = nz(lowerBand[1])
prevUpperBand = nz(upperBand[1])
lowerBand := lowerBand > prevLowerBand or close[1] < prevLowerBand ?
lowerBand : prevLowerBand
upperBand := upperBand < prevUpperBand or close[1] > prevUpperBand ?
upperBand : prevUpperBand
int direction = na
float superTrend = na
prevSuperTrend = superTrend[1]
if na(rangec[1])
direction := 1
else if prevSuperTrend == prevUpperBand
direction := close > upperBand ? -1 : 1
else
direction := close < lowerBand ? 1 : -1
superTrend := direction == -1 ? lowerBand : upperBand
[superTrend, direction]
// Get Components
ema1 = ta.ema(high, 9)
ema2 = ta.ema(high, 12)
ema3 = ta.ema(high, 15)
ema4 = ta.ema(high, 18)
ema5 = ta.ema(high, 21)
ema6 = ta.ema(high, 24)
ema7 = ta.ema(high, 27)
ema8 = ta.ema(high, 30)
ema9 = ta.ema(high, 33)
ema10 = ta.ema(high, 36)
ema11 = ta.ema(high, 39)
ema12 = ta.ema(high, 42)
ema13 = ta.ema(high, 45)
ema14 = ta.ema(high, 48)
ema15 = ta.ema(high, 51)
// Colors
green = color.new(#2BBC4D, 0)
red = color.new(#C51D0B, 0)
emaEnergyColor(ma) =>
emaEnergy ? (close >= ma ? green : red) : color.new(na, 0)
// Plots
//plot(ema1, "", emaEnergyColor(ema1), editable=false)
//plot(ema2, "", emaEnergyColor(ema2), editable=false)
plot(ema3, "", emaEnergyColor(ema3), editable=false)
plot(ema4, "", emaEnergyColor(ema4), editable=false)
plot(ema5, "", emaEnergyColor(ema5), editable=false)
plot(ema6, "", emaEnergyColor(ema6), editable=false)
plot(ema7, "", emaEnergyColor(ema7), editable=false)
plot(ema8, "", emaEnergyColor(ema8), editable=false)
plot(ema9, "", emaEnergyColor(ema9), editable=false)
plot(ema10, "", emaEnergyColor(ema10), editable=false)
plot(ema11, "", emaEnergyColor(ema11), editable=false)
plot(ema12, "", emaEnergyColor(ema12), editable=false)
plot(ema13, "", emaEnergyColor(ema13), editable=false)
plot(ema14, "", emaEnergyColor(ema14), editable=false)
plot(ema15, "", emaEnergyColor(ema15), editable=false)
[supertrend, direction] = supertrend(close, sensitivity, 11, keltner_length)
bull = ta.crossover(close, supertrend)
bear = ta.crossunder(close, supertrend)
y1 = low - (ta.atr(30) * 2)
y2 = high + (ta.atr(30) * 2)
// Braid Filter
//-- Inputs
maType = input.string('McGinley', 'Filter', options=['EMA', 'DEMA', 'TEMA', 'WMA',
'VWMA', 'SMA', 'SMMA', 'HMA', 'LSMA', 'Kijun', 'McGinley', 'RMA'])
Period1 = 3
Period2 = 7
Period3 = 20
PipsMinSepPercent = input(60, 'Filter Strength')
//-- Moving Average
ma(type, src, len) =>
float result = 0
if type == 'SMA' // Simple
result := ta.sma(src, len)
result
if type == 'EMA' // Exponential
result := ta.ema(src, len)
result
if type == 'DEMA' // Double Exponential
e = ta.ema(src, len)
result := 2 * e - ta.ema(e, len)
result
if type == 'TEMA' // Triple Exponential
e = ta.ema(src, len)
result := 3 * (e - ta.ema(e, len)) + ta.ema(ta.ema(e, len), len)
result
if type == 'WMA' // Weighted
result := ta.wma(src, len)
result
if type == 'VWMA' // Volume Weighted
result := ta.vwma(src, len)
result
if type == 'SMMA' // Smoothed
w = ta.wma(src, len)
sma_prev = ta.sma(src, len)
sma_value = na(w[1]) ? sma_prev : (w[1] * (len - 1) + src) / len
result := sma_value
if type == 'RMA'
result := ta.rma(src, len)
result
if type == 'HMA' // Hull
result := ta.wma(2 * ta.wma(src, len / 2) - ta.wma(src, len),
math.round(math.sqrt(len)))
result
if type == 'LSMA' // Least Squares
result := ta.linreg(src, len, 0)
result
if type == 'Kijun' //Kijun-sen
kijun = math.avg(ta.lowest(len), ta.highest(len))
result := kijun
result
if type == 'McGinley'
mg = 0.0
ema_value = ta.ema(src, len)
mg := na(mg[1]) ? ema_value : mg[1] + (src - mg[1]) / (len * math.pow(src /
mg[1], 4))
result := mg
result
//-- Braid Filter
ma01 = ma(maType, close, Period1)
ma02 = ma(maType, open, Period2)
ma03 = ma(maType, close, Period3)
max = math.max(math.max(ma01, ma02), ma03)
min = math.min(math.min(ma01, ma02), ma03)
dif = max - min
filter = ta.atr(14) * PipsMinSepPercent / 100
//-- Plots
//BraidColor = ma01 > ma02 and dif > filter ? color.green : ma02 > ma01 and dif >
filter ? color.red : color.gray
//plot(dif, 'Braid', BraidColor, 5, plot.style_columns)
//plot(filter, 'Filter', color.new(color.blue, 0), 2, plot.style_line)
//bgcolor(BraidColor, transp=90)
// Braid Filter Finish
buy = bull and ma01 > ma02 and dif > filter ? label.new(bar_index, y1, "BUY",
xloc.bar_index, yloc.price, green, label.style_label_up, color.white,
size.normal) : na
sell = bear and ma02 > ma01 and dif > filter ? label.new(bar_index, y2, "SELL",
xloc.bar_index, yloc.price, red, label.style_label_down, color.white,
size.normal) : na
[supertrends, directions] = supertrend(close, sensitivity, atrPeriod,
keltner_length)
bodyMiddle = plot((open + close) / 2, display=display.none)
// Trend Catcher Indicator (Example)
ema100 = ta.ema(close, 10)
ema200 = ta.ema(close, 20)
crossover_condition = ta.crossover(ema100, ema200)
crossunder_condition = ta.crossunder(ema100, ema200)
trendCatcher = crossover_condition ? 1 : crossunder_condition ? -1 : 0
trendColor = trendCatcher == 1 ? color.rgb(90, 23, 102) : na
barcolor(trendColor)
// Colored candles
barcolor(color = close > supertrends ? color.rgb(102, 255, 0) : color.rgb(255, 0,
0))
// Take Profit Script
colorsr = 'DARK'
bullcolorr = colorsr == 'DARK' ? color.rgb(0, 255, 8) : #00DBFF
bearcolorr = colorsr == 'DARK' ? color.rgb(255, 0, 0) : #E91E63
ShowTEX = input.bool(true, "Show Take Profit Signals")
TE1 = true
TE2 = true
TE3 = true
//TE4 = input(true, 'TE - 4' , group="Money Moves [Trend Exhaustion]" , inline =
"TEX")
rsiLengthInput = 22
rsiSourceInput = close
maTypeInput = ta.sma(close, 14)
up66 = ta.rma(math.max(ta.change(rsiSourceInput), 0), rsiLengthInput)
downw = ta.rma(-math.min(ta.change(rsiSourceInput), 0), rsiLengthInput)
rsi66 = downw == 0 ? 100 : up66 == 0 ? 0 : 100 - (100 / (1 + up66 / downw))
rsiMA = maTypeInput
long1 = ta.crossover(rsi66, 30)
long2 = ta.crossover(rsi66, 20)
long3 = ta.crossover(rsi66, 15)
//long4 = ta.crossover(rsi66, 10)
// SHORT
short1 = ta.crossunder(rsi66, 70)
short2 = ta.crossunder(rsi66, 80)
short3 = ta.crossunder(rsi66, 85)
//short4 = ta.crossunder(rsi66, 90)
// LONG
plotshape(long1 and ShowTEX and TE1, "GO LONG 1", style=shape.circle,
location=location.belowbar,size=size.tiny, color = color.new(bullcolorr , 60) ,
text="TP" , textcolor = bullcolorr , editable = false)
plotshape(long2 and ShowTEX and TE2, "GO LONG 2", style=shape.circle,
location=location.belowbar,size=size.tiny, color = color.new(bullcolorr , 50),
text="TP" , textcolor = bullcolorr , editable = false)
plotshape(long3 and ShowTEX and TE3, "GO LONG 3", style=shape.circle,
location=location.belowbar,size=size.tiny, color = color.new(bullcolorr , 10),
text="TP", textcolor = bullcolorr , editable = false)
//plotshape(long4 and ShowTEX, "GO LONG 4", style=shape.circle,
location=location.belowbar,size=size.tiny, color=color.gray, text="4")
// SHORT
plotshape(short1 and ShowTEX and TE1, "GO SHORT 1", style=shape.circle,
location=location.abovebar,size=size.tiny, color = color.new(bearcolorr , 60) ,
text="TP" , textcolor = bearcolorr , editable = false)
plotshape(short2 and ShowTEX and TE2, "GO SHORT 2", style=shape.circle,
location=location.abovebar,size=size.tiny, color = color.new(bearcolorr , 50) ,
text="TP" , textcolor = bearcolorr , editable = false)
plotshape(short3 and ShowTEX and TE3, "GO SHORT 3", style=shape.circle,
location=location.abovebar,size=size.tiny, color = color.new(bearcolorr , 10) ,
text="TP" , textcolor = bearcolorr , editable = false)
//plotshape(short4 and ShowTEX, "GO SHORT 4", style=shape.circle,
location=location.abovebar,size=size.tiny, color=color.gray, text="4")
// alertcondition(long1 or short1 , 'Trend Exhausted - 1', 'Trend Exhausted |
Strength - 1 ')
// alertcondition(long2 or short2 , 'Trend Exhausted - 2', 'Trend Exhausted |
Strength - 2 ')
// alertcondition(long3 or short3 , 'Trend Exhausted - 3', 'Trend Exhausted |
Strength - 3 ')
// Peak Profit Script
import protradingart/pta_plot/6 as pp
pp.peakprofit(bull and ma01 > ma02 and dif > filter, bear and ma02 > ma01 and dif >
filter)
///////////////////////////////////////////////////////////////////////////////////
///////////////////////////////////
// This Pine Script™ code is subject to the terms of the Mozilla Public License 2.0
at https://mozilla.org/MPL/2.0/
// Inputs EMA
len1 = input.int(9, title = "Main Flow EMA", group = "CANDLES COLORS 🌈")
src1 = close
out1 = ta.ema(src1, len1)
len2 = input.int(21, title = "")
src2 = close
out2 = ta.ema(src2, len2)
// Sensitivity inputs for violet candles
sensitivity_violet = input.float(0.3, title=" \n Sensitivity Violet", step=0.01)
sensitivity_rose = input.float(0.1, title="Sensitivity Rose", step=0.01)
// Calculate the difference between EMAs for long and short signals
ema_diff_long_short = out1 - out2
// Define the conditions for long and short signals
long_signal = ema_diff_long_short > 0
short_signal = ema_diff_long_short < 0
// Calculate the difference between the two violet EMAs
ema_diff_violet = out1 - out2
// Define the conditions for the EMAs to be close based on sensitivities
emas_close_violet1 = ema_diff_violet >= -sensitivity_violet * ta.atr(14) and
ema_diff_violet <= sensitivity_violet * ta.atr(14)
emas_close_violet2 = ema_diff_violet >= -sensitivity_rose * ta.atr(14) and
ema_diff_violet <= sensitivity_rose * ta.atr(14)
// Imputs EMA Trend
len3 = input.int(20, minval=1, title='Trend EMA', group = "Trend 📊")
src3 = close
out3 = ta.ema(src3, len3)
len4 = input.int(50, minval=1, title='')
src4 = close
out4 = ta.ema(src4, len4)
// Show Trend Checkbox
//show_trend = input.bool(true, "Show Trend")
// Use plotcandle to color bars based on the conditions
plotcandle(open, high, low, close, color=emas_close_violet1 ? color.new(#5b00f7, 0)
: (long_signal ? color.new(#00FF1A, 0) : (short_signal ? color.new(#FF0000,00) :
na)), wickcolor=emas_close_violet1 ? color.new(#7E57C2, 00) : (long_signal ?
color.new(#00FF1A, 00) : (short_signal ? color.new(#FF0000, 00) : na)),
bordercolor=emas_close_violet1 ? color.new(#7E57C2, 00) : (long_signal ?
color.new(#00FF1A, 00) : (short_signal ? color.new(#FF0000, 0) : na)), editable =
true)
// Use plotcandle to color bars based on the conditions with different sensitivity
plotcandle(open, high, low, close, color=emas_close_violet2 ? color.new(#AB47BC, 0)
: (long_signal ? color.new(#00FF1A,100) : (short_signal ? color.new(#FF0000, 100) :
na)), wickcolor=emas_close_violet2 ? color.new(#AB47BC, 0) : (long_signal ?
color.new(#00FF1A,100) : (short_signal ? color.new(#FF0000, 100) : na)),
bordercolor=emas_close_violet2 ? color.new(#AB47BC, 0) : (long_signal ?
color.new(#00FF1A, 100) : (short_signal ? color.new(#FF0000,100) : na)), editable =
true)
// Alert Conditions
//alertcondition(long_signal, title="Bullish", message="A Bullish Signal has been
triggered!")
//lertcondition(short_signal, title="Bearish", message="A Bearish Signal has been
triggered!")
// Entrée pour afficher ou masquer les bougies bearish
showBearishCandles = input.bool(true, "Show Bearish Candle", group = "BEARISH
CANDLE 🐻")
// Color bearish candles body in red or hide them based on user input
bearishCandleColor = showBearishCandles ? (close > open ? na : color.rgb(255, 0,
0)) : na
plotcandle(open, high, low, close, color=bearishCandleColor,
wickcolor=color.rgb(54, 58, 69, 100), bordercolor=color.rgb(54, 58, 69, 100),
editable=true)
// Define the conditions for blue or red trend based on show_trend input
//ema1_color_trend = show_trend ? out3 > out4 ? color.new(#2962FF, 100) :
color.new(#F23645, 100) : na
//ema2_color_trend = show_trend ? out3 > out4 ? color.new(#2962FF, 0) :
color.new(#F23645, 0) : na
//ema1plot = plot(out3, color=show_trend ? ema1_color_trend : na,
style=plot.style_line, linewidth=1, title='EMA-1', editable=true)
//ema2plot = plot(out4, color=show_trend ? ema2_color_trend : na,
style=plot.style_line, linewidth=1, title='EMA-2', editable=true)
// Define the fill color based on the condition of show_trend input
//fill_color = show_trend ? out3 > out4 ? #2962FF : #F23645 : na
// Fill between EMAs when they cross
//fill(ema1plot, ema2plot, color=fill_color, transp=85, editable=true)
// RSI Settings
rsi_len = 14
rsi_overbought = 75
rsi_oversold = 25
// RSI Calculation
rsi = ta.rsi(close, rsi_len)
// Detection of the first occurrence of overbought (RSI > 75)
first_overbought = ta.crossover(rsi, rsi_overbought)
// Detection of the first occurrence of oversold (RSI < 25)
first_oversold = ta.crossunder(rsi, rsi_oversold)
toggleBreaks = true
leftBars = 50
rightBars = 50
volumeThresh = 20
//Volume %
short = ta.ema(volume, 5)
long = ta.ema(volume, 10)
osc = 100 * (short - long) / long
// Inputs Zero Lag EMA
length0 = 144
highlightMovements = true
src0 = close
lag = math.floor((length0 - 1) / 2)
zlema = ta.ema(src0 + src0 - src0[lag], length0)
// Show Zero Lag EMA Checkbox
0show_zlema = input.bool(true, "Show Zero Lag EMA", group = "Zero Lag EMA 0")
0️⃣
zlemaColor = show_zlema ? (highlightMovements ? zlema > zlema[1] ? #00FF1A :
#FF0000 : #6d1e7f) : na
// Plot Zero Lag EMA
plot(zlema, color=zlemaColor, title="Zero Lag EMA", linewidth=2, editable = true)
///////
// === Inputs ===
showDashboard = input.bool(true, "Show Dashboard")
locationDashboard = input.string("Bottom Right", "Dashboard Location",
options=["Top Right", "Top Left", "Bottom Right", "Bottom Left"])
// === Functions ===
// Dummy values for demo (replace with your own logic)
getTrend(tf) =>
tf == "1m" or tf == "5m" or tf == "4h" or tf == "1D" ? "Bearish" :tf == "15m"
or tf == "30m" or tf == "1h" ? "Oversold" : tf == "1W" ? "Bullish" : "Bearish"
getVol(tf) =>
tf == "1D" ? "Normal" : tf == "1W" ? "High" : "Low"
// === Timeframes ===
tfs = array.from("1m", "5m", "15m", "30m", "1h", "4h", "1D", "1W", "AVG")
// === Create table ===
var table dash = table.new(position.bottom_left, 3, array.size(tfs)+1,
border_width=1, frame_color=color.new(color.white,80))
if barstate.islast and showDashboard
// Headers
table.cell(dash, 0, 0, " Timeframe", text_color=color.white,
text_size=size.tiny, bgcolor=color.rgb(30,30,50))
table.cell(dash, 1, 0, "📊 Trend", text_color=color.white, text_size=size.tiny,
bgcolor=color.rgb(30,30,50))
table.cell(dash, 2, 0, "📉 Volatility", text_color=color.white,
text_size=size.tiny, bgcolor=color.rgb(30,30,50))
// Rows
for i = 0 to array.size(tfs)-1
tf = array.get(tfs, i)
trend = getTrend(tf)
vol = getVol(tf)
// Timeframe column
table.cell(dash, 0, i+1, tf, text_color=color.orange,
bgcolor=color.rgb(10,20,60))
// Trend column
trendText = trend == "Bearish" ? "🐻 Bearish" : trend == "Bullish" ? "🚀
Bullish" : "🎭 Oversold"
trendColor = trend == "Bearish" ? color.red : trend == "Bullish" ?
color.green : color.blue
table.cell(dash, 1, i+1, trendText, text_color=color.white,
bgcolor=trendColor)
// Volatility column
volText = vol == "Low" ? "⚖️
Low" : vol == "Normal" ? " Normal" : "🌋 High"
volColor = vol == "Low" ? color.rgb(0,50,100) : vol == "Normal" ?
color.rgb(100,100,50) : color.rgb(120,0,0)
table.cell(dash, 2, i+1, volText, text_color=color.white, bgcolor=volColor)
