if(adviseLong(DTREE,0,Signal1,Signal2) > 0)
    enterLong();

int trade_num;
string outfn[255];
char buff[65536] = { '\0' };

function run() {
  if (is(INITRUN)) {
    if(!is(TESTMODE))
      quit("Click [Test].");
    BarPeriod = 80;
    LookBack = 141;
    StartDate = 20131201;
    EndDate = 20131230;
    set(TICKS + MUTE);
    Hedge = 2;
    TradesPerBar = 2;
    Weekend = 1;
    EntryTime = 1;
  }

  asset("EUR/USD");

  sprintf(buff, "%07dL1", Bar);
  algo(buff);

  var atr100 = ATR(100);
  TakeProfit = 3 * atr100;
  Stop = 3 * atr100;

  // Verify that exactly 0 or 2 trades are entered per bar.
  bool not_entered_1 = false;
  bool not_entered_2 = false;

  sprintf(buff, "%07dL1", Bar);
  algo(buff);
  Entry = -0.125 * atr100;
  if (!enterLong()) {
    not_entered_1 = true;
  }

  sprintf(buff, "%07dL2", Bar);
  algo(buff);
  Entry = 0;
  if (!enterLong()) {
    not_entered_2 = true;
  }

  if (not_entered_1 != not_entered_2) {
    printf("\nOnly 1 trade was entered at Bar %d.", Bar);
    quit();
  }

  if(is(EXITRUN)) {
    buff[0] = 0;
    strcpy(outfn, "out.csv");
    file_delete(outfn);
    trade_num = 0;
    for(all_trades) {
      if (trade_num % TradesPerBar == 0) {
        strcat(buff, "\n");
        file_append(outfn, buff);
        buff[0] = 0;
      }
      strcat(buff, ",");
      strcat(buff, TradeAlgo);
      trade_num++;
    }
    file_append(outfn, "\n");
  }
}