Get a Distinctive Color from a Set of Colors

// GetIndexedRGBColor(colorIndex, red, green, blue)
// Given an index from 0 to 15, returns a color as r, g and b.
// colorIndex is an input. red, green and blue are outputs.
// Example:
// Function Test()
//  Variable i
//  for(i=0; i<10; i+=1)
//      Variable red, green, blue
//      GetColor(i, red, green, blue)
//      Printf "%d: red=%d, green=%d, blue=%d\r", red, green, blue
//  endfor
// End
Function GetIndexedRGBColor(colorIndex, red, green, blue)
    Variable colorIndex
    Variable &red, &green, &blue                // Outputs
 
    Variable numColors = 16                 // Number of colors in the following switch
    
    colorIndex = mod(colorIndex, numColors)         // Wrap around if necessary
    switch(colorIndex)
        case 0:     // Time wave
            red = 0; green = 0; blue = 0;                               // Black
            break
            
        case 1:
            red = 65535; green = 16385; blue = 16385;           // Red
            break
            
        case 2:
            red = 2; green = 39321; blue = 1;                       // Green
            break
            
        case 3:
            red = 0; green = 0; blue = 65535;                       // Blue
            break
            
        case 4:
            red = 39321; green = 1; blue = 31457;                   // Purple
            break
            
        case 5:
            red = 39321; green = 39321; blue = 39321;           // Gray
            break
            
        case 6:
            red = 65535; green = 32768; blue = 32768;           // Salmon
            break
            
        case 7:
            red = 0; green = 65535; blue = 0;                       // Lime
            break
            
        case 8:
            red = 16385; green = 65535; blue = 65535;           // Turquoise
            break
            
        case 9:
            red = 65535; green = 32768; blue = 58981;           // Light purple
            break
            
        case 10:
            red = 39321; green = 26208; blue = 1;                   // Brown
            break
            
        case 11:
            red = 52428; green = 34958; blue = 1;                   // Light brown
            break
 
        case 12:
            red = 65535; green = 32764; blue = 16385;           // Orange
            break
 
        case 13:
            red = 1; green = 52428; blue = 26586;                   // Teal
            break
 
        case 14:
            red = 1; green = 3; blue = 39321;                       // Dark blue
            break
 
        case 15:
            red = 65535; green = 49151; blue = 55704;           // Pink
            break
    endswitch
End