\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 dup puti push +46(6b) putc push -499(9b) mark null swap push +10(4b) mul swap push +1(1b) add dup jneg null swap stor push -2000(11b) mark +0(0b) swap push +0(0b) retr add push +0(0b) retr dup mul swap div swap push +1(1b) add dup jneg +0(0b) pop puti