proscreener associé à indicateur zero lag trend

Bonjour ci joint proscreener associé à indicateur zéro lag trend révision jacques germain de ce jour, il donne les 5 cas bullish verts en même temps (5mn,1h,4h,1j)

CapitaLisationMini=250000
timeframe (monthly)
c1=average[20](close*volume)>(CapitaLisationMini*21)
timeframe (weekly)
c1=average[20](close*volume)>(CapitaLisationMini*5)
TIMEFRAME(4 HOUR)
c1=average[20](close*volume)>(CapitaLisationMini/2.14)
TIMEFRAME(1 HOUR)
c1=average[20](close*volume)>(CapitaLisationMini/8.5)
TIMEFRAME(30 minutes)
c1=average[20](close*volume)>(CapitaLisationMini/17)
TIMEFRAME(15 minutes)
c1=average[20](close*volume)>(CapitaLisationMini/34)
timeframe(5 mn)
length5 = 70
mult5 = 1.2
myzlema5 = ZLEMA[length5](close)
atr5 = averagetruerange[length5](close)
volatil5 = highest[length5*3](atr5) * mult5
once trendy5 = 0
if close crosses over myzlema5 + volatil5 then
trendy5=1
elsif close crosses under myzlema5 - volatil5 then
trendy5=-1
endif
// Affichage des flèches
//once trendarrow5= 0
if trendy5 = -1 then
if trendy5 <> trendy5[1] then
//trendarrow15=-1
//drawarrowdown(barindex, upper + 0.25 * atr) coloured(r, g, 0, 175)
endif
else
if trendy5 <> trendy5[1] then
//trendarrow15=1
//drawarrowup(barindex, lower - 0.25 * atr) coloured(0, 128, 0, 175)
endif
endif
once trend5 = 0
if close > myzlema5 - volatil5 then
trend5 = 1
elsif close < myzlema5 + volatil5 then
trend5 = -1
endif
if islastbarupdate then
if trend5 = 1 and trendy5=1 then
//DRAWTEXT("Bullish (5 minutes)", -100, -60, dialog, bold, 12) coloured(0, 50, 0) anchor(topright, xshift, yshift)
else
//DRAWTEXT("Bearish (5 minutes)", -100, -60, dialog, bold, 12) coloured(150, 0, 0) anchor(topright, xshift, yshift)
endif
endif
timeframe(15 mn)
length15 = 70
mult15 = 1.2
myzlema15 = ZLEMA[length15](close)
atr15 = averagetruerange[length15](close)
volatil15 = highest[length15*3](atr15) * mult15
once trendy15 = 0
if close crosses over myzlema15 + volatil15 then
trendy15=1
elsif close crosses under myzlema15 - volatil15 then
trendy15=-1
endif
// Affichage des flèches
//once trendarrow15= 0
if trendy15 = -1 then
if trendy15 <> trendy15[1] then
//trendarrow15=-1
//drawarrowdown(barindex, upper + 0.25 * atr) coloured(r, g, 0, 175)
endif
else
if trendy15 <> trendy15[1] then
//trendarrow15=1
//drawarrowup(barindex, lower - 0.25 * atr) coloured(0, 128, 0, 175)
endif
endif
once trend15 = 0
if close > myzlema15 - volatil15 then
trend15 = 1
elsif close < myzlema15 + volatil15 then
trend15 = -1
endif
if islastbarupdate then
if trend15 = 1 and trendy15=1 then
//DRAWTEXT("Bullish (15 minutes)", -100, -60, dialog, bold, 12) coloured(0, 150, 0) anchor(topright, xshift, yshift)
else
//DRAWTEXT("Bearish (15 minutes)", -100, -60, dialog, bold, 12) coloured(150, 0, 0) anchor(topright, xshift, yshift)
endif
endif
timeframe(1h)
length60 = 70
mult60 = 1.2
myzlema60 =ZLEMA[length60](close)
atr60 = averagetruerange[length60](close)
volatil60 = highest[length60*3](atr60)*mult60
once trendy60 = 0
if close crosses over myzlema60 + volatil60 then
trendy60=1
elsif close crosses under myzlema60 - volatil60 then
trendy60=-1
endif
//Affichage des flèches
//once trendarrow60= 0
if trendy60 = -1 then
if trendy60 <> trendy60[1] then
//trendarrow60=-1
//drawarrowdown(barindex, upper + 0.25 * atr) coloured(r, g, 0, 175)
endif
else
if trendy60 <> trendy60[1] then
//trendarrow60=1
//drawarrowup(barindex, lower - 0.25 * atr) coloured(0, 128, 0, 175)
endif
endif
once trend60 = 0
if close> myzlema60-volatil60 then
trend60 = 1
elsif close< myzlema60+volatil60 then
trend60 = -1
endif
if islastbarupdate then
if trend60 = 1 and trendy60=1 then
//DRAWTEXT("Bullish (1 heure)", -100, -80, dialog, bold, 12) coloured(0, 150, 0) anchor(topright, xshift, yshift)
else
//DRAWTEXT("Bearish (1 heure)", -100, -80, dialog, bold, 12) coloured(150, 0, 0) anchor(topright, xshift, yshift)
endif
endif
timeframe(4 hour)
length240 =70
mult240 = 1.2
myzlema240 =ZLEMA[length240](close)
atr240 = averagetruerange[length240](close)
volatil240 = highest[length240*3](atr240)*mult240
once trendy240 = 0
if close crosses over myzlema240 + volatil240 then
trendy240=1
elsif close crosses under myzlema240 - volatil240 then
trendy240=-1
endif
//Affichage des flèches
//once trendarrow240= 0
if trendy240 = -1 then
if trendy240 <> trendy240[1] then
//trendarrow240=-1
//drawarrowdown(barindex, upper + 0.25 * atr) coloured(r, g, 0, 175)
endif
else
if trendy240 <> trendy240[1] then
//trendarrow240=1
//drawarrowup(barindex, lower - 0.25 * atr) coloured(0, 128, 0, 175)
endif
endif
once trend240 = 0
if close > myzlema240 - volatil240 then
trend240 = 1
elsif close < myzlema240 + volatil240 then
trend240 = -1
endif
if islastbarupdate then
if trend240 = 1 and trendy240=1 then
//DRAWTEXT("Bullish (4 heures)", -100, -100, dialog, bold, 12) coloured(0, 150, 0) anchor(topright, xshift, yshift)
else
//DRAWTEXT("Bearish (4 heures)", -100, -100, dialog, bold, 12) coloured(150, 0, 0) anchor(topright, xshift, yshift)
endif
endif
timeframe(daily)
length1j =70
mult1j = 1.2
myzlema1j=ZLEMA[length1j](close)
atr1j = averagetruerange[length1j](close)
volatil1j = highest[length1j*3](atr1j) * mult1j
once trendy1j = 0
if close crosses over myzlema1j + volatil1j then
trendy1j=1
elsif close crosses under myzlema1j - volatil1j then
trendy1j=-1
endif
//Affichage des flèches
//once trendarrow1j= 0)if trendy1j = -1 then
if trendy1j <> trendy1j[1] then
//trendarrow1j=-1
//drawarrowdown(barindex, upper + 0.25 * atr) coloured(r, g, 0, 175)
endif
if trendy1j <> trendy1j[1] then
//trendarrow1j=1
//drawarrowup(barindex, lower - 0.25 * atr) coloured(0, 128, 0, 175)
endif
once trend1j = 0
if close > myzlema1j - volatil1j then
trend1j = 1
elsif close < myzlema1j + volatil1j then
trend1j = -1
endif
if islastbarupdate then
if trend1j = 1 and trendy1j=1 then
//DRAWTEXT("Bullish (1 jour)", -100, -120, dialog, bold, 12) coloured(0, 150, 0) anchor(topright, xshift, yshift)
else
//DRAWTEXT("Bearish (1 jour)", -100, -120, dialog, bold, 12) coloured(150, 0, 0) anchor(topright, xshift, yshift)
endif
endif
timeframe (default)
//stock= trendarrow15=1 or trendarrow60=1 or trendarrow240=1 or trendarrow1j=1
F=((trend5=1 and trendy5=1) and (trend15=1 and trendy15=1) and (trend60=1 and trendy60=1) and (trend240=1 and trendy240=1) and (trend1j=1 and trendy1j=1)) and c1
SCREENER [f](F as "verts 5 temps")

MALT-5-minutes.png