Max min con estensioni

• 05/14/2019 at 2:31 PM #98485
  robertogozzi

  Basta aggiungere un’ulteriore variabile da aggiornare al cambio del giorno (non l’ho provato):

  Secondo giorno precedente

  DEFPARAM DrawOnLastBarOnly = true IF OpenTime >= 080000 AND OpenTime <= 220000 THEN IF OpenTime = 080000 THEN MinimoPrec2 = MinimoPrec MassimoPrec2 = MassimoPrec MinimoPrec = Minimo MassimoPrec = Massimo Sopra10Prec2 = Sopra10Prec Sotto10Prec2 = Sotto10Prec Sopra10Prec = Sopra10 Sotto10Prec = Sotto10 Minimo = low Massimo = high Inizio = BarIndex ENDIF Massimo = max(Massimo, high) Minimo = min(Minimo, low) ENDIF IF OpenTime >= 080000 AND OpenTime <= 140000 THEN Estensione = (Massimo – Minimo) * 0.1 //10% Sopra10 = Massimo + Estensione Sotto10 = Minimo – Estensione ENDIF DRAWSEGMENT(Inizio,MassimoPrec2,BarIndex,MassimoPrec2) coloured(0,201,87,255) DRAWTEXT(” #MassimoPrec2#”, barindex,MassimoPrec2, SansSerif,Bold,10) coloured(0,201,87,255) DRAWSEGMENT(Inizio,MinimoPrec2 ,BarIndex,MinimoPrec2) coloured(0,201,87,255) DRAWTEXT(” #MinimoPrec2#” , barindex, MinimoPrec2, SansSerif,Bold,10) coloured(0,201,87,255) DRAWSEGMENT(Inizio,Sopra10Prec2,BarIndex,Sopra10Prec2) coloured(218,165,32,255) DRAWTEXT(” #Sopra10Prec2#”, barindex, Sopra10Prec2, SansSerif,Bold,10)coloured(218,165,32,255) DRAWSEGMENT(Inizio,Sotto10Prec2,BarIndex,Sotto10Prec2) coloured(218,165,32,255) DRAWTEXT(” #Sotto10Prec2#”, barindex, Sotto10Prec2, SansSerif,Bold,10)coloured(218,165,32,255) 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

  DEFPARAM DrawOnLastBarOnly = true IF OpenTime >= 080000 AND OpenTime <= 220000 THEN    IF OpenTime = 080000 THEN       MinimoPrec2 = MinimoPrec       MassimoPrec2 = MassimoPrec       MinimoPrec = Minimo       MassimoPrec = Massimo       Sopra10Prec2 = Sopra10Prec       Sotto10Prec2 = Sotto10Prec       Sopra10Prec = Sopra10       Sotto10Prec = Sotto10       Minimo = low       Massimo = high       Inizio = BarIndex    ENDIF    Massimo = max(Massimo, high)    Minimo = min(Minimo, low) ENDIF IF OpenTime >= 080000 AND OpenTime <= 140000 THEN    Estensione = (Massimo – Minimo) * 0.1 //10%    Sopra10 = Massimo + Estensione    Sotto10 = Minimo – Estensione ENDIF DRAWSEGMENT(Inizio,MassimoPrec2,BarIndex,MassimoPrec2) coloured(0,201,87,255) DRAWTEXT(” #MassimoPrec2#”, barindex,MassimoPrec2, SansSerif,Bold,10) coloured(0,201,87,255) DRAWSEGMENT(Inizio,MinimoPrec2 ,BarIndex,MinimoPrec2) coloured(0,201,87,255) DRAWTEXT(” #MinimoPrec2#” , barindex, MinimoPrec2, SansSerif,Bold,10) coloured(0,201,87,255) DRAWSEGMENT(Inizio,Sopra10Prec2,BarIndex,Sopra10Prec2) coloured(218,165,32,255) DRAWTEXT(” #Sopra10Prec2#”, barindex, Sopra10Prec2, SansSerif,Bold,10)coloured(218,165,32,255) DRAWSEGMENT(Inizio,Sotto10Prec2,BarIndex,Sotto10Prec2) coloured(218,165,32,255) DRAWTEXT(” #Sotto10Prec2#”, barindex, Sotto10Prec2, SansSerif,Bold,10)coloured(218,165,32,255) RETURN

  Per fare l’altra cosa con RETURN dovrai aggiornare la riga come segue:

  RETURN MassimoPrec2,MinimoPrec2,Sopra10Prec2,Sotto10Prec2

  1	RETURN MassimoPrec2,MinimoPrec2,Sopra10Prec2,Sotto10Prec2

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17138

  Been thanked: 4031 times
  05/18/2019 at 4:13 PM #98789
  Marcotrading

  Salve Roberto buongiorno. appena provato il codice e funziona alla grande.

  Un ultima domanda. Se volessi ottenere il max e minimo della settimana precedente con relative estensioni, come fare?

  Grazie anticipata per la tua umile disponibilità

  

  Marcotrading

  Participant

  Topics: 6

  Replies: 25

  Been thanked: 0 times
  05/18/2019 at 7:46 PM #98801
  robertogozzi

  Te lo farò lunedì. Buon fine settimana.

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17138

  Been thanked: 4031 times
  05/20/2019 at 9:21 AM #98867
  robertogozzi

  Provalo, mi sembra funzioni:

  Settimana precedente

  DEFPARAM CalculateOnLastBars = 1000 DEFPARAM DrawOnLastBarOnly = true IF OpenTime >= 080000 AND OpenTime <= 220000 THEN IF OpenTime = 080000 THEN IF OpenDayOfWeek = 1 THEN MinimoPrec = Minimo MassimoPrec = Massimo Sopra10Prec = Sopra10 Sotto10Prec = Sotto10 Minimo = low Massimo = high Inizio = BarIndex ENDIF ENDIF Massimo = max(Massimo, high) Minimo = min(Minimo, low) ENDIF IF OpenTime >= 080000 AND OpenTime <= 140000 THEN Estensione = (Massimo - Minimo) * 0.1 //10% Sopra10 = Massimo + Estensione Sotto10 = Minimo - Estensione ENDIF DRAWSEGMENT(Inizio,MassimoPrec,BarIndex,MassimoPrec) coloured(0,201,87,255) DRAWTEXT(" #MassimoPrec#", barindex,MassimoPrec, SansSerif,Bold,10) coloured(0,201,87,255) DRAWSEGMENT(Inizio,MinimoPrec ,BarIndex,MinimoPrec) coloured(0,201,87,255) DRAWTEXT(" #MinimoPrec#" , barindex, MinimoPrec, SansSerif,Bold,10) coloured(0,201,87,255) DRAWSEGMENT(Inizio,Sopra10Prec,BarIndex,Sopra10Prec) coloured(218,165,32,255) DRAWTEXT(" #Sopra10Prec#", barindex, Sopra10Prec, SansSerif,Bold,10)coloured(218,165,32,255) DRAWSEGMENT(Inizio,Sotto10Prec,BarIndex,Sotto10Prec) coloured(218,165,32,255) DRAWTEXT(" #Sotto10Prec#", barindex, Sotto10Prec, SansSerif,Bold,10)coloured(218,165,32,255) 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

  DEFPARAM CalculateOnLastBars = 1000 DEFPARAM DrawOnLastBarOnly   = true IF OpenTime >= 080000 AND OpenTime <= 220000 THEN    IF OpenTime = 080000 THEN       IF OpenDayOfWeek = 1 THEN          MinimoPrec  = Minimo          MassimoPrec = Massimo          Sopra10Prec = Sopra10          Sotto10Prec = Sotto10          Minimo  = low          Massimo = high          Inizio  = BarIndex       ENDIF    ENDIF    Massimo = max(Massimo, high)    Minimo  = min(Minimo, low) ENDIF IF OpenTime >= 080000 AND OpenTime <= 140000 THEN    Estensione = (Massimo - Minimo) * 0.1              //10%    Sopra10    = Massimo  + Estensione    Sotto10    = Minimo   - Estensione ENDIF DRAWSEGMENT(Inizio,MassimoPrec,BarIndex,MassimoPrec)                                 coloured(0,201,87,255) DRAWTEXT("                 #MassimoPrec#", barindex,MassimoPrec, SansSerif,Bold,10)  coloured(0,201,87,255) DRAWSEGMENT(Inizio,MinimoPrec ,BarIndex,MinimoPrec)                                  coloured(0,201,87,255) DRAWTEXT("                 #MinimoPrec#" , barindex, MinimoPrec, SansSerif,Bold,10)  coloured(0,201,87,255) DRAWSEGMENT(Inizio,Sopra10Prec,BarIndex,Sopra10Prec) coloured(218,165,32,255) DRAWTEXT("                  #Sopra10Prec#", barindex, Sopra10Prec, SansSerif,Bold,10)coloured(218,165,32,255) DRAWSEGMENT(Inizio,Sotto10Prec,BarIndex,Sotto10Prec) coloured(218,165,32,255) DRAWTEXT("                  #Sotto10Prec#", barindex, Sotto10Prec, SansSerif,Bold,10)coloured(218,165,32,255) RETURN

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17138

  Been thanked: 4031 times
  08/03/2022 at 8:57 AM #198396
  Marcotrading

  Ciao Roberto buongiorno. Vorrei lo stesso indicatore che mi tracci le estensioni, pero’ questa volta non calcolate sul max e minimo del giono precedente, ma bensi’ calcolate con il max e minimo candela che viene identificata con il maggior picco di atr a 5 periodi della giornata che si viene a creare dalle ore 10:00 alle ore 17:00.

  è lo stesso indicatore, solo che dovremmo inserire l’atr per calcolare il max e minimo candela. potresti aiutarmi? grazie

  

  Marcotrading

  Participant

  Topics: 6

  Replies: 25

  Been thanked: 0 times
  08/09/2022 at 11:52 AM #198809
  Marcotrading

  Roberto ti allego un’immagine in modo tale che cio’ che ho scritto sia piu’ comprensibile.

  Grazie

  

  Marcotrading

  Participant

  Topics: 6

  Replies: 25

  Been thanked: 0 times
  08/10/2022 at 11:46 AM #198868
  robertogozzi

  Eccolo:

  DEFPARAM CalculateOnLastBars = 1000 DEFPARAM DrawOnLastBarOnly = true // //ONCE atrP = 5 //ONCE OraInizio = 100000 //ONCE OraFine = 170000 //ONCE EstenzionePerCent = 1.0 // ATR = AverageTrueRange[atrP](close) IF OpenTime >= OraInizio AND OpenTime <= OraFine THEN IF OpenTime = OraInizio THEN MyAtr = ATR Massimo = high Minimo = low Inizio = BarIndex ENDIF ENDIF IF OpenTime >= OraInizio AND OpenTime <= OraFine THEN MyAtr = max(ATR,MyAtr) IF MyAtr <> MyAtr[1] THEN Massimo = high Minimo = low //Inizio = BarIndex ENDIF Sopra = Massimo + (Massimo * (EstenzionePerCent / 100)) Sotto = Minimo - (Minimo * (EstenzionePerCent / 100)) ENDIF DRAWSEGMENT(Inizio,Massimo,BarIndex,Massimo) coloured(0,201,87,255) DRAWTEXT(" #Massimo#", barindex,Massimo, SansSerif,Bold,10) coloured(0,201,87,255) DRAWSEGMENT(Inizio,Minimo ,BarIndex,Minimo) coloured(0,201,87,255) DRAWTEXT(" #Minimo#" , barindex, Minimo, SansSerif,Bold,10) coloured(0,201,87,255) DRAWSEGMENT(Inizio,Sopra,BarIndex,Sopra) coloured(218,165,32,255) DRAWTEXT(" #Sopra#", barindex, Sopra, SansSerif,Bold,10)coloured(218,165,32,255) DRAWSEGMENT(Inizio,Sotto,BarIndex,Sotto) coloured(218,165,32,255) DRAWTEXT(" #Sotto#", barindex, Sotto, SansSerif,Bold,10)coloured(218,165,32,255) 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

  DEFPARAM CalculateOnLastBars = 1000 DEFPARAM DrawOnLastBarOnly   = true // //ONCE atrP              = 5 //ONCE OraInizio         = 100000 //ONCE OraFine           = 170000 //ONCE EstenzionePerCent = 1.0 // ATR = AverageTrueRange[atrP](close) IF OpenTime >= OraInizio AND OpenTime <= OraFine THEN    IF OpenTime = OraInizio THEN       MyAtr   = ATR       Massimo = high       Minimo  = low       Inizio  = BarIndex    ENDIF ENDIF IF OpenTime >= OraInizio AND OpenTime <= OraFine THEN    MyAtr      = max(ATR,MyAtr)    IF MyAtr <> MyAtr[1] THEN       Massimo = high       Minimo  = low       //Inizio  = BarIndex    ENDIF    Sopra = Massimo  + (Massimo  * (EstenzionePerCent / 100))    Sotto = Minimo   - (Minimo   * (EstenzionePerCent / 100)) ENDIF DRAWSEGMENT(Inizio,Massimo,BarIndex,Massimo)                                 coloured(0,201,87,255) DRAWTEXT("                 #Massimo#", barindex,Massimo, SansSerif,Bold,10)  coloured(0,201,87,255) DRAWSEGMENT(Inizio,Minimo ,BarIndex,Minimo)                                  coloured(0,201,87,255) DRAWTEXT("                 #Minimo#" , barindex, Minimo, SansSerif,Bold,10)  coloured(0,201,87,255) DRAWSEGMENT(Inizio,Sopra,BarIndex,Sopra) coloured(218,165,32,255) DRAWTEXT("                  #Sopra#", barindex, Sopra, SansSerif,Bold,10)coloured(218,165,32,255) DRAWSEGMENT(Inizio,Sotto,BarIndex,Sotto) coloured(218,165,32,255) DRAWTEXT("                  #Sotto#", barindex, Sotto, SansSerif,Bold,10)coloured(218,165,32,255) RETURN

  Inizia a stampare le linee dall’ora di INIZIO. Se preferisci stamparle solo dalla barra in cui fa il nuvomassimo ATR, basta che togli le barre iniziali dei commenti dalla riga 23.

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17138

  Been thanked: 4031 times
  08/10/2022 at 12:07 PM #198873
  Marcotrading

  Ciao Roberto, l’indicatore mi traccia perfettamente due linee su max e minimo candela identificata tramite ATR, ma non mi disegna le estensioni

  

  Marcotrading

  Participant

  Topics: 6

  Replies: 25

  Been thanked: 0 times
  08/10/2022 at 1:57 PM #198882
  robertogozzi

  Penso dipenda dalla percentuale, prova a restringere verticalmente il grafico (o indicare una percentuale più piccola).

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17138

  Been thanked: 4031 times
  08/11/2022 at 8:35 AM #198936
  Marcotrading

  Ciao Roberto buongiorno. L’indicatore mi traccia le linee, ma sballa un po la percentuale.

  Questo classici e cio’ quello che mi hai programmato un anno fa, va benissimo.

  Potresti aggiungere l’identificazione del max e minimo della candela con Atr a questo classico che mi hai già fatto? Ti allego il codice:

  DEFPARAM CalculateOnLastBars = 1000 DEFPARAM DrawOnLastBarOnly = true IF OpenTime >= 080000 AND OpenTime <= 220000 THEN IF OpenTime = 080000 THEN IF OpenDayOfWeek = 1 THEN MinimoPrec = Minimo MassimoPrec = Massimo Sopra10Prec = Sopra10 Sotto10Prec = Sotto10 Minimo = low Massimo = high Inizio = BarIndex ENDIF ENDIF Massimo = max(Massimo, high) Minimo = min(Minimo, low) ENDIF IF OpenTime >= 080000 AND OpenTime <= 140000 THEN Estensione = (Massimo - Minimo) * 0.1 //10% Sopra10 = Massimo + Estensione Sotto10 = Minimo - Estensione ENDIF DRAWSEGMENT(Inizio,MassimoPrec,BarIndex,MassimoPrec) coloured(0,201,87,255) DRAWTEXT(" #MassimoPrec#", barindex,MassimoPrec, SansSerif,Bold,10) coloured(0,201,87,255) DRAWSEGMENT(Inizio,MinimoPrec ,BarIndex,MinimoPrec) coloured(0,201,87,255) DRAWTEXT(" #MinimoPrec#" , barindex, MinimoPrec, SansSerif,Bold,10) coloured(0,201,87,255) DRAWSEGMENT(Inizio,Sopra10Prec,BarIndex,Sopra10Prec) coloured(218,165,32,255) DRAWTEXT(" #Sopra10Prec#", barindex, Sopra10Prec, SansSerif,Bold,10)coloured(218,165,32,255) DRAWSEGMENT(Inizio,Sotto10Prec,BarIndex,Sotto10Prec) coloured(218,165,32,255) DRAWTEXT(" #Sotto10Prec#", barindex, Sotto10Prec, SansSerif,Bold,10)coloured(218,165,32,255) 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

  DEFPARAM CalculateOnLastBars = 1000 DEFPARAM DrawOnLastBarOnly   = true IF OpenTime >= 080000 AND OpenTime <= 220000 THEN    IF OpenTime = 080000 THEN       IF OpenDayOfWeek = 1 THEN          MinimoPrec  = Minimo          MassimoPrec = Massimo          Sopra10Prec = Sopra10          Sotto10Prec = Sotto10          Minimo  = low          Massimo = high          Inizio  = BarIndex       ENDIF    ENDIF    Massimo = max(Massimo, high)    Minimo  = min(Minimo, low) ENDIF IF OpenTime >= 080000 AND OpenTime <= 140000 THEN    Estensione = (Massimo - Minimo) * 0.1              //10%    Sopra10    = Massimo  + Estensione    Sotto10    = Minimo   - Estensione ENDIF DRAWSEGMENT(Inizio,MassimoPrec,BarIndex,MassimoPrec)                                 coloured(0,201,87,255) DRAWTEXT("                 #MassimoPrec#", barindex,MassimoPrec, SansSerif,Bold,10)  coloured(0,201,87,255) DRAWSEGMENT(Inizio,MinimoPrec ,BarIndex,MinimoPrec)                                  coloured(0,201,87,255) DRAWTEXT("                 #MinimoPrec#" , barindex, MinimoPrec, SansSerif,Bold,10)  coloured(0,201,87,255) DRAWSEGMENT(Inizio,Sopra10Prec,BarIndex,Sopra10Prec) coloured(218,165,32,255) DRAWTEXT("                  #Sopra10Prec#", barindex, Sopra10Prec, SansSerif,Bold,10)coloured(218,165,32,255) DRAWSEGMENT(Inizio,Sotto10Prec,BarIndex,Sotto10Prec) coloured(218,165,32,255) DRAWTEXT("                  #Sotto10Prec#", barindex, Sotto10Prec, SansSerif,Bold,10)coloured(218,165,32,255) RETURN

   

  

  Marcotrading

  Participant

  Topics: 6

  Replies: 25

  Been thanked: 0 times
  08/11/2022 at 11:03 AM #198949
  robertogozzi

  In effetti avevo capito male la richiesta ed avevo cambiato il calcolo.

  Eccolo giusto:

  DEFPARAM CalculateOnLastBars = 1000 DEFPARAM DrawOnLastBarOnly = true // //ONCE atrP = 5 //ONCE OraInizio = 100000 //ONCE OraFine = 170000 //ONCE EstenzionePerCent = 30.0 // ATR = AverageTrueRange[atrP](close) IF OpenTime >= OraInizio AND OpenTime <= OraFine THEN IF OpenTime = OraInizio THEN MyAtr = ATR Massimo = high Minimo = low Inizio = BarIndex ENDIF MyAtr = max(ATR,MyAtr) IF MyAtr <> MyAtr[1] THEN Massimo = high Minimo = low //Inizio = BarIndex ENDIF Estensione = (Massimo - Minimo) * (EstenzionePerCent / 100) Sopra = Massimo + Estensione Sotto = Minimo - Estensione ENDIF DRAWSEGMENT(Inizio,Massimo,BarIndex,Massimo) coloured(0,201,87,255) DRAWTEXT(" #Massimo#", barindex,Massimo, SansSerif,Bold,10) coloured(0,201,87,255) DRAWSEGMENT(Inizio,Minimo ,BarIndex,Minimo) coloured(0,201,87,255) DRAWTEXT(" #Minimo#" , barindex, Minimo, SansSerif,Bold,10) coloured(0,201,87,255) DRAWSEGMENT(Inizio,Sopra,BarIndex,Sopra) coloured(218,165,32,255) DRAWTEXT(" #Sopra#", barindex, Sopra, SansSerif,Bold,10)coloured(218,165,32,255) DRAWSEGMENT(Inizio,Sotto,BarIndex,Sotto) coloured(218,165,32,255) DRAWTEXT(" #Sotto#", barindex, Sotto, SansSerif,Bold,10)coloured(218,165,32,255) 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

  DEFPARAM CalculateOnLastBars = 1000 DEFPARAM DrawOnLastBarOnly   = true // //ONCE atrP              = 5 //ONCE OraInizio         = 100000 //ONCE OraFine           = 170000 //ONCE EstenzionePerCent = 30.0 // ATR = AverageTrueRange[atrP](close) IF OpenTime >= OraInizio AND OpenTime <= OraFine THEN    IF OpenTime = OraInizio THEN       MyAtr   = ATR       Massimo = high       Minimo  = low       Inizio  = BarIndex    ENDIF    MyAtr      = max(ATR,MyAtr)    IF MyAtr <> MyAtr[1] THEN       Massimo = high       Minimo  = low       //Inizio  = BarIndex    ENDIF    Estensione = (Massimo - Minimo) * (EstenzionePerCent / 100)    Sopra      = Massimo  + Estensione    Sotto      = Minimo   - Estensione ENDIF DRAWSEGMENT(Inizio,Massimo,BarIndex,Massimo)                                 coloured(0,201,87,255) DRAWTEXT("                 #Massimo#", barindex,Massimo, SansSerif,Bold,10)  coloured(0,201,87,255) DRAWSEGMENT(Inizio,Minimo ,BarIndex,Minimo)                                  coloured(0,201,87,255) DRAWTEXT("                 #Minimo#" , barindex, Minimo, SansSerif,Bold,10)  coloured(0,201,87,255) DRAWSEGMENT(Inizio,Sopra,BarIndex,Sopra) coloured(218,165,32,255) DRAWTEXT("                  #Sopra#", barindex, Sopra, SansSerif,Bold,10)coloured(218,165,32,255) DRAWSEGMENT(Inizio,Sotto,BarIndex,Sotto) coloured(218,165,32,255) DRAWTEXT("                  #Sotto#", barindex, Sotto, SansSerif,Bold,10)coloured(218,165,32,255) RETURN

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17138

  Been thanked: 4031 times
  08/11/2022 at 12:40 PM #198957
  Marcotrading

  Perfetto, appena testato. funziona benissimo Roberto.

  Ultima domanda: se volessi identificare sempre max e minimo di una candela identificata tramite Atr, quindi lo stesso calcolo, ma del giorno precedente è possibile farlo? Quindi stesso indicatore, ma nel giorno precedente

  

  Marcotrading

  Participant

  Topics: 6

  Replies: 25

  Been thanked: 0 times
  08/11/2022 at 3:40 PM #198967
  robertogozzi

  Questa è la versione per il giorno precedente:

  DEFPARAM CalculateOnLastBars = 1000 DEFPARAM DrawOnLastBarOnly = true // //ONCE atrP = 5 //ONCE OraInizio = 100000 //ONCE OraFine = 170000 //ONCE EstenzionePerCent = 30.0 // ATR = AverageTrueRange[atrP](close) IF OpenTime >= OraInizio AND OpenTime <= OraFine THEN IF OpenTime = OraInizio THEN HH = Massimo LL = Minimo Estensione = (HH - LL) * (EstenzionePerCent / 100) Sopra = HH + Estensione Sotto = LL - Estensione Inizio = Barra // MyAtr = ATR Massimo = high Minimo = low Barra = BarIndex ENDIF MyAtr = max(ATR,MyAtr) IF MyAtr <> MyAtr[1] THEN Massimo = high Minimo = low ENDIF ENDIF DRAWSEGMENT(Inizio,HH,BarIndex,HH) coloured(0,201,87,255) DRAWTEXT(" #HH#", barindex, HH, SansSerif,Bold,10) coloured(0,201,87,255) DRAWSEGMENT(Inizio,LL ,BarIndex,LL) coloured(0,201,87,255) DRAWTEXT(" #LL#", barindex, LL, SansSerif,Bold,10) coloured(0,201,87,255) DRAWSEGMENT(Inizio,Sopra,BarIndex,Sopra) coloured(218,165,32,255) DRAWTEXT(" #Sopra#", barindex, Sopra, SansSerif,Bold,10) coloured(218,165,32,255) DRAWSEGMENT(Inizio,Sotto,BarIndex,Sotto) coloured(218,165,32,255) DRAWTEXT(" #Sotto#", barindex, Sotto, SansSerif,Bold,10) coloured(218,165,32,255) 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

  DEFPARAM CalculateOnLastBars = 1000 DEFPARAM DrawOnLastBarOnly   = true // //ONCE atrP              = 5 //ONCE OraInizio         = 100000 //ONCE OraFine           = 170000 //ONCE EstenzionePerCent = 30.0 // ATR = AverageTrueRange[atrP](close) IF OpenTime >= OraInizio AND OpenTime <= OraFine THEN    IF OpenTime = OraInizio THEN       HH         = Massimo       LL         = Minimo       Estensione = (HH - LL) * (EstenzionePerCent / 100)       Sopra      = HH  + Estensione       Sotto      = LL  - Estensione       Inizio     = Barra       //       MyAtr   = ATR       Massimo = high       Minimo  = low       Barra   = BarIndex    ENDIF    MyAtr      = max(ATR,MyAtr)    IF MyAtr <> MyAtr[1] THEN       Massimo = high       Minimo  = low    ENDIF ENDIF DRAWSEGMENT(Inizio,HH,BarIndex,HH)                                        coloured(0,201,87,255) DRAWTEXT("                 #HH#", barindex, HH, SansSerif,Bold,10)        coloured(0,201,87,255) DRAWSEGMENT(Inizio,LL ,BarIndex,LL)                               coloured(0,201,87,255) DRAWTEXT("                 #LL#", barindex, LL, SansSerif,Bold,10)        coloured(0,201,87,255) DRAWSEGMENT(Inizio,Sopra,BarIndex,Sopra) coloured(218,165,32,255) DRAWTEXT("                  #Sopra#", barindex, Sopra, SansSerif,Bold,10) coloured(218,165,32,255) DRAWSEGMENT(Inizio,Sotto,BarIndex,Sotto) coloured(218,165,32,255) DRAWTEXT("                  #Sotto#", barindex, Sotto, SansSerif,Bold,10) coloured(218,165,32,255) RETURN

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17138

  Been thanked: 4031 times
• Author
  Posts