Tradestation User Group Germany - Druckvorschau: Literatur für Indikatoren

Tradestation User Group Germany (http://www.tradernet.org/wbb/index.php)
|- Posts aus dem alten Userforum (http://www.tradernet.org/wbb/board.php?boardid=15)
|-- Literatur für Indikatoren (http://www.tradernet.org/wbb/threadid.php?boardid=15&threadid=190)

Geschrieben von _harami am 13.11.2001, 20:10:

Literatur für Indikatoren

Hallo,
ich suche nach Literatur für folgende Indikatoren der TS:
FEAR Oscillator, gpMarketMood, Jail Break, Klinger Vol. Osc., FSST.
Gibt es eigentlich den Money Flow von Chaikin auch für TS oder nur
für Metastock?

Wenn jemand etwas wissen sollte. Ich bin für jeden Hinweis dankbar.

Geschrieben von _Uwe am 15.11.2001, 10:10:

RE: Literatur FEAR / Indikatoren MoneyFlowIndex

Literatur zu FEAR Oscillator

MassPsycholgy Latest Book by James Dines
( http://www.amazon.com/exec/obidos/ASIN/0964968908/ref=ase_jamesdinescompai/002-9591321-3952835

GpMarketMood......{ mir nicht bekannt }
Jail Break................{ mir nicht bekannt }
Klinger Vol. Osc.....{ mir nicht bekannt }
FSST.......................{ mir nicht bekannt }

{Chaikin s Money Flow nach EQUIS-FORMULA – MataStock, umgesetzt für TS }

Inputs: Price((high+low+close)/3), Periode(21), viewInd(true);

vars: positivPriceVolume(0), negativPriceVolume(0);
var: PMF(0), NMF(0), MFR(0), MFI(0);

positivPriceVolume = Iff( Price > Price[1], Volume*Price,0);
negativPriceVolume = Iff( Price < Price[1], -Volume*Price,0);

{Positives Money Flow}
PMF = summation(positivPriceVolume, Periode);

{Negatives Money Flow}
NMF = summation(negativPriceVolume, Periode);

if NMF<>0 then
begin
{Money Flow Ratio}
MFR = PMF / NMF;

if MFR<>0 then
begin
{Money Flow Index}
MFI = 100 - ( 100 / ( 1 + MFR ) );

if viewInd then
begin
Plot1(100,"");
Plot2(MFI, "MF-Index");
end
else
begin
Plot1(0,"");
Plot3(MFR, "MF-Ratio");
end;
end;
end;

Uwe

Geschrieben von _harami am 16.11.2001, 11:10:

RE: Literatur FEAR / Indikatoren MoneyFlowIndex

vielen herzlichen Dank. Hilft mir sehr weiter.

Geschrieben von _harami am 16.11.2001, 12:10:

RE: Literatur FEAR / Indikatoren MoneyFlowIndex

ich habe es jetzt eingegeben. bekomme leider bei {Negativ Money Flow} - negativPriceVolume - einen Syntax error.
Ich komme also nicht weiter.

Geschrieben von _Uwe am 24.11.2001, 19:10:

RE: Literatur FEAR / Indikatoren MoneyFlowIndex

harami:
ich habe es jetzt eingegeben. bekomme leider bei {Negativ Money Flow} - negativPriceVolume - einen Syntax error.
Ich komme also nicht weiter.

Wenn der Fehler beim Überprüfen des Programmcodes auftritt, so bitte ich Dich nochmals sorgfältig zu schauen, ob das Kopieren (oder Abtippen) in allen Einzelheiten richtig geklappt hat, denn bei mir wird die Befehlsfolge anstandslos umgesetzt.

Zum anderen ist natürlich noch eine Frage an Dich zu stellen, die, da ich das Programm auf der TS4 umgesetzt hatte, zuvor mir nicht in den sinn kam: Mit welcer TS arbeitest Du? Die Frage findet ihre Begründung, da ich in der TS2000i und in der TSpro den Indikator Money Flow im Lieferumfang vorgefunden hatte.

Darüber hinaus hier der Hinweis auf die MetaStock-Formel, die ich versucht habe umzusetzen (siehe Link).

Inputs: Price((high+low+close)/3), Periode(21), viewInd(true);

vars: positivPriceVolume(0), negativPriceVolume(0);
var: PMF(0), NMF(0), MFR(0), MFI(0);

positivPriceVolume = Iff( Price > Price[1], Volume*Price,0);
negativPriceVolume = Iff( Price < Price[1], -Volume*Price,0);

{Positives Money Flow}
PMF = summation(positivPriceVolume, Periode);

{Negatives Money Flow}
NMF = summation(negativPriceVolume, Periode);

if NMF<>0 then
begin
{Money Flow Ratio}
MFR = PMF / NMF;

if (1+MFR)<>0 then {!!!Anderung zur 1.Fassung!!!)
begin
{Money Flow Index}
MFI = 100 - ( 100 / ( 1 + MFR ) );

http://www.equis.com/customer/support/formulas/cf00028.html
Money Flow Index (Formula) MetaStock

von harami am 16.Nov.2001 12:20 :
ich habe es jetzt eingegeben. bekomme leider bei {Negativ Money Flow} - negativPriceVolume - einen Syntax error.
Ich komme also nicht weiter.

Wenn der Fehler beim Überprüfen des Programmcodes auftritt, so bitte ich Dich nochmals sorgfältig zu schauen, ob das Kopieren (oder Abtippen) in allen Einzelheiten richtig geklappt hat, denn bei mir wird die Befehlsfolge anstandslos umgesetzt.

Zum anderen ist natürlich noch eine Frage an Dich zu stellen, die, da ich das Programm auf der TS4 umgesetzt hatte, zuvor mir nicht in den sinn kam: Mit welcer TS arbeitest Du? Die Frage findet ihre Begründung, da ich in der TS2000i und in der TSpro den Indikator Money Flow im Lieferumfang vorgefunden hatte.

Darüber hinaus hier der Hinweis auf die Meta-Stock-Formel, die ich versucht habe umzusetzen:

Money Flow - Erläuterung

Money Flow Index (Formula)

Positive Money Flow:
sum ( if ( typ( ) ,> ,ref ( typ ( ) ,-1 ) ,V * typ ( ) ,0 ) , PERIODS)

Negative Money Flow:
sum ( if ( typ( ) ,< ,ref ( typ( ) ,-1) ,V * typ ( ) * -1 ,0 ) , PERIODS)

Money Flow Ratio:
fml ( "Positive Money Flow" ) / fml ( "Negative Money Flow" )

Money Flow Index:
100 - ( 100 / ( 1 + fml ( "Money Flow Ratio" ) ) )

***The time periods are controlled by PERIODS in the Positive and Negative Money Flow formulas.

Geschrieben von _Snurer am 01.12.2001, 10:10:

RE: Literatur FEAR / Indikatoren MoneyFlowIndex

Das minuszeichen ist falsch

negativPriceVolume = Iff( Price < Price[1], -Volume*Price,0);

es muss lauten:

negativPriceVolume = Iff( Price < Price[1], Volume*Price,0);

Geschrieben von _Snurer am 04.12.2001, 07:10:

RE: Literatur für Indikatoren

Den Klinger Volume Oscillator gibt s bei TradeStation2000i. Und hier unten der Market Mood. Auf wunsch kan es auch ge-emailt werden.

{Market Mood - (c) G.Prick 1997}

inputs: Flen(100);
vars: ax(0),Fhi(0),Flo(0),Midd(0),stem(0),RL(0),LL(0),BLH(0),BRH(0),TLH(0),
TRH(0),LA(0),RA(0);
if currentbar = 1 then begin
Fhi = highest(H,Flen);Flo=lowest(L,Flen);
ax = Fhi-Flo;
stem = TL_New(date,time,Fhi-.6*ax,date,time,Fhi-.4*ax);
RL = TL_New(date,time,Fhi-.4*ax,date,time,Fhi-.2*ax);
LL = TL_New(date,time,Fhi-.2*ax,date,time,Fhi-.1*ax);
BLH = TL_New(date,time,Fhi-.2*ax,date,time,Fhi-.1*ax);
BRH = TL_New(date,time,Fhi-.1*ax,date,time,Fhi-.4*ax);
TLH = TL_New(date,time,Fhi-.6*ax,date,time,Fhi-.2*ax);
TRH = TL_New(date,time,Fhi-.7*ax,date,time,Fhi-.6*ax);
LA = TL_New(date,time,Fhi-.7*ax,date,time,Fhi-.6*ax);
RA = TL_New(date,time,Fhi-.3*ax,date,time,Fhi-.2*ax);
TL_SetExtLeft(stem, false);TL_SetExtRight(stem, false);
TL_SetExtLeft(RL, false);TL_SetExtRight(RL, false);
TL_SetExtLeft(LL, false);TL_SetExtRight(LL, false);
TL_SetExtLeft(BLH, false);TL_SetExtRight(BLH, false);
TL_SetExtLeft(BRH, false);TL_SetExtRight(BRH, false);
TL_SetExtLeft(TLH, false);TL_SetExtRight(TLH, false);
TL_SetExtLeft(TRH, false);TL_SetExtRight(TRH, false);
TL_SetExtLeft(LA, false);TL_SetExtRight(LA, false);
TL_SetExtLeft(RA, false);TL_SetExtRight(RA, false);
if false then plot1(0,"duh");
end;
if currentbar > 1 then begin
Fhi = highest(H,Flen);Flo=lowest(L,Flen); ax = Fhi-Flo; Midd =
Flen/2; TL_SetEnd(stem,date[Midd],time[Midd],Fhi-.4*ax);
TL_SetBegin(stem, date[Midd], time[Midd], Fhi-.6*ax);
TL_SetEnd(RL,date[Midd],time[Midd],Fhi-.6*ax); TL_SetBegin(RL,
date[Midd-Midd/2], time[Midd-Midd/2], Flo);
TL_SetEnd(LL,date[Midd],time[Midd],Fhi-.6*ax); TL_SetBegin(LL,
date[Midd+Midd/2], time[Midd+Midd/2], Flo);
TL_SetEnd(BLH,date[Midd+Midd/6],time[Midd+Midd/6],Fhi-.2*ax);
TL_SetBegin(BLH, date[Midd], time[Midd], Fhi-.4*ax);
TL_SetEnd(BRH,date[Midd-Midd/6],time[Midd-Midd/6],Fhi-.2*ax);
TL_SetBegin(BRH, date[Midd], time[Midd], Fhi-.4*ax);
TL_SetEnd(TLH,date[Midd],time[Midd],Fhi); TL_SetBegin(TLH,
date[Midd+Midd/6], time[Midd+Midd/6], Fhi-.2*ax);
TL_SetEnd(TRH,date[Midd],time[Midd],Fhi); TL_SetBegin(TRH,
date[Midd-Midd/6], time[Midd-Midd/6], Fhi-.2*ax);
if close > close[10] then begin
TL_SetEnd(LA,date[Flen],time[Flen],Fhi-.2*ax);
TL_SetBegin(LA, date[Midd], time[Midd], Fhi-.5*ax);
TL_SetEnd(RA,date[1],time[1],Fhi-.2*ax);
TL_SetBegin(RA, date[Midd], time[Midd], Fhi-.5*ax);
end else begin
TL_SetEnd(LA,date[Flen],time[Flen],Fhi-.8*ax);
TL_SetBegin(LA, date[Midd], time[Midd], Fhi-.5*ax);
TL_SetEnd(RA,date[1],time[1],Fhi-.8*ax);
TL_SetBegin(RA, date[Midd], time[Midd], Fhi-.5*ax);
end;
end;