//@version=6
indicator("IT_Tendances", shorttitle="Tendances", overlay=true)

montrer_moyennes = input.bool (defval=true,title ="Montrer moyennes")
montrer_moyenne_decalee = input.bool (defval=false,title ="Montrer visualisation tendance")
montrer_faisceaux =  input.bool (defval=false,title ="Montrer faisceaux")
montrer_Bollinger = input.bool(defval=false,title="Bandes_Bollinger") 

// Déclarations moyennes mobiles exponentielles

Prix = input(close)

Periode_M200 = input(200,title="Moyenne_LT",group= "Moyennes mobiles")
Periode_M50 = input(50,title="Moyenne_MT",group= "Moyennes mobiles")
Periode_M20 = input(20,title="Moyenne_CT",group= "Moyennes mobiles")

Sortie_1 = ta.ema(Prix,Periode_M200)
Sortie_2 = ta.ema(Prix,Periode_M50)
Sortie_3 = ta.ema(Prix,Periode_M20)

// Déclarations moyennes mobiles décalée

Periode_Mdecalee = input.int(14,minval =1,title="Moyenne expo Base",group= "visualisation tendance")
offset = input.int(title="décalage", defval=3,minval=0,maxval=50,display = display.data_window,group= "visualisation tendance")
color_above = input.color(color.new(color.green, 30), title="Tendance haussière",group= "visualisation tendance")
color_below = input.color(color.new(color.red, 30), title="Tendance baissière",group= "visualisation tendance")
Sortie_4 = ta.ema(Prix,Periode_Mdecalee)
Prix_2 = ta.sma(close,3)

//Déclaration moyennes faisceaux

Periode_ATR = input(0.3, title = 'largeur faisceau',group= "paramètre faisceau")

Periode_Moyenne_courte = input(20, title = 'Faisceau court',group= "paramètre faisceau")
Sortie_courte = ta.ema(close, Periode_Moyenne_courte)

Periode_Moyenne_moyenne = input(50, title = 'Faisceau moyen',group= "paramètre faisceau")
Sortie_moyenne = ta.ema(close, Periode_Moyenne_moyenne)

Periode_Moyenne_longue = input(200, title = 'Faisceau long',group= "paramètre faisceau")
Sortie_longue = ta.ema(close, Periode_Moyenne_longue)

Faisceau_CT = Sortie_courte + Periode_ATR * ta.atr(40)
Faisceau_CT_2 = Sortie_courte - Periode_ATR * ta.atr(40)

Faisceau_MT = Sortie_moyenne + Periode_ATR * ta.atr(40)
Faisceau_MT_2 = Sortie_moyenne - Periode_ATR * ta.atr(40)

Faisceau_LT = Sortie_longue + Periode_ATR * ta.atr(40)
Faisceau_LT_2 = Sortie_longue - Periode_ATR * ta.atr(40)


//Déclaration Bandes de Bollinger

periode = input.int(20, minval=1,group = "Bandes Bollinger")
mult = input.float(2.0, minval=0.001, maxval=50, title="Ecart type",group = "Bandes Bollinger")
basis = ta.sma(close,periode)
dev = mult * ta.stdev(close, periode)

Boll_sup= basis + dev
Boll_inf = basis - dev

//Affichage moyennes mobiles exponentielles

Couleur_LT = color.orange,title = "Moyenne_LT"

Plot1 = plot(Sortie_1,'Moyenne_LT',montrer_moyennes?Couleur_LT:na,linewidth = 2,display=display.all-display.status_line)
Plot2 = plot(Sortie_2,'Moyenne_MT',montrer_moyennes?color.blue:na, linewidth = 2,display=display.all-display.status_line )
Plot3 = plot(Sortie_3,'Moyenne_CT',montrer_moyennes?color.purple:na, linewidth = 2,display=display.all-display.status_line )
Plot4 = plot(Sortie_4,'Moyenne_décalee',montrer_moyenne_decalee?color.rgb(19, 44, 184):na, linewidth = 2, offset = offset )
Plot5 = plot(Prix_2,'lissage prix',montrer_moyenne_decalee?color.blue:na)

fill(Plot4,Plot5,montrer_moyenne_decalee? (Sortie_4 > Prix_2 ? color_below : color_above):na)

//Affichage faiceaux

Plot10=plot(Faisceau_CT,'Faisceau_CT',montrer_faisceaux?color.green:na, linewidth = 1,display=display.all-display.status_line )
Plot6=plot(Faisceau_CT_2,'Faisceau_CT',montrer_faisceaux?color.green:na, linewidth = 1,display=display.all-display.status_line)
Plot7=plot(Faisceau_MT,'Faisceau_MT',montrer_faisceaux?color.orange:na, linewidth = 1,display=display.all-display.status_line)
Plot12=plot(Faisceau_MT_2,'Faisceau_MT_2',montrer_faisceaux?color.orange:na, linewidth = 1,display=display.all-display.status_line)
Plot13=plot(Faisceau_LT,'Faisceau_LT',montrer_faisceaux?color.red:na, linewidth = 1,display=display.all-display.status_line)
Plot14=plot(Faisceau_LT_2,'Faisceau_LT',montrer_faisceaux?color.red:na, linewidth = 1,display=display.all-display.status_line)

fill(Plot13, Plot14,montrer_faisceaux? color.new(#ff1100,80):na,title="Faisceau lent")
fill(Plot10, Plot6, montrer_faisceaux? color.new(#0cb51a,80):na,title="Faisceau rapide")
fill(Plot12, Plot7, montrer_faisceaux?color.new(#e58907,80):na,title="Faisceau moyen")

//Affichage Bollinger

plot13 = plot(Boll_sup, "Boll_sup", montrer_Bollinger?#2708ad:na,linewidth = 1,display=display.all-display.status_line)
plot14 = plot(Boll_inf, "Boll_inf", montrer_Bollinger?#2708ad:na,linewidth = 1,display=display.all-display.status_line )
fill(plot13, plot14,montrer_Bollinger? color.rgb(33, 149, 243, 91):na, title = "Background")