Fala Rapaziada, estou com esse código de rompimento da primeira barra do dia.

esta iniciando a operação certa, mais a saída de (stopLoss), esta dando erro, após iniciar a operação só fica o (stopgain) o (stopLoss) desaparece, algum colega pode dar uma olhada por favor.

var
  spred, fh, fsg, fsl, points,stopGain,stopLoss : float;

  Inicio
Se (Time >= HoraInicio)e(Time <= HorarioFim) entao
  
  
  begin
  fsg := 3;
  fsl := 1;
  if (IsBMF) then
    begin              
      spred := 0.06;
      fh := 1000;
    end
  else 
    begin
      spred := 0.06;
      fh := 1100;
    end;
           
  if (BuyPosition = 0) and (SellPosition = 0) and 
  (time < fh+BarDuration) 
  then
    begin
      PaintBar(clPurple);
      BuyStop((High + spred),(High + spred));
      SellShortStop((Low - spred),(Low - spred));
      points := High - Low;
      stopGain := points * fsg;
      stopLoss := points * fsl;
    end;

  if (BuyPosition = 1) then
    begin
      SellToCoverStop(BuyPrice + stopGain,BuyPrice + stopGain);
      SellToCoverStop(BuyPrice - stopLoss,BuyPrice - stopLoss);
      
    end
  else if (SellPosition = 1) then
    begin
      BuyToCoverStop(SellPrice - stopGain,SellPrice - stopGain);
      BuyToCoverStop(SellPrice + stopLoss,SellPrice + stopLoss);
      
    end; 


end;
Fim;