Times square header
Here's a quick way to use some of the more interesting capabilities of the Color Computer to produce a "header" for a program that's. as they say, fast and dirty.
This little gem will give you a Times Square-like message center on your screen. The words will just scroll along. And. from the code below, you'll see that it's easy to produce. You might even want to use it to leave messages for other members of the family!
For those without Extended Color Basic, change the STRING$ (16,32) in line 3 to 16 blank: spaces. Line 11 can be deleted, it’s just there to keep the display neat in this example.
Here's the RPQ (RAINBOW Program Quickie) --with thanks to Joe Bennett--:
1 CLS0 3 AS=" THIS PROGRAM IS BROUGHT TO YOU THROUGH THE RAINBOW ... THE MONTHLY MAGAZ INE FOR COLOR COMPUTER USER S. YOU CAN PUT YOUR OWN MES SAGE HERE. "+STRING$ (16,32) 5 FOR A=1 TO LEN(AS)-15:E1=E1 +1:IF E1>4 THEN E1=1:E=1125 :EE=1140 7 PRINT@328,MID$(A$,A,15); 9 SOUND RND(240),1:NEXT A 11 GOTO 11