Code ProRealTime pour identifier les heures officielles

[Ozmizrak]

Voici un Code ProRealTime pour tracer un tiret gris clair toutes les 15 minutes sur les heures d'ouverture officielles des marchés.

Spoiler:

Ne pas oublier de déclarer les deux variables booleens
America True/False
Europe True/False
Ne mettez pas les deux à True

Capture20201213.1.JPG (36.3 Kio) Vu 1849 fois

Code : #

Seconde = Time - (Hour * 10000) - (Minute * 100)

If (America And (Time >= 153000 and Time <= 220000)) or (Europe And (Time >= 090000 and Time <= 173000)) Then

If Minute = 0 or  Minute = 15 or Minute = 30 or  Minute = 45 Then

DrawVLine (BarIndex) Coloured(208,208,208)
EndIf
EndIf

//Le code suivant redessine la bougie pour ne pas perdre les mèches
If Close > Open Then
DrawCandle (Open[0], High[0], Low[0], Close[0]) COLOURED (0,255,255)
DrawSegment(BarIndex,Low[0],BarIndex,High[0]) COLOURED (0,255,255)
ElsIf Close < Open Then
DrawCandle (Open[0], High[0], Low[0], Close[0]) COLOURED (255,85,85)
DrawSegment(BarIndex,Low[0],BarIndex,High[0]) COLOURED (255,85,85)
Else
DrawCandle (Open[0], High[0], Low[0], Close[0]) COLOURED (0,0,0)
DrawSegment(BarIndex,Low[0],BarIndex,High[0]) COLOURED (0,0,0)
EndIf
Return

Voilà ce que vous aller obtenir pour NASDAQ

Capture20201213.2.JPG (60.29 Kio) Vu 1849 fois

[Kovalofmax]

Sympa , merci Oz

[Francis1]

[Ozmizrak]

Pour pas perdre les mèches
Si vous utiliser les chandeliers c'est déjà dans le code fourni

• Si vous utiliser les bougies Heikin Ashi Remplacer par
  code-prorealtime-pour-les-bougies-heiki ... 40248.html

[Nico38]

Bonjour,
Il y a quelques années j'avais fait cela (je l'utilise sur mes graphes depuis)

Capture.png (41.12 Kio) Vu 1813 fois

foncé : "fermé"
bleu : "uniquement" EU d'ouvert
vert : "uniquement" US d'ouvert
blanc : préopen UE puis préopen US et jusqu'à clôture UE
et les flèches : préopen&Open UE et même chose US (à la clôture par exemple 15H35 ou 15H45 auto en fonction de l'UT)
si ça vous intéresse me le dire SVP j'irai faire copier coller ^^

[Ozmizrak]

Nico38
Oui ca nous intéresse si tu peux coller le code.
d'avance.

[Nico38]

Code pour les flèches :

Code : #

///////////////////////////////////////////UT définie en 2 bougies/////////////////////////////////////////
// UT => Weekly: 23 / Daily (J): 10 / H4: 4 / H1: 1 / m15: 15 / m5: 5 /m1: 0
//////////////////////////////////////////////////Variables//////////////////////////////////////////////////
d = days
Ho = OpenHour
Mi = Minute
BI = BarIndex

IF BI = 0 THEN
d0 = d
Ho0 = Ho
Mi0 = Mi
ENDIF

IF BI = 2 THEN
d1 = d
dd = d1-d0
Ho1 = Ho
dH = ABS(Ho1 - Ho0)
Mi1 = Mi
dMi = ABS(Mi1 - Mi0)
IF dd>=1 THEN
IF dd = 14 THEN
UT = 23
ELSIF dd < 14 THEN
UT = 10
ENDIF
ENDIF

IF dH >=2 THEN
IF dH = 8 OR dH = 16 THEN
UT = 4
ELSIF dH = 2 OR dH = 20 OR dH = 22 THEN
UT = 1
ENDIF
ENDIF

IF dMi >=2 THEN
IF dMi = 30 THEN
UT = 15
ELSIF dMi = 10 OR dMi = 50 THEN
UT = 5
ELSIF dMi = 4 OR dMi = 56 THEN
UT = 2
ELSIF dMi = 2 THEN
UT = 0
ENDIF
ENDIF
ENDIF
////////////////////////////////////////UT définie en 2 bougies: fin///////////////////////////////////////

//////////////////////////////////////////////Delta Findice&UT/////////////////////////////////////////////
Op = Open
IF BI = 3 THEN
IF UT = 4 AND Op < 15000 THEN
de = 5
ELSE
de = 50
ENDIF
IF UT = 1 AND Op < 15000 THEN
de = 5
ELSE
de = 20
ENDIF
IF UT = 15 AND Op < 15000 THEN
de = 5
ELSE
de = 15
ENDIF
IF UT = 5 AND Op < 15000 THEN
de = 5
ELSE
de = 10
ENDIF
IF UT = 2 OR UT = 0 THEN
de = 5
ENDIF
ENDIF
//////////////////////////////////////////////////Variables//////////////////////////////////////////////////
T = Time
Da = Date
Hi = High
Lo = Low
//delta = de
//////////////////////////////////////////////////////////////////////////////////////////////////////////////
//////////////////////////////////////////////////PRE-OPENS//////////////////////////////////////////////////
//////////////////////////////////////////////////// H4 ///////////////////////////////////////////////////
IF UT = 4 THEN
IF T = 170000 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ENDIF
////////////////////////////////////////////////// H1 //////////////////////////////////////////////////
IF UT = 1 THEN
//////////////////////////////////////////////////PRE-OPENS//////////////////////////////////////////////////
IF T = 090000 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (0, 51, 133, 150)
DRAWARROWUP (x, y2) COLOURED (0, 51, 133, 150)
//code couleur bleu drapeau UE : 0, 51, 133
ENDIF

IF (Da >= 20200307 AND Da <= 20200328) OR (Da >= 20201024 AND Da <= 20201031) THEN
IF T = 120000 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101, 150)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101, 150)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ELSE
IF T = 130000 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101, 150)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101, 150)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ENDIF
////////////////////////////////////////////////////OPENS////////////////////////////////////////////////////
IF T = 100000 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (0, 51, 133)
DRAWARROWUP (x, y2) COLOURED (0, 51, 133)
//code couleur bleu drapeau UE : 0, 51, 133
ENDIF

IF (Da >= 20200307 AND Da <= 20200328) OR (Da >= 20201024 AND Da <= 20201031) THEN
IF T = 150000 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ELSE
IF T = 160000 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ENDIF
ENDIF
////////////////////////////////////////////////// m15 /////////////////////////////////////////////////
IF UT = 15 THEN
//////////////////////////////////////////////////PRE-OPENS//////////////////////////////////////////////////
IF T = 081500 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (0, 51, 133, 150)
DRAWARROWUP (x, y2) COLOURED (0, 51, 133, 150)
//code couleur bleu drapeau UE : 0, 51, 133
ENDIF

IF (Da >= 20200307 AND Da <= 20200328) OR (Da >= 20201024 AND Da <= 20201031) THEN
IF T = 114500 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101, 150)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101, 150)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ELSE
IF T = 124500 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101, 150)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101, 150)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ENDIF
////////////////////////////////////////////////////OPENS////////////////////////////////////////////////////
IF T = 091500 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (0, 51, 133)
DRAWARROWUP (x, y2) COLOURED (0, 51, 133)
//code couleur bleu drapeau UE : 0, 51, 133
ENDIF

IF (Da >= 20200307 AND Da <= 20200328) OR (Da >= 20201024 AND Da <= 20201031) THEN
IF T = 144500 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ELSE
IF T = 154500 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ENDIF
ENDIF
////////////////////////////////////////////////// m5 //////////////////////////////////////////////////
IF UT = 5 THEN
//////////////////////////////////////////////////PRE-OPENS//////////////////////////////////////////////////
IF T = 080500 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (0, 51, 133, 150)
DRAWARROWUP (x, y2) COLOURED (0, 51, 133, 150)
//code couleur bleu drapeau UE : 0, 51, 133
ENDIF

IF (Da >= 20200307 AND Da <= 20200328) OR (Da >= 20201024 AND Da <= 20201031) THEN
IF T = 113500 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101, 150)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101, 150)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ELSE
IF T = 123500 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101, 150)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101, 150)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ENDIF
////////////////////////////////////////////////////OPENS////////////////////////////////////////////////////
IF T = 090500 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (0, 51, 133)
DRAWARROWUP (x, y2) COLOURED (0, 51, 133)
//code couleur bleu drapeau UE : 0, 51, 133
ENDIF

IF (Da >= 20200307 AND Da <= 20200328) OR (Da >= 20201024 AND Da <= 20201031) THEN
IF T = 143500 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ELSE
IF T = 153500 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ENDIF
ENDIF
////////////////////////////////////////////////// m2 //////////////////////////////////////////////////
IF UT = 2 THEN
//////////////////////////////////////////////////PRE-OPENS//////////////////////////////////////////////////
IF T = 080200 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (0, 51, 133, 150)
DRAWARROWUP (x, y2) COLOURED (0, 51, 133, 150)
//code couleur bleu drapeau UE : 0, 51, 133
ENDIF

IF (Da >= 20200307 AND Da <= 20200328) OR (Da >= 20201024 AND Da <= 20201031) THEN
IF T = 113200 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101, 150)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101, 150)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ELSE
IF T = 123200 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101, 150)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101, 150)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ENDIF
////////////////////////////////////////////////////OPENS////////////////////////////////////////////////////
IF T = 090200 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (0, 51, 133)
DRAWARROWUP (x, y2) COLOURED (0, 51, 133)
//code couleur bleu drapeau UE : 0, 51, 133
ENDIF

IF (Da >= 20200307 AND Da <= 20200328) OR (Da >= 20201024 AND Da <= 20201031) THEN
IF T = 143200 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ELSE
IF T = 153200 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ENDIF
ENDIF
////////////////////////////////////////////////// m1 //////////////////////////////////////////////////
IF UT = 0 THEN
//////////////////////////////////////////////////PRE-OPENS//////////////////////////////////////////////////
IF T = 080100 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (0, 51, 133, 150)
DRAWARROWUP (x, y2) COLOURED (0, 51, 133, 150)
//code couleur bleu drapeau UE : 0, 51, 133
ENDIF

IF (Da >= 20200307 AND Da <= 20200328) OR (Da >= 20201024 AND Da <= 20201031) THEN
IF T = 113100 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101, 150)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101, 150)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ELSE
IF T = 123100 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101, 150)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101, 150)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ENDIF
////////////////////////////////////////////////////OPENS////////////////////////////////////////////////////
IF T = 090100 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (0, 51, 133)
DRAWARROWUP (x, y2) COLOURED (0, 51, 133)
//code couleur bleu drapeau UE : 0, 51, 133
ENDIF

IF (Da >= 20200307 AND Da <= 20200328) OR (Da >= 20201024 AND Da <= 20201031) THEN
IF T = 143100 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ELSE
IF T = 153100 THEN
x = BI
y1 = Hi+de
y2 = Lo-de
DRAWARROWDOWN (x, y1) COLOURED (133, 187, 101)
DRAWARROWUP (x, y2) COLOURED (133, 187, 101)
//code couleur vert dollar bill :133, 187, 101
ENDIF
ENDIF
ENDIF
RETURN DMi
//RETURN dHo as "dHo", dMi as"dMi", UT as "UT", dH as "dH"

[Nico38]

code pour l'arrière plan coloré :

Code : #

if Time > 090000 and Time <= 123000 then
BACKGROUNDCOLOR(0,0,255,7)

elsif Time > 173000 and Time <= 220000 then
BACKGROUNDCOLOR(0,255,0,10)

elsif Time > 220000 and Time <= 235959 then
BACKGROUNDCOLOR(0,0,0,10)
elsif Time >= 000000 and Time <= 080000 then
BACKGROUNDCOLOR(0,0,0,10)
endif

RETURN

[Nico38]

Pour l'arrière plan coloré je ne tiens pas compte du décalge horaire comme pour les flèche (pas trop utile je trouve mais c'est possible de s’inspirer du 1er pour l'implanter dans le second )

[Nico38]

Je t'en prie.

[Nico38]

Le code pour les flèches est "relativement complexe" dans la 1ère partie du code je détermine l'UT (comme ça possible de le mettre sur tout les graphes en dupliquant).
Le code avec les flèches fonctionne en H4 H1 m15 m5 m2 et m1 (contrairement à ce que j'ai écrit dans l'en tête du code) je n'ai pas mis à jour.

[Nico38]

(décalage heure d'été & hiver entre US et FR)

[Ozmizrak]

Nico

[Nico38]

Je t'en prie