Metastock EOD: Power Pivot: Verschwundene Signale

Hallo,

das Problem der verschwundenen Signale ist bekannt und die Lösung dürfte für sie wahrscheinlich wenig zufriedenstellend sein: Es handelt sich ganz einfach um ein fehlerhaft umgesetztes System.

Ebenso wenig dürfte die Lösung für sie zufriedenstellend sein: Man sollte auf den Einsatz der Systeme/Experts verzichten.

Damit das Lesen dieses Beitrages nicht ohne kleines Erfolgserlebnis bleibt, ein paar gute Indikatoren.

Automatische Retracements
i1:=Input("Pivot (1=Minor 2=Interm 3=Major 4=Primary)", 1, 4, 2);
i2:=Input("Trend Direction",1,4,1);

fib2:=Input("Retrace % 2", -300, 300, .382);
fib3:=Input("Retrace % 3", -300, 300, .5);
fib4:=Input("Retrace % 4", -300, 300, .618);

aPivots:= ExtFml("PowerPivots.Pivots");
aTrend:= ExtFml("PowerPivots.TrendDirection",i1,i2);

ExtFml("PowerPivots.RetInd",0,aPivots,aTrend,i1,fib2);
ExtFml("PowerPivots.RetInd",0,aPivots,aTrend,i1,fib3);
ExtFml("PowerPivots.RetInd",0,aPivots,aTrend,i1,fib4);

Automatische Trendlinie(n)
PPivot:=Input("P 1=minor 2=intermediate 3=major 4=primary",1,4,2);
TPivot:=Input("T -1=minor -2=intermediate -3=major -4=primary",-4,-
1,-2);
FTrough := LastValue( ExtFml("Powerpivots.NthPivotPrice",Tpivot,0,1));
STrough := LastValue( ExtFml("Powerpivots.NthPivotPrice",Tpivot,1,1));
DeltaVerticalU := FTrough - STrough;
DeltaHorizontalU :=
LastValue(ExtFml("Powerpivots.BarsSinceNthPivot",Tpivot,1)) -
LastValue(ExtFml("Powerpivots.BarsSinceNthPivot",Tpivot,0));
DeltaPerBarU := DeltaVerticalU / DeltaHorizontalU;
BarNoSecondTrough := LastValue(
Cum(1) - ExtFml("Powerpivots.BarsSinceNthPivot",Tpivot,1));
TrendD := If(Cum(1) < BarNoSecondTrough,
BarsSince(Cum(1) >= BarNoSecondTrough),
STrough +
(DeltaPerBarU * (Cum(1) - BarNoSecondTrough)));
Up:=If(FTrough >= STrough,
TrendD,
BarsSince(FTrough >= STrough));
FPeak := LastValue( ExtFml("Powerpivots.NthPivotPrice",Ppivot,0,1));
SPeak := LastValue( ExtFml("Powerpivots.NthPivotPrice",Ppivot,1,1));
DeltaVerticalD := FPeak - SPeak;
DeltaHorizontalD :=
LastValue(ExtFml("Powerpivots.BarsSinceNthPivot",Ppivot,1)) -
LastValue(ExtFml("Powerpivots.BarsSinceNthPivot",Ppivot,0));
DeltaPerBarD := DeltaVerticalD / DeltaHorizontalD;
BarNoSecondPeak := LastValue(
Cum(1) - ExtFml("Powerpivots.BarsSinceNthPivot",Ppivot,1));
TrendU := If(Cum(1) < BarNoSecondPeak,
BarsSince(Cum(1) >= BarNoSecondPeak),
SPeak +
(DeltaPerBarD * (Cum(1) - BarNoSecondPeak)));
Dn:=If(FPeak <= SPeak,
TrendU,
BarsSince(FPeak <= SPeak));
Up;Dn;

Sollten noch weitere Fragen auftauchen, bitte in diesen Beitrag posten.

P.S Es gibt eine betreute User Group unter http://groups.yahoo.com/group/PowerPivots/

Hallo metatrader,

bezieht sich das nur auf das Handelssystem "Contrarian"?

Wie bekommst du die Abwärtstrendlinie rot und die Aufwärtstrendlinie grün, bzw. die Retracements farbig und gepunktet? :-(

Viele Grüße Catano

@ metatrader #2

Wow, was a Formel, da hauts mer glatt en Leberkäs vom Weckla :-)), Reschpekt!!

Brauch ich, um damit zu arbeiten, das PlugIn Power Pivot oder genügt MS EOD?
Falls MS ausreicht bitte kurze Info wie und wo die Formeln einzufügen sind.
Besten Dank und eine gute Zeit!

Gruss Mike

@ chubbyblues

Du benötigst MetaStock + das PowerPivotPlugin. Hast du beides, musst du die Formel lediglich in den Indikatorbuilder einfügen.

Das Plugin kannst du hier aber bestellen, Hilfe von mir gibt es kostenlos dazu ;)

@ metatrader [#2]

Nach Erstellen des Beispiel-Indikators -Automatische Retracements- erhalte ich folgende Fehlermeldung:

Numeric constant expected. (e.g. 10)
Cursor zeigt auf die Codezeile: fib1:=Input("Retrace % 1", -300, 300, .25);

Offensichtlich stört der Wert .25 ... Eine ganze Zahl wird genommen.
Wo liegt mein Fehler?

Umfeld: MS Pro 9.1 / QuoteCenter + Powerpivots Plus

Grüße Jürgen

Hallo,

du kannst dort nur ganze Zahlen eingeben, also z.B. ändern in:

retval1:=Input("Retracement 1",18,10000,382);
a:=ExtFml( "PowerPivots.NthPivotPrice",1,0,1);
ret1:=ExtFml("PowerPivots.Retracement",1,retval1/1000,0);
ValueWhen(2,a,ret1);

Oder so ähnlich ;)