Rettangolo giorni settimana

• 02/20/2024 at 12:30 PM #228445
  Edisone

  Salve, sto cercando un modo per disegnare un rettangolo in un grafico daily che mi contenga tutti i giorni della settimana come da grafico allegato. Mentre se il grafico è weekly un rettangolo che mi contenga tutte le settimane del mese

  Grazie mille

  

  Edisone

  Participant

  Topics: 44

  Replies: 73

  Been thanked: 2 times
  02/20/2024 at 1:17 PM #228448
  robertogozzi

  Eccolo:

  ONCE TF = gettimeframe IF TF = 604800 THEN //Weekly IF OpenMonth <> OpenMonth[1] THEN IF cc > oo THEN DrawRectangle(Barra,Massimo,BarIndex-1,Minimo) coloured("Blue",30) bordercolor("white",0) ELSE DrawRectangle(Barra,Massimo,BarIndex-1,Minimo) coloured("Red",30) bordercolor("white",0) ENDIF Barra = BarIndex Massimo = high Minimo = low OO = open ENDIF ELSIF TF = 86400 THEN //Daily IF OpenDayOfWeek < OpenDayOfWeek[1] THEN IF cc > oo THEN DrawRectangle(Barra,Massimo,BarIndex-1,Minimo) coloured("Blue",30) bordercolor("white",0) ELSE DrawRectangle(Barra,Massimo,BarIndex-1,Minimo) coloured("Red",30) bordercolor("white",0) ENDIF Barra = BarIndex Massimo = high Minimo = low OO = open ENDIF ENDIF Massimo = max(Massimo,high) Minimo = min(Minimo,low) cc = close DrawRectangle(Barra,Massimo,BarIndex,Minimo) coloured("Grey",10) bordercolor("grey",0) 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

  ONCE TF = gettimeframe IF TF = 604800 THEN                            //Weekly    IF OpenMonth <> OpenMonth[1] THEN       IF cc > oo THEN          DrawRectangle(Barra,Massimo,BarIndex-1,Minimo) coloured("Blue",30) bordercolor("white",0)       ELSE          DrawRectangle(Barra,Massimo,BarIndex-1,Minimo) coloured("Red",30)  bordercolor("white",0)       ENDIF       Barra   = BarIndex       Massimo = high       Minimo  = low       OO      = open    ENDIF ELSIF TF = 86400 THEN                          //Daily    IF OpenDayOfWeek < OpenDayOfWeek[1] THEN       IF cc > oo THEN          DrawRectangle(Barra,Massimo,BarIndex-1,Minimo) coloured("Blue",30) bordercolor("white",0)       ELSE          DrawRectangle(Barra,Massimo,BarIndex-1,Minimo) coloured("Red",30)  bordercolor("white",0)       ENDIF       Barra   = BarIndex       Massimo = high       Minimo  = low       OO      = open    ENDIF ENDIF Massimo = max(Massimo,high) Minimo  = min(Minimo,low) cc      = close DrawRectangle(Barra,Massimo,BarIndex,Minimo) coloured("Grey",10) bordercolor("grey",0) RETURN

   

  1 user thanked author for this post.

  Edisone

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17129

  Been thanked: 4026 times
• Author
  Posts