social.solarpunk.au

social.solarpunk.au

5 DATA "(u w u)","(u w u )","( u w u)","(> u w u)>","<( u w u <)"
10 FOR I=1 TO 100
15     DELAY 1000
20     F=INT(RND(1)*5)+1
30     RESTORE F
40     READ P$:PRINT P$
50 NEXT I

( :

replies
1
announces
1
likes
0

@uwu

I don't know if you're looking for portability notes, but in most BASICs I know, RESTORE either doesn't take an argument at all, or restores to a line number.

Good luck!

@goosey yes. I suspected something similar myself. Please consider this particular code just a bit of noodling. I was quite amused that it worked for me.

Thank you very much for your response, it lets me know if I stick little code snippets here, that people will take an interest ( :