diff options
author | rsiddharth <s@ricketyspace.net> | 2018-04-23 22:02:09 +0000 |
---|---|---|
committer | rsiddharth <s@ricketyspace.net> | 2018-04-23 22:02:09 +0000 |
commit | 2e7726da51c619ee4572e0453364089abc6d0bb8 (patch) | |
tree | 7783065bdc117ad471d0f6d2f51e739ab32ab1ed | |
parent | 484b792c4747acfdbf060f7950ca0c462f372921 (diff) |
mix/1.3.2/easter.mixal: Compute D.
-rw-r--r-- | mix/1.3.2/easter.mixal | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/mix/1.3.2/easter.mixal b/mix/1.3.2/easter.mixal index 0ed4332..8de5abc 100644 --- a/mix/1.3.2/easter.mixal +++ b/mix/1.3.2/easter.mixal @@ -5,6 +5,7 @@ G CON 0 G will get stored here. C CON 0 C will get stored here. X CON 0 X will get stored here. Z CON 0 Z will get stored here. +D CON 0 D will get stored here. ORIG 1000 START JMP DOE * Date of Easter routine. Assumes Y is in address 0. @@ -30,5 +31,11 @@ DOE LDX Y Step E1 DIV =25= DECA 5 STA Z + ENTA 5 Compute D + MUL Y + DIV =4= + SUB X + DECA 10 + STA D STOP HLT END START |