[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [EquisMetaStock Group] How to read VAP ( Volume at Price)

To: equismetastock@xxxxxxxxxxxxxxx
Subject: Re: [EquisMetaStock Group] How to read VAP ( Volume at Price)
From: le corbeaux masque <lecorbeauxmasque7@xxxxxxxxx>
Date: Fri, 29 Aug 2003 04:38:41 -0700
In-reply-to: <bincm6+fpo2@xxxxxxxxxxx>
PureBytes Links
Trading Reference Links
hi there,

i beleive it's mostly my fault as i'm receiving
several independant email as to how to use it,

i didn't wanted to fill the group menber's email with
the knowHowto of this indicator whish at first got
very little interest (appart from roy)

send me an independant email and i'll send you the
tutorial (as i'm writing it, it is long and has
several attached picture/code improvments)
the whole thing is free and open to everyone to share
and learn, it actually is just simple basis i found
out about evryone can use at his own will
-i beleive it can be a real kick to any trading
systeme-

o btw:>> the uses i make of the VAP has been
develloped independently, there is another guy whish
is using it in a completely different way 
(http://www.floatanalysis.com/technical_anlysis.htm)
as amercians say : "whatever float your boat"...


regards, 




--- mudgalbharat <no_reply@xxxxxxxxxxxxxxx> wrote:
> Hello Roy
> 
> There has been a lot of writing on the VAP but very
> less has been 
> said about How to Read this indicator. Can you
> please throw some 
> light as I am a newbie. The formula I am using is as
> below.
> 
> regards
> 
> Bharat Mudgal
> 
> > > {ROY LARSEN:VAP for MS} 
> > > 
> > > { vap-A}
> > > q2:=input("precision",1,9,5);
> > > q3:=input("select segment",1,9,5);
> > > q1:=(l+((h-l)/q2)*q3);
> > > D:=Input("Set Default Periods",0,2000,200);
> > > N:=5; {scaling factor}
> > > D:=LastValue(If(D=0,LastValue(Cum(1)-1),D));
> > > F:=LastValue(Cum(1));
> > > A:=F-D<Cum(1);
> > > B:=LastValue(Cum(If(A,V,0)));
> > > Q:=LastValue(HighestSince(1,A=0,C));
> > > R:=LastValue(LowestSince(1,A=0,C));
> > > I:=(Q-R)/96;  K:=.5;
> > > X:=LastValue(Cum(If(q1<(R+I) AND A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*K);
> > > X:=LastValue(Cum(If(q1>=(R+I) AND q1<(R+I*2) AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*3*K);
> > > X:=LastValue(Cum(If(q1>=(R+I*2) AND q1<(R+I*3)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*5*K);
> > > X:=LastValue(Cum(If(q1>=(R+I*3) AND q1<(R+I*4)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*7*K);
> > > X:=LastValue(Cum(If(q1>=(R+I*4) AND q1<(R+I*5)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*9*K);
> > > X:=LastValue(Cum(If(q1>=(R+I*5) AND q1<(R+I*6)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*5.5);
> > > X:=LastValue(Cum(If(q1>=(R+I*6) AND q1<(R+I*7)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*6.5);
> > > X:=LastValue(Cum(If(q1>=(R+I*7) AND q1<(R+I*8)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*7.5);
> > > X:=LastValue(Cum(If(q1>=(R+I*8) AND q1<(R+I*9)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*8.5);
> > > X:=LastValue(Cum(If(q1>=(R+I*9) AND q1<(R+I*10)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*9.5);
> > > X:=LastValue(Cum(If(q1>=(R+I*10) AND q1<(R+I*11)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*10.5);
> > > X:=LastValue(Cum(If(q1>=(R+I*11) AND q1<(R+I*12)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*11.5);
> > > X:=LastValue(Cum(If(q1>=(R+I*12) AND q1<(R+I*13)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*12.5);
> > > X:=LastValue(Cum(If(q1>=(R+I*13) AND q1<(R+I*14)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*13.5);
> > > X:=LastValue(Cum(If(q1>=(R+I*14) AND q1<(R+I*15)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*14.5);
> > > X:=LastValue(Cum(If(q1>=(R+I*15) AND q1<(R+I*16)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*15.5);
> > > X:=LastValue(Cum(If(q1>=(R+I*16) AND q1<(R+I*17)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*16.5);
> > > X:=LastValue(Cum(If(q1>=(R+I*17) AND q1<(R+I*18)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*17.5);
> > > X:=LastValue(Cum(If(q1>=(R+I*18) AND q1<(R+I*19)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*18.5);
> > > X:=LastValue(Cum(If(q1>=(R+I*19) AND q1<(R+I*20)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-Int(X*D*N)=Cum(1),R+I*19.5);
> > > 
> > > 
> > > {vap-B}
> > > q2:=input("precision",1,9,5);
> > > q3:=input("select segment",1,9,5);
> > > q1:=(l+((h-l)/q2)*q3);
> > > D:=Input("Set Colour and Style",0,0,0);
> > > D:=FmlVar("vap-A","D");
> > > N:=FmlVar("vap-A","N");
> > > F:=LastValue(Cum(1));
> > > A:=F-D<Cum(1);
> > > B:=LastValue(Cum(If(A,V,0)));
> > > Q:=LastValue(HighestSince(1,A=0,C));
> > > R:=LastValue(LowestSince(1,A=0,C));
> > > I:=(Q-R)/96;  K:=.5;
> > > X:=LastValue(Cum(If(q1>=(R+I*20) AND q1<(R+I*21)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(20+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*21) AND q1<(R+I*22)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(21+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*22) AND q1<(R+I*23)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(22+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*23) AND q1<(R+I*24)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(23+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*24) AND q1<(R+I*25)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(24+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*25) AND q1<(R+I*26)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(25+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*26) AND q1<(R+I*27)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(26+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*27) AND q1<(R+I*28)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(27+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*28) AND q1<(R+I*29)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(28+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*29) AND q1<(R+I*30)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(29+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*30) AND q1<(R+I*31)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(30+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*31) AND q1<(R+I*32)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(31+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*32) AND q1<(R+I*33)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(32+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*33) AND q1<(R+I*34)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(33+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*34) AND q1<(R+I*35)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(34+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*35) AND q1<(R+I*36)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(35+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*36) AND q1<(R+I*37)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(36+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*37) AND q1<(R+I*38)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(37+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*38) AND q1<(R+I*39)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-X*D*N<Cum(1),R+I*(38+K));
> > > X:=LastValue(Cum(If(q1>=(R+I*39) AND q1<(R+I*40)
> AND
> > > A,V,0))/B);
> > > ValueWhen(1,F-Int(X*D*N)=Cum(1),R+I*39.5);
> > > 
> 
=== message truncated ===


__________________________________
Do you Yahoo!?
Yahoo! SiteBuilder - Free, easy-to-use web site design software
http://sitebuilder.yahoo.com

------------------------ Yahoo! Groups Sponsor ---------------------~-->
Buy Ink Cartridges or Refill Kits for Your HP, Epson, Canon or Lexmark
Printer at Myinks.com. Free s/h on orders $50 or more to the US & Canada. http://www.c1tracking.com/l.asp?cid=5511
http://us.click.yahoo.com/l.m7sD/LIdGAA/qnsNAA/BefplB/TM
---------------------------------------------------------------------~->

To unsubscribe from this group, send an email to:
equismetastock-unsubscribe@xxxxxxxxxxxxxxx

 

Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/
References:
- [EquisMetaStock Group] How to read VAP ( Volume at Price)
  - From: mudgalbharat
Prev by Date: Re: [EquisMetaStock Group] How to read VAP ( Volume at Price)
Next by Date: Re: [EquisMetaStock Group] against spam
Previous by thread: Re: [EquisMetaStock Group] How to read VAP ( Volume at Price)
Next by thread: Re: [EquisMetaStock Group] How to read VAP ( Volume at Price)
Index(es):
- Date
- Thread