Hallo,
Hier ist er
-----------------------------------------------------------
Express DTOsc // Nom de l'indicateur
Vars // Définition des variables
// Définition des variables d'entrée :
input $SpanRsi(1,100,8); // Longueur du RSI, peut prendre une valeur de 1 à 100, fixé à l'origine à 8
input $SpanStoc(1,100,5); // Longueur du Stochastique, peut prendre une valeur entre 1 et 100, fixé à l'origine à 5
input $SpanMa1(1,100,3); // Longueur de la 1ere moyenne mobile simple, peut prendre les valeurs de 1 à 100, fixée à l'origine à 3
input $SpanMa2(1,100,3); // Longueur de la 2eme moyenne mobile simple, peut prendre les valeurs de 1 à 100, fixée à l'origine à 3
input $SpanSeuilHaut (50,100,75); // Définition du niveaus de déclenchement du seuil haut, peut prendre une valeur de 50 à 100, fixé à l'origine à 75
input $SpanSeuilBas(1,50,25); // Définition du niveau de déclenchement du seuil bas, peut prendre une valeur de 1 à 50, fixé à l'origine à 25
series StoRsi, RsiSpan, HautRsi, BasRsi, MaStoRsi, MMaStoRsi; // Définition des variables series
Calculation // début des calculs
CalculateAtEveryTick(false); // Calculs effectués a la fin de la période pour éviter les calculs intensifs (ralentissements)
RSI (close,RsiSpan,$SpanRsi); // Calcul du RSI
HautRsi = Highest(RsiSpan, $SpanStoc); // Calcul du plus haut du RSI sur la période $SpanRsi
BasRsi = Lowest( RsiSpan, $SpanStoc); // Calcul du plus bas du RSI sur la période $SpanRsi
if isNonZero(HautRsi - BasRsi) then // Instruction pour eviter une erreur en cas de division par zéro
SToRsi =100* ((RsiSpan - BasRsi) /( HautRsi - BasRsi)); //Calcul du premier indicateur stochastique du RSI, StoRsi
MovingAverage(StoRsi,MaStoRsi,$SpanMa1); // Cacul de la moyenne mobile simple de StoRsi = MaStoRsi
MovingAverage(MaStoRsi,MMaStoRsi, $SpanMa2); // Calcul de la moyenne mobile simple de la moyenne MaStoRsi = MMaStoRsi
Interpretation TwoThresholds(MMaStoRsi, $SpanSeuilHaut , $SpanSeuilBas);
// Permet l'interprétation des signaux de trading à l'aide du modèle coupure de 2 niveaux
plot (MaStoRsi, green,2); // Traçage de la courbe MaStoRsi, couleur trait =bleue, épaisseur trait = 2
plot (MMaStoRsi, red,2); // Traçage de la courbe MMaStoRsi, couleur trait = rouge, épaisseur trait = 2
plotline ($SpanSeuilHaut,blue,2); // Traçage de la ligne SeuilHaut, couleur bleue, épaisseur trait = 2
plotline ($SpanSeuilBas, blue, 2); // Traçage de la ligne SeuilBas , couleur bleue, épaisseur trait = 2
//plot (RsiSpan, black, 2);
// Utilisation libre, merci de faire référence à l'auteur//@@@cs:945354-3758645-793331_cs@@@
-------------------------------------------------------------------------------------
Viel Spaß damit.
MFG
Martrader
