Posts feitos por Joao Paulo 0

Se alguém quiser ajudar.. estou disposto a pagar. Chama no privado.

Boa tarde a todos.

Meu problema é muito, muito simples de resolver pra quem entende, mas extremamente frustrante pra mim que não levo jeito pra programação e não consigo avançar. 

Só quero criar uma regra de coloração para o histograma MACD, que é quando ele estiver positivo, pintar verde. Quando estiver negativo, pintar vermelho. 

Estou tentando ir pela subtração da media exponencial de 26 menos a 12, e depois comparar ela com a exponencial de 9 pra pintar as barras. Só isso. Mas meu código só retorna barras vermelhas. Alguém pode por favor ver o que há de errado nele? Obrigado antecipadamente.

input
  MediaPequena(9);
  MediaMedia(12);
  MediaGrande(26);

var
  sMediaPequena  : Float;
  sMediaMedia    : Float;
  sMediaGrande   : Float;
  sSubtracao     : Float;

begin
  sMediaPequena    := MediaExp(MediaPequena, Close);
  sMediaMedia      := MediaExp(MediaMedia, Close);
  sMediaGrande     := MediaExp(MediaGrande, Close);
  sSubtracao       := sMediaGrande[0] - sMediaMedia[0];

  if sSubtracao > sMediaPequena then
       PaintBar(clGreen)
    
  else if sSubtracao < sMediaPequena then
       PaintBar(clRed);
   

end;