Zorro 1.22 released!

// TMF that opens an opposite trade when stopped out,
// and opens a new trade when profit target is reached (Zorro 1.22 and above)
int ReverseAtStop()
{
	printf("#\nTick-price=%.8f",priceClose());
  if(TradeIsStop) { // stop loss hit?
    if(TradeIsShort)
      enterLong(ReverseAtStop); // enter opposite trade
    else 
      enterShort(ReverseAtStop);
  }
  if(TradeIsProfit) { // profit target hit?
    if(TradeIsShort)
      enterShort(ReverseAtStop); // enter same trade again
    else 
      enterLong(ReverseAtStop);
  }
// call the TMF at stop loss / profit target only  
  return 16;
}

function run()
{
	set(LOGFILE);
	set(PLOTNOW);
  set(TICKS);  // normally needed for TMF
  Weekend = 3; // don't run TMF at weekend
	BarPeriod	= 1440;
  Stop = 10000*PIP;
  TakeProfit = 10000*PIP;
  if(Bar == LookBack) // enter the first trade directly at the first bar
    enterLong(ReverseAtStop);
}

int tmf(var Price) {
	return 0;
}

// helper function for finding trades at a grid line
bool findTrade(var Price,var Grid,bool IsShort) {
  for(open_trades)
    if((TradeIsShort == IsShort)
      and between(TradeEntryLimit,Price-Grid/2,Price+Grid/2))
        return true;
  return false;
}
  
function run() {
	set(LOGFILE);
	set(PLOTNOW);
//	set(TICKS);
  BarPeriod = 1440;
  StartDate	= 20140101;
	EndDate	= 20140114;
  Hedge = 2; 
  EntryTime = 50;
	Trail			= 1000*PIP;
	TrailLock	= 90;
  var Price;
  var Grid = 10*PIP; // grid spacing
  var Current = priceClose();
// place pending trades at 5 grid lines  
// above and below the current price
	if (Bar>=LookBack) {
  for(Price = Current-5*Grid; Price <= Current+5*Grid; Price += Grid) {
    if(Price <= Current and !findTrade(Price,Grid,true)) {
    	Stop = 10000*PIP;
//		enterLong(tmf,-Price);
		enterLong(0,Price);
      }
    else if(Price > Current and !findTrade(Price,Grid,false)) {
    	Stop = 100*PIP;
//		enterShort(tmf,-Price);
		enterShort(0,-Price);
      }
	}
  }
}