home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / gbmsrc.zip / _gbmerr.c next >
C/C++ Source or Header  |  1996-04-01  |  2KB  |  100 lines
  1. /*
  2.  
  3. _gbmerr.c - Calculate the quick 'closest-colour' lookup table for gbmerr.c
  4.  
  5. */
  6.  
  7. #include <stdio.h>
  8. #include "gbm.h"
  9.  
  10. /*...sVGA palette:0:*/
  11. static GBMRGB gbmrgb_vga[] =
  12.     {
  13.       0,  0,  0,
  14.     128,  0,  0,
  15.       0,128,  0,
  16.     128,128,  0,
  17.       0,  0,128,
  18.     128,  0,128,
  19.       0,128,128,
  20.     128,128,128,
  21.     204,204,204,
  22.     255,  0,  0,
  23.       0,255,  0,
  24.     255,255,  0,
  25.       0,  0,255,
  26.     255,  0,255,
  27.       0,255,255,
  28.     255,255,255,
  29.     };
  30. /*...e*/
  31. /*...scalc_nearest:0:*/
  32. /*
  33. This function, when given am RGB colour, finds the VGA palette entry closest
  34. to it. We deliberately bias away from the two grey palette entries.
  35. */
  36.  
  37. static byte calc_nearest(byte r, byte g, byte b)
  38.     {
  39.     long min_dist = 3L * 256L * 256L * 10L;
  40.     byte bi, bi_min;
  41.  
  42.     for ( bi = 0; bi < 0x10; bi++ )
  43.         {
  44.         long b_dist = ((long) b - (long) gbmrgb_vga[bi].b);
  45.         long g_dist = ((long) g - (long) gbmrgb_vga[bi].g);
  46.         long r_dist = ((long) r - (long) gbmrgb_vga[bi].r);
  47.         long dist = r_dist * r_dist + g_dist * g_dist + b_dist * b_dist;
  48.  
  49.         if ( bi == 7 || bi == 8 )
  50.             /* Bias away from this colour */
  51.             dist <<= 3;
  52.  
  53.         if ( dist < min_dist )
  54.             {
  55.             min_dist = dist;
  56.             bi_min = bi;
  57.             }
  58.         }
  59.     return ( bi_min );
  60.     }
  61. /*...e*/
  62.  
  63. static char *dw_casings[] =
  64.     {
  65.     "\t%d,", "%d,", "%d,", "%d,", "%d,", "%d,", "%d,", "%d,",
  66.     "%d,", "%d,", "%d,", "%d,", "%d,", "%d,", "%d,", "%d,\n",
  67.     };
  68.  
  69. int main(void)
  70.     {
  71.     byte r, r0, r1, g, g0, g1, b, b0, b1, i = 0;
  72.  
  73.     printf("static byte quick_tab[16][16][16] =\n\t{\n");
  74.  
  75.     for ( r = 0, r0 = 0, r1 = 15; r < 16; r++, r0 += 16, r1 += 16 )
  76.         for ( g = 0, g0 = 0, g1 = 15; g < 16; g++, g0 += 16, g1 += 16 )
  77.             for ( b = 0, b0 = 0, b1 = 15; b < 16; b++, b0 += 16, b1 += 16 )
  78. /*...sanalyse cube:32:*/
  79. {
  80. byte n = calc_nearest(r0, g0, b0);
  81. byte inx;
  82.  
  83. if ( n == calc_nearest(r0, g0, b1) &&
  84.      n == calc_nearest(r0, g1, b0) &&
  85.      n == calc_nearest(r0, g1, b1) &&
  86.      n == calc_nearest(r1, g0, b0) &&
  87.      n == calc_nearest(r1, g0, b1) &&
  88.      n == calc_nearest(r1, g1, b0) &&
  89.      n == calc_nearest(r1, g1, b1) )
  90.     inx = n;
  91. else
  92.     inx = (byte) 0xff;
  93. printf(dw_casings[i++ & 15], (int) inx);
  94. }
  95. /*...e*/
  96.  
  97.     printf("\t};\n");
  98.     return 0;
  99.     }
  100.