ProRealTime
Pour discuter sur l’interface de ProRealTime Software, nos configurations graphiques...
Répondre Page 1 sur 1

Tracer les niveaux symboliques

par Tamtam » 05 Sep 2019 22:59

Bonsoir,

Après avoir chercher sur Prorealcode sans trouver et passer des heures à tracer mes niveaux symboliques à la main
J'ai fais un petit indicateur qui marche avec une simple boucle
Ça donne ça :

Image

Le défaut : il détecte automatiquement les indices selon le prix
Dow (20000-30000)
Dax (9000-15000)
Cac (4000-6000)

à modifier ou ajouter comme vous le souhaitez c'est très simple ! :top:

Code: Tout sélectionner
// Lignes tous les 100 points

x = 0

// Cac 40
if close>4000 and close<6000 then
While Not(x>6000) Do
x = x +100
DRAWHLINE(x) COLOURED(117, 0, 158)
If x > 6000 then
Break
Endif
Wend
endif

// Dax 30
if close>9000 and close<15000 then
While Not(x>15000) Do
x = x +100
DRAWHLINE(x) COLOURED(117, 0, 158)
If x > 15000 then
Break
Endif
Wend
endif

// Dow Jones
if close>20000 and close<30000 then
While Not(x>30000) Do
x = x +100
DRAWHLINE(x) COLOURED(117, 0, 158)
If x > 30000 then
Break
Endif
Wend
endif



// Lignes tous les 250 points

y = 0

// Cac 40
if close>4000 and close<6000 then
While Not(y>6000) Do
y = y +250
DRAWHLINE(y-0.1) COLOURED(117, 0, 158)
DRAWHLINE(y) COLOURED(117, 0, 158)
DRAWHLINE(y+0.1) COLOURED(117, 0, 158)
If y > 6000 then
Break
Endif
Wend
endif

// Dax 30
if close>9000 and close<15000 then
While Not(y>15000) Do
y = y +250
DRAWHLINE(y-0.2) COLOURED(117, 0, 158)
DRAWHLINE(y) COLOURED(117, 0, 158)
DRAWHLINE(y+0.2) COLOURED(117, 0, 158)
If y > 15000 then
Break
Endif
Wend
endif

// Dow Jones
if close>20000 and close<30000 then
While Not(y>30000) Do
y = y +250
DRAWHLINE(y-0.3) COLOURED(117, 0, 158)
DRAWHLINE(y) COLOURED(117, 0, 158)
DRAWHLINE(y+0.3) COLOURED(117, 0, 158)
If y > 30000 then
Break
Endif
Wend
endif

RETURN

Re: Tracer les niveaux symboliques

par Tamtam » 06 Sep 2019 16:24

à ne pas afficher sur le graphique en ticks :!:
J'ai remarquer que ça fait énormément ralentir les performances du pc, car la boucle est calculée à chaque clôture de bougie!
Je préfère l'afficher en 5minutes
Je vais trouver un moyen de réduire ce problème :top:

Re: Tracer les niveaux symboliques

par Francis1 » 07 Sep 2019 10:19

:merci: , Il y a quelque temps, je crois que j'avais un indicateur qui l'a fait, je vais le chercher.

Re: Tracer les niveaux symboliques

par Tamtam » 07 Sep 2019 20:45

Update
Tout simple, j'ai simplement ajouter un if intradaybarindex=0 pour qu'il ne calcul qu'au moment de la première bougie de la journée et plus de problème de performances :top:

Code: Tout sélectionner
// Lignes tous les 100 points

 if intradaybarindex=0 then

x = 0

// Cac 40
if close>4000 and close<6000 then
While Not(x>6000) Do
x = x +100
DRAWHLINE(x) COLOURED(117, 0, 158)
If x > 6000 then
Break
Endif
Wend
endif

// Dax 30
if close>9000 and close<15000 then
While Not(x>15000) Do
x = x +100
DRAWHLINE(x) COLOURED(117, 0, 158)
If x > 15000 then
Break
Endif
Wend
endif

// Dow Jones
if close>20000 and close<30000 then
While Not(x>30000) Do
x = x +100
DRAWHLINE(x) COLOURED(117, 0, 158)
If x > 30000 then
Break
Endif
Wend
endif

// Nasdaq
if close>6000 and close<8500 then
While Not(x>8500) Do
x = x +100
DRAWHLINE(x) COLOURED(117, 0, 158)
If x > 8500 then
Break
Endif
Wend
endif



// Lignes tous les 250 points

y = 0

// Cac 40
if close>4000 and close<6000 then
While Not(y>6000) Do
y = y +250
DRAWHLINE(y-0.1) COLOURED(117, 0, 158)
DRAWHLINE(y) COLOURED(117, 0, 158)
DRAWHLINE(y+0.1) COLOURED(117, 0, 158)
If y > 6000 then
Break
Endif
Wend
endif

// Dax 30
if close>9000 and close<15000 then
While Not(y>15000) Do
y = y +250
DRAWHLINE(y-0.2) COLOURED(117, 0, 158)
DRAWHLINE(y) COLOURED(117, 0, 158)
DRAWHLINE(y+0.2) COLOURED(117, 0, 158)
If y > 15000 then
Break
Endif
Wend
endif

// Dow Jones
if close>20000 and close<30000 then
While Not(y>30000) Do
y = y +250
DRAWHLINE(y-0.3) COLOURED(117, 0, 158)
DRAWHLINE(y) COLOURED(117, 0, 158)
DRAWHLINE(y+0.3) COLOURED(117, 0, 158)
If y > 30000 then
Break
Endif
Wend
endif

// Dow Jones
if close>6000 and close<8500 then
While Not(y>8500) Do
y = y +250
DRAWHLINE(y-0.3) COLOURED(117, 0, 158)
DRAWHLINE(y) COLOURED(117, 0, 158)
DRAWHLINE(y+0.3) COLOURED(117, 0, 158)
If y > 8500 then
Break
Endif
Wend
endif

 endif

RETURN

Articles en relation
Indicateur de niveaux symboliques
Fichier(s) joint(s) par DarthTrader » 23 Aoû 2016 17:07 (21 Réponses)
Tracer sur PRT
par Raphael88 » 17 Nov 2017 17:18 (5 Réponses)
Tracer automatiquement des droites 25 50 75 100
par Topitop » 05 Nov 2016 12:51 (2 Réponses)
Comment tracer une ligne en pointillée dans ProBuilder?
par Jim » 04 Juin 2017 23:04 (3 Réponses)
Mettre 4 niveaux sur un RSI
par fl9278 » 18 Jan 2016 10:38 (6 Réponses)
niveaux différents lors du passage du DAX à 5€ au DAX à 1€
par KORTAL » 23 Mai 2016 11:09 (9 Réponses)

ProRealTime