timeframe (15 minutes)
//variables
tenkanM15=(highest[9](high)+lowest[9](low))/2
kijunM15=(highest[26](high)+lowest[26](low))/2
SpanAfutureM15=(tenkanM15+kijunM15)/2
SpanBfutureM15=(highest[52](high)+lowest[52](low))/2
// - Twist Ichimoku nuage futur
c1 = SpanAfutureM15 crosses over SpanBfutureM15
c2 = SpanAfutureM15 crosses under SpanBfutureM15
twistM15 = summation[6](c1 or c2)
timeframe (1 hours)
//variables
tenkan=(highest[9](high)+lowest[9](low))/2
kijun=(highest[26](high)+lowest[26](low))/2
SpanAfuture=(tenkan+kijun)/2
SpanBfuture=(highest[52](high)+lowest[52](low))/2
// - Twist Ichimoku nuage futur
c3 = SpanAfuture crosses over SpanBfuture
c4 = SpanAfuture crosses under SpanBfuture
twist = summation[6](c3 or c4)
timeframe (4 hours)
//variables
tenkanh4=(highest[9](high)+lowest[9](low))/2
kijunh4=(highest[26](high)+lowest[26](low))/2
SpanAfutureh4=(tenkanh4+kijunh4)/2
SpanBfutureh4=(highest[52](high)+lowest[52](low))/2
// - Twist Ichimoku nuage futur
c5 = SpanAfutureh4 crosses over SpanBfutureh4
c6 = SpanAfutureh4 crosses under SpanBfutureh4
twistH4 = summation[6](c5 or c6)
x= 0
if twist then
x = 1
ELSIF twistH4 then
x = 4
ELSIF twistM15 then
x = 15
endif
screener[twist or twistH4 or twistM15] (x as "1 = H1, 4 = H4, 15 = M15")
//x = 0
//IF LpointD > 0 THEN
//x = 1
//ELSIF SpointD > 0 THEN
//x = 2
//ENDIF
//SCREENER[x](x AS "1=↑, 2=↓")