{ Downloaded From https://www.WiseStockTrader.com }
{Bullish}
X:=1;
BarsSince(Cross(ValueWhen(1,Trough(1,C,X)<>Ref(Trough(1,C,X),-1),C),C))>
BarsSince(Cross(C,ValueWhen(1,Peak(1,C,X)<>Ref(Peak(1,C,X),-1),C)));

{Bearish}
X:=1;
BarsSince(Cross(ValueWhen(1,Trough(1,C,X)<>Ref(Trough(1,C,X),-1),C),C))<
BarsSince(Cross(C,ValueWhen(1,Peak(1,C,X)<>Ref(Peak(1,C,X),-1),C)));