wave line by o-cn

<?for(;"
"<$a=fgetc(STDIN);$r[$d][$k++]=$b=$a)$r[$d+=$a<$b^-($a>$b)].=' ';ksort($r)?><?=join("
",$r);

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

download

return to the top page