Times square header

From CoCopedia - The Tandy/Radio Shack Color Computer Wiki
Revision as of 12:25, 12 May 2019 by Luis46coco (talk | contribs)
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Jump to: navigation, search

Template:Header


Home / Publications / Rainbow / Rainbow 1981 / Rainbow 1981-11Template:PageName So. you've written a neat program but you don't really have a good way to introduce it ... and you're tired. anyway.

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

Links

See Rainbow Magazine 1981-11 Pag 5, in archive.org