On Thu, 28 May 2015 10:13:02 +0100 Inter Navtis <[email protected]> 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 > [email protected] > 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. _______________________________________________ Remind-fans mailing list [email protected] http://lists.roaringpenguin.com/cgi-bin/mailman/listinfo/remind-fans Remind is at http://www.roaringpenguin.com/products/remind
