From 23a8917e6811b476c9a99c468f3ecdbb6409c506 Mon Sep 17 00:00:00 2001
From: Julian Blake Kongslie
Date: Sun, 29 May 2022 16:38:30 -0700
Subject: Add Fibonacci Focal script and a dumped memory image with it already
 loaded.

---
 mem/fib.focal | 9 +++++++++
 1 file changed, 9 insertions(+)
 create mode 100644 mem/fib.focal

(limited to 'mem/fib.focal')

diff --git a/mem/fib.focal b/mem/fib.focal
new file mode 100644
index 0000000..9ea6d07
--- /dev/null
+++ b/mem/fib.focal
@@ -0,0 +1,9 @@
+1.1 SET X0=0
+1.2 SET X1=1
+1.3 FOR X=1,100; DO 2
+2.1 TYPE X0,!
+2.2 SET X2=X0+X1
+2.3 SET X0=X1
+2.4 SET X1=X2
+2.5 RETURN
+GO 1.1
-- 
cgit v1.2.3