add_sub_brainfuck_code by eban

l=0
loop{c=getc
$><<(c<l ?"-":"+")*(c-l).abs+"."
l=c}

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return top