[EquisMetaStock Group] Re: Serious question

["Preston Umrysh" <pumrysh@xxxxxxxxx>]

------------------------------------------------------------------------
You cannot reply to this message via email because you have chosen not
to disclose your email address to the group.

To reply:  http://groups.yahoo.com/group/equismetastock/post?act=reply&messageNum=4994
------------------------------------------------------------------------

--- In equismetastock@xxxx, Lajos Toth <lajostot@xxxx> wrote:
> 
>  Dear Sir !
> I have a serious problem which I cannot resolve. I need the formula 
of CCI - Standard and CCI - Equis, it would be good in Metastock 
Formula Language or matemathical formula. My experience the above 
metnioned two indicator differ from original Lambert formula in 
numerical value. Thank you Lajos Tot
>  

Here are a few. Enjoy!

{CCI-Equis1}
MidPri:=((H+L+C)/3);
Diff:=MidPri-Mov(MidPri,14,S);
AveDiff:=Mov(Abs(Diff),14,S);
EquationComp:=Diff/AveDiff;
AdjCon:=66.66667{equivelant=2/3tds};
PercResult:=EquationComp*AdjCon;
PercResult
{end}

{CCI-Equis2}
pds:=Input("CCI periods",1,252,14);
x:=Typical();
y:=Mov(x,pds,S);
MeanDev:=Sum(Abs(x-y),pds)/pds;
ZZI:=(x-y)/(MeanDev*0.015);
ZZI
{end}

{CCI-Lambert}
(((H+L+C)/3) - Mov(((H+L+C)/3),11,S))/
(Mov((Abs(((H+L+C)/3) - Mov(((H+L+C)/3),10,S))),11,S)*.015)
{end}

{CCI-Standard1}
(Typ()-Mov(Typ(),14,S))/
(1.75*Stdev(Abs(Typ()),14))*125
{Note: this is the closest 'equal' to the
build-in version}
{end}

{ CCI-Standard2}
d:=Input("CCI periods",2,39,14);
x:=Typical();
y:=Mov(x,d,S);
z:=Abs(x-y);
z:=If(d>1,z+Abs(Ref(x,-1)-y),z);
z:=If(d>2,z+Abs(Ref(x,-2)-y),z);
z:=If(d>3,z+Abs(Ref(x,-3)-y),z);
z:=If(d>4,z+Abs(Ref(x,-4)-y),z);
z:=If(d>5,z+Abs(Ref(x,-5)-y),z);
z:=If(d>6,z+Abs(Ref(x,-6)-y),z);
z:=If(d>7,z+Abs(Ref(x,-7)-y),z);
z:=If(d>8,z+Abs(Ref(x,-8)-y),z);
z:=If(d>9,z+Abs(Ref(x,-9)-y),z);
z:=If(d>10,z+Abs(Ref(x,-10)-y),z);
z:=If(d>11,z+Abs(Ref(x,-11)-y),z);
z:=If(d>12,z+Abs(Ref(x,-12)-y),z);
z:=If(d>13,z+Abs(Ref(x,-13)-y),z);
z:=If(d>14,z+Abs(Ref(x,-14)-y),z);
z:=If(d>15,z+Abs(Ref(x,-15)-y),z);
z:=If(d>16,z+Abs(Ref(x,-16)-y),z);
z:=If(d>17,z+Abs(Ref(x,-17)-y),z);
z:=If(d>18,z+Abs(Ref(x,-18)-y),z);
z:=If(d>19,z+Abs(Ref(x,-19)-y),z);
z:=If(d>20,z+Abs(Ref(x,-20)-y),z);
z:=If(d>21,z+Abs(Ref(x,-21)-y),z);
z:=If(d>22,z+Abs(Ref(x,-22)-y),z);
z:=If(d>23,z+Abs(Ref(x,-23)-y),z);
z:=If(d>24,z+Abs(Ref(x,-24)-y),z);
z:=If(d>25,z+Abs(Ref(x,-25)-y),z);
z:=If(d>26,z+Abs(Ref(x,-26)-y),z);
z:=If(d>27,z+Abs(Ref(x,-27)-y),z);
z:=If(d>28,z+Abs(Ref(x,-28)-y),z);
z:=If(d>29,z+Abs(Ref(x,-29)-y),z);
z:=If(d>30,z+Abs(Ref(x,-30)-y),z);
z:=If(d>31,z+Abs(Ref(x,-31)-y),z);
z:=If(d>32,z+Abs(Ref(x,-32)-y),z);
z:=If(d>33,z+Abs(Ref(x,-33)-y),z);
z:=If(d>34,z+Abs(Ref(x,-34)-y),z);
z:=If(d>35,z+Abs(Ref(x,-35)-y),z);
z:=If(d>36,z+Abs(Ref(x,-36)-y),z);
z:=If(d>37,z+Abs(Ref(x,-37)-y),z);
z:=If(d>38,z+Abs(Ref(x,-38)-y),z);
z:=z/d;
ZZI:=(x-y)/(z*0.015);
ZZI
{end}



------------------------ Yahoo! Groups Sponsor ---------------------~-->
Sell a Home with Ease!
http://us.click.yahoo.com/SrPZMC/kTmEAA/MVfIAA/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/