Rettangoli automatici

• 09/21/2019 at 1:17 PM #108116
  Dario

  Buongiorno,

  avrei bisogno del codice per creare un indicatore che disegni un rettango da un determinato punto fino all’ultima candela presente sul grafico.

  Es. Se l’RSI rompo il livello di ipervenduto, l’indicatore deve creare un rettangolo su tutto il corpo della candela e protrarlo nel tempo.

  Allego uno screen esplicativo.

  Grazie a chi mi aiuterà

  

  Dario

  Participant

  Topics: 4

  Replies: 12

  Been thanked: 0 times
  09/21/2019 at 2:07 PM #108119
  robertogozzi

  Eccolo:

  IF barindex = 0 THEN RsiFlag = 0 ENDIF IF Rsi[14](close) CROSSES UNDER 30 then RsiFlag = 1 Barra = BarIndex Massimo = high Minimo = low ENDIF IF RsiFlag = 1 THEN DRAWRECTANGLE(Barra,Massimo,BarIndex,Minimo) COLOURED(0,0,0,0) ENDIF RETURN

  1 2 3 4 5 6 7 8 9 10 11 12 13

  IF barindex = 0 THEN    RsiFlag = 0 ENDIF IF Rsi[14](close) CROSSES UNDER 30 then    RsiFlag = 1    Barra   = BarIndex    Massimo = high    Minimo  = low ENDIF IF RsiFlag = 1 THEN    DRAWRECTANGLE(Barra,Massimo,BarIndex,Minimo) COLOURED(0,0,0,0) ENDIF RETURN

   

  1 user thanked author for this post.

  Dario

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 16466

  Been thanked: 3641 times
  09/21/2019 at 10:18 PM #108130
  Dario

  Infinite grazie Roberto, ma il mio problema era riuscire a mantenere disegnato il rettangolo anche quando se ne crea un successivo.

  Quello che mi interessava è proprio la sovrapposizione dei rettangoli che creano una zona di supp/resistenza.

  Ovviamente per non “intasare” il grafico avevo pensato di filtrare con un comando che conteggiasse solo le ultime 500 barre.

  Secondo te c’è un modo per farli sovrapporre invece di annullare il precedente rettangolo e crearne uno nuovo?

  

  Dario

  Participant

  Topics: 4

  Replies: 12

  Been thanked: 0 times
  09/22/2019 at 10:45 PM #108191
  robertogozzi

  Si può fare in maniera limitata.

  PRT non supporta i vettori, quindi bisogna preimpostare non tanto le barre, quanto i rettangoli che vuoi siano visualizzati. Io te lo farò per gli ultimi 3 rettangoli, poi tu potrai aumentarli a piacimento aggiungendo del codice.

   

  1 user thanked author for this post.

  Dario

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 16466

  Been thanked: 3641 times
  09/23/2019 at 11:43 AM #108235
  robertogozzi

  Eccolo:

  DEFPARAM DrawOnLastBarOnly = true IF barindex = 0 THEN RsiFlag = 0 Barra1 = 1 Barra2 = 0 Barra3 = 0 Minimo1 = 0 Minimo2 = 0 Minimo3 = 0 Massimo1= 0 Massimo2= 0 Massimo3= 0 ENDIF IF Rsi[14](close) CROSSES UNDER 30 then RsiFlag = 1 Barra3 = Barra2 Barra2 = Barra1 Barra1 = BarIndex Massimo3= Massimo2 Massimo2= Massimo1 Massimo1= high Minimo3 = Minimo2 Minimo2 = Minimo1 Minimo1 = low ENDIF IF RsiFlag = 1 THEN IF Barra3 > 0 THEN DRAWRECTANGLE(Barra3,Massimo3,BarIndex,Minimo3) COLOURED(0,0,0,0) ENDIF IF Barra2 > 0 THEN DRAWRECTANGLE(Barra2,Massimo2,BarIndex,Minimo2) COLOURED(0,0,0,0) ENDIF IF Barra1 > 0 THEN DRAWRECTANGLE(Barra1,Massimo1,BarIndex,Minimo1) COLOURED(0,0,0,0) ENDIF 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

  DEFPARAM DrawOnLastBarOnly = true IF barindex = 0 THEN    RsiFlag = 0    Barra1  = 1    Barra2  = 0    Barra3  = 0    Minimo1 = 0    Minimo2 = 0    Minimo3 = 0    Massimo1= 0    Massimo2= 0    Massimo3= 0 ENDIF IF Rsi[14](close) CROSSES UNDER 30 then    RsiFlag = 1    Barra3  = Barra2    Barra2  = Barra1    Barra1  = BarIndex    Massimo3= Massimo2    Massimo2= Massimo1    Massimo1= high    Minimo3 = Minimo2    Minimo2 = Minimo1    Minimo1 = low ENDIF IF RsiFlag = 1 THEN    IF Barra3 > 0 THEN       DRAWRECTANGLE(Barra3,Massimo3,BarIndex,Minimo3) COLOURED(0,0,0,0)    ENDIF    IF Barra2 > 0 THEN       DRAWRECTANGLE(Barra2,Massimo2,BarIndex,Minimo2) COLOURED(0,0,0,0)    ENDIF    IF Barra1 > 0 THEN       DRAWRECTANGLE(Barra1,Massimo1,BarIndex,Minimo1) COLOURED(0,0,0,0)    ENDIF ENDIF RETURN

  Come puoi vedere ogni volta che l’RSI entra in ipervenduto scala di un posto a tutti i rettangoli per fare posto a quello nuovo. Basta che tu ne aggiunga altri, 4, 5, 6, quelli che desideri e li vedrai tutti sul grafico.

  Devi scrivere un pò di righe, ma è semplice.

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 16466

  Been thanked: 3641 times
  09/23/2019 at 12:26 PM #108251
  Dario

  Fantastico, grazie mille Roberto!
  Penso che questo indicatore possa essere molto utile nell’individuazione zone di retest.
  Ovviamente và duplicato anche per gli iper-comprati.

  

  Dario

  Participant

  Topics: 4

  Replies: 12

  Been thanked: 0 times
  09/23/2019 at 2:29 PM #108272
  robertogozzi

  Per l’ipercomprato lo duplichi con un nome diverso e basta che metti CROSSES OVER 70 invece di CROSSES UNDER 30.

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 16466

  Been thanked: 3641 times
  09/23/2019 at 4:04 PM #108284
  Dario

  Si..si..
  stavo pensando, ma secondo te è possibile utilizzare un ciclo per duplicarli?

   

  

  Dario

  Participant

  Topics: 4

  Replies: 12

  Been thanked: 0 times
  09/23/2019 at 4:25 PM #108286
  robertogozzi

  Un ciclo sarebbe utile e semplice se ci fossero i vettori, così puoi utilizzarne quanti vuoi ma senza cicli.

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 16466

  Been thanked: 3641 times
• Author
  Posts