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

[Metastockusers] Re: Help with code pls?



PureBytes Links

Trading Reference Links

This is a revised formula for the Jackson zones that only plot the 
last value.

It has also been adapted for the day on intraday charts


TF:=Input("1=hour 2=day 3=week 4=month 5=year ",1,5,4);
NW:=If(TF=1,ROC(Minute(),1,$)<0,If(TF=2,ROC(Hour(),1,$)<0, If
(TF=3,ROC(DayOfWeek(),1,$)<0,If(TF=4,ROC(DayOfMonth(),1,$)<0,ROC
(Month(),1,$)<0))));
A1:=Cum(1);
A2:=LastValue(A1-BarsSince(NW>0));
WH:=ValueWhen(1,Nw,Ref(HighestSince(1,Nw,H),-1));
WL:=ValueWhen(1,Nw,Ref(LowestSince(1,Nw,L),-1));
WCL:=ValueWhen(1,Nw,Ref(C,-1));
BP:=LastValue((WH+WL+WCL)/3);
RB2:=If(A1<A2,BarsSince(A1>=A2),LastValue(((WH-WL)*1.382)+BP));
D1:=If(A1<A2,BarsSince(A1>=A2),LastValue((WH-WL)+BP));
RB1:=If(A1<A2,BarsSince(A1>=A2),LastValue(((WH-WL)*.618)+BP));
D:=If(A1<A2,BarsSince(A1>=A2),LastValue(((WH-WL)/2)+BP));
MBP:=If(A1<A2,BarsSince(A1>=A2),LastValue((WH+WL+WCL)/3));
B:=If(A1<A2,BarsSince(A1>=A2),LastValue(BP-((WH-WL)/2)));
SB1:=If(A1<A2,BarsSince(A1>=A2),LastValue(BP-((WH-WL)*.618)));
B1:=If(A1<A2,BarsSince(A1>=A2),LastValue(BP-(WH-WL)));
SB2:=If(A1<A2,BarsSince(A1>=A2), LastValue(BP-((WH-WL)*1.382)));
RB2;D1;RB1;D;MBP;B;SB1;B1;SB2;


--- In Metastockusers@xxxxxxxxxxxxxxx, "Lionel Issen" <lissen@xxxx> 
wrote:
> So would I.  Post it here.
>  
> Lionel
>  
>  
> 
> -----Original Message-----
> From: Petros Lazos [mailto:peter_laso@x...] 
> Sent: Friday, January 24, 2003 12:57 PM
> To: Metastockusers@xxxxxxxxxxxxxxx
> Subject: [Metastockusers] Help with code pls?
> 
> 
> I'm trying, for some time now, to create a custom indicator that 
would
> plot
> the daily Pivot Point,S1,S2S3,R1,R2,R3 on an intraday chart. Daily 
PP
> etc
> are based on previous day's H L C & O.
> If any of  the members have an idea or has the code, I'd be truly
> obliged
> for the help.
> TiA
> P.
> 
> PS Henry, I've tried using your code for Jackson Zones, published 
in
> Stockcentral but I couldn't make it work. Any ideas?
> 
> 
> 
> Yahoo! Groups Sponsor	
> 
> ADVERTISEMENT
>  
> 
<http://rd.yahoo.com/M=243376.2803712.4220031.1927555/D=egroupweb/S=1
705
> 
001779:HM/A=1414910/R=0/*http://ad.doubleclick.net/jump/N879.ameritra
de.
> yahoo/B1054521.29;sz=300x250;adc=zhs;ord=1043434635719764?> 	
>  
> <http://us.adserver.yahoo.com/l?
M=243376.2803712.4220031.1927555/D=egrou
> pmail/S=:HM/A=1414910/rand=181123034> 	
> 
> To unsubscribe from this group, send an email to:
> Metastockusers-unsubscribe@xxxxxxxxxxx
> 
> 
> 
> Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service
> <http://docs.yahoo.com/info/terms/> .


To unsubscribe from this group, send an email to:
Metastockusers-unsubscribe@xxxxxxxxxxx

 

Your use of Yahoo! Groups is subject to http://docs.yahoo.com/info/terms/