RE: [EquisMetaStock Group] Weekly Double Stoch on daily charts

["Michael Bethell" <mdtmn@xxxxxxxxxxxxxxxx>]

Hi Roy,

<span
>                      Wonderful

 
Thanks

Michael B

 

<span
>-----Original Message-----
From: Roy Larsen
[mailto:rlarsen@xxxxxxxxxxxxxx] 
Sent: Monday, 22 September 2003
8:25 AM
To: equismetastock@xxxxxxxxxxxxxxx
Subject: Re: [EquisMetaStock
Group] Weekly Double Stoch on daily charts

<font size=3
face="Times New Roman"> 

<font size=2
face="Courier New">Michael<font
size=2 face="Courier New">

I've also posted the following formula on the
Stock Central site but include
it here for anyone that may be interested. I have
only converted the second
of the two formulas you posted as it seemed to be
the easiest to manage.

To those that want comments and an explanation for
all posted code I
apologise in advance - there aren't any.

Roy

  {Weekly Double Stochastic}
  {© 2003 Roy Larsen}
  {rlarsen@xxxxxxxxxxxxxx}
  {use on daily charts}
D:=Input("Periods (weeks)",1,99,10);
Q:=Input("1= MS Dynamic update,  2=
End-of-week update",1,2,1);
{1=dynamic current week, MS compatible}
{2=update @ end of week except when no Friday}
F:=DayOfWeek()=5;
M:=DayOfWeek()<=ValueWhen(2,1,DayOfWeek());
G:=LastValue(Cum(1))=Cum(1); R:=0.5;
J:=If(F,1,If(Alert(F,2)=0 AND M,2,0));
J:=If(G AND J+Q=1,1,J);
Hw:=If(J=1,HighestSince(1,M,H),If(J=2,
  If(BarsSince(Ref(M,-1))=4,Ref(HHV(H,5),-1),
  If(BarsSince(Ref(M,-1))=3,Ref(HHV(H,4),-1),
  If(BarsSince(Ref(M,-1))=2,Ref(HHV(H,3),-1),
  If(BarsSince(Ref(M,-1))=1,Ref(HHV(H,2),-1),
  Ref(H,-1))))),0));
Hw:=ValueWhen(1,J>0 AND Hw>0,Hw);
Lw:=If(J=1,LowestSince(1,M,L),If(J=2,
  If(BarsSince(Ref(M,-1))=4,Ref(LLV(L,5),-1),
  If(BarsSince(Ref(M,-1))=3,Ref(LLV(L,4),-1),
  If(BarsSince(Ref(M,-1))=2,Ref(LLV(L,3),-1),
  If(BarsSince(Ref(M,-1))=1,Ref(LLV(L,2),-1),
  Ref(L,-1))))),0));
Lw:=ValueWhen(1,J>0 AND Lw>0,Lw);
K:=ValueWhen(1,J,If(J=1,C,ValueWhen(2,1,C)));
Ls:=LowestSince(D,J,Lw);
Hs:=HighestSince(D,J,Hw);
P0:=((K-Ls)/(Hs-Ls))*100;
P1:=If(Cum(P0>0)=1,P0,ValueWhen(1,J,PREV)*(1-R)+P0*R);
Lp:=LowestSince(D,J,P1);
Hp:=HighestSince(D,J,P1);
P2:=((P1-Lp)/(Hp-Lp))*100;
Ds:=If(Cum(P2>0)=1,P2,ValueWhen(1,J,PREV)*(1-R)+P2*R);
Ds;

> The Double Stochastic
> "Double Stochastic - 10 Period II
> {demominators defined to eliminate divide by
zero errors}
>
> denom1:= If(HHV(H,10)-LLV(L,10)>0,
HHV(H,10)-LLV(L,10), 1);
> P1:= Mov(((C-LLV(L,10))/ denom1)*100,3,E);
> denom2 := If(HHV(P1,10)-LLV(P1,10)>0,
HHV(P1,10)-LLV(P1,10), 1);
> Mov(((P1-LLV(P1,10))/denom2)*100,3,E)"
> By Jim
> Atlanta GA from Trader.online.PL
>
> OR
>
>
> H1:=70;
> H2:=40;
> H1;
> H2;
>
P1:=Mov(((C-LLV(L,10))/(HHV(H,10)-LLV(L,10)))*100,3,E);
>
Mov(((P1-LLV(P1,10))/(HHV(P1,10)-LLV(P1,10)))*100,3,E)
>
> The above having some horizontal reference
lines
>
> Is it possible to plot the weekly indicator
> on a daily chart ?
>
> Thanks
> Michael B
> mdtmn@xxxxxxxxxxxxxxxx
>
>
>
>
>
>
> To unsubscribe from this group, send an email
to:
> equismetastock-unsubscribe@xxxxxxxxxxxxxxx
>
>
>
> Your use of Yahoo! Groups is subject to <a
href="">http://docs.yahoo.com/info/terms/
>
>
>
>






<font size=2
face="Courier New">To unsubscribe from this
group, send an email to:<span
>
equismetastock-unsubscribe@xxxxxxxxxxxxxxx



Your use of
Yahoo! Groups is subject to the Yahoo!
Terms of Service. 










Yahoo! Groups Sponsor


  ADVERTISEMENT 









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.