RSI - Indicator

Vragen en suggesties over handelssystemen en indicatoren

Moderator: Perry

RSI

Berichtdoor rogier » wo 05 nov 2003, 17:08

Hallo Paul,

Yes, nu werkt 't wel!

Zo zie je: rechtstreeks uit de literatuur overgenomen en dan zitten er dit soort slordigheden in.
En dat er dan mensen zijn die in ??n keer zien waar de schoen wringt...
Hartelijk dank voor je wel heel snelle service!
Mvg
Rogier
rogier
 
Berichten: 5
Geregistreerd op: di 03 dec 2002, 16:45

RSI

Berichtdoor rogier » do 06 nov 2003, 17:15

Hallo Paul,

Kan er toch nog ergens een 'vuiltje' in de formule voor de StochRSI zitten? In een grafiek zonder andere indicatoren kan ik 'm zonder probleem invoegen; maar in een chart waarin al een RSI in de subgrafiek staat krijg ik de melding dat 'het programma een puntkomma verwacht in de module op (6:7) en dat de indicator niet ingevoegd kan worden'.
Hij conflicteert dus kennelijk met de gewone RSI. Heb je enig idee hoe dit op te lossen is? Het is maar een klein schoonheidsfoutje, maar wel jammer.
Mvg
Rogier
rogier
 
Berichten: 5
Geregistreerd op: di 03 dec 2002, 16:45

RSI

Berichtdoor bertlamoree » do 06 nov 2003, 18:41

Misschien kan je proberen de naam te veranderen in bijv RRsi?
bertlamoree
 
Berichten: 96
Geregistreerd op: ma 25 feb 2002, 12:04
Woonplaats: waddinxveen

RSI

Berichtdoor Paul M » do 06 nov 2003, 23:25

Hallo Rogier,

Dat ligt aan de functie RSI.
Ik heb de naam omgedoopt naar zRSI.

Functie:

value function zRSI (value xSeries[],value xNumberOfbars) begin

?{---- variables used ----}
?value xUp[],xDown[],xUpAvg[],xDownAvg[],xI,xChange[];

?{---- if first time, kick-start the calculation ----}
?if CurrentBar=1 or xUpAvg[1]=_NA or xDownAvg[1]=_NA then begin
? ?for xI := xNumberOfBars-1 downto 0 do begin
? ? ?xChange := xSeries[xI]-xSeries[xI+1];
? ? ?if xChange>0 then xUp[xI] := xChange else xUp[xI] := 0;
? ? ?if xChange<0 then xDown[xI] := -xChange else xDown[xI] := 0;
? ? ?end;
? ?xUpAvg := Average(xUp,xNumberOfBars);
? ?xDownAvg := Average(xDown,xNumberOfBars);
? ?end

?{---- else calculate new up and down value ----}
?else begin
? ?xChange := xSeries-xSeries[1];
? ?if xChange>0 then xUp := xChange else xUp := 0;
? ?if xChange<0 then xDown := -xChange else xDown := 0;
? ?xUpAvg := ((xNumberOfBars-1)*xUpAvg[1]+xUp)/xNumberOfbars;
? ?xDownAvg := ((xNumberOfBars-1)*xDownAvg[1]+xDown)/xNumberOfBars;
? ?end;

?{---- now calculate relative strength up and down ----}
?if xDownAvg=0 and xUpAvg=0 then zRSI := _NA
?else if xDownAvg=0 then zRSI := 100
?else zRSI := 100-100/(xUpAvg/xDownAvg+1);

?end;

Indicator:

Input: ?RSILen(13), LBLen(8), WAvgLen(5),Overbought(70),Oversold(30);

Var: ?RS(0),RSIL(0),RSIH(0),StochRSI(0),xRSI(0);


RS=zRSI(C,RSILen);
RSIL = Lowest(RS,LBLen);
RSIH = Highest(RS,LBLen);

StochRSI = (RS - RSIL)/(RSIH-RSIL);
xRSI=(WAverage(StochRSI,WavgLen))*100;
Plot1(xRSI,"Stoch RSI");
Plot2(OverBought, "OverBought");
Plot3(OverSold, "OverSold");
end;

Paul.
Paul M
 
Berichten: 263
Geregistreerd op: vr 13 dec 2002, 23:21

RSI

Berichtdoor rogier » vr 07 nov 2003, 15:19

Dag Paul,

Bedankt voor je uitvoerige reactie, mede namens diverse andere 'cursisten'.
Mvg
Rogier
rogier
 
Berichten: 5
Geregistreerd op: di 03 dec 2002, 16:45

RSI

Berichtdoor JPR » za 08 nov 2003, 16:13

En voor de de lief hebbers van dynamische OB OS lijnen: ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?value function zRSIDynOBOS (value xSeries[]=Close, value xNumberOfBars=7, value xStdDevUp=2,
value xStdDevDn=2) begin
?value OBline, OSline;

OBline := BollingerBand(RSI(Close, xNumberOfBars), 50, xStdDevUp);
OSline := BollingerBand(RSI(Close, xNumberOfBars), 50, -xStdDevDn);

plot1 (RSI(Close,xNumberOfBars), "RSI");
plot2 (OBline, "OBline");
plot3 (OSline, "OSline");

end; ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? Paul R
JPR
 
Berichten: 85
Geregistreerd op: wo 03 jul 2002, 18:39

RSI

Berichtdoor Paul M » za 08 nov 2003, 17:10

Paul,

Zie post Handelssystemen +indicatoren-dynamische trendlijnen-27 augustus.

Paul.
Paul M
 
Berichten: 263
Geregistreerd op: vr 13 dec 2002, 23:21

RSI

Berichtdoor JPR » zo 09 nov 2003, 0:44

Hallo Paul,

Ik had beter effe met een verwijzing kunnen reageren.. maar goed nu staat alles wel zo'n beetje bij elkaar :-)

Groet,

JPaul R
JPR
 
Berichten: 85
Geregistreerd op: wo 03 jul 2002, 18:39

Vorige

Keer terug naar Handelssystemen + Indicatoren

Wie is er online

Gebruikers op dit forum: Geen geregistreerde gebruikers en 17 gasten

cron