[Remind-Fans] compute the greek easter date

[gino.aerografia]

On Thu, 28 May 2015 10:13:02 +0100
Inter Navtis <navtis at hab-verschlafen.de> wrote:

> Hello,
> 
> the lines to compute the greek easter date that were sended over this
> list in April [1] worked for me only for some years, because the used
> formular was simplified. I tried to write my own lines using the
> complete formular. I want to share the result:
> 
> SET gauss_a year(today())%19
> SET gauss_b abs(year(today())/4)
> SET gauss_d ((19*gauss_a)+15)%30
> SET gauss_r abs((gauss_d+abs(gauss_a/11))/29)
> SET gauss_og 21+gauss_d-gauss_r
> SET gauss_szh (year(today())+gauss_b)%7
> SET gauss_sz 7-gauss_szh
> SET gauss_oeh (gauss_og-gauss_sz)%7
> SET gauss_oe 7-gauss_oeh
> 
> SET gauss_dif abs(year(today())/100)-abs(year(today())/400)-2
> 
> SET gauss_os gauss_og+gauss_oe+gauss_dif
> 
> IF gauss_os <= 31
>     SET pasxa date(year(today()),03,gauss_os)
> ELSE
>     IF gauss_os <= 61
> 	SET pasxa date(year(today()),04,gauss_os-31)
>     ELSE
>         SET pasxa date(year(today()),05,gauss_os-61)
>     ENDIF
> ENDIF
> 
> REM [TRIGGER(pasxa)] MSG greek easter
> 
> 
> It hope that it returns the correct easterdate for all future years.
> 
> Have fun!
> 
> 
> 1. mail with subject: "[Remind-Fans] orthodox easter (pascha)
> calculation. tested and working" sended on Fri Apr 10 10:15:53 EDT
> 2015 _______________________________________________
> Remind-fans mailing list
> Remind-fans at lists.roaringpenguin.com
> http://lists.roaringpenguin.com/cgi-bin/mailman/listinfo/remind-fans
> Remind is at http://www.roaringpenguin.com/products/remind

Hi, did you get the last script? cause i had done some typing errors in
the first one. If That's the case, the new one is:

SET cal_d 44-((((year(today())-2)%19)*11)%30)
IF cal_d <= 20
   SET pas_d date(year(today()),04,cal_d)+13
ELSE
   SET pas_d date(year(today()),03,cal_d)+13
ENDIF
SET Easterdate evaltrig("Sunday",pas_d)
REM [Easterdate] MSG Holy Pascha
SET Gdate date(year(today()),04,23)
IF (Easterdate -7 <= Gdate && Gdate <= Easterdate)
   REM Mon [Easterdate] MSG St. George
ELSE
   REM 23 Apr MSG St. George
ENDIF

Anyway, i've already starting to test yours ind i really like it. At
least it's more readable.