ema7 = ExponentialAverage[EMA](close)
ST = Supertrend[3,10]
SMA30 = Average[SMA](close)
EMA45 = ExponentialAverage[periodema](close)
Delta = close - EMA45
deltaneg = Delta < AverageTrueRange[14](close)
Deltapos = Delta > AverageTrueRange[14](close)
Test1 = EMA7 crosses over SMA30 and close>ST and close > EMA45
Test2 = close>EMA45 and EMA7>SMA30 and close crosses over ST
Test3 = close crosses over EMA45 and EMA7>SMA30 and close>ST
IF Test1 or Test2 or Test3 then
if resultat1 >0 and delta < AverageTrueRange[14](close) then
DRAWARROWDOWN(barindex, high + 0.25*AverageTrueRange[14](close)) coloured (255,0,0)
else
DRAWARROWUP(barindex, high + 0.25*AverageTrueRange[14](close)) coloured (0,255,0)
endif
Resultat1 = low-AverageTrueRange[14](close)
takeprofit = close*perf
else
Resultat1 = 0
endif
RETURN resultat1 coloured (153,22,189) STYLE (DOTTEDLINE2,5) as "SIGNAL D'ACHAT" , takeprofit coloured (0,204,2041) STYLE (DOTTEDLINE2,2)as "TARGET"