3 Minute Bar Breakout

{Functions used in Middle Screen}
MiddleScreenBlue := Mov( Close, 34, E )
MiddleScreenYell := Mov( Open, 13, E )
{Functions used in Lower Screen}
StochRed := Stoch( 9, 7 )
StochLagging : = Mov( StochRed, 7, S )

{ Main analysis section }
{BULLISH}
Cross( StochRed, StochLagging ) AND ( MiddleScreenYell > MiddleScreenBlue )

{BEARISH}
Cross( StochLagging, StochRed ) AND ( MiddleScreenYell < MiddleScreenBlue )

{ Breakout Notifier }
UpperSupportNow := Mov( OPEN, 10, E )
LowerSupportNow := Mov( CLOSE, 8, E )
PrevUpperSupport := Ref( Mov( OPEN, 10, E ), -1 )
PrevLowerSupportNow := ref( Mov( CLOSE, 8, E ), - 1 )
TRUE := 1
FALSE := 0
SignalledHigh := FALSE
SignalledLow :=FALSE

{ BULLISH }
IF ( ( L > UpperSupportNow ) AND ( Ref( L, -1 ) > PrevUpperSupport ) AND
SignalledHigh = FALSE )
THEN
SignalledHigh := TRUE
IF ( SignalledHigh = TRUE )
THEN
SignalledLow :=FALSE

{BEARISH}
IF ( ( H < LowerSupportNow ) AND ( Ref( H, -1 ) > PrevLowerSupport ) AND
SignalledLow = FALSE )
THEN
SignalledLow := TRUE
IF ( SignalledLow = TRUE )
THEN
SignalledHigh := FALSE