<?for($s="\xd7\x90\xcb\xda\x9c^_\xd0\xdf\xdc";O^$c=fgetc(STDIN);$t=sprintf("%9b$t",ord($s[$c])));$t="000$t";for($i=1|$n=22;$n;print chr($i>($n>21)*3?32+$t[$i--]*($i<$e=6-$n%2*3)*(15+($i+$n)%2*45):9+1%$i=1|--$n+!$t=substr($t,$e)));
Note that non-ascii characters in the above source code will be escaped (such as \x9f).