a=0 loop{b=getc%8 b==7?p(a):a=[a,a+1,a,a*a,a>0?a-1:a][b] a==256&&a=0}

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

download

return top