[description=DJB - ENTRY on New High, Exit 7 on 12; author = Bleakley, Des ; target=PRICE; ] 

{ THIS INDICATOR SHOWS WHETHER A STOCK HAS EXHIBITED AN ENTER CONDITION  }

entercondition := CLOSE >= highest( CLOSE, 52);  {  Entry condition - on a 52 bar New High  }
exitcondition := cross( ma(C,12,E) , ma(C,7,E));       {  Exit condition  - 7 on 12 EMA crossover  }

{     *****   According to our entry and exit conditions, are we in or out of the market?     *****   }

INMKT := if ( entercondition, true,  if ( exitcondition, false,  prev ));     
                                                                                                
{   ****    Look at status of INMKT to see if we have triggered a buy or sell condition   ****  }

buysignal := INMKT AND NOT hist(INMKT,1);
sellsignal := NOT INMKT AND hist(INMKT,1);

{     ****  PRINT ENTER & EXIT ARROWS    ****     }

[Name = ENTER;Linestyle = marker; marker = type13;color = green];    buysignal;                                                            
[Name = EXIT; Linestyle = marker; marker=type14; color = red];   sellsignal;