Papá Robot on Nostr: nprofile1q…s8xar #zxspectrumbot 10 LET r=INT(RND*22): LET c=INT(RND*32): LET ...
nprofile1qy2hwumn8ghj7un9d3shjtnddaehgu3wwp6kyqpq2d535cvt26z2hky5dcesfqr2gzqczyajt4s3gg6ggkegglrxahmsds8xar (nprofile…8xar)
#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 GOTO 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
#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 GOTO 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