|
PureBytes Links
Trading Reference Links
|
Hi Roy,
Thanks for the effort....actually its probably a breeze for you. I am
looking at how you coded it so hopefully I can manage other codes in
future.
Cheers
Norman
--- In Metastockusers@xxxxxxxxxxxxxxx, "Roy Larsen" <rlarsen@xxxx> wrote:
> Hi Norman
>
>
> Your definitions for weekly HIGH and LOW are wrong. I think you
> copied from the weekly CLOSE, but the HIGH and LOW have to
> be calculated differently. See my Weekly OHLC formula.
>
> The following two lines in my code are purely to remove distorting zero
> values at the left side of the chart. They inhibit any zero plot for the
> weekly high or low.
>
> Hw:=ValueWhen(1,Hw>0,Hw);
> Lw:=ValueWhen(1,Lw>0,Lw);
>
> Try this formula and see what it looks like. I've changed the "Q"
variable
> default so you get a dynamic plot for the current week.
>
> N:=Input("Weekly Periods",1,99,13);
> F:=Input("End of Week, 5=Friday 6=Saturday 7=Sunday",5,7,5);
> Q:=Input("Display Mode, 0=Static 1=Dynamic 2=Test",0,2,1);
> {0=Display, update on Friday when possible}
> {1=Display, update on each new bar}
> {2=Backtest, update on first bar of new week}
> G:=LastValue(Highest(Sum(DayOfWeek()=F,5))=5);
> I:=Fml("Calendar Week counter");
> I:=Abs(I-ValueWhen(2-G,1,I)); M:=G OR I>0;
> F:=G OR (DayOfWeek()=F AND I=0);
> A:=LastValue(Cum(1)-1)=Cum(1);
> B:=LastValue(Cum(1))=Cum(1);
> J:=If(F,1,If(Alert(F,2)=0 AND M,2,0));
> J:=If(A+LastValue(J)>2 OR B+(Q=1)=2,1,J);
> J:=If(G,1,If(Q=2 OR Cum(J)<=1,M*2,J));
> Hw:=HighestSince(1,M,H);
> Hw:=ValueWhen(1,J,If(J=1,Hw,ValueWhen(2-G,1,Hw)));
> Lw:=LowestSince(1,M,L);
> Lw:=ValueWhen(1,J,If(J=1,Lw,ValueWhen(2-G,1,Lw)));
> Hw:=ValueWhen(1,Hw>0,Hw);
> Lw:=ValueWhen(1,Lw>0,Lw);
> H1:=ValueWhen(2,J,Hw);
> L1:=ValueWhen(2,J,Lw);
> A:=If(Hw>H1,Hw-H1,0);
> B:=If(Lw<L1,L1-Lw,0);
> X:=Cum((J>0)*A);
> X:=(X-ValueWhen(N+1,J,X))/N;
> Y:=Cum((J>0)*B);
> Y:=(Y-ValueWhen(N+1,J,Y))/N;
> X/(X+Y);
>
> Kind regards
>
> Roy
> www.metastocktips.co.nz
>
>
>
>
> ----- Original Message -----
> From: "ruagoodp" <almutwinter@xxxx>
> To: <Metastockusers@xxxxxxxxxxxxxxx>
> Sent: Thursday, May 26, 2005 9:24 AM
> Subject: [Metastockusers] WEEKLY INDICATOR
>
>
> > Hi Roy,
> >
> > Try again:
> >
> >
> > N:=Input("Weekly RSI - Close Periods",1,99,13); Pc:=1/N;
> > F:=Input("End of Week, 5=Friday 6=Saturday 7=Sunday",5,7,5);
> > Q:=Input("Display Mode, 0=Static 1=Dynamic 2=Test",0,2,2);
> > {0=Display, update on Friday when possible}
> > {1=Display, update on each new bar}
> > {2=Backtest, update on first bar of new week}
> >
> > G:=LastValue(Highest(Sum(DayOfWeek()=F,5))=5);
> > I:=Fml("Calendar Week counter");
> > I:=Abs(I-ValueWhen(2-G,1,I)); M:=G OR I>0;
> > F:=G OR (DayOfWeek()=F AND I=0);
> > A:=LastValue(Cum(1)-1)=Cum(1);
> > B:=LastValue(Cum(1))=Cum(1);
> > J:=If(F,1,If(Alert(F,2)=0 AND M,2,0));
> > J:=If(A+LastValue(J)>2 OR B+(Q=1)=2,1,J);
> > J:=If(G,1,If(Q=2 OR Cum(J)<=1,M*2,J));
> > K:=ValueWhen(1,J,If(J=1,H,ValueWhen(2-G,1,H)));
> > K:=ValueWhen(1,K>0,K);
> > K1:=ValueWhen(1,J,If(J=1,L,ValueWhen(2-G,1,L)));
> > K1:=ValueWhen(1,K1>0,K1);
> > Ua:=ValueWhen(1,J>0,K); Da:=ValueWhen(2,J>0,K);
> > Ua1:=ValueWhen(1,J>0,K1); Da1:=ValueWhen(2,J>0,K1);
> > Ub:=If(Ua>Da,Ua-Da,0); Db:=If(Ua1<Da1,Da1-Ua1,0);
> > A:=Cum((j>0)*Ub);
> > B:=Cum((j>0)*Db);
> >
> > X:=(A-ValueWhen(N+1,J,A))/N;
> > Y:=(B-ValueWhen(N+1,J,B))/N;
> > X/X+Y
> >
> > Its beginning to look like the original indicator if I invert the
Y scale!
> >
> > Norman
> >
> >
> >
> >
> >
> >
> >
--------------------------------------------------------------------------------
> > Yahoo! Groups Links
> >
> > a.. To visit your group on the web, go to:
> > http://groups.yahoo.com/group/Metastockusers/
> >
> > b.. To unsubscribe from this group, send an email to:
> > Metastockusers-unsubscribe@xxxxxxxxxxxxxxx
> >
> > c.. Your use of Yahoo! Groups is subject to the Yahoo! Terms of
Service.
> >
> >
------------------------ Yahoo! Groups Sponsor --------------------~-->
In low income neighborhoods, 84% do not own computers.
At Network for Good, help bridge the Digital Divide!
http://us.click.yahoo.com/EpW3eD/3MnJAA/cosFAA/zMEolB/TM
--------------------------------------------------------------------~->
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/Metastockusers/
<*> To unsubscribe from this group, send an email to:
Metastockusers-unsubscribe@xxxxxxxxxxxxxxx
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
|