byte WHITE = 1;
byte RED = 2;
byte GREEN = 5;

void main() {
   byte[] colseq = { WHITE, RED, GREEN };
   byte* screen = $0400;
   byte* cols = $d800;
   byte j = 0;
   for( byte i : 0..39) {
      screen[i] = '*';
      cols[i] = colseq[j];
      if(++j==3) {
         j=0;
      }
   }

}