|
PureBytes Links
Trading Reference Links
|
Preston,
unfortunately José Silva`s indicator plots only past full and new moons ... well, Preston, that's
definitely not your fault :-) ... thanks again.
Best Regards
Georg
_______________________________________________
{ Full/New Moon signals indicator MkVI }
{ Accurate to within 1 minute per 69 years }
{ ©Copyright 2002-2004 jose silva }
{ For personal use only }
{ josesilva22@xxxxxxxxx }
{ 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)
_______________________________________________________
--- pumrysh <no_reply@xxxxxxxxxxxxxxx> wrote:
Georg,
Wrong! It can be done. Go to Jose's site for the full moon indicator,
then follow Dusant's suggestion for using an if statement. This is
then plotted as an overlay on your price plot. This can also be done
as an expert.
Preston
-- In equismetastock@xxxxxxxxxxxxxxx, Georg Mayer <ylem_mayer@xxxx>
wrote:
>
> Dusant,
>
> receive my thank for your kind help and hint. I did not really get
what this Day-Counter is good
> for to solve my problem, but will check it out ...
>
> And again to the group: So it is really true, MetaStock can't plot
a set of dates as vertical
> lines? Would be sad ... and definitely a handicap the MetaStock-
programmers should get rid of in
> the next update.
>
> Best Regards
>
> Georg
>
>
>
> --- Dusant <cooldush@xxxx> wrote:
>
> > Georg,
> >
> > As far as my knowledge goes, it is not possible to make those
annotations in Metastock.
> >
> > But plotting the cycle lines is possible. You would need to
determine the calendar days between
> > each such occurrence.
> >
> > You need to specify the start date, with the syntax something
like this:
> >
> > ---------------------------------
> >
> > day1:=Input("EnterFirstDate-mmddyy",010100,123199,010101);
> > dh1:=BarsSince(DayOfMonth()=Int(day1/100)-(Int(day1/10000)*100)
AND Month()=Int(day1/10000) AND
> > Year()=If(Mod(day1,100)>30,1900+Mod(day1,100),2000+Mod
(day1,100)));
> >
> > ---------------------------------
> >
> > Then use a calendar days counter for counting the number of days:
> >
> > ---------------------------------
> >
> > { Day counter from 1/1/0001, Gregorian calendar }
> > { Count is independent of any missing chart data }
> > { ©Copyright 2003-2004 Jose Silva }
> > { josesilva22@xxxx }
> >
> > limit:=Input("Count Calendar Days From Year",1,2100,1980);
> >
> > LimLeap:=Frac(limit/4)=0 AND Frac(limit/100)<>0
> > OR Frac(limit/400)=0;
> > NoCount:=limit*365+Int(limit/4)
> > -Int(limit/100)+Int(limit/400)-LimLeap;
> > 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)-NoCount;
> > 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)))))))))));
> > DayNr:=y+m+DayOfMonth();
> >
> > DayNr
> >
> > ---------------------------------
> >
> > The plots are done when a condition is true like this:
> > if(condition, 1, 0); You need to plot it like a histogram.
> >
> > My knowledge of astro is a big zero, therefore, I could not
assist you further.
> >
> > However, this should put you on track.
> >
> > Dusant
> > ----- Original Message -----
> > From: Georg Mayer
> > To: equismetastock@xxxx
> > Sent: Tuesday, November 16, 2004 1:19 PM
> > Subject: [EquisMetaStock Group] display dates/events as
vertical lines
> >
> >
> > Hello group,
> >
> > most probably my problems were solved long time ago, but I am
still wondering if it is
> > possible to
> > display in MetaStock a set of dates, e.g.
> >
> > 09/21/2004 MA 90° GC
> > 09/26/2004 ME 90° GC
> > 10/26/2004 VE 90° GC
> > 12/18/2004 SA 0° GC
> > 01/07/2005 ME 0° GC
> > 01/07/2005 VE 0° GC
> > 02/02/2005 MA 0° GC
> > 03/03/2005 ME 90° GC
> > 03/17/2005 SA 90° GC
> > 03/20/2005 VE 90° GC
> > 05/31/2005 VE 180° GC
> >
> > as simple vertical lines. To explain myself better, please have
a look at the attached chart
> > (generated by Dynamic Trader 4).
> >
> > (2) And is there a formula script or a add-in to display full-
and new-moons as symbols or
> > vertical
> > lines?
> >
> > Thank you very much for any hint.
> >
> > Best Regards
> >
> > Georg
> >
> > ---------------------------------
> > Do you Yahoo!?
> > The all-new My Yahoo! – Get yours free!
>
>
>
>
> __________________________________
> Do you Yahoo!?
> Meet the all-new My Yahoo! - Try it today!
> http://my.yahoo.com
Yahoo! Groups Sponsor ADVERTISEMENT
---------------------------------
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 the Yahoo! Terms of Service.
__________________________________
Do you Yahoo!?
The all-new My Yahoo! - Get yours free!
http://my.yahoo.com
------------------------ Yahoo! Groups Sponsor --------------------~-->
$9.95 domain names from Yahoo!. Register anything.
http://us.click.yahoo.com/J8kdrA/y20IAA/yQLSAA/BefplB/TM
--------------------------------------------------------------------~->
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/
|