|
PureBytes Links
Trading Reference Links
|
Maurizio
Maybe a few words on how to use it or what to
look for in this indicator will be appreciated.
Thank you
DusantChief Architect<A
href="">http://www.candlestrength.com/
----- Original Message -----
From: "maurineri2002" <<A
href=""><FONT face=Verdana
size=2>direzione@xxxxxx>
To: <<A
href=""><FONT face=Verdana
size=2>equismetastock@xxxxxxxxxxxxxxx<FONT face=Verdana
size=2>>
Sent: Sunday, March 28, 2004 13:05
PM
Subject: [EquisMetaStock Group] Bell distribution
- ROC bar example
<FONT face=Verdana
size=2>> Hi,> this little code use the last 14 bars to show bell
distribution of ROC> bars.> Thanks Jose for shortcuts and
improvment...> > Regards,> maurizio> >
> ======================> ROC - bar distribution>
======================> ---8<-----------------> > {
****** (c) Maurizio Neri - 03/2004 ****** }> { <A
href=""><FONT face=Verdana
size=2>maurizio.neri@xxxxxx }> {
Distribuzione Empirica per Metastock v1.1 }> > pds:=Input("ROC
periods",1,252,1);> > { calculate current dt, min, max }>
Rc:=ROC(C,pds,%);> Kh:=Highest(Rc);> Kl:=Lowest(Rc);>
> { Counting and assignment "loop" dt+}> B:=Kh/7;>
X:=1;> S1:=100*Cum(Rc>=(Kh-X*B))/Cum(1);> X:=X+1;>
S2:=100*Cum(Rc>=(Kh-X*B) AND Rc<(Kh-(X-1)*B))/Cum(1);>
X:=X+1;> S3:=100*Cum(Rc>=(Kh-X*B) AND
Rc<(Kh-(X-1)*B))/Cum(1);> X:=X+1;> S4:=100*Cum(Rc>=(Kh-X*B)
AND Rc<(Kh-(X-1)*B))/Cum(1);> X:=X+1;>
S5:=100*Cum(Rc>=(Kh-X*B) AND Rc<(Kh-(X-1)*B))/Cum(1);>
X:=X+1;> S6:=100*Cum(Rc>=(Kh-X*B) AND
Rc<(Kh-(X-1)*B))/Cum(1);> X:=X+1;> S7:=100*Cum(Rc>=(Kh-X*B)
AND Rc<(Kh-(X-1)*B))/Cum(1);> > { Counting and assignment
"loop" dt- }> B:=Abs(Kl/7);> X:=1;>
S8:=100*Cum(Rc>=(0-X*B) AND Rc<(0-(X-1)*B))/Cum(1);>
X:=X+1;> S9:=100*Cum(Rc>=(0-X*B) AND
Rc<(0-(X-1)*B))/Cum(1);> X:=X+1;> S10:=100*Cum(Rc>=(0-X*B)
AND Rc<(0-(X-1)*B))/Cum(1);> X:=X+1;>
S11:=100*Cum(Rc>=(0-X*B) AND Rc<(0-(X-1)*B))/Cum(1);>
X:=X+1;> S12:=100*Cum(Rc>=(0-X*B) AND
Rc<(0-(X-1)*B))/Cum(1);> X:=X+1;> S13:=100*Cum(Rc>=(0-X*B)
AND Rc<(0-(X-1)*B))/Cum(1);> X:=X+1;>
S14:=100*Cum(Rc<(0-(X-1)*B))/Cum(1);> > { Restrict plots to
last 14 bars }> X:=14-(Cum(1)-ValueWhen(1,Ref(Cum(1),-1)+14>
=LastValue(Cum(1)),Cum(1)));> > If(X=1,S1, If(X=2,S2,
If(X=3,S3, If(X=4,S4,> If(X=5,S5, If(X=6,S6,
If(X=7,S7,0)))))));> > If(X=8,S8, If(X=9,S9, If(X=10,S10,
If(X=11,S11,> If(X=12,S12, If(X=13,S13,
If(X=14,S14,0)))))));> > Kh;Kl;Kh/7;Kl/7> > >
> > > > > Yahoo! Groups Links>
> <*> To visit your group on the web, go to:>
<A
href=""><FONT face=Verdana
size=2>http://groups.yahoo.com/group/equismetastock/<FONT
face=Verdana size=2>> > <*> To unsubscribe from this group, send
an email to:> <A
href=""><FONT face=Verdana
size=2>equismetastock-unsubscribe@xxxxxxxxxxxxxxx<FONT
face=Verdana size=2>> > <*> Your use of Yahoo! Groups is subject
to:> <A
href=""><FONT face=Verdana
size=2>http://docs.yahoo.com/info/terms/<FONT face=Verdana
size=2>> > >
Yahoo! Groups Links
To visit your group on the web, go to:http://groups.yahoo.com/group/equismetastock/
To unsubscribe from this group, send an email to:equismetastock-unsubscribe@xxxxxxxxxxxxxxx
Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
|