Screen Full of Stars and a Welcome Message in GW Basic by Blackjack

Started by ron77, Dec 16, 2023, 10:38 AM

Previous topic - Next topic

ron77

10 RANDOMIZE TIMER:DEF SEG=&HB800
20 FOR I=0 TO 2000:POKE I*2+1,0:POKE I*2,42:NEXT
30 T$="Hello, welcome to RetroCoders Community Forum!"
40 LOCATE 12,(80-LEN(T$))\2:PRINT T$;
50 WHILE INKEY$<>CHR$(27):POKE INT(RND*2000)*2+1,INT(RND*16):WEND
␚




CharlieJV

Cool.  I'm having a "Lite-brite" flashback (I loved that toy).