Sonntag, 10. Januar 2010, 21:22
Swing Reversal (erster Lernversuch)
Leider habe ich keine Erfahrung in VBScript, daher dieses Posting. Erste Gehversuche...
Es taucht da ein hartnäckiger Syntaxfehler auf, den ich nicht beseitigen konnte. Hat jemand eine Idee, wie ich die "If then Bloecke" so gestalten kann, dass der Fehler entfällt?
Sicherlich sind da noch weitere Schnitzer drin...
Vielen Dank
Alexander
Es taucht da ein hartnäckiger Syntaxfehler auf, den ich nicht beseitigen konnte. Hat jemand eine Idee, wie ich die "If then Bloecke" so gestalten kann, dass der Fehler entfällt?
Sicherlich sind da noch weitere Schnitzer drin...
Vielen Dank
Alexander
|
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 |
getdaten "open", opendaten
getdaten "high", highdaten
getdaten "low", lowdaten
getdaten "close", closedaten
...
dim Price(10000000)
dim Time(10000000)
...
'day+1 schleife
While DayNo<PeriodenEnd
if highdaten(2)-Price(1)>Boxsize*ReversalAmout then
...
elseif Price(1)-Low(2)>Boxsize*ReversalAmount then
...
else
DayNo=DayNo+1
end if
Wend
...
|
Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von »PnLtobePositive« (12. Januar 2010, 19:42)
Sonntag, 10. Januar 2010, 21:41
wie wäre es mal mit Fehlermeldungen posten?
Gar nicht schön.
Dim mit anschließendem redim(PeriodenEnd) ist deutlich elgeanter.
Aber ohne es zu testen kann ich DIr sagen, dass das hier IMHO nicht funktionieren kann:
dim Price(10000000) 'Create two array variables called price and time to hold the swing data
dim Time(10000000)
Gar nicht schön.
Dim mit anschließendem redim(PeriodenEnd) ist deutlich elgeanter.
Aber ohne es zu testen kann ich DIr sagen, dass das hier IMHO nicht funktionieren kann:
if highdaten(2)-Price(1)>Boxsize*ReversalAmout then
...
elseif Price(1)-Low(2)>Boxsize*ReversalAmount then
...
else
...
end if
If you think it´s expensive to hire a professional, wait until you hire an amateur.
Montag, 11. Januar 2010, 00:10
Ja, Fehlermeldung posten bei einer solchen Frage wär mal was.
Wenn ich mir das so angucke, verwechselst Du die Begriffe end if und endif else if und elseif. Sowie das Coding aussieht, meintest Du endif und nicht end if elseif und nicht else if in etlichen Zeilen, und sicher fragt der Scripting Host Dich desswegen nach fehlenden then's.
Die Anforderung Deines Arbeitsspeichers ist ausserdem ambitionös
Dann ist die Verwendung für Set für Objektverweise vorgesehen und nicht für normale Zuweisungen, und die Ansteuerungen Deiner Unterprogramme erschliesst sich einem eigentlich gar nicht. Wahrscheinlich dem Scripting Host auch nicht.
Wenn ich mir das so angucke, verwechselst Du die Begriffe end if und endif else if und elseif. Sowie das Coding aussieht, meintest Du endif und nicht end if elseif und nicht else if in etlichen Zeilen, und sicher fragt der Scripting Host Dich desswegen nach fehlenden then's.
Die Anforderung Deines Arbeitsspeichers ist ausserdem ambitionös
Dann ist die Verwendung für Set für Objektverweise vorgesehen und nicht für normale Zuweisungen, und die Ansteuerungen Deiner Unterprogramme erschliesst sich einem eigentlich gar nicht. Wahrscheinlich dem Scripting Host auch nicht.
Gruss
Bernd
Bernd
Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von »Bernd« (11. Januar 2010, 02:04)
Montag, 11. Januar 2010, 00:47
Die Fehlermeldung lautet:
'If' erwartet in Linie:
end Sup
Nun gibt's ja viele End Sups, daher hatte ich "While" ohne alles an verschiedene Stellen des Codes geschrieben, um zu sehen, wo der Fehler auftritt. Genützt hat mir's nichts...
Die Microsoft Referenz sagt zur If Then Else:
If Bedingung Then
[Anweisungen]
[ElseIf Bedingung-n Then
[elseifAnweisungen]] . . .
[Else
[elseAnweisungen]]
End If
Insofern:
Endif gibt's nicht...
Ja, das mag durchaus stimmen! Bei vielen Dingen musste ich einfach schnell schätzen was funktionieren könnte. Offenbar lag ich ziemlich daneben.
Das muss noch ein wenig reifen...
'If' erwartet in Linie:
end Sup
Nun gibt's ja viele End Sups, daher hatte ich "While" ohne alles an verschiedene Stellen des Codes geschrieben, um zu sehen, wo der Fehler auftritt. Genützt hat mir's nichts...
Die Microsoft Referenz sagt zur If Then Else:
If Bedingung Then
[Anweisungen]
[ElseIf Bedingung-n Then
[elseifAnweisungen]] . . .
[Else
[elseAnweisungen]]
End If
Insofern:
Endif gibt's nicht...
Zitat
die Ansteuerungen Deiner Unterprogramme erschliesst sich einem eigentlich gar nicht. Wahrscheinlich dem Scripting Host auch nicht.
Ja, das mag durchaus stimmen! Bei vielen Dingen musste ich einfach schnell schätzen was funktionieren könnte. Offenbar lag ich ziemlich daneben.
Das muss noch ein wenig reifen...
Montag, 11. Januar 2010, 01:58
> Endif gibt's nicht...
Klar, sieht man ja schon an der Editor-Farbe beim eintippen in Investox. Das hab' ich ja auch nicht gemeint
sondern nun hat auch bei mir der Tippfehler zugeschlagen:
> meintest Du endif und nicht end if
sollte heissen
... meintest Du elseif und nicht else if ...
guckst Du z.B. in Zeile 108. Beide Varianten sind möglich, haben aber unterschiedliche Bedeutung!
Ich hab's im ersten Beitrag korrigiert, damit es im Sinnzusammenhang passt.
Bei else if und elseif sieht man im Investox Editor übrigens natürlich keine Ungereimtheit an der Farbe, weil beide Schlüsselworte möglich sind!, erkannt und farblich hervorgehoben angezeigt werden. Wenn man sich nicht auskennt, geht sowas dann schonmal daneben.
Klar, sieht man ja schon an der Editor-Farbe beim eintippen in Investox. Das hab' ich ja auch nicht gemeint
sondern nun hat auch bei mir der Tippfehler zugeschlagen:> meintest Du endif und nicht end if
sollte heissen
... meintest Du elseif und nicht else if ...
guckst Du z.B. in Zeile 108. Beide Varianten sind möglich, haben aber unterschiedliche Bedeutung!
Ich hab's im ersten Beitrag korrigiert, damit es im Sinnzusammenhang passt.
Bei else if und elseif sieht man im Investox Editor übrigens natürlich keine Ungereimtheit an der Farbe, weil beide Schlüsselworte möglich sind!, erkannt und farblich hervorgehoben angezeigt werden. Wenn man sich nicht auskennt, geht sowas dann schonmal daneben.
Gruss
Bernd
Bernd
Ähnliche Themen
-
Indikatoren und Funktionen »-
Markante Punkte im Chart autom. verbinden lassen
(19. Oktober 2009, 13:38)
-
- Indikatoren und Funktionen »
-
Ausbruch über lokales Hoch
(20. Juli 2009, 12:53)
-
- Formelsprache und Handelssystementwicklung »
-
strategie mit swing lows und highs
(25. Januar 2006, 00:07)