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.
Summary
This topic contains 34 replies,
has 3 voices, and was last updated by 
7 years, 9 months ago.
Topic Details
| Forum: | ProBuilder: Indicatori & Strumenti Personalizzati |
| Language: | Italian |
| Started: | 05/29/2018 |
| Status: | Active |
| Attachments: | 20 files |