1( cat a.rom | uxncli hx.rom > b.txt )
2
3@on-reset ( -> )
4 ;on-console #10 DEO2 BRK
5@on-console ( -> )
6 #0417 DEI NEQ [ JMP BRK ]
7 #12 DEI DUP #04 SFT emit emit INC
8@spacer ( c -> )
9 DUP #0f AND ?{ #0a18 DEO BRK }
10 DUP #01 AND ?{ #2018 DEO } BRK
11@emit ( c -- )
12 #0f AND DUP #09 GTH #27 MUL ADD LIT "0 ADD #18 DEO JMP2r
13