alti (nanotecnologie) nasdaq (3 lettori)

osinod · 1 Aprile 2009

idem stop per il momento

Fernando'S · 1 Aprile 2009

Eolo ha scritto:
Continuiamo a vedere quello che succede ...

P.S. ho trovato la formula per il Volume at Price con Metastock

Bravo Eolo !!
i migliori si fanno riconoscere sempre

postamela (anche in privato)
grazie !!!
ciao :up:

Eolo · 2 Aprile 2009

Continuiamo con l'esperimento ...
prossima resistenza a 1,10 e poi a 1,17, altrimenti si ritorna a 1,07 (N.B. io non sto operando, è un esperimento "in corpore vili"

)

Fernando'S ha scritto:
Bravo Eolo !!
i migliori si fanno riconoscere sempre
postamela (anche in privato)
grazie !!!
ciao

Magari fossi bravo :specchio:

La formula è questa

"Volume By Price 25 Roy Larsen"

d:=Input("Bars to Include",1,9999,100);
n:=Input("Scaling Factor",1,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}

Non è mia ma è' appunto di tale Roy Larsen e l'ho trovata qua

http://trader.online.pl/MSZ/e-w-Volume_By_Price.html

Mi pare che funzioni.
E' possibile impostare il numero di barre che si vogliono prendere in considerazione tramite l'input "Bars to include" e che vengono evidenziati dal rettangolo (o trapezio a seconda della visualizzazione): nel caso di ALTI ho messo 84 che corrisponde al 28/11/08. "Scaling factor" è semplicemente un fattore di scala delle barre orizzontali. "Plot frame?" se lasciato ad 1 plotta il rettangolo, se messo a 0 non lo plotta.
I risultati corrispondono con quelli di Parity.
Per il "Volume at Price" non riesco a trovare una trattazione specifica: richiama molto il "Market Profile" però, da quel poco che ho letto, il Market Profile registra solo i prezzi e non i volumi, per cui sarebbe più simile al DaysAtPrice di Parity. Ne sapete qualcosa di più? Ho vistoche qualcuno lo chiama "Volume Histogram".
Per lo spessore delle line non ho trovato altro sistema che reimpostarle a mano.