Mercredi 11 février 2009 3 11 /02 /Fév /2009 17:03



Ci - dessous le code Prorealtime  histogramme (mettre sous le graphe) du TTM TREND de John Carter.

Lien ,avec une video explicative du TTM-TREND (en anglais)
http://www.tradethemarkets.com/products/item9.cfm




////////////TTMTEND JOHNCARTER

//VARIABLE =  CB-  par DEFAUT CB=6
//customclose par defaut = totalprice

 

if barindex>1 then
 hclose= customclose
 hopen= (hopen[1] + hclose[1])/2
 
else
 hopen=open
 hclose= customclose
endif

if hclose > hopen then
 color =1
else
 color =-1
endif

for i =1 to cb
 
 if hopen <= max(hopen[i],hclose[i]) and hopen >= min(hopen[i],hclose[i]) and hclose <= max(hopen[i],hclose[i]) and hclose >= min(hopen[i],hclose[i])then  // mettre sur une seule ligne
  
  color=color[i]
 endif
next


return color as " TTM TREND"  // mettre histogramme






Ci - dessous le code Prorealtime  chart (mettre sur le graphe) du TTM TREND .


/////////////TTMTEND JOHNCARTER

//VARIABLE =  CB  - par  DEFAUT CB=6
// customclose - par défaut totalprice (c+o+l+h)/4

// ce programme s'ouvre sur le graphe prix en position barchart.
//vous devez remplacer les lignes par des points (en position 3)
//et choisir suivant votre choix couleur hausse et baisse
////////////////////////////////

 

if barindex>1 then
 hclose= customclose
 hopen= (hopen[1] + hclose[1])/2
 
else
 hopen=open
 hclose=customclose
endif

if hclose > hopen then
 c =1
else
 c =-1
endif

for i =1 to cb
 
 if hopen <= max(hopen[i],hclose[i]) and hopen >= min(hopen[i],hclose[i]) and hclose <= max(hopen[i],hclose[i]) and hclose >= min(hopen[i],hclose[i])then  // mettre sur une seule ligne
  

  
  c=c[i]
 endif
next

 

/////////////////coloriage du barchart

 

r=(high-low)/29
b1=low
b2=b1+r
b3=b2+r
b4=b3+r
b5=b4+r
b6=b5+r
b7=b6+r
b8=b7+r
b9=b8+r
b10=b9+r
b11=b10+r
b12=b11+r
b13=b12+r
b14=b13+r
b15=b14+r
b16=b15+r
b17=b16+r
b18=b17+r
b19=b18+r
b20=b19+r
b21=b20+r
b22=b21+r
b23=b22+r
b24=b23+r
b25=b24+r
b26=b25+r
b27=b26+r
b28=b27+r
b29=b28+r
b30=b29+r

return b1 coloured by c,b2 coloured by c,b3 coloured by c,b4 coloured by c,b5 coloured by c,b6 coloured by c,b7 coloured by c,b8 coloured by c,b9 coloured by c,b10 coloured by c,b11 coloured by c,b12 coloured by c,b13 coloured by c,b14 coloured by c,b15 coloured by c,b16 coloured by c,b17 coloured by c,b18 coloured by c,b19 coloured by c,b20 coloured by c,b21 coloured by c,b22 coloured by c,b23 coloured by c,b24 coloured by c,b25 coloured by c,b26 coloured by c,b27 coloured by c,b28 coloured by c,b29 coloured by c,b30 coloured by c

 



Publié dans : John Carter
Ecrire un commentaire - Voir les 2 commentaires
Mardi 20 janvier 2009 2 20 /01 /Jan /2009 13:08

L 'indicateur Demarker créé par Tom Demark.

voir:
http://www.metaquotes.net/techanalysis/indicators/demarker

Code Prorealtime :


// demark//

// variable : p = période (défaut =14)

if high > high[1]   then
 demax = high - high[1]
else
 demax = 0
endif

if low < low[1] then
 demin = low[1]-low
else
 demin =0
endif

a1 = Average[p](demax)
a2 = Average[p](demin)

dmark =100*( a1 /  ( a1 + a2 ))

 

return dmark as "demark",30 as"30",70 as"70",50 as "50"




Publié dans : Sohocool
Ecrire un commentaire - Voir les 0 commentaires
Dimanche 18 janvier 2009 7 18 /01 /Jan /2009 18:35


Macd zero retard (zero lag) dema avec réglage de la moyenne mobile du signal.

Formule Prorealtime :


// MACD ZERO LAG (zero retard)

// p= variable moyenne dema courte (défaut = 12)

// q= variable moyenne dema longue (défaut = 26)

// r= variable moyenne du signal ) (défaut = 9)

// s = ma type (sorte moyenne mobile) (défaut = exponentielle)


// macd -signal = mettre histogramme


z1=DEMA[p](close)


z2 =dema[q](close)

e= z1 - z2  // macd

 

z3=average[r,s](e) // signal


g=e-z3  // macd - signal

if g >= g[1] then
 color =1
else
 color =-1
endif


return g  coloured by  color as "macd-signal"  ,0 as "zero",e AS "MACD ZEROLAG",z3 AS "signal"



Publié dans : Sohocool
Ecrire un commentaire - Voir les 0 commentaires
Dimanche 18 janvier 2009 7 18 /01 /Jan /2009 17:50

Le maddox momentum est un momentum avec les volumes .

Le code Prorealtime:


///Maddox momentum

// variable : p période e la summation (défaut =21)

pr= customclose

a1=(pr-pr[1])*volume

aa=summation[p](a1) / 1000


return  aa as "maddox momentum" , 0 as "ligne zero"





Publié dans : Volume
Ecrire un commentaire - Voir les 0 commentaires
Dimanche 18 janvier 2009 7 18 /01 /Jan /2009 17:00

je viens de traduire en language Prorealtime le "macd on rsi" vu dans la librairie de Metetrader4.

lien : http://codebase.mql4.com/3739


On calcule le rsi d'une moyenne exponentielle , puis le macd de cet rsi.


Formule Prorealtime:

//macd on rsi

// variable : p1 = moyenne exponentielle (défaut =5)
///                p2 = péroide rsi (défaut = 3)
//                 p3 = moyenne rapide macd rsi (défaut = 10 )
//                 p4= moyenne lente macd ri (défaut = 20)
//                 p5= moyenne macd signal (défaut = 5)

pr= customclose

ma = exponentialaverage[p1](pr)

brsi = rsi[p2](ma)

bmacd =8*( exponentialaverage[p3](brsi) - exponentialaverage[p4](brsi))

//mettre bmacd en histogramme

if bmacd >= bmacd[1] then
 color =1
else
 color =-1
endif

 

bsignal = average [p5](bmacd)


return  bmacd coloured by color as "macd rsi",bsignal as "macd signal",brsi as "rsi expo",50 as"ligne 50 rsi"




Publié dans : Sohocool
Ecrire un commentaire - Voir les 0 commentaires

Présentation

Syndication

  • Flux RSS des articles

LOCALISATION VISITEURS

Locations of visitors to this page

Calendrier

Juin 2012
L M M J V S D
        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  
<< < > >>
Créer un blog gratuit sur over-blog.com - Contact - C.G.U. - Rémunération en droits d'auteur - Signaler un abus - Articles les plus commentés