Linee sul grafico
-
Ecco il codice aggiornato, stampa linee VIOLA per il primo parametro e VERDI per il secondo, se il secondo è <= al primo stampa sempre in VERDE!
DEFPARAM CalculateOnLastBars = 1000 //DEFPARAM DrawOnLastBarOnly = true //MioVolume = 0 non stampa niente //MioVolume2 = 0 non stampa niente //BarreRettangolo = 0 stampa un rettangolo pari all'ombra della candela, quindi quasi invisibile Prezzo = 0 Massimo = 0 Minimo = 0 ONCE MioVolume = max(0,min(MioVolume,999999)) //intervallo accettato 0 - 999999 ONCE MioVolume2 = max(0,min(MioVolume2,999999)) //intervallo accettato 0 - 999999 ONCE BarreRettangolo = max(0,min(BarreRettangolo,999999)) //intervallo accettato 0 - 999999 IF Volume >= MioVolume AND MioVolume > 0 THEN r = 138 g = 43 b = 226 IF close > open THEN Massimo = high Minimo = close Prezzo = high ELSE Massimo = close Minimo = low Prezzo = low ENDIF ENDIF IF Volume >= MioVolume2 AND MioVolume2 > 0 THEN r = 144 g = 238 b = 144 IF close > open THEN Massimo = high Minimo = close Prezzo = high ELSE Massimo = close Minimo = low Prezzo = low ENDIF ENDIF DRAWHLINE(Prezzo) COLOURED(r,g,b,255) //(138,43,226,255) DRAWRECTANGLE(BarIndex,Massimo,BarIndex+BarreRettangolo,Minimo)coloured(255,10,10,255) RETURNabd78 thanked this postCiao vorrei riprendere l ‘indicatore LINEE E RETT. 1 realizzato qualche settimana fa per modificarlo leggermente.
Ho notato che l ‘indicatore mostra rette e rettangoli solo per 2-3 giorni nel passato. Se li volessi per più giorni o al limite per tutti come posso fare?
E’ possibile far disegnare una retta di color giallo oro (anziché viola) in corrispondenza di un volume maggiore o uguale al doppio del valore della prima soglia? Per esempio volume prima soglia = 500 in corrispondenza di un volume maggiore o uguale a 1000 mi deve disegnare una retta giallo oro anziché viola.
Ho necessità inoltre che tutte le rette disegnate si possano far scomparire e ricomparire tramite una casella di spunta come mostrato in allegato. So per certo che si può fare (dal punto di vista della programmazione)
Potete aiutarmi?
I rettangoli li visualizza PER SEMPRE, solo che la riga 1 limita il sistema alle ultime 1000 barre per velocizzare l’indicatore. Basta aumentare quel limite, oppure mettere commentarla con le doppie barre per risolvere il problema.
Ho fatto le modifiche richieste e ti allego il nuovo indicatore ed uno screenshot di come apparirà.
I colori puoi, ovviamente, variarli come vuoi.
DEFPARAM CalculateOnLastBars = 10000 //DEFPARAM DrawOnLastBarOnly = true //MioVolume = 0 non stampa niente //MioVolume2 = 0 non stampa niente //BarreRettangolo = 0 stampa un rettangolo pari all'ombra della candela, quindi quasi invisibile //DisegnaRette = 1 (spuntato) disegna le rette 0 (non spuntato) non le disegna Prezzo = 0 Massimo = 0 Minimo = 0 MioVolume = max(0,min(MioVolume,999999)) //intervallo accettato 0 - 999999 MioVolume2 = max(0,min(MioVolume2,999999)) //intervallo accettato 0 - 999999 BarreRettangolo = max(0,min(BarreRettangolo,999999)) //intervallo accettato 0 - 999999 DoppioVolume = MioVolume * 2 IF Volume >= MioVolume AND MioVolume > 0 THEN IF Volume >= DoppioVolume THEN r = 255 g = 215 b = 0 ELSE r = 138 g = 43 b = 226 ENDIF IF close > open THEN Massimo = high Minimo = close Prezzo = high ELSE Massimo = close Minimo = low Prezzo = low ENDIF ENDIF IF Volume >= MioVolume2 AND MioVolume2 > 0 THEN r = 0 //144 g = 128 //238 b = 0 //144 IF close > open THEN Massimo = high Minimo = close Prezzo = high ELSE Massimo = close Minimo = low Prezzo = low ENDIF ENDIF IF DisegnaRette THEN DRAWHLINE(Prezzo) COLOURED(r,g,b,255) //(138,43,226,255) ENDIF DRAWRECTANGLE(BarIndex,Massimo,BarIndex+BarreRettangolo,Minimo)coloured(0,0,0,255)//(255,10,10,255) RETURN
- You must be logged in to reply to this topic.
New Reply
Summary
This topic contains 34 replies,
has 3 voices, and was last updated by 
7 years, 3 months ago.
Topic Details
| Forum: | ProBuilder: Indicatori & Strumenti Personalizzati |
| Language: | Italian |
| Started: | 05/29/2018 |
| Status: | Active |
| Attachments: | 20 files |
Loading...