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

Re: [EquisMetaStock Group] full Moon/New Moon indicator



PureBytes Links

Trading Reference Links

Wow Jose, this is a dead give away.  Somebody recently stated, on this
forum, that "A good system developer's personality borders on
obsessive perfectionism."

Regards
MG Ferreira
TsaTsa EOD Programmer and trading model builder
http://www.ferra4models.com
http://fun.ferra4models.com 




--- In equismetastock@xxxxxxxxxxxxxxx, "Jose Silva" <josesilva22@xxxx>
wrote:
> Thanks, Claud.
> Good to hear that the original Lunar phase code is still working as it 
> should after 5 years.  Don't forget to adjust signals by one minute
in 64 
> years from now!   |:-D
> 
> jose '-)
> http://www.metastocktools.com
> 
> 
> 
> --- In equismetastock@xxxxxxxxxxxxxxx, Claud Baruch <claudb@xxxx> 
> wrote:
> > Jose, actually I've had this indicator in my list since 2000. But
I'll 
> > abide by your direction in the future/
> > 
> > Claud
> > 
> >
> > Jose Silva wrote:
> > 
> > Claud, I would be grateful if you would kindly *not remove* the 
> > copyright header from any of my published MS code.
> > 
> > As for the indicator's accuracy, one only has to plot its signals
below
> > any complete chart, and take a look out the window to verify if they
> > match.  
> > Seeing is believing. ;)
> > 
> > 
> > jose '-)
> > http://www.metastocktools.com
> > 
> > 
> > 
> > Original Lunar cycle indicator:
> > 
> > MetaStock -> Tools -> Indicator Builder -> New
> > Copy and paste formula below.
> > 
> > ===========
> > Lunar cycle
> > ===========
> > ---8<---------------------------
> > 
> > { Full/New Moon signals indicator MkVI }
> > { Accurate to within 1 minute per 69 years }
> > { ©Copyright 2002-2004 jose silva }
> > { For personal use only }
> > { http://www.metastocktools.com }
> > 
> > { Plots +1 signal on Full Moon; -1 on New Moon }
> > { If FM/NM falls on a holiday or weekend,
> >   signal is plotted on the nearest trading day }
> > { Warning: will not plot last FM/NM signal
> >    until it is confirmed on next trade day }
> > 
> > { Input your world time zone }
> > TZ:=Input("Your Time Zone?  (-12 to +12hrs)",
> >  -12,12,10);
> > 
> > { Lunar cycle }
> > LunarMonth:=29.530589;
> > Offset:=7.254621;
> > 
> > { Calendar }
> > leap:=Frac(Year()/4)=0 AND Frac(Year()/100)<>0
> >  OR Frac(Year()/400)=0;
> > y:=Year()*365+Int(Year()/4)
> >  -Int(Year()/100)+Int(Year()/400);
> > m:=
> >  If(Month()=2,31-leap,
> >  If(Month()=3,59,
> >  If(Month()=4,90,
> >  If(Month()=5,120,
> >  If(Month()=6,151,
> >  If(Month()=7,181,
> >  If(Month()=8,212,
> >  If(Month()=9,243,
> >  If(Month()=10,273,
> >  If(Month()=11,304,
> >  If(Month()=12,334,
> >  -leap)))))))))));
> > CurrentDay:=y+m+DayOfMonth()-TZ/24-Offset;
> > 
> > { Full/New Moon }
> > FM:=Frac(CurrentDay/LunarMonth);
> > NM:=Frac(FM+0.5);
> > 
> > { Plot in own window below chart }
> > (PeakBars(1,FM,.01)=0)-(PeakBars(1,NM,.01)=0)
> > 
> > ---8<---------------------------
> > 
> > 
> > 
> > --- In equismetastock@xxxxxxxxxxxxxxx, Claud Baruch 
> <claudb@xxxx> wrote:
> >  
> >
> > >>{plots +1 signal on Full Moon & -1 on New Moon}
> > >>{if FM/NM falls on a holiday or weekend, signal is plotted on the 
> > >>closest trading day}
> > >>
> > >>Span:=Input("Full/New Moon signal, total span in days",1,9,1);
> > >>TZ:=
> > >> Input("Time Zone (-12 to +12hrs)",-12,12,-10);
> > >>
> > >>LunarMonth:=29.530589;
> > >>Offset:=7.254621;
> > >>
> > >>leap:=Frac(Year()/4)=0 AND Frac(Year()/100)<>0
> > >> OR Frac(Year()/400)=0;
> > >>y:=Year()*365+Int(Year()/4)
> > >> -Int(Year()/100)+Int(Year()/400);
> > >>m:=
> > >> If(Month()=2,31-leap,
> > >> If(Month()=3,59,
> > >> If(Month()=4,90,
> > >> If(Month()=5,120,
> > >> If(Month()=6,151,
> > >> If(Month()=7,181,
> > >> If(Month()=8,212,
> > >> If(Month()=9,243,
> > >> If(Month()=10,273,
> > >> If(Month()=11,304,
> > >> If(Month()=12,334,
> > >> -leap)))))))))));
> > >>CurrentDay:=y+m+DayOfMonth()+TZ/24-Offset;
> > >>
> > >>FM:=Frac(CurrentDay/LunarMonth);
> > >>NM:=Frac(FM+0.5);
> > >>
> > >>0;Ref(Alert(FM>Ref(FM,1),Span),Span/2)+
> > >>Ref(Alert(NM>Ref(NM,1),Span),Span/2)*-1
> >
> >
> >Al Dina wrote:
> >
> > Hello,
> > 
> > A while ago, I believe that Jose or someone else posted the code for 
> > the Full Moon/New Moon.  Does anybody have that code and do they
> > know if it is accurate? 
> > 
> > Any help would be appreciated.
> >  
> > Thanks,
> > Al




 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/equismetastock/

<*> 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/