From 0819ecebf6b6e45545c14a7e52bc76cc691e61b8 Mon Sep 17 00:00:00 2001
From: rsiddharth <s@ricketyspace.net>
Date: Thu, 26 Apr 2018 22:10:29 +0000
Subject: mix/1.3.2/easter.mixal: Do penultimate step.

---
 mix/1.3.2/easter.mixal | 8 ++++++++
 1 file changed, 8 insertions(+)

(limited to 'mix')

diff --git a/mix/1.3.2/easter.mixal b/mix/1.3.2/easter.mixal
index 72fe2ee..1b29d63 100644
--- a/mix/1.3.2/easter.mixal
+++ b/mix/1.3.2/easter.mixal
@@ -61,5 +61,13 @@ STRE    STX  E
         JGE  STRN
         INCA 30
 STRN    STA  N
+        LDA  D Penultimate step.
+        ADD  N
+        SRC  5 Move value to reg. X from reg. A.
+        ENTA 0 Clear reg. A
+        DIV  =-7=
+        SLC  5 Move value to reg. X from reg. X
+        ADD  =7=
+        ADD  N
 STOP    HLT
         END START
-- 
cgit v1.2.3