Donnerstag, 17. April 2008, 13:56
Zitat
Aber meine Frage ist ja eben, wie man auf die Ergebnisse der Handelssystemauswertung in einer Formel zugreifen kann. Ich wüßte jetzt nicht, wie man den durchschnittlichen Gewinn so berechnet, dass man eine fortlaufende Zeitreihe bekommt.
Du kannst in V5 mit dem Schlüsselwort
#_tradelisteeinbinden#
die Eigenschaften der Investox-Tradeliste abgreifen. Auf Basis von Einstiegspreis / Ausstiegspreis, Tradeanzahl, Kosten kannst Du dann den Nettogewinn ---durchschnittlichen Gewinn /durchschnittlichen Verlust, Anzahl Gewinntrades + Verlusttrades und daraus schlussendlich den Profitfaktor errechnen und später als Anwenderindikator im Chart anzeigen lassen.
Für die Demonstration des Zugriffes auf Eigenschaften der Tradeliste lieferte Herr Knöpfel einen Beispiel-Indikator mit V5 (Script-Tradeinfo).
Die programmiertechnische Umsetzung für den Profitfaktor ist allerdings nicht ganz trivial bzw. zumindest einigermaßen zeitaufwändig.
Cu Tim
Sonntag, 20. April 2008, 18:20
VB Indikator
Ich habe Dir das mal schnell zusammengeklöppelt. Als Vorlage habe ich dazu den Indi von Investox genommen, der dort zum Downloadbereitsteht.
Was der indikator macht ist folgendes:
Er holt sich zu jedem Trade die Einsteigs und Aussteigsbasis und die Taderichtung und berechnet daraus das Tradergebniss.
Dann summiert er die ewinner und Verlierer.
Als Ergebnis gibt er die Summe daraus aus. Sprich die Kapitalkurve wird nachgebildet.
Um den profitfaktor zu berechnen müßte das Ergebnis wie folgt berechnet werden:
Leider gibt IV dann bei mir aber kein Ergebnis zurück.
Aber ich hoffe das Prinzip ist Dir damit klar geworden
Was der indikator macht ist folgendes:
Er holt sich zu jedem Trade die Einsteigs und Aussteigsbasis und die Taderichtung und berechnet daraus das Tradergebniss.
Dann summiert er die ewinner und Verlierer.
Als Ergebnis gibt er die Summe daraus aus. Sprich die Kapitalkurve wird nachgebildet.
|
Quellcode |
1 |
ergebnis(i+datenoffset)=summegewinner+summeverlierer |
Um den profitfaktor zu berechnen müßte das Ergebnis wie folgt berechnet werden:
|
|
Quellcode |
1 |
ergebnis(i+datenoffset)=-summegewinner/summeverlierer |
Leider gibt IV dann bei mir aber kein Ergebnis zurück.
Aber ich hoffe das Prinzip ist Dir damit klar geworden
|
|
Quellcode |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 |
dim i
dim aktTradeNr
dim startperiod
dim endperiod
dim wert
dim datum
dim TradeStartdatum
dim DatenOffset
dim anzahlgewinner, anzahlverlierer, summegewinner, summeverlierer
anzahlgewinner=0
anzahlverlierer=0
summegewinner=0
summeverlierer=0
if tradeanzahl>0 then
'Zuerst ermitteln, welcher Offset in den Perioden von
'Tradeliste und Chartdaten besteht
getdatum datum
TradeStartdatum=tradeergebnis(1,"startdate")
Startperiod=tradeergebnis(1,"startperiod")
for i=1 to alleperioden
if datum(i)>=TradeStartdatum then
DatenOffset=i-Startperiod
exit for
end if
next
' Jetzt das gewünschte Ergebnis kopieren
for aktTradeNr = 1 to tradeanzahl
startperiod=tradeergebnis(akttradenr,"startperiod")
endperiod=tradeergebnis(akttradenr,"endperiod")
wert=(tradeergebnis(akttradenr,"exitbasis") - tradeergebnis(akttradenr,"enterbasis"))*tradeergebnis(akttradenr,"position")
if wert>0 then
anzahlgewinner=anzahlgewinner+1
summegewinner=summegewinner+wert
else
if wert<0 then
anzahlverlierer=anzahlverlierer+1
summeverlierer=summeverlierer+wert
end if
end if
for i = startperiod to endperiod
if i+datenoffset <= AllePerioden then
ergebnis(i+datenoffset)=summegewinner+summeverlierer
end if
next
next
else
'Ohne Tradeliste: Alles auf 0 setzen
for i=1 to alleperioden
ergebnis(i)=1
next
end if
|
If you think it´s expensive to hire a professional, wait until you hire an amateur.
Sonntag, 20. April 2008, 20:07
Nachdem mir TIm gerade auf die Sprünge geholfen hat den Fehler zu finedn (Div by zero) hier der Profitfaktor zum Einblenden in den Chart
|
|
Quellcode |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 |
dim i
dim aktTradeNr
dim startperiod
dim endperiod
dim wert
dim datum
dim TradeStartdatum
dim DatenOffset
dim anzahlgewinner, anzahlverlierer, summegewinner, summeverlierer
anzahlgewinner=0
anzahlverlierer=0
summegewinner=0
summeverlierer=0
if tradeanzahl>0 then
'Zuerst ermitteln, welcher Offset in den Perioden von
'Tradeliste und Chartdaten besteht
getdatum datum
TradeStartdatum=tradeergebnis(1,"startdate")
Startperiod=tradeergebnis(1,"startperiod")
for i=1 to alleperioden
if datum(i)>=TradeStartdatum then
DatenOffset=i-Startperiod
exit for
end if
next
' Jetzt das gewünschte Ergebnis kopieren
for aktTradeNr = 1 to tradeanzahl
startperiod=tradeergebnis(akttradenr,"startperiod")
endperiod=tradeergebnis(akttradenr,"endperiod")
wert=(tradeergebnis(akttradenr,"exitbasis") - tradeergebnis(akttradenr,"enterbasis"))*tradeergebnis(akttradenr,"position")
if wert>0 then
anzahlgewinner=anzahlgewinner+1
summegewinner=summegewinner+wert
else
if wert<0 then
anzahlverlierer=anzahlverlierer+1
summeverlierer=summeverlierer+wert
end if
end if
for i = startperiod to endperiod
if i+datenoffset <= AllePerioden then
if summeverlierer<>0 then
ergebnis(i+datenoffset)=-(summegewinner/summeverlierer)
else
ergebnis(i+datenoffset)=0
end if
end if
next
next
else
'Ohne Tradeliste: Alles auf 0 setzen
for i=1 to alleperioden
ergebnis(i)=1
next
end if
|
If you think it´s expensive to hire a professional, wait until you hire an amateur.
