packed UTF 9 by Mark Byers

   \x09
   

  

 \x09 
\x09  

 \x09 
\x09
\x09 \x09    \x09  \x09 
\x09  
\x09    
\x09   \x09 
\x09 \x09  
 
\x09 \x09
 
\x09 
 \x09
     \x09         
\x09 \x09 
    

 


   
 
  
 \x09
\x09 \x09\x09\x09   \x09  \x09\x09\x09
\x09 \x09\x09   \x09  \x09
\x09  \x09   \x09    

\x09

  \x09
 

   \x09        
 
\x09
 

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

Disassemble:

push +1(1b)
push +0(0b)
mark null
call +0(0b)
mul
call +0(0b)
getc
add
copy +2(2b)
mul
add
swap
push +2(2b)
div
dup
jzero -0(0b)
swap
dup
putc
push +512(10b)
div
mark +0(1b)
jump null
mark +0(0b)
dup
dup
getc
retr
push +39(6b)
mod
push +9(4b)
sub
push +16(5b)
ret
mark -0(0b)
pop
push +256(9b)
swap
jump null

download

return top