Plot Circle by pooq

pull r
do x=-r to r
a=copies("*",r*2+1)
do y=-r to r
a=overlay(" ",a,r+y+1,x*x+y*y>r*r)
end
say a
end

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

download

return to the top page