diff --git a/vimlac/cpu.c b/vimlac/cpu.c
index 1aa63f5..73e07da 100755
--- a/vimlac/cpu.c
+++ b/vimlac/cpu.c
@@ -99,6 +99,20 @@ cpu_get_prev_PC(void)
 }
 
 
+void
+cpu_set_AC(WORD new_ac)
+{
+    r_AC = new_ac;
+}
+
+
+void
+cpu_set_L(WORD new_l)
+{
+    r_L = (new_l && 1);
+}
+
+
 void
 cpu_set_PC(WORD new_pc)
 {
diff --git a/vimlac/cpu.h b/vimlac/cpu.h
index 93b34b2..f8237f3 100755
--- a/vimlac/cpu.h
+++ b/vimlac/cpu.h
@@ -19,6 +19,8 @@ WORD cpu_get_AC(void);
 WORD cpu_get_L(void);
 WORD cpu_get_PC(void);
 WORD cpu_get_prev_PC(void);
+void cpu_set_AC(WORD ac);
+void cpu_set_L(WORD l);
 void cpu_set_PC(WORD pc);
 void cpu_set_DS(WORD ds);