diff options
| author | rsiddharth <s@ricketyspace.net> | 2018-05-04 22:04:38 +0000 |
|---|---|---|
| committer | rsiddharth <s@ricketyspace.net> | 2018-05-04 22:04:38 +0000 |
| commit | 81bcad7bcd4fdf11e4e571c2a13f434ff5c2e381 (patch) | |
| tree | 4ea6e3f411ada967cdf74f2bfeb834ab3cf5a83d | |
| parent | 0ce2e21faf47db7a29a7f054dabc70ad5064f243 (diff) | |
mix: easter.mixal: Add program to print easter between 1950 - 2000.
| -rw-r--r-- | mix/1.3.2/easter.mixal | 8 |
1 files changed, 7 insertions, 1 deletions
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. |