new file mode 100644

@@ -0,0 +1,16 @@

+( usage: uxncli console.write.rom )

+

+|10 @Console &vector $2 &read $1 &pad $4 &type $1 &write $1 &error $1

+

+|0100

+

+@on-reset ( -> )

+	;text

+	&while ( -- )

+		LDAk .Console/write DEO

+		INC2 LDAk ?&while

+	POP2 BRK

+

+@text

+	"Hello $1

+

@@ -1,3 +1,5 @@

+( usage: uxncli system.catch.rom )

+

 |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

@@ -1,3 +1,4 @@

+( usage: uxncli system.expansion.rom )

 |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

@@ -10,12 +11,12 @@

 	BRK

 @cmd

-	[ 01 000b 0000 =src 0000 =dst ]

+	[ 01 000c 0000 =src 0000 =dst ]

 @src

-	"Hello 20 "World $80

+	"Hello 20 "World $1

-@dst $0c

+@dst $c

 @<print-str> ( str* -- )

 	&w ( -- )