From f0377ca2d994ec92f8ce0ba6b3df1a9fb1135516 Mon Sep 17 00:00:00 2001
From: Devine Lu Linvega <aliceffekt@gmail.com>
Date: Sat, 15 Jul 2023 21:58:41 -0700
Subject: [PATCH] (system.expansion.tal) Added expansion port test file

---
 .../examples/devices/system.expansion.tal     | 25 +++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100644 projects/examples/devices/system.expansion.tal

diff --git a/projects/examples/devices/system.expansion.tal b/projects/examples/devices/system.expansion.tal
new file mode 100644
index 0000000..2a687e6
--- /dev/null
+++ b/projects/examples/devices/system.expansion.tal
@@ -0,0 +1,25 @@
+
+|00 @System &catch $2 &expansion $2 &pad $2 &metadata $2 &r $2 &g $2 &b $2 &debug $1 &halt $1
+|10 @Console &vector $2 &read $1 &pad $4 &type $1 &write $1 &error $1
+
+|0100
+
+@on-reset ( -> )
+	;cmd .System/expansion DEO2
+	;dst <print-str>
+	BRK
+
+@cmd
+	[ 01 000b 0000 =src 0000 =dst ]
+
+@src
+	"Hello 20 "World $80
+
+@dst $0c
+
+@<print-str> ( str* -- )
+	&w ( -- )
+		LDAk #18 DEO
+		INC2 LDAk ?&w
+	POP2 JMP2r
+