ayé : les Mogs en UT 7 mn bougent !! Allez Louyah ..
Annonce
Réduire
Aucune annonce.
Ads
Réduire
Intraday DAX EURUSD AVRIL 2018
Réduire
X
-
" Le plus grand dérèglement de l'esprit consiste à voir les choses telles qu'on le veut et non pas telles qu'elles sont " - Bossuet
----
trade what you see, not what you think, motherfucker !
----
“C’est pas parce qu’ils sont nombreux à avoir tort qu’ils ont raison.” - Coluche
-
-
Envoyé par dom2911 Voir le messagebonjour netjoker
l'indicateur en bleu sur ton graphe est personnel ou on peut le trouver sur les plates-formes connues ( j'utilise nano whs) stp
merci
voila le code que j'ai fait pour une MMA32 décalée de 16 , avec une enveloppe de 15 (en principe selon ParisBoy ça devrait être 15.625 , mais n'étant pas vraiment expert je ne sais pas programmer les chiffres décimaux .Ceci étant ça devrait être possible ....... )
// Copyright Fipertec
// Version 1.5
Express EnvelopeMMAperso
Vars
numeric i;
series line_up, price, line_dn, line_mid,line_decal , res1,MA, senti(50);
input
$period(1, 100, 32),
$Price("Open;Close;High;Low",1),
$Perioda(1,125,15),
$MessageBox("No;Yes",0),
$PlaySound("No;Yes",0),
$SendEmail("No;Yes",0),
$MMPeriod(1,250,16);
Calculation
if IsFirstBar() then
begin
CalculateAtEveryTick(false);
SetYscaleFormat(GetPriceFormat());
for i = 0 to FinalBarIndex()
begin
if $Price = 3 then price[-i] = l[-i];
else
if $Price = 2 then price[-i] = h[-i];
else
if $Price = 1 then price[-i] = c[-i];
else
if $Price = 0 then price[-i] = o[-i];
end
end
line_mid = price;
//---------------function MMA---------------
//if CurrentBarIndex() = $period then
// res1 = price;
//if CurrentBarIndex() > $period then
//begin
// res1 = res1[1] + (price - res1[1]) /$period;
if IsFirstBar() then
begin
MovingAverage(close , MA ,$Period);
end
//-----------------------------------------
line_decal = MA [-$MMPeriod];
line_up = line_decal + $Perioda;
line_dn = line_decal - $Perioda;
if CurrentBarIndex() <= $period then
begin
line_up = void;
line_dn = void;
line_mid = void;
line_decal = void ;
end
if (price[1] < line_up[1]) and (price > line_up) then
begin
senti = 100;
if ($SendEmail = 1) then SendEmail("Buy signal","Buy signal EnvelopeMMA: " + SymbolName());
if ($PlaySound = 1) then Playsound("ring");
if ($MessageBox = 1) then MessageBox("Buy signal EnvelopeMMA: " + SymbolName());
end
if (price[1] > line_dn[1]) and (price < line_dn) then
begin
senti = 0;
if ($SendEmail = 1) then SendEmail("Sell signal","Sell signal EnvelopeMMA: " + SymbolName());
if ($PlaySound = 1) then Playsound("ring");
if ($MessageBox = 1) then MessageBox("Sell signal EnvelopeMMA: " + SymbolName());
end
interpretation
begin
sentiment = senti;
end
plot (line_up, lightblue, 1);
plot (line_dn, lightblue, 1);
plot(line_decal , lightblue,2);
- j'aime 2
Commentaire
-
Quand je lis vos codes je ne comprends pas grand chose ...
En PRT c'est un poil plus simple, dans la version avec les vraies MMC.
Question interprétation des extrapolations, je m'y suis fait par rapport à la méthode pure de Parisbox, cad un décalage de 16 sur les 3 MM et extrapolation en ligne droite en fonction des derniers points.
- pour les MMC :
// en variables réglables le nombre de points de décalage voulu sur M256 ( Y256 ) M128 ( Y128 ) M32 ( Y32 )
decay= 16
M256C=average[256](customclose)
drawtext(".",barindex[decay+112],M256C,serif,bold,30)coloured(142,68,173)
M256L = M256C - Y256
drawtext(".",barindex[decay+112],M256L,serif,bold,30)coloured(255,0,255)
M256H = M256C + Y256
drawtext(".",barindex[decay+112],M256H,serif,bold,30)coloured(255,0,255)
M128C=average[128](customclose)
drawtext(".",barindex[decay+48],M128C,serif,bold,30)coloured(243,156,18)
M128L = M128C - Y128
drawtext(".",barindex[decay+48],M128L,serif,bold,30)coloured(255,140,0)
M128H = M128C + Y128
drawtext(".",barindex[decay+48],M128H,serif,bold,30)coloured(255,140,0)
M32C=average[32](customclose)
drawtext(".",barindex[decay],M32C,serif,bold,30)coloured(50,205,50)
M32L = M32C - Y32
drawtext(".",barindex[decay],M32L,serif,bold,30)coloured(50,205,50)
M32H = M32C + Y32
drawtext(".",barindex[decay],M32H,serif,bold,30)coloured(50,205,50)
return
- pour les extensions calculées par itération des périodes plus courtes ( cf les files ) :
//
defparam drawonlastbaronly = true
decay1= 64
a=128
for i=1 to 64
M128=average[a-i](customclose)
drawtext("-",barindex[decay1-i],M128,serif,bold,30)coloured(255,140,0)
drawtext("-",barindex[decay1-i],M128+Y128,serif,bold,30)coloured(255,140,0)
drawtext("-",barindex[decay1-i],M128-Y128,serif,bold,30)coloured(255,140,0)
next
decay2= 128
b=256
for i=1 to 128
M256=average[b-i](customclose)
drawtext("-",barindex[decay2-i],M256,serif,bold,30)coloured(255,0,255)
drawtext("-",barindex[decay2-i],M256+Y256,serif,bold,30)coloured(255,0,255)
drawtext("-",barindex[decay2-i],M256-Y256,serif,bold,30)coloured(255,0,255)
next
decay3= 16
c=32
for i=1 to 16
M32=average[c-i](customclose)
drawtext("-",barindex[decay3-i],M32,serif,bold,30)coloured(50,205,50)
drawtext("-",barindex[decay3-i],M32+Y32,serif,bold,30)coloured(50,205,50)
drawtext("-",barindex[decay3-i],M32-Y32,serif,bold,30)coloured(50,205,50)
next
c1= M256 crosses over M128
c2=M256 crosses under M128
If c1 then
drawarrowup(barindex[64], M256 ) coloured(190,255,10)
endif
If c2 then
drawarrowdown(barindex[64], M256 ) coloured(190,255,10)
endif
return
et en passant un merci à Pilou1 qui m'a bien aidé pour les MMC avec sa ruse du "decay" ..." Le plus grand dérèglement de l'esprit consiste à voir les choses telles qu'on le veut et non pas telles qu'elles sont " - Bossuet
----
trade what you see, not what you think, motherfucker !
----
“C’est pas parce qu’ils sont nombreux à avoir tort qu’ils ont raison.” - Coluche
- j'aime 2
Commentaire
-
" Le plus grand dérèglement de l'esprit consiste à voir les choses telles qu'on le veut et non pas telles qu'elles sont " - Bossuet
----
trade what you see, not what you think, motherfucker !
----
“C’est pas parce qu’ils sont nombreux à avoir tort qu’ils ont raison.” - Coluche
Commentaire
-
Gooood Moorning
Les missiles ne volent pas encore : Orange One n'est pas pressé .... ( facile celle là ) ou peut être attends t il simplement que les marchés aient un w/e pour digérer la chose ?
Réponse demain matin
" Le plus grand dérèglement de l'esprit consiste à voir les choses telles qu'on le veut et non pas telles qu'elles sont " - Bossuet
----
trade what you see, not what you think, motherfucker !
----
“C’est pas parce qu’ils sont nombreux à avoir tort qu’ils ont raison.” - Coluche
Commentaire
-
L'ouverture de 08H00 va se faire près de VAH : à voir si ce niveau est cassé ou bien si rejet et test vers le bas en direction de R1W
Je prévois un short sur 450 si on y va dans les 2/3 premières minutes , car niveau R2 d'hier ( 451 ) si le KST en UT1 passe au dessus de sa Bol 100" Le plus grand dérèglement de l'esprit consiste à voir les choses telles qu'on le veut et non pas telles qu'elles sont " - Bossuet
----
trade what you see, not what you think, motherfucker !
----
“C’est pas parce qu’ils sont nombreux à avoir tort qu’ils ont raison.” - Coluche
Commentaire
-
" Le plus grand dérèglement de l'esprit consiste à voir les choses telles qu'on le veut et non pas telles qu'elles sont " - Bossuet
----
trade what you see, not what you think, motherfucker !
----
“C’est pas parce qu’ils sont nombreux à avoir tort qu’ils ont raison.” - Coluche
Commentaire
-
" Le plus grand dérèglement de l'esprit consiste à voir les choses telles qu'on le veut et non pas telles qu'elles sont " - Bossuet
----
trade what you see, not what you think, motherfucker !
----
“C’est pas parce qu’ils sont nombreux à avoir tort qu’ils ont raison.” - Coluche
Commentaire
-
Font chier ces algos ...
Pris short sur IBH / 478 -- stop serré sur 483 because la vol est faible cible : retour sur VAH / 443
Edit : stoppé" Le plus grand dérèglement de l'esprit consiste à voir les choses telles qu'on le veut et non pas telles qu'elles sont " - Bossuet
----
trade what you see, not what you think, motherfucker !
----
“C’est pas parce qu’ils sont nombreux à avoir tort qu’ils ont raison.” - Coluche
Commentaire
Commentaire