1( cat a.txt | uxncli xh.rom > b.rom )
 2@on-reset ( -> )
 3	;on-console #10 DEO2 BRK
 4@on-console ( -> )
 5	#0417 DEI EQU ?{
 6		#12 DEI
 7		LIT "0 SUB DUP #0a LTH ?{
 8			#27 SUB DUP #10 LTH ?{ POP BRK } }
 9		LITr 40 EORr STHkr ?{ ORA #18 DEO BRK }
10		STHkr SFT BRK }
11	#800f DEO