( init )

|0100 @program

	#1234 SWP
	#010e DEO
	#010f DEO

	#1234 #5678 SWP2

	;hello-word

	&while
		( send ) LDAk #18 DEO
		( loop ) INC2 LDAk ,&while JCN
	POP2

	#010f DEO

BRK

@program/extend BRK

@hello-word "Hello 20 "World! 00