Any ideas? (maybe I'm just missing something)Looks like you forgot to attach the code. :-)
Here it is, sorry!
ciao,
--
Giuliano
#!/usr/bin/perl
$i=$j=$r=$b=-16.0;while((print"\n"),$b++<15){foreach$a(0..78){print
+(split //,' .:-;!/>)|&IH%*#')[$k&15];for($i=$k=$r=0;$j=$r*$r-$i*$i
-2+$a/25,$i=2*$r*$i+$b/10,$j*$j+$i*$i<11&&$k++<111;$r=$j){}}}
Attachment:
popcombo.pl.gz
Description: application/gunzip