0 Members and 2 Guests are viewing this topic.
That doesn't seem to work... it gives numbers that are anywhere for 50 to 1000 btes less than the actual...
:.INPUTS: X,Y=CENTER, R=RADIUS:Lbl C:-(R→M)→E:0->N:While M≥N:Pxl-On(X+M,Y+N:Pxl-On(X+M,Y-N:Pxl-On(X-M,Y+N:Pxl-On(X-M,Y-N:Pxl-On(X+N,Y+M:Pxl-On(X+N,Y-M:Pxl-On(X-N,Y+M:Pxl-On(X-N,Y-M:If N+1→N*2-1+E→E≥≥0:-(M-1→M)*2+E→E:End:End:Return