Dragon curve by tybalt89

pos=$x+5e3,s/\G /*/,$x+=(93,1,-93,-1)[3&($d+=$c&-$c&$c++/2?3:1)]for($_=($/.$"x92)x99)x(2**<>+1);s/^\s*^ //gmuntil/
\*/;print

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

download

return to the top page