for i=-20to 23for j=-21to 22k=(i-1.59)^2+(j-.49)^2:l=i*44+j:m=12-(i+5.1)^2:n=78-(j-.6)^2 ?chr$(46-11*(k<483and k>304or(j+6.7)^2<m or(j-7.8)^2<m or(i-2.2)^2<n+30and n<i^2and i>2or l=643or!l+562));next ?next
Note that non-ascii characters in the above source code will be escaped (such as \x9f).