\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 \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) dup push +0(1b) push +65(7b) stor puti push +10(4b) putc mark +0(0b) push +1(1b) add dup dup push +0(1b) stor push +100(7b) sub jzero -0(1b) push +1(1b) mark -1(1b) push +1(1b) add copy +1(1b) copy +1(1b) mod jzero -0(2b) jump -1(1b) mark -0(2b) dup retr push -1(1b) mul jneg -1(2b) dup push +0(1b) retr stor push +0(1b) push +0(1b) retr push +1(1b) add stor retr call -0(0b) jump +0(0b) mark -1(2b) retr call -0(0b) jump +0(0b) mark -0(0b) putc push +10(4b) putc ret mark -0(1b)