From 81bcad7bcd4fdf11e4e571c2a13f434ff5c2e381 Mon Sep 17 00:00:00 2001 From: rsiddharth Date: Fri, 4 May 2018 22:04:38 +0000 Subject: mix: easter.mixal: Add program to print easter between 1950 - 2000. --- mix/1.3.2/easter.mixal | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/mix/1.3.2/easter.mixal b/mix/1.3.2/easter.mixal index 4f4cbf0..f5a2ecf 100644 --- a/mix/1.3.2/easter.mixal +++ b/mix/1.3.2/easter.mixal @@ -15,7 +15,13 @@ POUT ALF " 23 " ALF ", 20" ALF "28 " ORIG 1000 -START JMP DOE +START ENT2 1950 +LOOP CMP2 =2000= + JG STOP + ST2 0 + JMP DOE + INC2 1 + JMP LOOP STOP HLT * Date of Easter routine. Assumes Y is in address 0. * Routine using registers A, X and I1. -- cgit v1.2.3