4trading (www.4trading.it)

analisi di borsa

Archive for the ‘metastock’ Category

formula metastock (fibonacci)

Posted by 4trading su 19 dicembre 2007

Pubblichiamo una formula che calcola i volumi visualizzati in orizzontale e, direttamente, sul grafico dei prezzi. L’utilita’ di questa formula e’ quella di visualizzare le fasce di prezzo dove si sono concentrati i volumi determinando, in tal modo, i livelli di supporto e resistenze dati dagli scambi.

L’applicazione di questa formula e’ utile se la compressione dei dati del grafico e’ settimanale, mentre su quella giornaliera perde un poco di significato.

Il settaggio temporale della formula sottostante e’ pari a 50 periodi (giorni o settimane), almeno come l’utilizziamo su base settimanale. Per una corretta visualizzazione giornaliera e’ necessario ampliare il periodo di osservazione ad almeno 150.

Inserimento della formula all’interno del programma.

Cliccare nel menu il tasto ƒ(ҳ), cliccare new, scrivere il nome della formula che si desidera (es. ritracciamenti di Fibonacci), copia incolla della formula pubblicata in seguito nell’apposita sezione:

{Volume By Price 25}
{©2006 Roy Larsen, www.metastocktips.com}
d:=Input(“Bars to Include”,1,9999,50);
n:=Input(“Scaling Factor”,.005,99,5);
k:=Input(“Plot Frame?”,0,1,1);
y:=Cum(1);f:=LastValue(y);z:=f-1=y;
d:=LastValue(If(d>=f,f-1,d));a:=(f-d<y)*(y>1);
g:=a*V;b:=LastValue(Cum(g));
q:=LastValue(HighestSince(1,a=0,C));
r:=LastValue(LowestSince(1,a=0,C));
i:=(q-r)/25;u:=r+i*.5;m:=n*d/b;
x:=LastValue(Cum((C<(r+i))*g));ValueWhen(1,f-x*m<y,u);
x:=LastValue(Cum((C>=(r+i))*(C<(r+i*2))*g));ValueWhen(1,f-
x*m<y,u+i);
x:=LastValue(Cum((C>=(r+i*2))*(C<(r+i*3))*g));ValueWhen(1,f-
x*m<y,u+i*2);
x:=LastValue(Cum((C>=(r+i*3))*(C<(r+i*4))*g));ValueWhen(1,f-
x*m<y,u+i*3);
x:=LastValue(Cum((C>=(r+i*4))*(C<(r+i*5))*g));ValueWhen(1,f-
x*m<y,u+i*4);
x:=LastValue(Cum((C>=(r+i*5))*(C<(r+i*6))*g));ValueWhen(1,f-
x*m<y,u+i*5);
x:=LastValue(Cum((C>=(r+i*6))*(C<(r+i*7))*g));ValueWhen(1,f-
x*m<y,u+i*6);
x:=LastValue(Cum((C>=(r+i*7))*(C<(r+i*8))*g));ValueWhen(1,f-
x*m<y,u+i*7);
x:=LastValue(Cum((C>=(r+i*8))*(C<(r+i*9))*g));ValueWhen(1,f-
x*m<y,u+i*8);
x:=LastValue(Cum((C>=(r+i*9))*(C<(r+i*10))*g));
ValueWhen(1,f-x*m<y,u+i*9);
x:=LastValue(Cum((C>=(r+i*10))*(C<(r+i*11))*g));
ValueWhen(1,f-x*m<y,u+i*10);
x:=LastValue(Cum((C>=(r+i*11))*(C<(r+i*12))*g));
ValueWhen(1,f-x*m<y,u+i*11);
x:=LastValue(Cum((C>=(r+i*12))*(C<(r+i*13))*g));
ValueWhen(1,f-x*m<y,u+i*12);
x:=LastValue(Cum((C>=(r+i*13))*(C<(r+i*14))*g));
ValueWhen(1,f-x*m<y,u+i*13);
x:=LastValue(Cum((C>=(r+i*14))*(C<(r+i*15))*g));
ValueWhen(1,f-x*m<y,u+i*14);
x:=LastValue(Cum((C>=(r+i*15))*(C<(r+i*16))*g));
ValueWhen(1,f-x*m<y,u+i*15);
x:=LastValue(Cum((C>=(r+i*16))*(C<(r+i*17))*g));
ValueWhen(1,f-x*m<y,u+i*16);
x:=LastValue(Cum((C>=(r+i*17))*(C<(r+i*18))*g));
ValueWhen(1,f-x*m<y,u+i*17);
x:=LastValue(Cum((C>=(r+i*18))*(C<(r+i*19))*g));
ValueWhen(1,f-x*m<y,u+i*18);
x:=LastValue(Cum((C>=(r+i*19))*(C<(r+i*20))*g));
ValueWhen(1,f-x*m<y,u+i*19);
x:=LastValue(Cum((C>=(r+i*20))*(C<(r+i*21))*g));
ValueWhen(1,f-x*m<y,u+i*20);
x:=LastValue(Cum((C>=(r+i*21))*(C<(r+i*22))*g));
ValueWhen(1,f-x*m<y,u+i*21);
x:=LastValue(Cum((C>=(r+i*22))*(C<(r+i*23))*g));
ValueWhen(1,f-x*m<y,u+i*22);
x:=LastValue(Cum((C>=(r+i*23))*(C<(r+i*24))*g));
ValueWhen(1,f-x*m<y,u+i*23);
x:=LastValue(Cum((C>=(r+i*24))*(C<(r+i*25))*g));
ValueWhen(1,f-Int(x*m)=y,u+i*24);
x:=(f-d=y)*k;ValueWhen(1,x,q);ValueWhen(1,Alert(x,2),If(x,q,r));
{end}

Annunci

Posted in metastock | Leave a Comment »

formula di metastock

Posted by 4trading su 30 novembre 2007

pubblichiamo una formula di Jose Silva che traccia in automatico linee di tendenza, rialziste e ribassiste, sul grafico del titolo da analizzare. La formula e’ settata per essere applicata sia per il brevissimo che il lungo periodo.  Quando si applichera’ la formula si aprira’ una finestra dove sara’ chiesto all’utente se le trendline da tracciare saranno di breve (short), medio (med) o lungo (long) periodo.Inserimento della formula all’interno del programma.

Cliccare nel menu il tasto ƒ(ҳ), cliccare new, scrivere in nome della formula, copia incolla della formula pubblicata in seguito nell’apposita sezione:

 {Resistance & Support Trendlines

©Copyright 2001~2007 Jose Silva.
The grant of this license is for personal use
  only – no resale or repackaging allowed.
All code remains the property of Jose Silva.}

pp:= Input(“Long = 2,Med = 1,Shor2 = .5”, 0.5,6,.5);
x0:= If(MP()>=Ref(MP(),-1),ATR(1),0);
y0:= Cum(If(x0>0,1,0));
z1:= If(x0>0,ATR(1),HIGH);
z2:=Log(z1/HIGH);
z3:= Cum(z2)/Max(1,y0);
z4:= 100*Exp(LastValue(z3));
a1:= LastValue(z4)*pp;
a2:= LastValue(Peak(1,H,a1));
a3:= LastValue(Peak(2,H,a1));
a4:= a2-a3;
a5a:=PeakBars(2,H,a1);
a5b:=PeakBars(1,H,a1);
a5:= LastValue(a5a)-LastValue(a5b);
a6:= a4/a5; {Slope}
a7:= LastValue(Cum(1)-a5b);
a8:= LastValue(Cum(1)-a5a);
a9:= Cum(1);
a10:=a3+(a6*(a9-a8));
a11:=If(a9<a8,BarsSince(a9>=a8),a10);
a11;


pp:= Input(“Long = 2,Med = 1,Short = .5”, 0.5,6
,.5);
x0:= If(MP()<=Ref(MP(),-1),ATR(1),0);
y0:= Cum(If(x0>0,1,0));
z1:= If(x0>0,ATR(1),LOW);
z2:=Log(z1/LOW);
z3:= Cum(z2)/Max(1,y0);
z4:= 100*Exp(LastValue(z3));
a1:= LastValue(z4)*pp;
a2:= LastValue(Trough(1,L,a1));
a3:= LastValue(Trough(2,L,a1));
a4:= a2-a3;
a5a:=TroughBars(2,L,a1);
a5b:=TroughBars(1,L,a1);
a5:= LastValue(a5a)-LastValue(a5b);
a6:= a4/a5; {Slope}
a7:= LastValue(Cum(1)-a5b);
a8:= LastValue(Cum(1)-a5a);
a9:= Cum(1);
a10:=a3+(a6*(a9-a8));
a11:=If(a9<a8,BarsSince(a9>=a8),a10);
a11;

Posted in metastock | Contrassegnato da tag: , | Leave a Comment »