Listing 1: VISIONS.BAS Download
Listing 2, RAINBOW.BAS, comes from the newsletter of the Salt Lake City Atari Computer Enthusiasts (ACE). You don't need to type in the lines numbered 200 and above. They are there to show the changes to make on lines 30, 50 and 70 if you have an XL or XE computer to take advantage of Graphics 15 which is unavailable on the older machines.
Listing 2: RAINBOW.BAS Download