Easter JULIAN

[Dieter]

(10-31-2015 08:57 PM)ggauny@live.fr Wrote:  Here is a little routine to get the date of Easter in Julian calendar.

This returns 18.04 for 2016. Is this the correct date?

If yes, here is an improved version. I am posting this because some days ago you suggested a kind of "tips and tricks" section for the one or other calculator, and this routine demonstrates quite a few ways to use the 34s more effectively. So this might provide some helpful insights.

Code:

001 LBL'PAQ'
002 FILL
003 # 019
004 RMDR
005 RCL× L
006 # 015
007 +
008 # 030
009 RMDR
010 R↑
011 # 004
012 RMDR
013 STO+ X
014 R↑
015 # 007
016 RMDR
017 # 004
018 ×
019 +
020 x<> Y
021 -
022 RCL L
023 x<> Y
024 # 034
025 +
026 # 007
027 RMDR
028 +
029 # 114
030 +
031 RCL X
032 # 031
033 RMDR
034 INC X
035 x<> Y
036 # 031
037 IDIV
038 SDR 002
039 +
040 END

NB: I used the RMDR command since it is directly available on the keyboard, and for positive x and y the results are the same as for MOD.

NB2: Yes, I still think a function that returns both DIV and MOD in X and Y in one single step would be helpful under many circumstances, but I do not see much hope that this will get implemented in the 34s.

Dieter