Mittwoch, 17. April 2024, 01:04 UTC+2

Sie sind nicht angemeldet.

  • Anmelden
  • Registrieren

ST.L

unregistriert

1

Freitag, 23. Juli 2004, 09:17

Insync Index by Norm North

Hallo

Hab mir mal die Arbeit gemacht den "Insync Index by Norm North"
von Metastock zu übersetzten. Dabei hat sich ein Fehler eingeschlichen, der sich so äusert, das die Berechnung immer 8Perioden zurück liegt. Kann sich bitte einer vo Euch mal die Formel anschauen ich sehe den Wald vor lauter Bäumen nicht mehr.

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
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
DPO
Detrended Price Oscillator


Const Daten: 10;

Close-Ref( GD(Close, 20, S),Daten)


_________________________________________________


ISI
Insync Index

Calc C: Close;
Const Daten1: 20;
Const Daten2:10;
Const Daten3:14;
Const Daten4:18;






Calc StdAbw1:StdAbw(C ,Daten1,2);
Calc CCI1:CCI(Daten3);
Calc DPO1:DPO(Daten4);
Calc MACD1:MACD(C);
Calc ROC1:ROC(C , Daten2, $);
Calc EMV1: EMV(Daten2,S);
Calc Stoch1:Stoch(Daten3,1);

50
+ (If(CCI1 >  100, 5, If(CCI1<-100, -5, 0)))
+ (If((C-( GD(C,Daten1,S) - 2 * (StdAbw1))) / 
          (GD(C,Daten1,S) + 2 * (StdAbw1)) - 
          (GD(C,Daten1,S) - 2 * (StdAbw1)) < .05, -5, 
   If((C-( GD(C,Daten1,S) - 2 * (StdAbw1))) / 
          (GD(C,Daten1,S) + 2 * (StdAbw1)) -
          (GD(C,Daten1,S)- 2 * (StdAbw1)) >  .95, 5, 0)))
+ (If(RSI(Daten3,Daten3) > 80,5,If(RSI(Daten3,Daten3) < 20,-5,0)))
+ (If(Stoch1 > 80,5,If(Stoch1 <20,-5,0)) )
+ (If(Stoch1 > 80, 5, If(Stoch1 <  20, -5,0)) )
+ (If(MFI(Daten1) > 80,5,If(MFI(Daten1) < 20,-5,0)))
+ (If(EMV1 - GD(EMV1,10,S) < 0, 
   If(GD(EMV1,10,S) <  0, -5, 0),0))
+ (If(EMV1 - GD(EMV1,10,S) > 0,
   If(GD(EMV1,10,S)  > 0, 5, 0),0) )
+ (If(ROC1 - GD(ROC1, 10,S) > 0, 
   If(GD(ROC1, 10,S)> 0,5,0),0))
+ (If(ROC1 - GD(ROC1, 10,S) <  0, 
   If(GD(ROC1,10,S)< 0,-5,0),0) )
+ (Ref((If(DPO1 - GD(DPO1, 10, S) >  0,
        If(GD(DPO1,10,S) >  0, 5, 0), 0)),-10) )
+ (Ref((If(DPO1 - GD(DPO1, 10, S)<  0,
        If(GD(DPO1,10,S) <  0, -5, 0), 0)),-10) )
+ (If(MACD1 - GD(MACD1, 10, S) >  0,
   If(GD(MACD1,10, S) >  0, 5, 0), 0))
+ (If(MACD1 - GD(MACD1, 10, S) < 0, 
   If(GD(MACD1,10,S) <  0, -5, 0), 0))


Danke im vorraus

Gruß ST.L

Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von »ST.L« (23. Juli 2004, 10:08)


ST.L

unregistriert

2

Freitag, 23. Juli 2004, 10:24

RE: Insync Index by Norm North

Hab den Fehler gefunden.

Quellcode

1
2
3
4
5
6
7
....
+ (Ref((If(DPO1 - GD(DPO1, 10, S) >  0,If(GD(DPO1,10,S) >  0, 5, 0), 0)),
-Daten4) )

+ (Ref((If(DPO1 - GD(DPO1, 10, S)<  0,If(GD(DPO1,10,S) <  0, -5, 0), 0)),
-Daten4) )
....



Gruß ST.L