Veja como localizar GAPs e identificar no gráfico.

Código:

var
GAPalta,GAPbaixa : Booleano;
valorGAPalta,valorGAPbaixa : Real;

inicio
// Condição
GAPalta := Minima > Maxima[1];
GAPbaixa := Maxima < Minima[1];

// Valores
valorGAPalta := Minima – Maxima[1];
valorGAPbaixa := Minima[1] – Maxima;

// Teste Condicional
Se (GAPbaixa) e (valorGAPbaixa > 300) entao
inicio
PaintBar(clRed);
Plot(1);
fim
Senao Se (GAPalta) e (valorGAPalta > 500) entao
inicio
PaintBar(clGreen);
Plot(1);
fim
Senao
Plot(0);

end;

Execução

Exemplo:

Para testar, adicione o código como uma regra de coloração e plotagem