* Tom DeMarks's Sequential Ela Code für Tradestation 2000 i

Auf den Webseiten der VTAD finden sich die Folien eines Vortrages von Tom DeMark zu dem Thema. Vielleicht hilft das weiter.

http://www.vtad.de

@ Lutz

Bitte schreiben Sie solche Beiträge doch als Antwort unter den Beitrag, den Sie meinen. Jeder der antworten möchte, muss erst suchen und das aus so aufwändig, dass niemand antwortet, ausser Manfred Hübner.

In diesem Forum stehen mittlerweile 5.327 Themen mit 10-20.000 Beiträgen.

Hallo Lutz,

dass es bei mir funktioniert, habe ich gepostet, der Code war ja auch von mir.

Mit der Übernahme aus dem Forum funktioniert es wirklich nicht, es liegt wohl
daran das einige Funktionen in der TS dann nicht vorhanden sind.

mfg spada

@ Spada

Die früheren Probleme hier im Forum, dass Formeln teilweise verschwunden sind, wurden inzwischen behoben !

@ spada1

Könntest Du freundlicherweise Deinen TS-Code vom INDICATOR: TD Sequen Buy, den Du im Orginal-Thread
http://www.terminmarktwelt.de/cgi-bin/tmw-forum.pl?ST=3747&CP=0
vom 18.08.02 gepostet hast, nochmal ins Forum stellen?

Beim damaligen Posting fehlt am Ende ein Teil des Codes, deshalb funktionierte die Übernahme in die TS nicht. Dieses Problem dürfte jetzt nicht mehr auftreten, siehe auch oben von Herrn Ebert.

Danke

Hallo,

ich hoffe es ist jetzt alles dabei,es handelt sich hier aber nur um eine Anlehnung an das Buch,ich glaube die autorisierten Sachen von DeMark werden von Stuart Okorofsky geschrieben den er auch in seinem Buch grüsst.

{INDICATOR: TD Sequen Buy
Chapter 7, Figures 7.16 - 7.31.
"Sequential" is a Trademark held by Thomas R. DeMark.
"Price Countdown" is a Trademark held by Thomas R. DeMark.
"Price Intersector" is a Trademark held by Thomas R. DeMark.
Idea taken from "The New Science of Technical Analysis" by Thomas R. DeMark,
published by John Wiley & Sons, New York, 1994.
Programming code is written by
Richard Saidenberg
35 Tamarack Way
Pleasantville, NY 10570 -- phone 914-769-5164. }

INPUT:COUNT(9),BARSBACK(4),COUNTDN(13),BARSCDN(2);

VAR:COUNTER(0),Z(0),HH(0),
BUYSETUP(FALSE),INTERSECTION(FALSE),COUNTDOWN(0),
COUNTERS(0);

IF INTERSECTION=FALSE THEN COUNTDOWN=0;

IF C<=C[BARSBACK] THEN COUNTER=COUNTER+1 ELSE COUNTER=0;
IF C>=C[BARSBACK] THEN COUNTERS=COUNTERS+1 ELSE COUNTERS=0;
IF COUNTERS=COUNT THEN BUYSETUP=FALSE;{Cancel Setup on SellSetup}
IF BUYSETUP AND COUNTER=COUNT THEN BUYSETUP=FALSE;{Recycle}

IF BUYSETUP=FALSE THEN BEGIN
COUNTDOWN=0;
INTERSECTION=FALSE;
HH=0;
IF COUNTER=COUNT THEN BEGIN
BUYSETUP=TRUE;
FOR Z=0 TO COUNT-1 BEGIN
IF H[Z]>HH THEN HH=H[Z];
END;
FOR Z=3 TO COUNT-1 BEGIN
IF H>=L[Z] THEN INTERSECTION=TRUE;
IF Z>3 AND H[1]>=L[Z] THEN INTERSECTION=TRUE;
IF INTERSECTION THEN Z=COUNT-1;
END;
END;
END;

IF BUYSETUP THEN BEGIN
IF INTERSECTION=FALSE THEN BEGIN
FOR Z=3 TO COUNT-1 BEGIN
IF H>=L[Z] THEN INTERSECTION=TRUE;
IF INTERSECTION THEN Z=COUNT-1;
END;
END;
IF C>HH THEN BEGIN
BUYSETUP=FALSE;
INTERSECTION=FALSE;
COUNTER=0;
END;
END;

IF INTERSECTION THEN BEGIN
IF C<L[BARSCDN] THEN BEGIN
COUNTDOWN=COUNTDOWN+1;
PLOT3(L,"CntDown");
END;
IF INTERSECTION[1]=FALSE THEN PLOT4((H+L)/2,"Intersect");
END;

IF COUNTDOWN=COUNTDN THEN BEGIN
PLOT1((H+L)/2,"Sequen");
PLOT2(L,"Buy");
BUYSETUP=FALSE;
END;
--------------------------------------------------------------------------------

{INDICATOR: TD Sequen BuySetup
Chapter 7, Figures 7.4 - 7.15.
"Sequential" is a Trademark held by Thomas R. DeMark.
"Price Countdown" is a Trademark held by Thomas R. DeMark.
"Price Intersector" is a Trademark held by Thomas R. DeMark.
Idea taken from "The New Science of Technical Analysis" by Thomas R. DeMark,
published by John Wiley & Sons, New York, 1994.
Programming code is written by
Richard Saidenberg
35 Tamarack Way
Pleasantville, NY 10570 -- phone 914-769-5164. }

INPUT:COUNT(9),BARSBACK(4);

VAR:COUNTER(0),Z(0);

IF C<=C[BARSBACK] THEN COUNTER=COUNTER+1 ELSE COUNTER=0;

IF COUNTER=COUNT THEN BEGIN
Plot1((H+L)/2,"SeqBuy");
Plot2(L,"Setup");
FOR Z=0 TO COUNT-1 BEGIN
Plot3[Z](L[Z],"Count");
END;
END;

Hallo zusammen,

ich habe das jetzt einmal selbst probiert (copy,paste). Es funktioniert nicht, selbst wenn ich es innerhalb des PowerEditors kopiere und dann einen neuen Indikator anlege passiert garnix.

Es liegt wohl daran, das beim einlesen des Indikatoren Paket´s aus einem zip oder exe Tool (über Import Export im PowerEditor) noch andere Sachen eingelesen werden (LastCalcDate,
LastCalcTime etc.).

Das wird wohl ne kleine Sicherheit sein damit nicht jeder ohne Geld zu bezahlen die Sachen verwenden kann. Wie ist das eigentlich mit dem copyright der Programmierer wenn man die Sachen ins Netz stellt?

spada