Papá Robot on Nostr: #atari8bitbot {B02S99} 10 GR.9+16:C.15:PI=3.14159265 40 for x=-30 to 30 50 for y=-30 ...

#atari8bitbot {B02S99}
10 GR.9+16:C.15:PI=3.14159265
40 for x=-30 to 30
50 for y=-30 to 30
60 z=SQR(ABS(x*x-y*y))
70 xp=x+40
80 yp=y+96
90 if z>0
93 color int(z*15)
95 plot xp,yp
100 endif
110 next y
120 next x
130 do:loop