I just reverted conditions:

// Trend Template
c1 = Average[13](close) < Average[26](close)
c2 = Average[26](close) < Average[52](close)
c3 = average[52](volume*close) > 3000000
n = 0
if barindex = 0 then
haOpen  = open
haClose = close
elsif N = 0 then
haClose =(Open+High+Low+Close)/4
haOpen =(haOpen[1]+haClose[1])/2
elsif (barindex MOD N) = 0 then
haClose =(Open[N]+Highest[N](high)+Lowest[N](low)+Close)/4
haOpen  =(haOpen[1]+haClose[1])/2
endif
c4 = haclose < haopen
c5 = haclose[1] > haopen[1]
c6 = haclose[2] > haopen[2]
c7 = haclose[3] > haopen[3]
SCREENER[c1 and c2 and c3 and c4 and c5 and c6 and c7 ](volume*close as "traded volume")

There’s no data on your pic.

Can you post gthe rules to go short?

Ok, then no moving average is needed to simply spot any reversion, just after a P number of green candles, the first red one is returned:

P = 10
N = 0
if barindex = 0 then
   haOpen  = open
   haClose = close
elsif N = 0 then
   haClose =(Open+High+Low+Close)/4
   haOpen =(haOpen[1]+haClose[1])/2
elsif (barindex MOD N) = 0 then
   haClose =(Open[N]+Highest[N](high)+Lowest[N](low)+Close)/4
   haOpen  =(haOpen[1]+haClose[1])/2
endif
haBullish = haClose > haOpen
haBearish = haClose < haOpen
Cond = 0
IF haBearish AND (summation[P](haBullish[1]) = P) THEN
   Cond = 1
ENDIF
SCREENER[Cond]