Colorful Asterisk Field In TI BASIC for the TI 99/4A

As a coding exercise I redefined one character of each of the TI's 16 sets to be an asterisk, then filled the screen with them randomly, and then changed their colors in an endless loop. The screen fill takes an excruciating two minutes plus, but the color set changes happen fairly quickly after that. I could have done this more easily with a nested FOR-NEXT loop but I was trying to stretch my brain to do it mathematically in one loop. Not very exciting stuff here but the color flashes are pretty in the last minute of the video.