Starburst by primo

<?for($l=~strlen($s=fgets(STDIN));$c=$s[$n++];print~\xf5)for($i=0;$d=$s[$i++];)echo$n+$l/2?$i-$n&&$i+$l/2&&$l+$n+$i?~\xdf:$c:$d;

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

download

return to the top page