Participez aux échanges de la file de discussion concernant ALLIANZ SE
Annonce
Réduire
Aucune annonce.
Ads
Réduire
Allianz se
Réduire
X
-
STPMT et Repulse
Bonjour,
Est ce qu'une ame charitable pourrai poster les codes du STPMT et du REPULSE pour Chart studio.
tout ceci afin d'ajouter une moyenne mobile au STPMT comme le conseille Eric , seulement sur prostation elle n'y est pas d'origine.
merci à vous
- Selected Answer
-
indicator Repulse;
input period=5;
draw rep_1("Repulse(1)"), rep_5("Repulse(5)"), rep_15("Repulse(15)"), MA("MA");
vars lo5(number),hi5(number),lo15(number),hi15(number),
Myfirst1(series), Mylast1(series),Myfirst5(series), Mylast5(series),Myfirst10(series), Mylast10(series),Myfirst15(series), Mylast15(series),
i1(number), i5(number), i(number), i15(number) ;
begin
{repulse_1
for i1:=front(open)+1 to back(open) do begin
Myfirst1[i1]:=((3* close[i1])-(2* Low[i1])-(open[i1-1]))/ close [i1]*100;
MyLast1[i1]:=((open[i1-1])+(2* High[i1])-(3* close[i1]))/ close [i1]*100;
rep_1:= ema (MyFirst1, 5) - ema (MyLast1,5);
End;
{repulse_5
for i5 := front(open) + 5 to back(open) do begin
lo5 := movmin(low, i5, 5);
hi5 := movmax(high, i5, 5);
Myfirst5[i5]:=((3* close[i5])-(2* lo5)-(open[i5-4]))/ close [i5]*100;
MyLast5[i5]:=((open[i5-4])+(2* hi5)-(3* close[i5]))/ close [i5]*100;
rep_5:= ema (MyFirst5, 25) - ema (MyLast5,25);
End;
{repulse_15
for i15 := front(open) + 15 to back(open) do begin
lo15 := movmin(low, i15, 15);
hi15 := movmax(high, i15, 15);
Myfirst15[i15]:=((3* close[i15])-(2* lo15)-(open[i15-14]))/ close [i15]*100;
MyLast15[i15]:=((open[i15-14])+(2* hi15)-(3* close[i15]))/ close [i15]*100;
rep_15:= ema (MyFirst15, 75) - ema (MyLast15,75);
End;
{MA
for i:=front(open) + period to back (open) do begin
MA:= sma (rep_1, period);
End;
end.
- Selected Answer
Commentaire
-
///////////
indicator stpmt;
draw stpmtline("STPMT"), cycleline("cycle");
vars i(number), sto1(series), sto2(series), sto3(series), sto4(series), mm9(series);
begin
StochasticOscilator(close, 5, 3);
sto1 := StochasticOscilator.line_k;
StochasticOscilator(close,14,3);
sto2 := StochasticOscilator.line_k;
StochasticOscilator(close,45,14);
sto3 := StochasticOscilator.line_k;
StochasticOscilator(close,75,20);
sto4 := StochasticOscilator.line_k;
for i := front(sto3) to back(close) do begin
stpmtline := ((4.1 * sto1) + (2.5 * sto2) + (sto3) + (4 * sto4)) /11.6;
end;
cycleline := stpmtline - SMA(stpmtline,9);
end.
//////////// / /
- Selected Answer
Commentaire
-
c'est du fait maison avec l'aide du concepteur de deal book ! la VRAIE version de prostation...
si tu veux ta mm9 tu lui dis de l'afficher dans la ligne "draw... !
le cycle c'est celui d'eric !
j'ai pris exactement le code d'eric pour la stpmt.
pour le repulse j'ai une version raccourci pour n'avoir que la 5.
pour les sto...draw sto...
- Selected Answer
Commentaire
-
Bonjour , désolé pour l'écriture en italique , j'ai beau essayé j'arrive pas à l'enlever!! Si un modérateur passe par là....
Bref pour tous ceux qui utilisent Prostation voici le code de la STPMT (Merci Boursicoton ). J'ai pris la liberté de rajouter la mm9 de la STPMT comme le montre Eric dans son webinaire.
En dessous de la STPMT est donc présent l'indicateur de cycle en histogramme.
En trait épais vert on voit sur la ligne de zéro l'indicateur de squeeze. (prise de position dès que le trait disparait)
Les Sto d'origine restes visibles en pointillé pour les courtes et en tiret pour les longues.
Voici le code:
indicator Stpmt_Cycle_Squeeze;
input period_mm = 9, med_line = 50, period = 20, kN = 1.5, bbN = 2;
draw stpmtline("STPMT",solid_line,red,2),SMA("SMA",solid_line,blue,2), cycleline("cycle", histogram,dark_magenta,1),
baseline ("Milieu",solid_line,black,1), sto5 ("Sto5",dash_dot_line,dark_green,1), sto14("Sto14",dash_dot_line,dark_yellow,1),
sto45("Sto45",dash_line,dark_cyan,1), sto75("Sto75",dash_line,black,1),
Squeeze("Squeeze",solid_line,dark_green,4);
vars i(number), sto1(series), sto2(series), sto3(series), sto4(series),
mm9(series), kUpper (series), kLower (series), bbUpper (series), bbLower (series), hlp(series), hlp2(series);
begin
baseline := makeseries(front(close), back(close), med_line);
StochasticOscilator(close, 5, 3);
sto1 := StochasticOscilator.line_k;
StochasticOscilator(close,14,3);
sto2 := StochasticOscilator.line_k;
StochasticOscilator(close,45,14);
sto3 := StochasticOscilator.line_k;
StochasticOscilator(close,75,20);
sto4 := StochasticOscilator.line_k;
{Keltner
keltner_channel(period, kN);
kUpper := keltner_channel.line_upper;
kLower := keltner_channel.line_lower;
{Bollinger
Bollinger_Bands(close, period, bbN);
bbUpper := Bollinger_Bands.line_upper;
bblower := Bollinger_Bands.line_lower;
{momentum
Momentum(close, 12);
for i := front(bbUpper) to back(bbUpper) do
begin
hlp := (bbUpper - kUpper) + (kLower - bbLower);
if hlp < 0 then Squeeze := 0;
hlp2 := Momentum.line - 100;
/*
if bbUpper <= kUpper AND bbLower >= kLower then
signal := -1 // High probability breakout signal
else
if bblower >= sma50 then signal := -0.5 // Medium probability breakout signal
else
if bbupper <= sma50 then signal := -0.5 // Medium probability breakout signal
else
signal := 0; // No breakout signal */
end;
for i := front(sto3) to back(close) do begin
stpmtline := ((4.1 * sto1) + (2.5 * sto2) + (sto3) + (4 * sto4)) /11.6;
end;
SMA:= sma (stpmtline, period_mm);
cycleline := stpmtline - SMA(stpmtline,9);
sto5:= sto1;
sto14:= sto2;
sto45:= sto3;
sto75:= sto4;
end.
Merci encore à tous ceux qui font partager leur codes et leur connaissances, qui grace à eux me permet d'avancer.
- Selected Answer
Commentaire
-
J'ai fais un simple copy/paste du code mais il est invalide lors de la vérification, j'ai les erreurs suivantes:
(Ln:41 Col:8)Error:incompatible types
(Ln:41 Col:25)Error:incompatible types
(Ln:42 Col:23)Error:incompatible types
(Ln:42 Col:6)Error:incompatible types
j'ai l'impression que le soucis est par là:
for i := front(bbUpper) to back(bbUpper) do
begin
hlp := (bbUpper - kUpper) + (kLower - bbLower);
if hlp < 0 then Squeeze := 0;
hlp2 := Momentum.line - 100;
j'ai oublié de faire un truc ??
Merci
- Selected Answer
Commentaire
-
ça y est je viens de comprendre pourquoi ça ne marche pas!!!
quand on poste sur le forum les crochet ne sont pas inscrit "[" donc ça fait des merdouilles.
ligne 40 et 41 il faut mettre hlp puis desuite après sans espace un i entre crochet et idem ligne 42 après hlp2
et voilà ça marche
comme ceci
regarde bien ya aussi les i dans la formule , faut que tu fasse tout pareil
- Selected Answer
Commentaire
Commentaire