3.2 Din første robot, del 2: signal og ordre

// Leser én verdi fra en indikator
double Value(int handle, int shift)
{
   double buf[1];
   if(CopyBuffer(handle, 0, shift, 1, buf) != 1) return(EMPTY_VALUE);
   return(buf[0]);
}

// Teller robotens egne åpne posisjoner i dette markedet
int CountPositions()
{
   int count = 0;
   for(int i = PositionsTotal() - 1; i >= 0; i--)
   {
      ulong ticket = PositionGetTicket(i);
      if(ticket == 0) continue;
      if(PositionGetString(POSITION_SYMBOL) == _Symbol &&
         PositionGetInteger(POSITION_MAGIC) == (long)InpMagic) count++;
   }
   return(count);
}

void OnTick()
{
   // 1. Bare én gang per nytt lys
   datetime barTime = iTime(_Symbol, _Period, 0);
   if(barTime == lastBarTime) return;
   lastBarTime = barTime;

   // 2. Les indikatorene på lys 1 og 2
   double fast1 = Value(hFast, 1), fast2 = Value(hFast, 2);
   double slow1 = Value(hSlow, 1), slow2 = Value(hSlow, 2);
   if(fast1 == EMPTY_VALUE || slow1 == EMPTY_VALUE ||
      fast2 == EMPTY_VALUE || slow2 == EMPTY_VALUE) return;

   bool buySignal  = (fast2 <= slow2 && fast1 > slow1);
   bool sellSignal = (fast2 >= slow2 && fast1 < slow1);

   // 3. Maks én posisjon
   if(CountPositions() > 0) return;

   // 4. Send ordre
   if(buySignal)
   {
      double ask = SymbolInfoDouble(_Symbol, SYMBOL_ASK);
      double sl  = NormalizeDouble(ask - InpStopLossPips * pip, _Digits);
      double tp  = NormalizeDouble(ask + InpTakeProfitPips * pip, _Digits);
      if(!trade.Buy(InpLots, _Symbol, ask, sl, tp, "MaKryss"))
         Print("Kjøp feilet: ", trade.ResultRetcodeDescription());
   }
   else if(sellSignal)
   {
      double bid = SymbolInfoDouble(_Symbol, SYMBOL_BID);
      double sl  = NormalizeDouble(bid + InpStopLossPips * pip, _Digits);
      double tp  = NormalizeDouble(bid - InpTakeProfitPips * pip, _Digits);
      if(!trade.Sell(InpLots, _Symbol, bid, sl, tp, "MaKryss"))
         Print("Salg feilet: ", trade.ResultRetcodeDescription());
   }
}