Questa versione stampa i segmenti (Verde=settimana prec., Rosso=giorno prec.), come da foto X.jpg allegata (togliendo i commenti alla riga 1 stamperà solo le ultime due linee settimanale e giornaliera):
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 DrawOnLastBarOnly = true
ONCE MaxSettimana = 0
ONCE MaxGiorno = 0
ONCE PrezzoSettimana = 0
ONCE PrezzoSettimanaPrec = 0
// Volumi settimanali
IF OpenDayOfWeek = 1 AND (OpenDayOfWeek [ 1 ] <> OpenDayOfWeek ) THEN
PrezzoSettimanaPrec = PrezzoSettimana
PrezzoSettimana = close
MaxSettimana = Volume
BarraSettimana = BarIndex
ENDIF
MaxSettimana = max (Volume ,MaxSettimana)
IF MaxSettimana <> MaxSettimana[ 1 ] THEN
PrezzoSettimana = close
ENDIF
// Volumi giornalieri
IF IntraDayBarIndex = 0 THEN
PrezzoGiornoPrec = PrezzoGiorno
PrezzoGiorno = close
MaxGiorno = Volume
BarraGiorno = BarIndex
ENDIF
MaxGiorno = max (Volume ,MaxGiorno)
IF MaxGiorno <> MaxGiorno[ 1 ] THEN
PrezzoGiorno = close
ENDIF
//
DRAWSEGMENT (BarraSettimana,PrezzoSettimanaPrec,BarIndex ,PrezzoSettimanaPrec) coloured (0 ,128 ,0 ,255 )
DRAWSEGMENT (BarraGiorno ,PrezzoGiornoPrec ,BarIndex ,PrezzoGiornoPrec) coloured (255 ,0 ,0 ,255 )
RETURN
Questa versione stampa linee continue a scalini (Verde=settimana prec., Rosso=giorno prec.), come da foto Y.jpg allegata:
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
ONCE MaxSettimana = 0
ONCE MaxGiorno = 0
ONCE PrezzoSettimana = 0
ONCE PrezzoSettimanaPrec = 0
// Volumi settimanali
IF OpenDayOfWeek = 1 AND (OpenDayOfWeek [ 1 ] <> OpenDayOfWeek ) THEN
PrezzoSettimanaPrec = PrezzoSettimana
PrezzoSettimana = close
MaxSettimana = Volume
ENDIF
MaxSettimana = max (Volume ,MaxSettimana)
IF MaxSettimana <> MaxSettimana[ 1 ] THEN
PrezzoSettimana = close
ENDIF
// Volumi giornalieri
IF IntraDayBarIndex = 0 THEN
PrezzoGiornoPrec = PrezzoGiorno
PrezzoGiorno = close
MaxGiorno = Volume
ENDIF
MaxGiorno = max (Volume ,MaxGiorno)
IF MaxGiorno <> MaxGiorno[ 1 ] THEN
PrezzoGiorno = close
ENDIF
//
RETURN PrezzoSettimanaPrec coloured (0 ,128 ,0 ,255 ) AS "Prezzo Settimana precedente" ,PrezzoGiornoPrec coloured (255 ,0 ,0 ,255 ) AS "Prezzo Giorno precedente"