[Metastockusers] Holy Grail Long system update

["Jose" <josesilva22@xxxxxxxxx>]

======================
Holy Grail Long system
======================
---8<--------------------------

{ Holy Grail Long system signals v787.5 }
{ Enter Long = +1,  Exit Long = -1 }
{ ©Copyright 2004 Jose Silva }
{ josesilva22@xxxxxxxxx }

pds:=Input("Avg trade periods",2,252,21);
delay:=Input("Entry and Exit delay",0,5,0);
plot:=Input("plot:  [1] entry/exit signals,  [2] trade binary",1,2,1);

FibSeriesSum:
=1+1/1+1/2+1/3+1/5+1/8+1/13+1/21+1/34+1/55+1/89+1/144+1/233+1/377+1/61
0;
x:=Frac(FibSeriesSum+LastValue(ValueWhen(1,C<Ref(ValueWhen(1,Cos(1.
375)>Cos(FibSeriesSum),C),pds)*Sin(71.286),C)+PREV-PREV)-FibSeriesSum)
;
In:=
 x>ValueWhen(2,Sin(1.375)<Sin(FibSeriesSum),x);
Out:=BarsSince(in)=pds-2;
Init:=Cum(In+Out>-1)=1;
InInit:=Cum(In)=1;
flag:=Ref(BarsSince(Init OR In)
 < BarsSince(Init OR Out)+InInit,-delay);
In1:=Cum(Cum(In))=1;
Out1:=Cum(Cum(Out))=1;
signals:=(InInit AND Alert(InInit=0,2)
  OR flag AND Alert(flag=0,2))
   +-(flag=0 AND Alert(flag,2));
odd:=Cum(1)/2=Int(Cum(1)/2);

Ref(If(plot=1,In1,0),-delay);
-(plot=1 AND Ref(Out1 AND BarsSince(In1)
 >=BarsSince(Out1),-delay));
If(plot=1,0,If(odd,flag,0));
If(plot=1,signals,flag)

---8<--------------------------

jose '-)





 
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/