Plotagem de média móvel exponencial e OBV com regra de coloração.

Código:

// OBV e Média Móvel
// Configuração : MM Exp de 13 períodos + OBV
// OBV > MM = Pinta Verde
// OBV < MM = Pinta Vermelho

Parametro
Periodo(13);

var
vOBV : Real;
vMM : Real;

Inicio

vOBV := OBV;
vMM := MediaExp(Periodo, vOBV);

// Indicador
Plot(vOBV);
Plot2(vMM);

// Regra de Coloração
Se (vOBV > vMM) entao SetPlotColor(1, clLime)
Senao Se (vOBV < vMM) entao SetPlotColor(1, clVermelho);

Fim;

Execução

Exemplo:

Para testar, adicione o código como indicador