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