Modification code Nadaraya

• 09/19/2023 at 10:54 AM #221262
  Sofitech

  Bonjour à tous. Comment modifier ce code pour qu’il propose des liens hautes et basses détectables sur des alertes PRT plutôt que des points…?
  Vous remerciant par avance.

  //Nadaraya-Watson Envelope defparam drawonlastbaronly = true length = 500//Window Size hh = 8 //Bandwidth mult = 0.45 src = Close n = barindex k = 2 if IsLastBarUpdate then y2 = 0 sume = 0 for i = 0 to length-1 sum = 0 sumw = 0 for j = 0 to length-1 w = EXP(-pow(i-j,2)/(hh*hh*2)) sum = sum+src[j]*w sumw = sumw+w next y2 = sum/sumw sume = sume+abs(src[i] - y2) $a[barindex-i]=y2 //DRAWPOINT(barindex-i, y2, 1) next mae = sume/(length*mult) for i=0 to length-1 DRAWPOINT(barindex-i, $a[barindex-i]-mae, 1) coloured(0,255,0,100) DRAWPOINT(barindex-i, $a[barindex-i]+mae, 1) coloured(255,0,0,100) //if close[barindex-i] > ($a[barindex-i]+mae) then // and src[1]<y2[1]+mae then //drawarrowdown(barindex-i,high) coloured("red") //endif //if close[barindex-i] < ($a[barindex-i]-mae) then //and src[1]>y2[1]-mae then //drawarrowup(barindex-i,low) coloured("green") //endif next /*drawpoint(barindex,y2,1) drawpoint(barindex,y2+mae,1) drawpoint(barindex,y2-mae,1)*/ Y2High=$a[barindex]+mae Y2Low=$a[barindex]-mae endif return

  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

  //Nadaraya-Watson Envelope defparam drawonlastbaronly = true length = 500//Window Size hh      = 8 //Bandwidth mult   = 0.45   src    = Close n = barindex k = 2 if IsLastBarUpdate then y2 = 0 sume = 0 for i = 0 to length-1 sum = 0 sumw = 0          for j = 0 to length-1 w = EXP(-pow(i-j,2)/(hh*hh*2)) sum = sum+src[j]*w sumw = sumw+w next y2 = sum/sumw sume = sume+abs(src[i] - y2) $a[barindex-i]=y2 //DRAWPOINT(barindex-i, y2, 1)   next mae = sume/(length*mult) for i=0 to length-1   DRAWPOINT(barindex-i, $a[barindex-i]-mae, 1) coloured(0,255,0,100) DRAWPOINT(barindex-i, $a[barindex-i]+mae, 1) coloured(255,0,0,100) //if close[barindex-i] > ($a[barindex-i]+mae) then // and src[1]<y2[1]+mae then //drawarrowdown(barindex-i,high) coloured("red") //endif //if close[barindex-i] < ($a[barindex-i]-mae) then //and src[1]>y2[1]-mae then //drawarrowup(barindex-i,low) coloured("green") //endif next   /*drawpoint(barindex,y2,1) drawpoint(barindex,y2+mae,1) drawpoint(barindex,y2-mae,1)*/ Y2High=$a[barindex]+mae Y2Low=$a[barindex]-mae endif return

   

  

  Sofitech

  Participant

  Topics: 55

  Replies: 147

  Been thanked: 10 times
  09/22/2023 at 11:22 AM #221433
  JC_Bywan

  Bonjour,

  considérant que:

  1) pour être détectable par alerte, il faut renvoyer des valeurs en ligne return

  et 2) ces valeurs en temps réel a priori sont Y2high et Y2low

  alors il suffit de remplacer la ligne return “vide” par:

  return Y2Low, Y2High

  1	return Y2Low, Y2High

  et utiliser ces 2 valeur pour créer ses alertes.

  Mais on est bien d’accord que les points obtenus par drawpoint dans ce code repeignent sur les bougies de l’historique, c’est-à-dire que leur position en live sur la dernière barre va se déplacer sur cette même barre au fur et à mesure qu’elle glisse dans le passé. Donc, ne pas être surpris si à l’affichage les points “glissent” par rapport aux valeurs Y2high, Y2low qui elles ne bougent pas (ne repeignent pas) sur les barres où elles existent depuis le lancement de l’indicateur (car ont démarré en islastbarupdate).

  1 user thanked author for this post.

  Nicolas

  

  JC_Bywan

  Moderator

  Topics: 20

  Replies: 2649

  Been thanked: 915 times
  09/23/2023 at 11:42 AM #221472
  LaMaille

  Pour se rendre compte de l’effet “repaint”, il suffit de mettre la ligne 2 en commentaire avec “//” avant la ligne 2.

  //defparam drawonlastbaronly = true

  Les points hauts et bas vont alors se redessiner (sans être effacés au préalable à chaque bar). Ce qui permettra de se rendre compte que les point hauts et bas tels qu’ils sont détectés de prime abord ne sont pas aussi “exploitables” que ceux recalculés plusieurs bars plus loin (plus tard) une fois que le parcours réel des bougies est enfin connus…

  C’est facile de tracer une enveloppe parfaite une fois que l’on connait la position exacte des bougies…

  

  LaMaille

  Participant

  Topics: 1

  Replies: 18

  Been thanked: 12 times
  12/27/2023 at 10:52 AM #225723
  Matriciel

  Bonjour à tous,

  J’aimerais avoir l’instruction “drawsegment” à la place de “drawpoint” afin de tracer des segments en lieu et place des points.

  J’ai fais ceci mais cela ne fonctionne pas :

  DRAWSEGMENT (barindex-i[1], $a[barindex-i][1], barindex-i, $a[barindex-i], 1) coloured(255,255,255)

  Pouvez-vous m’aider s’il-vous-plait ?

  MERCI !

  

  Matriciel

  Participant

  Topics: 25

  Replies: 110

  Been thanked: 24 times
  12/27/2023 at 11:30 AM #225725
  JC_Bywan

  Bonjour,

  tu peux essayer de remplacer les drawpoint par:

  DRAWSEGMENT(barindex-i-1, $a[barindex-i-1]-mae, barindex-i, $a[barindex-i]-mae) coloured(0,255,0,255)
  DRAWSEGMENT(barindex-i-1, $a[barindex-i-1]+mae, barindex-i, $a[barindex-i]+mae) coloured(255,0,0,255)

  (modifs: changé les tentatives avec [1] en -i-1, rajouté les + ou – mae)

  

  JC_Bywan

  Moderator

  Topics: 20

  Replies: 2649

  Been thanked: 915 times
  12/27/2023 at 11:44 AM #225726
  Matriciel

  Merci beaucoup JC !

  Cela fonctionne parfaitement.

  Passe de bonnes fêtes !   :o)

  1 user thanked author for this post.

  JC_Bywan

  

  Matriciel

  Participant

  Topics: 25

  Replies: 110

  Been thanked: 24 times
• Author
  Posts