//InitialisatiVariables
Ichtend = 0
R = 255
G = 255
B = 255
alpha = 255
//Ichimoku : Tenkan, Kijun, SSA et SSB (Kumo)
Tenkan = (highest[9](high)+lowest[9](low))/2
Kijun = (highest[26](high)+lowest[26](low))/2
SSA = (Tenkan[26]+Kijun[26])/2
SSB = (highest[52](high[26])+lowest[52](low[26]))/2
//Etat Chandelier
ChandelierH = Close > Open // Haussier
ChandelierB = Close < Open // Baissier
//Etat Kumo
KumoH = SSA > SSB //Nuage Haussier
KumoB = SSA < SSB //Nuage Baissier
//Evolution dans le Kumo
Indecision = KumoH and ChandelierH and Open >= SSB and Close <= SSA
//Sortie nuage, attente coupure Tenkan et Kijun
AttenteTenkan = KumoH and ChandelierH and Close > SSA and Close < Tenkan and Close < Kijun
IF Indecision THEN
IchTend = 0.3
R = 70 //Steelblue
G = 130
B = 180
alpha = 90
ELSIF AttenteTenkan then
IchTend = 0.5
R = 255 //Darkorange
G = 140
B = 0
alpha = 90
ELSE
IchTend = 0
ENDIF
return Ichtend coloured(R,G,B,alpha) style(histogram)
.
