Papá Robot on Nostr: #atari8bitbot 10 GR.9+16:C.15:PI=3.14159265 40 for x=-30 to 30 50 for y=-30 to 30 60 ...
#atari8bitbot
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
Published at
2024-10-20 01:31:23Event JSON
{
"id": "d27e708e62d60c8d73732a7aa838519ef69ea88973a1096c19853d49b8562784",
"pubkey": "3d7590d6c7171b7856ab7788de468e566583e69a7c789599fea8812a07f638df",
"created_at": 1729387883,
"kind": 1,
"tags": [
[
"t",
"atari8bitbot"
],
[
"content-warning",
"CODE: GR9"
],
[
"proxy",
"https://mastodon.cloud/users/papa_robot/statuses/113337164357172567",
"activitypub"
]
],
"content": "#atari8bitbot \n10 GR.9+16:C.15:PI=3.14159265\n40 for x=-30 to 30\n50 for y=-30 to 30\n60 z=SQR(ABS(x*x-y*y))\n70 xp=x+40\n80 yp=y+96\n90 if z\u003e0\n93 color int(z*15)\n95 plot xp,yp\n100 endif\n110 next y\n120 next x\n130 do:loop",
"sig": "e545b4f629717fbfd4ae871b2d92e062815ccf744e4ebdc0b38dfb64582a01d4417aab0185fe8e3dc03d3b5c1ea31f51d9e1c49f326a09a4027e35396cea5b02"
}