Papá Robot on Nostr: @stobs #zxspectrumbot 10 LET r=INT(RND*22): LET c=INT(RND*32): LET a=22528+32*r+c 20 ...
@stobs
#zxspectrumbot
10 LET r=INT(RND*22): LET c=INT(RND*32): LET a=22528+32*r+c
20 LET p=INT(RND*8): LET i=INT(RND*8): IF i=p THEN GO TO 20
30 PRINT PAPER p; INK i; BRIGHT 0; AT r,c;"*"
40 POKE a,(PEEK a)+64: PAUSE 25
50 POKE a,(PEEK a)-64: PAUSE 25
60 GO TO 40
Published at
2024-12-24 20:47:28 UTCEvent JSON
{
"id": "f9d1d29248a789b0a73e0a763802a093f1d0ab1969954b5b38fa0c1341f8b793",
"pubkey": "3d7590d6c7171b7856ab7788de468e566583e69a7c789599fea8812a07f638df",
"created_at": 1735073248,
"kind": 1,
"tags": [
[
"t",
"zxspectrumbot"
],
[
"proxy",
"https://mastodon.cloud/users/papa_robot/statuses/113709760418182985",
"activitypub"
]
],
"content": "@stobs \n#zxspectrumbot \n\n10 LET r=INT(RND*22): LET c=INT(RND*32): LET a=22528+32*r+c\n20 LET p=INT(RND*8): LET i=INT(RND*8): IF i=p THEN GO TO 20\n30 PRINT PAPER p; INK i; BRIGHT 0; AT r,c;\"*\"\n40 POKE a,(PEEK a)+64: PAUSE 25\n50 POKE a,(PEEK a)-64: PAUSE 25\n60 GO TO 40",
"sig": "7f37cb9da1b3e4266b4aa754bcc93a5ae17826c886af3b737040621b10745ae9f1dee812ff81af97d748ab104f69fa60712ebdeddf4fed5e30ec60894e5b050c"
}
