( init )

|00 @System &vector $2 &expansion $2 &wst $1 &rst $1 &metadata $2 &r $2 &g $2 &b $2 &debug $1 &state $1

%emit ( byte -- ) { #18 DEO }

|0100 @program

	#1234 SWP
	#010e DEO
	#010f DEO

	#1234 #5678 SWP2

	;hello-word

	&while
		( send ) LDAk emit
		( loop ) INC2 LDAk ?&while
	POP2

	#010f DEO

BRK 

@program/extend BRK

@hello-word "Hello 20 "World? 00