Voici le code :

Timeframe(Weekly)
once xOpenW = open
xCloseW     = (open + close + high + low) / 4
if barindex > 0 then
xOpenW  = (xOpenW[1] + xCloseW[1]) / 2
endif
xLowW  = min(low,min(xCloseW,xOpenW))
xHighW = max(high,max(xCloseW,xOpenW))
TenkW  = (highest[9](xHighW)  + lowest[9](xLowW))  / 2
Wcond = xCloseW CROSSES OVER TenkW
//
Timeframe(Daily)
once xOpenD = open
xCloseD     = (open + close + high + low) / 4
if barindex > 0 then
xOpenD  = (xOpenD[1] + xCloseD[1]) / 2
endif
xLowD  = min(low,min(xCloseD,xOpenD))
xHighD = max(high,max(xCloseD,xOpenD))
TenkD  = (highest[9](xHighD)  + lowest[9](xLowD))  / 2
Dcond = xCloseD CROSSES OVER TenkD
//
Timeframe(4h)
once xOpenH4 = open
xCloseH4     = (open + close + high + low) / 4
if barindex > 0 then
xOpenH4  = (xOpenH4[1] + xCloseH4[1]) / 2
endif
xLowH4  = min(low,min(xCloseH4,xOpenH4))
xHighH4 = max(high,max(xCloseH4,xOpenH4))
TenkH4  = (highest[9](xHighH4)  + lowest[9](xLowH4))  / 2
H4cond = xCloseH4 CROSSES OVER TenkH4
//
Timeframe(default)
once xOpen = open
xClose     = (open + close + high + low) / 4
if barindex > 0 then
xOpen  = (xOpen[1] + xClose[1]) / 2
endif
M7     = average[7,0](xClose)
Mcond1 = M7 > M7[1]
Mcond2 = xClose CROSSES OVER M7
Mcond  = Mcond1 AND Mcond2
//
Cond  = Wcond AND Dcond AND H4cond AND Mcond
SCREENER[Cond]