push 10
push 'l'
push 'a'
push 'm'
push 'i'
push 'c'
push 'e'
push 'd'
outchar
outchar
outchar
outchar
outchar
outchar
outchar
outchar
mark loop
push 0
dup
readchar
retrieve
dup
push 10
sub
jzero end
outchar
jump loop
mark end
end