1 files changed, 29 insertions, 0 deletions
diff --git a/evts/focal-fib.evt b/evts/focal-fib.evt
new file mode 100644
index 0000000..6368abe
--- /dev/null
+++ b/evts/focal-fib.evt
@@ -0,0 +1,29 @@
+1000
+$1.1 SET X0=0
+TT_BITS=0x0D01/0xFF01
+1000
+$1.2 SET X1=1
+TT_BITS=0x0D01/0xFF01
+1000
+$1.3 FOR X=1,100; DO 2
+TT_BITS=0x0D01/0xFF01
+1000
+$2.1 TYPE X0,!
+TT_BITS=0x0D01/0xFF01
+1000
+$2.2 SET X2=X0+X1
+TT_BITS=0x0D01/0xFF01
+1000
+$2.3 SET X0=X1
+TT_BITS=0x0D01/0xFF01
+1000
+$2.4 SET X1=X2
+TT_BITS=0x0D01/0xFF01
+1000
+$2.5 RETURN
+TT_BITS=0x0D01/0xFF01
+1000
+$GO 1.1
+TT_BITS=0x0D01/0xFF01
+2000000
+HALTED=1

diff --git a/evts/focal-fib.evt b/evts/focal-fib.evt new file mode 100644 index 0000000..6368abe --- /dev/null +++ b/evts/focal-fib.evt
@@ -0,0 +1,29 @@
	1	+1000
	2	$1.1 SET X0=0
	3	TT_BITS=0x0D01/0xFF01
	4	+1000
	5	$1.2 SET X1=1
	6	TT_BITS=0x0D01/0xFF01
	7	+1000
	8	$1.3 FOR X=1,100; DO 2
	9	TT_BITS=0x0D01/0xFF01
	10	+1000
	11	$2.1 TYPE X0,!
	12	TT_BITS=0x0D01/0xFF01
	13	+1000
	14	$2.2 SET X2=X0+X1
	15	TT_BITS=0x0D01/0xFF01
	16	+1000
	17	$2.3 SET X0=X1
	18	TT_BITS=0x0D01/0xFF01
	19	+1000
	20	$2.4 SET X1=X2
	21	TT_BITS=0x0D01/0xFF01
	22	+1000
	23	$2.5 RETURN
	24	TT_BITS=0x0D01/0xFF01
	25	+1000
	26	$GO 1.1
	27	TT_BITS=0x0D01/0xFF01
	28	+2000000
	29	HALTED=1