Conversion indicateur MT4 – ASCT rend_Sound.mq4

• 01/11/2021 at 7:18 PM #157392
  Marie-Eve Vergoz

  Bonsoir Nicolas, Bonsoir toute l’équipe,

  Avant de commencer, je me permets de vous souhaiter une bonne année et de l’optimisme pour passer cette période difficile sur le plan sanitaire et humain.

  Pouvez-vous, s’il vous plaît, traduire ce code qui permet de détecter les mouvements de marchés comme indiqué sur le graph joint  – Dax – ut1′ – il est valable toutes uts.

  J’espère avoir fait les bonnes manipulations et avoir mis cette demande dans la bonne file (je me trompe toujours).

  Je reste à votre disposition pour toute autre information qui vous serait nécessaire.

  Merci

  Bien sincèrement

  

  Marie-Eve Vergoz

  Participant

  Topics: 26

  Replies: 102

  Been thanked: 11 times
  01/11/2021 at 7:29 PM #157396
  Marie-Eve Vergoz

  https://www.stockmaniacs.net/asctrend-mt4-indicator-asctrend-indicator-download/

  Quelques informations concernant cet indicateur

  

  Marie-Eve Vergoz

  Participant

  Topics: 26

  Replies: 102

  Been thanked: 11 times
  01/12/2021 at 9:29 AM #157456
  Nicolas

  J’ai ajouté cette conversion à ma liste, merci pour ta patience.

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4774 times
  01/13/2021 at 1:49 PM #157650
  Nicolas

  L’indicateur ASCTrend pour ProRealTime est disponible ici : ASCTrend

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4774 times
  01/13/2021 at 5:31 PM #157679
  Marie-Eve Vergoz

  Bonsoir Nicolas

  Merci infiniment – toujours rapide en dépit de votre charge de travail – Cela semble tout à fait exact –

  Merci encore

   

  Cordialement

  

  Marie-Eve Vergoz

  Participant

  Topics: 26

  Replies: 102

  Been thanked: 11 times
  01/30/2021 at 3:45 PM #159925
  ipbvba

  Bonjour Nicolas,

  Cet indicateur est une aide précieuse.

  Pouvez-vous également établir un screener utilisant cette donnée? Surtout pour le signal achat (en ce qui m concerne)?

  Merci de votre aide car j’en serais incapable.

  Bonne journée,

  Patrick

  

  ipbvba

  Participant

  Topics: 4

  Replies: 11

  Been thanked: 1 time
  02/01/2021 at 10:30 AM #160024
  Nicolas

  Ci-dessous le code du screener qui détecte les signaux haussiers et baissiers du ASCTrend:

  // --- settings RISK=3 // --- end of settings value10=3+RISK*2 x1=67+RISK x2=33-RISK value11=value10 shift=0//CountBars-11-1 buysig=0 sellsig = 0 Counter=shift iRange=0.0 AvgRange=0.0 for Counter=shift to shift+9 do AvgRange=AvgRange+Abs(High[Counter]-Low[Counter]) next iRange=AvgRange/10 Counter=shift TrueCount=0 while (Counter<shift+9 and TrueCount<1) do if (Abs(Open[Counter]-Close[Counter+1])>=iRange*2.0) then TrueCount=TrueCount+1 endif Counter=Counter+1 wend if (TrueCount>=1) then MRO1=Counter else MRO1=-1 endif Counter=shift TrueCount=0 while (Counter<shift+6 and TrueCount<1) do if (Abs(Close[Counter+3]-Close[Counter])>=iRange*4.6) then TrueCount=TrueCount+1 endif Counter=Counter+1 wend if (TrueCount>=1) then MRO2=Counter else MRO2=-1 endif if (MRO1>-1) then value11=3 else value11=value10 endif if (MRO2>-1) then value11=4 else value11=value10 endif value2=100-Abs(Williams[value11](close)[shift]) // PercentR(value11=9) //$Tablevalue2[shift]=value2 //$val1[shift]=0 //$val2[shift]=0 //value3=0 if (value2<x2) then //signals if value2[1]>x2[1] and lastsig>=0 then sellsig = 1 lastsig = -1 endif endif if (value2>x1) then //signals if value2[1]<x1[1] and lastsig<=0 then buysig = 1 lastsig = 1 endif endif screener[buysig or sellsig]

  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 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84

  // --- settings RISK=3 // --- end of settings   value10=3+RISK*2 x1=67+RISK x2=33-RISK value11=value10   shift=0//CountBars-11-1 buysig=0 sellsig = 0   Counter=shift iRange=0.0 AvgRange=0.0 for Counter=shift to shift+9 do AvgRange=AvgRange+Abs(High[Counter]-Low[Counter]) next   iRange=AvgRange/10 Counter=shift TrueCount=0 while (Counter<shift+9 and TrueCount<1) do if (Abs(Open[Counter]-Close[Counter+1])>=iRange*2.0) then TrueCount=TrueCount+1 endif Counter=Counter+1 wend if (TrueCount>=1) then MRO1=Counter else MRO1=-1 endif   Counter=shift TrueCount=0 while (Counter<shift+6 and TrueCount<1) do if (Abs(Close[Counter+3]-Close[Counter])>=iRange*4.6) then TrueCount=TrueCount+1 endif Counter=Counter+1 wend if (TrueCount>=1) then MRO2=Counter else MRO2=-1 endif     if (MRO1>-1) then value11=3 else value11=value10 endif if (MRO2>-1) then value11=4 else value11=value10 endif   value2=100-Abs(Williams[value11](close)[shift]) // PercentR(value11=9) //$Tablevalue2[shift]=value2 //$val1[shift]=0 //$val2[shift]=0 //value3=0   if (value2<x2) then //signals if value2[1]>x2[1] and lastsig>=0 then sellsig = 1 lastsig = -1 endif endif   if (value2>x1) then //signals if value2[1]<x1[1] and lastsig<=0 then buysig = 1 lastsig = 1 endif endif   screener[buysig or sellsig]

   

  1 user thanked author for this post.

  PLermite

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4774 times
  02/13/2021 at 3:54 PM #161308
  BenL

  Bonjour,

  Merci pour ce code screener.

  Comment faire pour le diviser en 2 afin d’avoir un screener achat et un screener vente ?

  Merci

  

  BenL

  Participant

  Topics: 1

  Replies: 5

  Been thanked: 1 time
  02/13/2021 at 4:09 PM #161310
  BenL

  BenL wrote:

  Bonjour,

  Merci pour ce code screener.

  Comment faire pour le diviser en 2 afin d’avoir un screener achat et un screener vente ?

  Merci

  J’ai trouvé en modifiant le code, désolé je découvre mais c’était très simple en fait !

  

  BenL

  Participant

  Topics: 1

  Replies: 5

  Been thanked: 1 time
  02/15/2021 at 6:24 PM #161523
  BenL

  Bonjour,

  Il doit y avoir quelque chose que je ne maitrise pas.

  Quand j’observe le graphique de TOTAL, j’ai un signal d’achat qui est apparu aujourd’hui.

  Cependant, quand je lance le code du screener, il ne détecte pas TOTAL et me ressort la liste d’hier.

  Pouvez-vous m’expliquer ce que je fais mal ?

  

  BenL

  Participant

  Topics: 1

  Replies: 5

  Been thanked: 1 time
  02/17/2021 at 7:49 PM #161850
  ipbvba

  Bonjour Nicolas,

  Merci beaucoup pour ce travail cependant je ne comprends pas vraiment ce qu’il selectionne.

  Il faudrait avoir une liste (screener) et à chaque fois qu’un nouveau signal apparait en 1H/4H/1J (selon choix) depuis le dernier court de cloture (donc moins de 24h) alors l’action vient s’ajouter à la liste. Est-ce possible?

  Pour l’instant j’ai l’impression qu’il n’y a aucune limite de temps, pouvez-vous donc expliquer ce que le screener trie?

  Merci,

  Patrick

  

  ipbvba

  Participant

  Topics: 4

  Replies: 11

  Been thanked: 1 time
  02/18/2021 at 8:50 AM #161885
  Nicolas

  @BenL

  Rien fait de mal, mais je suppose que tu utilises un compte gratuit “fin de journée”, donc les résultats sont décalés d’une journée.

  
  @ipbvba

  La détection se fait sur la bougie courante, donc tant que la bougie n’est pas clôturé le signal peut disparaître.

  Pour détecter les signaux de bougies clôturées (soit celle précédente), il faut changer la dernière ligne par :

  screener[buysig[1] or sellsig[1]]

  1	screener[buysig[1] or sellsig[1]]

   

   

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4774 times
  02/20/2021 at 11:26 AM #162085
  ipbvba

  Bonjour Nicolas,

  Merci cela devient beaucoup plus concret.

  1/ Si je ne veux que les signaux buying, je supprime la partie code selling dans la dernière ligne et cela doit fonctionner?

  2/ Je souhaiterais afiner le screener pour qu’il ne me montre que le départ de tendance donc uniquement les actions pour lesquelles une fleche bleue (donc validé) est affichée sur le graphique des cours. Est-ce possible? Je comprends que pour l’instant il n’affiche pas que ce départ de tendance mais toutes les bougies entrant dans le critère de tendance.

  Encore félicitations pour votre travail!

  Patrick

  

  ipbvba

  Participant

  Topics: 4

  Replies: 11

  Been thanked: 1 time
  02/22/2021 at 10:07 AM #162319
  Nicolas

  1/ le code ci-dessous ne screen que les signaux de flèches bleus (haussier)

  // --- settings RISK=3 // --- end of settings value10=3+RISK*2 x1=67+RISK x2=33-RISK value11=value10 shift=0//CountBars-11-1 buysig=0 //sellsig = 0 Counter=shift iRange=0.0 AvgRange=0.0 for Counter=shift to shift+9 do AvgRange=AvgRange+Abs(High[Counter]-Low[Counter]) next iRange=AvgRange/10 Counter=shift TrueCount=0 while (Counter<shift+9 and TrueCount<1) do if (Abs(Open[Counter]-Close[Counter+1])>=iRange*2.0) then TrueCount=TrueCount+1 endif Counter=Counter+1 wend if (TrueCount>=1) then MRO1=Counter else MRO1=-1 endif Counter=shift TrueCount=0 while (Counter<shift+6 and TrueCount<1) do if (Abs(Close[Counter+3]-Close[Counter])>=iRange*4.6) then TrueCount=TrueCount+1 endif Counter=Counter+1 wend if (TrueCount>=1) then MRO2=Counter else MRO2=-1 endif if (MRO1>-1) then value11=3 else value11=value10 endif if (MRO2>-1) then value11=4 else value11=value10 endif value2=100-Abs(Williams[value11](close)[shift]) // PercentR(value11=9) //$Tablevalue2[shift]=value2 //$val1[shift]=0 //$val2[shift]=0 //value3=0 if (value2<x2) then //signals if value2[1]>x2[1] and lastsig>=0 then //sellsig = 1 lastsig = -1 endif endif if (value2>x1) then //signals if value2[1]<x1[1] and lastsig<=0 then buysig = 1 lastsig = 1 endif endif screener[buysig]

  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 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84

  // --- settings RISK=3 // --- end of settings   value10=3+RISK*2 x1=67+RISK x2=33-RISK value11=value10   shift=0//CountBars-11-1 buysig=0 //sellsig = 0   Counter=shift iRange=0.0 AvgRange=0.0 for Counter=shift to shift+9 do AvgRange=AvgRange+Abs(High[Counter]-Low[Counter]) next   iRange=AvgRange/10 Counter=shift TrueCount=0 while (Counter<shift+9 and TrueCount<1) do if (Abs(Open[Counter]-Close[Counter+1])>=iRange*2.0) then TrueCount=TrueCount+1 endif Counter=Counter+1 wend if (TrueCount>=1) then MRO1=Counter else MRO1=-1 endif   Counter=shift TrueCount=0 while (Counter<shift+6 and TrueCount<1) do if (Abs(Close[Counter+3]-Close[Counter])>=iRange*4.6) then TrueCount=TrueCount+1 endif Counter=Counter+1 wend if (TrueCount>=1) then MRO2=Counter else MRO2=-1 endif     if (MRO1>-1) then value11=3 else value11=value10 endif if (MRO2>-1) then value11=4 else value11=value10 endif   value2=100-Abs(Williams[value11](close)[shift]) // PercentR(value11=9) //$Tablevalue2[shift]=value2 //$val1[shift]=0 //$val2[shift]=0 //value3=0   if (value2<x2) then //signals if value2[1]>x2[1] and lastsig>=0 then //sellsig = 1 lastsig = -1 endif endif   if (value2>x1) then //signals if value2[1]<x1[1] and lastsig<=0 then buysig = 1 lastsig = 1 endif endif   screener[buysig]

  Les codes donnent le signal sur la bougie courante, si tu constates un décalage d’une bougie, c’est par ce que tu utilises la version gratuite de PRT en données fin de journée.

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4774 times
  02/25/2021 at 1:53 PM #162618
  reb

  Bonjour Nicolas,

   

  Je trouve cet indicateur très intéressant et je souhaitais l’avoir sous forme d’oscillateur (+1/-1) pour l’utiliser sous le graphique

  J’ai donc enlevé uniquement les drawarrow en les remplaçant par une variable qui vaut 1 ou -1 suivant le cas et ajouté cette variable dans le “return”

  Or le résultat ne donne rien

  ai je fait une erreur ?

  Reb

  

  reb

  Participant

  Topics: 15

  Replies: 158

  Been thanked: 28 times
• Author
  Posts