door hjborn » zo 30 nov 2003, 16:31
Misschien toch handig als ik de bewuste regels code er ook bij zet:
----------------------------------------
zMATrade:
value function zMATrade (value xAantallenBars=20);
begin
{variabele definitie}
value xMA[];
{bereken en plot de MA-waarde}
xMa := Average(Close,xAantallenBars);
plot1(xMA,'MA'+xAantallenBars:0:0);
{test voor kruising en geef orders}
if vCrossesAbove(Close,xMA) then Buy
else if vCrossesBelow(Close,xMA) then Sell;
end;
---------------------------------------
ZResultaat:
value function zResultaat begin
{onthou begin waarden}
value xBegin=0, xEinde;
if xBegin=0 then xBegin := Date;
{print resultaat op laatste dag}
if CurrentBar=vLastBar then begin
print ('Resultaat van ?',xBegin:0:0, ' tot ',Date:0:0);
print ('Aantal trades ?':20,TotalTrades:5:0);
print ('Aantal winners ?':20,NumWinTrades:5:0);
print ('Aantal verliezers ?':20,NumLosTrades:5:0);
print ('Brutowinst ?':20,GrossProfit:5:0);
end;
end;
In het overzicht 'samenvatting' staat alleen de eerste regel met de begin en eind datum. Om het systeem te testen heb ik gewoon de dagkoersen van de AEX genomen in een dag grafiek.
Ik hoop dat er iemand is die ziet wat er fout zit.
Groeten,
Hendrik jan