Ci-dessous une demande qui a été envoyée à ProRealTime :

Bonjour,
Pouvez vous m’écrire ce programme SVP.
Sur mon écran j’ai le CAC 40 et deux MACD moins le signal. Le premier histogramme réglé 20/26/9 et le deuxième ligne-points réglé 20/66/9.
Je souhaite intervenir sur le marché entre 9H et 17H30.
Ne pas prendre de position après 17H10
Fermer la position seulement si elle est gagnante à 17H30.
Dans le cas d’une position perdante la laisser ouverte jusqu’à 22H.

Pour l’achat:

Condition 1: Utiliser le MACD moins le signal 20/66/9 ligne-points.
Achat après deux barres vertes de suite.Achat à l’ouverture de la 3ème barre.
Point-Vert-Point-Vert-Point-Achat.

Condition 2: Si le cours du CAC 40 au comptant est au dessus de la MM7 de 4pts.

Condition 3: Si les deux barres sont bien vertes mais que le chandelier ferme en dessous du cours du chandelier précédent ne pas acheter. (Si le cours de clôture du chandelier et inférieur au précédent.)

Si ces trois conditions ne sont pas remplies ne pas acheter et attendre la fin de la 3ème ou 4 ème etc barres remplissant ces trois conditions.

Mettre un stop à 20pts et un objectif à 10pts.

Pour la vente:

Prendre les mêmes conditions mais à l’envers.

Condition 1: Utiliser le MACD moins le signal 20/66/9 ligne-points.
Deux barres rouges de suite: (Point-rouge-Point-rouge-Point-Vente
Condition 2: Cours du CAC 40 au comptant en dessous de 4pts de la MM7.
Condition 3: Si les deux barres sont bien rouges mais que le chandelier ferme au dessus du chandelier précédent ne pas vendre
( Si le cours de clôture du chandelier et supérieur au précédent ne pas vendre.)
Si ces trois conditions ne sont pas remplies ne pas acheter et attendre la fin de la 3ème ou 4 ème etc barres remplissant ces trois conditions.

Mettre toujours un stop à 20pts et un objectif à 10pts.

Dans l’attente,
merci.

Et une proposition de réponse :

DEFPARAM CumulateOrders = False
DEFPARAM FLATBEFORE=090000
DEFPARAM FLATAFTER=220000
fermeturepositiongagnante=173000
hlimitepriseposition=171000

macd1=MACD[20,66,9](close)
MM7=Average[7](close)

c1=macd1 > 0 and macd1[1] > 0
c2=close >= MM7+4*pointsize
c3=close >=close[1]

IF c1 and c2 and c3 and time < hlimitepriseposition then
buy 1 share at market
endif

c4=macd1 < 0 and macd1[1] < 0
c5=close <= MM7-4*pointsize
c6=close <=close[1]

IF c4 and c5 and c6 and time < hlimitepriseposition then
sellshort 1 share at market
endif

if onmarket and time = fermeturepositiongagnante then
if longonmarket and close > tradeprice then
sell at market
elsif shortonmarket and close < tradeprice then
exitshort at market
endif
endif

set stop ploss 20
set target pprofit 10