[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

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



PureBytes Links

Trading Reference Links

Michael

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 http://docs.yahoo.com/info/terms/
>
>
>
>



------------------------ Yahoo! Groups Sponsor ---------------------~-->
ReplayTV: CNet Ranked #1 over Tivo!
Instant Replay & Pause live TV.
Special Sale: 50% off!
http://us.click.yahoo.com/UUMW7B/.5qGAA/ySSFAA/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/