|
PureBytes Links
Trading Reference Links
|
Thanks again, to all who helped with special thanks to Dave and
raintree.
--- In amibroker@xxxxxxxxxxxxxxx, e <e.winters1@xxx> wrote:
>
> TZ == Time Zone in relation to GMT.
> -10 Hawaii
> -5 NY
> +3 Baghdad
> etc.
>
> thorstef2003 wrote:
> > Thank you, raintree!
> > TZ = Param("Time Zone",-5,-12,12);
> > Can you provide an example of "Time Zone"? If a number then is it
with
> > reference to GMT?
> >
> > --- In amibroker@xxxxxxxxxxxxxxx, e <e.winters1@> wrote:
> >> Translated:
> >> // Full/New Moon signals indicator
> >> // Accurate to within 1 Minute per 69 years }
> >>
> >> // 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 = Param("Time Zone",-5,-12,12);
> >>
> >> // Lunar cycle
> >> LunarMonth = 29.530589;
> >> Offset = 7.254621;
> >>
> >> // Calendar
> >> // leap = frac(Year()/4)=0 AND frac(Year()/100)<0 OR frac(Year()/
> > 400)=0;
> >> leap1 = IIf(frac(Year()/4)==0,1,0);
> >> leap2 = IIf(frac(Year()/100)<0,1,0);
> >> leap3 = IIf(frac(Year()/400)==0,1,0);
> >> leap = Leap1 AND Leap2 AND Leap3;
> >>
> >> y = Year()*365 + int(Year()/4) - int(Year()/100) +
int(Year()/
> > 400);
> >> m = IIf(Month()==2,31-leap,
> >> IIf(Month()==3,59,
> >> IIf(Month()==4,90,
> >> IIf(Month()==5,120,
> >> IIf(Month()==6,151,
> >> IIf(Month()==7,181,
> >> IIf(Month()==8,212,
> >> IIf(Month()==9,243,
> >> IIf(Month()==10,273,
> >> IIf(Month()==11,304,
> >> IIf(Month()==12,334,-leap)))))))))));
> >>
> >> CurrentDay = y + m + Day() - TZ/24 - Offset;
> >>
> >>
> >> // Full/New Moon }
> >> FM = frac(CurrentDay/LunarMonth);
> >> NM = frac(FM+0.5);
> >>
> >> // Plot in own window below chart }
> >> Plot(fm,"Full Moon",colorBlue,styleLine);
> >> Plot(nm,"New Moon",colorRed,styleLine);
> >> // (PeakBars(1,FM,.01)=0)-(PeakBars(1,NM,.01)=0)
> >> Filter=1;
> >>
> >> thorstef2003 wrote:
> >>> Thank you, Dave.
> >>> Was hoping someone had the AFL, but this link is a good step
> > forward.
> >>> Very surprising, that after so many years of AB, nobody
programmed
> > a
> >>> moon phase AFL!?
> >>>
> >>>>>> { Full/New Moon signals indicator MkVI }
> >>>>>> { Accurate to within 1 minute per 69 years }
> >>>>>> { ©Copyright 2002-2004 jose silva }
> >>>>>> { For personal use only }
> >>>>>> { josesilva22@xxxx }
> >>>>>>
> >>>>>> { 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)
> >>>>>>
> >>> Anyone able to translate this?
> >>>
> >>> --- In amibroker@xxxxxxxxxxxxxxx, "MarketMonk777" <dlittner@>
> >>> wrote:
> >>>> Hi Stef,
> >>>>
> >>>> Check out this link:
> >>>> http://www.purebytes.com/archives/metastock/2004/msg05973.html
> >>>>
> >>>> The code is for MetaStock but am fairly certain it can be
> > converted.
> >>>> And here is a long winded conversation about planet's and the
> >>> markets:
> >>>> http://www.purebytes.com/archives/omega/2003/msg05801.html
> >>>>
> >>>> And finally, code for Omega Tradestation, which is a little bit
> >>> tougher in
> >>>> some cases to convert:
> >>>> http://www.purebytes.com/archives/omega/2002/msg00476.html
> >>>>
> >>>> Regards,
> >>>>
> >>>> Dave
> >>>> MarketMonk
> >>>>
> >>>> -----Original Message-----
> >>>> From: amibroker@xxxxxxxxxxxxxxx [mailto:amibroker@xxxxxxxxxxx.
> > com]
> >>> On Behalf
> >>>> Of thorstef2003
> >>>> Sent: Sunday, July 09, 2006 9:31 AM
> >>>> To: amibroker@xxxxxxxxxxxxxxx
> >>>> Subject: [amibroker] Moon Phase Indicator
> >>>>
> >>>> Hi,
> >>>> I've gone through all the archives and nobody seems to have
> >>> programmed an
> >>>> indicator to overlay moon pases on the price charts.
> >>>> Can somebody please provide a link or the AFL of a moon phase
> >>> indicator?
> >>>> Thanks.
> >>>> Stef
> >>>>
> >>>>
> >>>>
> >>>>
> >>>>
> >>>> Please note that this group is for discussion between users
only.
> >>>>
> >>>> To get support from AmiBroker please send an e-mail directly to
> >>> SUPPORT {at}
> >>>> amibroker.com
> >>>>
> >>>> For other support material please check also:
> >>>> http://www.amibroker.com/support.html
> >>>>
> >>>>
> >>>> Yahoo! Groups Links
> >>>>
> >>>
> >>>
> >>>
> >>>
> >>>
> >>>
> >>> Please note that this group is for discussion between users
only.
> >>>
> >>> To get support from AmiBroker please send an e-mail directly to
> >>> SUPPORT {at} amibroker.com
> >>>
> >>> For other support material please check also:
> >>> http://www.amibroker.com/support.html
> >>>
> >>>
> >>> Yahoo! Groups Links
> >>>
> >>>
> >>>
> >>>
> >>>
> >>>
> >>>
> >>>
> >
> >
> >
> >
> >
> >
> >
> > Please note that this group is for discussion between users only.
> >
> > To get support from AmiBroker please send an e-mail directly to
> > SUPPORT {at} amibroker.com
> >
> > For other support material please check also:
> > http://www.amibroker.com/support.html
> >
> >
> > Yahoo! Groups Links
> >
> >
> >
> >
> >
> >
> >
>
|