my $i = 0;
my $pal_colormap = "";
my $pal_scoreboard = "";
+print STDERR "\nPaste these cases into the qc colormapPaletteColor function\n\n";
+
+print STDERR "\t\t// generated by gfx/colormap_palette.pl\n";
for(@colors)
{
/^(..)(..)(..)$/ or die "invalid color spec: $_";
ERASEABLE
vector colormapPaletteColor_(int c, bool isPants, float t)
{
+ // these colors are defined in gfx/colormap_palette.pl
+ // to generate them run: perl gfx/colormap_palette.pl > gfx/colormap_palette.lmp
+ // it will save them to gfx/colormap_palette.lmp (in the lmp format)
+ // and prints the cases of the following switch so they can be copy-pasted here
+
switch (c)
{
+ // generated by gfx/colormap_palette.pl
case 0: return '1.000000 1.000000 1.000000';
case 1: return '1.000000 0.333333 0.000000';
case 2: return '0.000000 1.000000 0.501961';