MetaStock™ Zone Forum & FAQ Artykuły Linki Elliott Waves EasyLanguage™ Zone

 A B C D E F G H I J K L M N O P R S T U V W Y Z #

Volume By Price 25 by Roy Larsen

From: murusprimus <sace[at]shaw.ca>
To: equismetastock[at]yahoogroups.com <equismetastock[at]yahoogroups.com>
Date: Wednesday, October 25, 2006, 8:20:27 AM
Subject: [EquisMetaStock Group] Vertical Volume

Is there an MS indicator that displays Volume in a vertical column able to be scaled to the Price ?

Wallace

=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
To: equismetastock[at]yahoogroups.com <equismetastock[at]yahoogroups.com>
Date: Friday, October 27, 2006, 6:11:33 AM
Subject: [EquisMetaStock Group] Re: Vertical Volume

Wallace,

Try this to see if it is what you are looking for.

Preston

Volume By Price 25

{C2006 Roy Larsen, www.metastocktips.com}

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);
{end}

=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
To: equismetastock[at]yahoogroups.com <equismetastock[at]yahoogroups.com>
Date: Friday, October 27, 2006, 6:29:58 AM
Subject: [EquisMetaStock Group] Re: Vertical Volume

Wallace,

BTW, initial discussion of this indicator starts in the April, 2003 if you should want to look at its evolution.

enjoy and thanks Roy,

Preston

Source / From: TOP
Metastockusers[at]yahoogroups[dot]com

Equis and MetaStock® and MetaStock Professional® are registered trademarks of Equis International. Achelis Binary Wave®, The DownLoader®,
Expert Advisor®, OptionScope®, Quotecenter® and Smart Charts® are trademarks of Equis International, a Thomson Reuters company.