BARRA IGNORADA
Inicio
Se(Fechamento[3] > Abertura[3]) e (Fechamento[2] > Abertura[2]) e
(Fechamento[1] > Abertura[1]) e (Fechamento < Abertura) então
PaintBar(clVerde);
Fim;
DAVE LANDRY
Inicio
Se(Minima < Minima[1]) e (Minima < Minima[2]) então
PaintBar(clPreto);
Fim;
INSIDE BAR
Inicio
Se(Maxima < Maxima[1]) e (Minima > Minima[1]) então
PaintBar(clAmarelo);
Fim;
PFR
Inicio
Se(Minima < Minima[1]) e (Minima < Minima[2]) e (Fechamento >
Fechamento[1]) então
PaintBar(clBranco);
Fim;
123
Inicio
Se(Minima > Minima[1]) e (Minima[1] < Minima[2]) então
PaintBar(clCinza);
Fim;
--------------------------------------------------------------------------------------------------
------
TODAS AS ESTRATÉGIAS
Inicio
Se(Fechamento[3] > Abertura[3]) e (Fechamento[2] > Abertura[2]) e
(Fechamento[1] > Abertura[1]) e (Fechamento < Abertura) então
PaintBar(clVerde);
Se(Minima > Minima[1]) e (Minima[1] < Minima[2]) então
PaintBar(clCinza);
Se(Minima < Minima[1]) e (Minima < Minima[2]) então
PaintBar(clPreto);
Se(Maxima < Maxima[1]) e (Minima > Minima[1]) então
PaintBar(clAmarelo);
Se(Minima < Minima[1]) e (Minima < Minima[2]) e (Fechamento >
Fechamento[1]) então
PaintBar(clBranco);
Fim;
--------------------------------------------------------------------------------------------------
------
COMPRA ESTOCÁSTICO
begin
Se (Fechamento > Fechamento[1]) e (lowest(Low,2) < lowest(Low,2)
[1]) e (SlowStochastic(8)<20) then
BuyAtMarket;
end;
--------------------------------------------------------------------------------------------------
------
CCI DUPLO ([Link]
Input
CCI_Curto(10);
CCI_Longo(100);
begin
Plot(CCI(CCI_Longo));
Plot2(CCI(CCI_Curto));
end;
--------------------------------------------------------------------------------------------------
------