- 1
- 2
Dienstag, 12. August 2008, 12:01
Potblitz Anke,
vielen Dank für den Hinweis.
Gerade umgestellt, leider kommt dann aber als Ergebnis:
"Die Formel kann nicht berechnet werden
Indikator Barssince
liefert kein Ergebnis ..."
Wobei ich im HS Daten von 1999 bis 2008 habe.
Allerdings nur, da ich ersterwert von -1 testweise auf 0 umgestellt hatte.
Mit -1 kommt folgendes Ergebnis heraus:
Ersterwert rollt quasi nicht rückwerts mit.
vielen Dank für den Hinweis.
Gerade umgestellt, leider kommt dann aber als Ergebnis:
"Die Formel kann nicht berechnet werden
Indikator Barssince
liefert kein Ergebnis ..."
Wobei ich im HS Daten von 1999 bis 2008 habe.
Allerdings nur, da ich ersterwert von -1 testweise auf 0 umgestellt hatte.
Mit -1 kommt folgendes Ergebnis heraus:
Ersterwert rollt quasi nicht rückwerts mit.
If you think it´s expensive to hire a professional, wait until you hire an amateur.
Dienstag, 12. August 2008, 12:21
Hallo,
Anstelle von "Ersterwert" könntest du z.B. auch verwenden:
calc Tag: ValueWhen(DatePart(d),kapital<>#_keinwert#,1,V);
Ich kann deine Formel derzeit aber leider nicht selbst testen und weiß deshalb nicht, ob die restliche Berechnung damit funktioniert.
Falls nicht, teste am besten mal Step-by-Step bis zu welchem Zwischenschritt alles noch wie gewünscht klappt, dann lässt sich der Fehler leichter lokalisieren.
Zitat
Ersterwert rollt quasi nicht rückwerts mit.
Anstelle von "Ersterwert" könntest du z.B. auch verwenden:
calc Tag: ValueWhen(DatePart(d),kapital<>#_keinwert#,1,V);
Ich kann deine Formel derzeit aber leider nicht selbst testen und weiß deshalb nicht, ob die restliche Berechnung damit funktioniert.
Falls nicht, teste am besten mal Step-by-Step bis zu welchem Zwischenschritt alles noch wie gewünscht klappt, dann lässt sich der Fehler leichter lokalisieren.
Dienstag, 12. August 2008, 16:09
Hallo Anke,
teste ich gleich mal aus.
Ich hab´s zwischendurch auch mal mit VB probiert.
Das ist aber so unfassbar langsam, wenn man 300.000 Perioden im HS hat, da kommen einem die Tränen und Investox spuckt auch ne Fehlermeldung aus, weil die Berechnung so lange dauert. "Script Control: The script you are excecuting is taking longer than expected. ..."
teste ich gleich mal aus.
Ich hab´s zwischendurch auch mal mit VB probiert.
Das ist aber so unfassbar langsam, wenn man 300.000 Perioden im HS hat, da kommen einem die Tränen und Investox spuckt auch ne Fehlermeldung aus, weil die Berechnung so lange dauert. "Script Control: The script you are excecuting is taking longer than expected. ..."
|
Quellcode |
1 2 3 4 5 6 7 8 9 10 11 |
Dim i,j
Dim Datumsfeld
getdatum Datumsfeld
for i= 1 to alleperioden
for j= i to 1 step -1
if datumsfeld(j)<(datumsfeld(i)-365) then
ergebnis(i)=(daten(i)/daten(j)-1)*100
exit for
end if
next
next
|
If you think it´s expensive to hire a professional, wait until you hire an amateur.
Dienstag, 12. August 2008, 16:29
calc Tag: ValueWhen(DatePart(d),kapital<>#_keinwert#,1,V);
klappt leider nicht.
Barssince liefert dann kein Ergebnis. Habe mich gefragt, warum das so ist und bin in der Hilfe fündig geworden:
"Mit diesem Schlüsselwort können Bereiche gekennzeichnet werden, in denen die mit #_StopLevel# berechnete Anzeige des Stops im Chart unterdrückt werden soll. Das Schlüsselwort entspricht intern dem Wert -1234567."
-1234567 als Kapitalstand taucht bei mir zum Glück nicht auf.
If you think it´s expensive to hire a professional, wait until you hire an amateur.
Dienstag, 12. August 2008, 21:35
Hallo ,
Wo genau in deinem Code verwendest du denn "Barssince" ? Ich konnte es in den bisherigen Postings nicht finden ?
#_keinWert# kann auch ohne das Schlüsselwert #_Stoplevel# in Berechnungen verwendet werden.
Es entspricht dem "novalue" in Visual Basic.
Die KK muss nicht den internen Wert -1234567 annehmen, damit die Berechnung ein Ergebnis liefert.
Ein Ergebnis wird im vorliegenden Fall auch angezeigt, wenn der nächste Wert der KK noch unbekannt ist.
Dann wird der Tag des Monats als Ergebnis ausgegeben, an dem die KK letztmalig einen Wert anzeigt (in der Grafik unten also der 12.)
Barssince liefert dann kein Ergebnis.
Wo genau in deinem Code verwendest du denn "Barssince" ? Ich konnte es in den bisherigen Postings nicht finden ?
#_keinWert# kann auch ohne das Schlüsselwert #_Stoplevel# in Berechnungen verwendet werden.
Es entspricht dem "novalue" in Visual Basic.
Die KK muss nicht den internen Wert -1234567 annehmen, damit die Berechnung ein Ergebnis liefert.
Ein Ergebnis wird im vorliegenden Fall auch angezeigt, wenn der nächste Wert der KK noch unbekannt ist.
Dann wird der Tag des Monats als Ergebnis ausgegeben, an dem die KK letztmalig einen Wert anzeigt (in der Grafik unten also der 12.)
Dienstag, 12. August 2008, 23:02
Hallo Anke,
sorry, ich habe aufgrund der Fehlermeldungen bisschen weiter rumexperimentiert gehabt mit barssince statt valuewhen.
Leider ist das Ergebniss das selbe.
Also hier der Code, den ich aktuell benutze:
und hier die Fehlermeldung:
ich bin traurig
sorry, ich habe aufgrund der Fehlermeldungen bisschen weiter rumexperimentiert gehabt mit barssince statt valuewhen.
Leider ist das Ergebniss das selbe.
Also hier der Code, den ich aktuell benutze:
|
|
Quellcode |
1 2 3 4 5 6 7 |
calc kapital:Datenreihe(#kapitalkurve#); calc jahr:ValueWhen(DatePart(yyyy),kapital<>#_keinwert#,1,V); calc monat:ValueWhen(DatePart(m),kapital<>#_keinwert#,1,V); calc tag:ValueWhen(DatePart(d),kapital<>#_keinwert#,1,V); calc datum:DatePart(yyyy)*12*31+DatePart(m)*31+DatePart(d); calc suchdatum:(jahr-1)*12*31+monat*31+tag; ValueWhen(kapital,datum<=suchdatum,1,v) |
und hier die Fehlermeldung:
ich bin traurig
If you think it´s expensive to hire a professional, wait until you hire an amateur.
Mittwoch, 13. August 2008, 15:36
Und so sieht das mit VB aus.
Funktioniert sogar "halbwegs" performant bei 300.000 Perioden.
Die Suchfunktion ist an Quicksort angelehnt.
Da der Datenbereich schon sortiert ist wird dieser solange halbiert und jeweils die richtige Hälfte zur weitersuche ausgewählt bis man beim Suchergebnis angekommen ist.
Eigentlich dürfte es keine Suchfunktion mit weniger Schritten geben.
Funktioniert sogar "halbwegs" performant bei 300.000 Perioden.
Die Suchfunktion ist an Quicksort angelehnt.
Da der Datenbereich schon sortiert ist wird dieser solange halbiert und jeweils die richtige Hälfte zur weitersuche ausgewählt bis man beim Suchergebnis angekommen ist.
Eigentlich dürfte es keine Suchfunktion mit weniger Schritten geben.
|
|
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 |
Dim i,suchschritt
Dim Datumsfeld
getdatum Datumsfeld
lookback=365 ' wieviel Tage zurückschauen
Startindex = ErsteDatenPeriode(Daten)
Endindex = LetzteDatenPeriode(Daten)
ergebnis(startindex)=0
for i=startindex to endindex
suchschritt=1
linker_rand=startindex
rechter_rand=i
if (datumsfeld(linker_rand)> (datumsfeld(i)-lookback)) then
ergebnis(i)=0
else
do
mitte=int((linker_rand+rechter_rand)/2)
if (datumsfeld(mitte)> (datumsfeld(i)-lookback)) then
' der Wert liegt links der Mitte -> es wird die linke Hälfte zur Suche weiter benutzt
rechter_rand=mitte
else
' der Wert liegt rechts der mitte -> es wird die rechte Hälfte zur Suche weiter benutzt
linker_rand=mitte
end if
suchschritt=suchschritt+1
loop until (rechter_rand-linker_rand)=1 or 2^(suchschritt-1)>i
if (datumsfeld(linker_rand)<=datumsfeld(i)-lookback) and (datumsfeld(linker_rand+1)>=datumsfeld(i)-lookback) then
ergebnis(i)=(daten(i)/daten(linker_rand)-1)*100
else
ergebnis(i)=ergebnis(i-1)
end if
end if
next
|
If you think it´s expensive to hire a professional, wait until you hire an amateur.
Mittwoch, 13. August 2008, 15:49
Hallo Lenzelott,
Herr Knöpfel hat ja schon eine mögliche Lösung gepostet.
Mein Lösungsvorschlag auf Basis deines bisherigen Codes hätte ähnlich ausgesehen - ich schieb ihn nur der Vollständigkeit halber noch nach:
calc kapitalatenreihe(#kapitalkurve#);
calc jahr:ValueWhen(DatePart(yyyy),kapital<>#_keinwert#,1,V);
calc monat:ValueWhen(DatePart(m),kapital<>#_keinwert#,1,V);
calc tag:ValueWhen(DatePart(d),kapital<>#_keinwert#,1,V);
calc datum
calc suchdatum
calc diff: datum-suchdatum;
(Kapital / RefVar(Kapital, - diff)-1) * 100
Hallo Anke, vielen Dank.
Auf Tagesbar´s wird das auch "fast" funktionieren, ohne dass ich es getestet habe.
Aber leider nicht mehr auf Intraday Geschichten.
In obigem Code dürfte DIFF immer 12*31= 372 sein.
Bei 5 Minuten Bars schaue ich damit halt nur 31 Stunden zurück.
Wobei das je nach Underlying (Handelszeitbeschränkung) eine unterschiedliche Tagesanzahl ist.
Selbst beim gleichen Underlying (zb FESX oder FDAX) ändert sich halt auch das noch, da es da ja drastische Änderungen in der Handelszeit gab.
ich meine so war es:
09:00-17:00 am Anfang
09:00-17:30 ab dem 24.01.2000
08:00-20:00 ab dem 01.01.2002
08:00-22:00 ab dem 28.11.2005
If you think it´s expensive to hire a professional, wait until you hire an amateur.
Mittwoch, 13. August 2008, 22:55
Aber leider nicht mehr auf Intraday Geschichten.
Hallo Lenzelott,
hierzu müsste man die 372 mit der Anzahl von Intraday-Perioden pro Tag multiplizieren und die unterschiedlichen Handelszeiten ggf. über zusätzliche If-Bedingungen ausfiltern.
Aber du hast dir ja inzwischen deine VBS-Variante programmiert, bei der die Periodenumrechnung entfallen kann.
Mittwoch, 13. August 2008, 23:28
Hallo Anke,
erstmal ganz herzlichen Dank für Deine Tips.
genau das hatte ich auch anfänglich versucht.
Das Problem dabei sind die Übergangsphasen bei den Handelszeitverlängerungen.
Jeder Tag nach Datum x sind y Perioden und das in 4 Stufen gestaffelt. Am besten überschneiden sich solche Verlängerungen noch in einer 12 Monatsperiode...
Ich habe mir die Handelszeiten sogar als Titel angelgt, dafür.
Heute ist Tag z und wieviel Perioden sind denn nun tatsächlich 365 Tage??
Ich bin ehrlich: ich hab´s nicht ausgerechnet bekommen!!!
Ich war mindestens so erfolglos dabei wie die Versuche, die ich hier am Anfang gepostet habe.
P.S. Auf den "reverse" Quicksort suchalgo bin ich jetzt aber schon stolz...
Kann sein, dass da noch ein paar Unwägbarkeiten nicht abgefangen sind, aber bei meinen HS stimmt´s augenscheinlich.
erstmal ganz herzlichen Dank für Deine Tips.
genau das hatte ich auch anfänglich versucht.
Das Problem dabei sind die Übergangsphasen bei den Handelszeitverlängerungen.
Jeder Tag nach Datum x sind y Perioden und das in 4 Stufen gestaffelt. Am besten überschneiden sich solche Verlängerungen noch in einer 12 Monatsperiode...
Ich habe mir die Handelszeiten sogar als Titel angelgt, dafür.
Heute ist Tag z und wieviel Perioden sind denn nun tatsächlich 365 Tage??
Ich bin ehrlich: ich hab´s nicht ausgerechnet bekommen!!!
Ich war mindestens so erfolglos dabei wie die Versuche, die ich hier am Anfang gepostet habe.
P.S. Auf den "reverse" Quicksort suchalgo bin ich jetzt aber schon stolz...
Kann sein, dass da noch ein paar Unwägbarkeiten nicht abgefangen sind, aber bei meinen HS stimmt´s augenscheinlich.
If you think it´s expensive to hire a professional, wait until you hire an amateur.
- 1
- 2
Ähnliche Themen
-
Allgemeine Fragen zu Investox »-
RealtimeTrading mit Investox
(13. September 2002, 01:26)
-
- Allgemeine Fragen zu Investox »
-
100% CPU Auslastung bei V 3.1 ?
(15. Oktober 2002, 12:19)
-
- Allgemeine Fragen zu Investox »
-
Linienverschiebung bei Chartumstellung (T auf W)
(23. Oktober 2002, 15:43)