\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 -150(8b) push +1(1b) dup dup geti retr mark null dup dup dup mul push +2(2b) div mul sub swap push +100(7b) mul copy +2(2b) push +1(1b) add swap copy +2(2b) copy +1(1b) mod copy +2(2b) jneg null puti