Minimo massimo su grafico mensile

• 02/06/2024 at 1:51 PM #227468
  pignolaus

  Buongiorno,

  ho provato a formulare un indicatore ma senza successo. quindi chiedo cortesemente se fosse possibile costruire un indicatore che vada a tracciare su un grafico mensile, la linea del massimo e del minimo prezzo relativo all’anno precedente con le linee che vengono disegnate  verso destra fino al mese in corso. Ad esempio per oggi 06/02/2024 vorrei vedere le due linee del max e min relative all’anno 2023.

  Grazie mille in anticipo.

  

  pignolaus

  Participant

  Topics: 12

  Replies: 9

  Been thanked: 0 times
  02/06/2024 at 5:35 PM #227479
  robertogozzi

  Eccolo:

  defparam drawonlastbaronly = true ONCE HH = 0 ONCE HHp = HH ONCE LL = 999999 ONCE LLp = LL // IF OpenYear <> OpenYear[1] THEN HHp = HH LLp = LL HH = high LL = low Barra = BarIndex ENDIF HH = max(HH,high) LL = min(LL,low) DrawSegment(Barra,HHp,BarIndex+1,HHp) DrawSegment(Barra,LLp,BarIndex+1,LLp) return

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

  defparam drawonlastbaronly = true ONCE HH  = 0 ONCE HHp = HH ONCE LL  = 999999 ONCE LLp = LL // IF OpenYear <> OpenYear[1] THEN    HHp   = HH    LLp   = LL    HH    = high    LL    = low    Barra = BarIndex ENDIF HH = max(HH,high) LL = min(LL,low) DrawSegment(Barra,HHp,BarIndex+1,HHp) DrawSegment(Barra,LLp,BarIndex+1,LLp) return

  puoi usarlo su qualunque grafico inferiore all’annuale (Settimanale, Giornaliero, 4 ore, ecc…), purché sul grafico ci siano un numero sufficiente di barre, ad esempio sul grafico orario occorrono almeno 15-16000 unità, sul 5 minuti 5 volte meno, su 1 minuto NON è possibile, perché il massimo numero di unità disponibili è 200000 e corrispondono a poco più di 6 mesi, mentre ti servono praticamente due anni, perché l’anno precedente inizia dall’1/1/2023, ma dovrai stamparlo sul grafico fino al 31/12/2024.

  Ad ogni modo sul mensile non avrai problemi.

  Ho fatto in modo che ti stampi sempre una barra oltre il mese corrente, così vedi meglio le linee. Se non lo desideri, togli +1 nell’istruzione DRAWSEGMENT, se invece ne vuoi vedere di più, sostituisci 1 con 2, 3, ecc…

   

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17188

  Been thanked: 4064 times
  02/06/2024 at 10:40 PM #227497
  pignolaus

  Grazie Roberto, l’ho provato e funziona perfettamente.

  Posso chiedere se fosse possibile anche fare visualizzare il valore delle due linee quindi Min e Max annuale sopra le stesse oppure sulla scala del prezzo?

  Grazie ancora.

  

  pignolaus

  Participant

  Topics: 12

  Replies: 9

  Been thanked: 0 times
  02/07/2024 at 3:29 PM #227576
  robertogozzi

  Eccolo, ti ho anche cambiato la linea, dasegmento a rettangolo, così puoi farla più spessa, aumentando/diminuendo quel +10 e -10.

  Ho aggiunto anche i colori, che puoi cambiare secondo questa tabella https://www.prorealcode.com/documentation/coloured/:

  defparam drawonlastbaronly = true ONCE HH = 0 ONCE HHp = HH ONCE LL = 999999 ONCE LLp = LL // IF OpenYear <> OpenYear[1] THEN HHp = HH LLp = LL HH = high LL = low Barra = BarIndex ENDIF HH = max(HH,high) LL = min(LL,low) //DrawSegment(Barra,HHp,BarIndex+1,HHp) coloured("Blue") DrawRectangle(Barra,HHP,BarIndex+1,HHP+10*PipSize) coloured("Cyan") BorderColor("Cyan") DrawText("#HHp#",BarIndex + 3,HHp) coloured("Fuchsia") //DrawSegment(Barra,LLp,BarIndex+1,LLp) coloured("Blue") DrawRectangle(Barra,LLP,BarIndex+1,LLP-10*PipSize) coloured("Cyan") BorderColor("Cyan") DrawText("#LLp#",BarIndex + 3,LLp) coloured("Fuchsia") return

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22

  defparam drawonlastbaronly = true ONCE HH  = 0 ONCE HHp = HH ONCE LL  = 999999 ONCE LLp = LL // IF OpenYear <> OpenYear[1] THEN    HHp   = HH    LLp   = LL    HH    = high    LL    = low    Barra = BarIndex ENDIF HH = max(HH,high) LL = min(LL,low) //DrawSegment(Barra,HHp,BarIndex+1,HHp)            coloured("Blue") DrawRectangle(Barra,HHP,BarIndex+1,HHP+10*PipSize) coloured("Cyan")    BorderColor("Cyan") DrawText("#HHp#",BarIndex + 3,HHp)                 coloured("Fuchsia") //DrawSegment(Barra,LLp,BarIndex+1,LLp)            coloured("Blue") DrawRectangle(Barra,LLP,BarIndex+1,LLP-10*PipSize) coloured("Cyan")    BorderColor("Cyan") DrawText("#LLp#",BarIndex + 3,LLp)                 coloured("Fuchsia") return

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 17188

  Been thanked: 4064 times
• Author
  Posts