hello there, i am a digital trader, page-17

arthurs eclipsed himself Getting a feelling Arthurs been quietly Mooning us all ..?
rarified in the ansell, indeed.!

re try somthing new..?


ecclipsed again by Jose Silva



MetaStock -> Tools -> Indicator Builder -> New
Copy and paste formula below.


===========
Lunar cycle
===========

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

{Full/New Moon binary indicator MkIV}
{©Copyright 2002 Jose Silva}
{[email protected]}

{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

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


http://users.bigpond.com/prominex/pegasus.htm