TexMod.h

   1 /*
   2 *       Glide64 - Glide video plugin for Nintendo 64 emulators.
   3 *       Copyright (c) 2002  Dave2001
   4 *
   5 *       This program is free software; you can redistribute it and/or modify
   6 *       it under the terms of the GNU General Public License as published by
   7 *       the Free Software Foundation; either version 2 of the License, or
   8 *       any later version.
   9 *
  10 *       This program is distributed in the hope that it will be useful,
  11 *       but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 *       MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 *       GNU General Public License for more details.
  14 *
  15 *       You should have received a copy of the GNU General Public License
  16 *       along with this program; if not, write to the Free Software
  17 *       Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  18 */
  19
  20 //****************************************************************
  21 //
  22 // Glide64 - Glide Plugin for Nintendo 64 emulators (tested mostly with Project64)
  23 // Project started on December 29th, 2001
  24 //
  25 // To modify Glide64:
  26 // * Write your name and (optional)email, commented by your work, so I know who did it, and so that you can find which parts you modified when it comes time to send it to me.
  27 // * Do NOT send me the whole project or file that you modified.  Take out your modified code sections, and tell me where to put them.  If people sent the whole thing, I would have many different versions, but no idea how to combine them all.
  28 //
  29 // Official Glide64 development channel: #Glide64 on EFnet
  30 //
  31 // Original author: Dave2001 (Dave2999@hotmail.com)
  32 // Other authors: Gonetz, Gugaman
  33 //
  34 //****************************************************************
  35
  36 #ifndef _WIN32
  37 #include <stdlib.h>
  38 #endif
  39
  40 static void mod_tex_inter_color_using_factor (WORD *dst, int size, DWORD color, DWORD factor)
  41 {
  42         float percent = factor / 255.0f;
  43         float percent_i = 1 - percent;
  44         DWORD cr, cg, cb;
  45         WORD col, a;
  46         BYTE r, g, b;
  47
  48         cr = (color >> 12) & 0xF;
  49         cg = (color >> 8) & 0xF;
  50         cb = (color >> 4) & 0xF;
  51
  52         for (int i=0; i<size; i++)
  53         {
  54                 col = *dst;
  55                 a = col & 0xF000;
  56                 r = (BYTE)(percent_i * ((col >> 8) & 0xF) + percent * cr);
  57                 g = (BYTE)(percent_i * ((col >> 4) & 0xF) + percent * cg);
  58                 b = (BYTE)(percent_i * (col & 0xF) + percent * cb);
  59                 *(dst++) = a | (r << 8) | (g << 4) | b;
  60         }
  61 }
  62
  63 static void mod_tex_inter_col_using_col1 (WORD *dst, int size, DWORD color0, DWORD color1)
  64 {
  65         DWORD cr, cg, cb;
  66         WORD col, a;
  67         BYTE r, g, b;
  68
  69         float percent_r = ((color1 >> 12) & 0xF) / 15.0f;
  70         float percent_g = ((color1 >> 8) & 0xF) / 15.0f;
  71         float percent_b = ((color1 >> 4) & 0xF) / 15.0f;
  72         float percent_r_i = 1.0f - percent_r;
  73         float percent_g_i = 1.0f - percent_g;
  74         float percent_b_i = 1.0f - percent_b;
  75
  76         cr = (color0 >> 12) & 0xF;
  77         cg = (color0 >> 8) & 0xF;
  78         cb = (color0 >> 4) & 0xF;
  79
  80         for (int i=0; i<size; i++)
  81         {
  82                 col = *dst;
  83                 a = col & 0xF000;
  84                 r = (BYTE)(percent_r_i * ((col >> 8) & 0xF) + percent_r * cr);
  85                 g = (BYTE)(percent_g_i * ((col >> 4) & 0xF) + percent_g * cg);
  86                 b = (BYTE)(percent_b_i * (col & 0xF) + percent_b * cb);
  87                 *(dst++) = a | (r << 8) | (g << 4) | b;
  88         }
  89 }
  90
  91 static void mod_full_color_sub_tex (WORD *dst, int size, DWORD color)
  92 {
  93         DWORD cr, cg, cb, ca;
  94         WORD col;
  95         BYTE a, r, g, b;
  96
  97         cr = (color >> 12) & 0xF;
  98         cg = (color >> 8) & 0xF;
  99         cb = (color >> 4) & 0xF;
 100         ca = color & 0xF;
 101
 102         for (int i=0; i<size; i++)
 103         {
 104                 col = *dst;
 105                 a = (BYTE)(ca - ((col >> 12) & 0xF));
 106                 r = (BYTE)(cr - ((col >> 8) & 0xF));
 107                 g = (BYTE)(cg - ((col >> 4) & 0xF));
 108                 b = (BYTE)(cb - (col & 0xF));
 109                 *(dst++) = (a << 12) | (r << 8) | (g << 4) | b;
 110         }
 111 }
 112
 113 static void mod_col_inter_col1_using_tex (WORD *dst, int size, DWORD color0, DWORD color1)
 114 {
 115         DWORD cr0, cg0, cb0, cr1, cg1, cb1;
 116         WORD col;
 117         BYTE r, g, b;
 118         WORD a;
 119         float percent_r, percent_g, percent_b;
 120
 121         cr0 = (color0 >> 12) & 0xF;
 122         cg0 = (color0 >> 8) & 0xF;
 123         cb0 = (color0 >> 4) & 0xF;
 124         cr1 = (color1 >> 12) & 0xF;
 125         cg1 = (color1 >> 8) & 0xF;
 126         cb1 = (color1 >> 4) & 0xF;
 127
 128         for (int i=0; i<size; i++)
 129         {
 130                 col = *dst;
 131                 a = col & 0xF000;
 132                 percent_r = ((col >> 8) & 0xF) / 15.0f;
 133                 percent_g = ((col >> 4) & 0xF) / 15.0f;
 134                 percent_b = (col & 0xF) / 15.0f;
 135                 r = min(15, (BYTE)((1.0f-percent_r) * cr0 + percent_r * cr1));
 136                 g = min(15, (BYTE)((1.0f-percent_g) * cg0 + percent_g * cg1));
 137                 b = min(15, (BYTE)((1.0f-percent_b) * cb0 + percent_b * cb1));
 138                 *(dst++) = a | (r << 8) | (g << 4) | b;
 139         }
 140 }
 141
 142 static void mod_col_inter_col1_using_texa (WORD *dst, int size, DWORD color0, DWORD color1)
 143 {
 144         DWORD cr0, cg0, cb0, cr1, cg1, cb1;
 145         WORD col;
 146         BYTE r, g, b;
 147         WORD a;
 148         float percent, percent_i;
 149
 150         cr0 = (color0 >> 12) & 0xF;
 151         cg0 = (color0 >> 8) & 0xF;
 152         cb0 = (color0 >> 4) & 0xF;
 153         cr1 = (color1 >> 12) & 0xF;
 154         cg1 = (color1 >> 8) & 0xF;
 155         cb1 = (color1 >> 4) & 0xF;
 156
 157         for (int i=0; i<size; i++)
 158         {
 159                 col = *dst;
 160                 a = col & 0xF000;
 161                 percent = (a >> 12) / 15.0f;
 162                 percent_i = 1.0f - percent;
 163                 r = (BYTE)(percent_i * cr0 + percent * cr1);
 164                 g = (BYTE)(percent_i * cg0 + percent * cg1);
 165                 b = (BYTE)(percent_i * cb0 + percent * cb1);
 166                 *(dst++) = a | (r << 8) | (g << 4) | b;
 167         }
 168 }
 169
 170 static void mod_col_inter_col1_using_texa__mul_tex (WORD *dst, int size, DWORD color0, DWORD color1)
 171 {
 172         DWORD cr0, cg0, cb0, cr1, cg1, cb1;
 173         WORD col;
 174         BYTE r, g, b;
 175         WORD a;
 176         float percent, percent_i;
 177
 178         cr0 = (color0 >> 12) & 0xF;
 179         cg0 = (color0 >> 8) & 0xF;
 180         cb0 = (color0 >> 4) & 0xF;
 181         cr1 = (color1 >> 12) & 0xF;
 182         cg1 = (color1 >> 8) & 0xF;
 183         cb1 = (color1 >> 4) & 0xF;
 184
 185         for (int i=0; i<size; i++)
 186         {
 187                 col = *dst;
 188                 a = col & 0xF000;
 189                 percent = (a >> 12) / 15.0f;
 190                 percent_i = 1.0f - percent;
 191                 r = (BYTE)(((percent_i * cr0 + percent * cr1) / 15.0f) * (((col & 0x0F00) >> 8) / 15.0f) * 15.0f);
 192                 g = (BYTE)(((percent_i * cg0 + percent * cg1) / 15.0f) * (((col & 0x00F0) >> 4) / 15.0f) * 15.0f);
 193                 b = (BYTE)(((percent_i * cb0 + percent * cb1) / 15.0f) * ((col & 0x000F) / 15.0f) * 15.0f);
 194                 *(dst++) = a | (r << 8) | (g << 4) | b;
 195         }
 196 }
 197
 198 static void mod_col_inter_tex_using_tex (WORD *dst, int size, DWORD color)
 199 {
 200         DWORD cr, cg, cb;
 201         WORD col;
 202         BYTE r, g, b;
 203         WORD a;
 204         float percent_r, percent_g, percent_b;
 205
 206         cr = (color >> 12) & 0xF;
 207         cg = (color >> 8) & 0xF;
 208         cb = (color >> 4) & 0xF;
 209
 210         for (int i=0; i<size; i++)
 211         {
 212                 col = *dst;
 213                 a = col & 0xF000;
 214                 percent_r = ((col >> 8) & 0xF) / 15.0f;
 215                 percent_g = ((col >> 4) & 0xF) / 15.0f;
 216                 percent_b = (col & 0xF) / 15.0f;
 217                 r = (BYTE)((1.0f-percent_r) * cr + percent_r * ((col & 0x0F00) >> 8));
 218                 g = (BYTE)((1.0f-percent_g) * cg + percent_g * ((col & 0x00F0) >> 4));
 219                 b = (BYTE)((1.0f-percent_b) * cb + percent_b * (col & 0x000F));
 220                 *(dst++) = a | (r << 8) | (g << 4) | b;
 221         }
 222 }
 223
 224 static void mod_col_inter_tex_using_texa (WORD *dst, int size, DWORD color)
 225 {
 226         DWORD cr, cg, cb;
 227         WORD col;
 228         BYTE r, g, b;
 229         WORD a;
 230         float percent, percent_i;
 231
 232         cr = (color >> 12) & 0xF;
 233         cg = (color >> 8) & 0xF;
 234         cb = (color >> 4) & 0xF;
 235
 236         for (int i=0; i<size; i++)
 237         {
 238                 col = *dst;
 239                 a = col & 0xF000;
 240                 percent = (a >> 12) / 15.0f;
 241                 percent_i = 1.0f - percent;
 242                 r = (BYTE)(percent_i * cr + percent * ((col & 0x0F00) >> 8));
 243                 g = (BYTE)(percent_i * cg + percent * ((col & 0x00F0) >> 4));
 244                 b = (BYTE)(percent_i * cb + percent * (col & 0x000F));
 245                 *(dst++) = a | (r << 8) | (g << 4) | b;
 246         }
 247 }
 248
 249 static void mod_col2_inter__col_inter_col1_using_tex__using_texa (WORD *dst, int size,
 250                                                                                                                                   DWORD color0, DWORD color1,
 251                                                                                                                                   DWORD color2)
 252 {
 253         DWORD cr0, cg0, cb0, cr1, cg1, cb1, cr2, cg2, cb2;
 254         WORD col;
 255         BYTE r, g, b;
 256         WORD a;
 257         float percent_r, percent_g, percent_b, percent_a;
 258
 259         cr0 = (color0 >> 12) & 0xF;
 260         cg0 = (color0 >> 8) & 0xF;
 261         cb0 = (color0 >> 4) & 0xF;
 262         cr1 = (color1 >> 12) & 0xF;
 263         cg1 = (color1 >> 8) & 0xF;
 264         cb1 = (color1 >> 4) & 0xF;
 265         cr2 = (color2 >> 12) & 0xF;
 266         cg2 = (color2 >> 8) & 0xF;
 267         cb2 = (color2 >> 4) & 0xF;
 268
 269         for (int i=0; i<size; i++)
 270         {
 271                 col = *dst;
 272                 a = col & 0xF000;
 273                 percent_a = (a >> 12) / 15.0f;
 274                 percent_r = ((col >> 8) & 0xF) / 15.0f;
 275                 percent_g = ((col >> 4) & 0xF) / 15.0f;
 276                 percent_b = (col & 0xF) / 15.0f;
 277                 r = (BYTE)(((1.0f-percent_r) * cr0 + percent_r * cr1) * percent_a + cr2 * (1.0f-percent_a));
 278                 g = (BYTE)(((1.0f-percent_g) * cg0 + percent_g * cg1) * percent_a + cg2 * (1.0f-percent_a));
 279                 b = (BYTE)(((1.0f-percent_b) * cb0 + percent_b * cb1) * percent_a + cb2 * (1.0f-percent_a));
 280                 *(dst++) = a | (r << 8) | (g << 4) | b;
 281         }
 282 }
 283
 284 static void mod_tex_scale_fac_add_fac (WORD *dst, int size, DWORD factor)
 285 {
 286         float percent = factor / 255.0f;
 287         WORD col;
 288         BYTE a;
 289         float base_a = (1.0f - percent) * 15.0f;
 290
 291         for (int i=0; i<size; i++)
 292         {
 293                 col = *dst;
 294                 a = (BYTE)(base_a + percent * (col>>12));
 295                 *(dst++) = (a<<12) | (col & 0x0FFF);
 296         }
 297 }
 298
 299 static void mod_tex_sub_col_mul_fac_add_tex (WORD *dst, int size, DWORD color, DWORD factor)
 300 {
 301         float percent = factor / 255.0f;
 302         DWORD cr, cg, cb;
 303         WORD col, a;
 304         float r, g, b;
 305
 306         cr = (color >> 12) & 0xF;
 307         cg = (color >> 8) & 0xF;
 308         cb = (color >> 4) & 0xF;
 309
 310         for (int i=0; i<size; i++)
 311         {
 312                 col = *dst;
 313                 a = col & 0xF000;
 314                 r = (float)((col >> 8) & 0xF);
 315                 r = /*max(*/(r - cr) * percent/*, 0.0f)*/ + r;
 316                 if (r > 15.0f) r = 15.0f;
 317                 if (r < 0.0f) r = 0.0f;
 318                 g = (float)((col >> 4) & 0xF);
 319                 g = /*max(*/(g - cg) * percent/*, 0.0f)*/ + g;
 320                 if (g > 15.0f) g = 15.0f;
 321                 if (g < 0.0f) g = 0.0f;
 322                 b = (float)(col & 0xF);
 323                 b = /*max(*/(b - cb) * percent/*, 0.0f)*/ + b;
 324                 if (b > 15.0f) b = 15.0f;
 325                 if (b < 0.0f) b = 0.0f;
 326
 327                 *(dst++) = a | ((WORD)r << 8) | ((WORD)g << 4) | (WORD)b;
 328         }
 329 }
 330
 331 static void mod_tex_scale_col_add_col (WORD *dst, int size, DWORD color, DWORD factor)
 332 {
 333         float percent = factor / 255.0f;
 334         float percent_r = (1.0f - ((color>>12)&0xF) / 15.0f) * percent;
 335         float percent_g = (1.0f - ((color>>8)&0xF) / 15.0f) * percent;
 336         float percent_b = (1.0f - ((color>>4)&0xF) / 15.0f) * percent;
 337         WORD col;
 338         float base = (1.0f - percent) * 15.0f;
 339         float r, g, b;
 340
 341         for (int i=0; i<size; i++)
 342         {
 343                 col = *dst;
 344                 r = base + percent_r * (float)((col>>8)&0xF);
 345                 g = base + percent_g * (float)((col>>4)&0xF);
 346                 b = base + percent_b * (float)(col&0xF);
 347                 *(dst++) = (col&0xF000) | ((BYTE)r << 8) | ((BYTE)g << 4) | (BYTE)b;
 348         }
 349 }
 350
 351 static void mod_tex_add_col (WORD *dst, int size, DWORD color)
 352 {
 353         DWORD cr, cg, cb, ca;
 354         WORD col;
 355         BYTE a, r, g, b;
 356
 357         cr = (color >> 12) & 0xF;
 358         cg = (color >> 8) & 0xF;
 359         cb = (color >> 4) & 0xF;
 360         ca = color & 0xF;
 361
 362         for (int i=0; i<size; i++)
 363         {
 364                 col = *dst;
 365                 a = (BYTE)((col >> 12) & 0xF);
 366 //              a = col & 0xF000;
 367                 r = (BYTE)(cr + ((col >> 8) & 0xF))&0xF;
 368                 g = (BYTE)(cg + ((col >> 4) & 0xF))&0xF;
 369                 b = (BYTE)(cb + (col & 0xF))&0xF;
 370                 *(dst++) = (a << 12) | (r << 8) | (g << 4) | b;
 371         }
 372 }
 373
 374 static void mod_col_mul_texa_add_tex (WORD *dst, int size, DWORD color)
 375 {
 376         DWORD cr, cg, cb;
 377         WORD col;
 378         BYTE r, g, b;
 379         WORD a;
 380         float factor;
 381
 382         cr = (color >> 12) & 0xF;
 383         cg = (color >> 8) & 0xF;
 384         cb = (color >> 4) & 0xF;
 385
 386         for (int i=0; i<size; i++)
 387         {
 388                 col = *dst;
 389                 a = col & 0xF000;
 390                 factor = (a >> 12) / 15.0f;
 391                 r = (BYTE)(cr*factor + ((col >> 8) & 0xF))&0xF;
 392                 g = (BYTE)(cg*factor + ((col >> 4) & 0xF))&0xF;
 393                 b = (BYTE)(cb*factor + (col & 0xF))&0xF;
 394                 *(dst++) = a | (r << 8) | (g << 4) | b;
 395         }
 396 }
 397
 398 static void mod_tex_sub_col (WORD *dst, int size, DWORD color)
 399 {
 400         DWORD cr, cg, cb, ca;
 401         WORD col;
 402         BYTE a, r, g, b;
 403
 404         cr = (color >> 12) & 0xF;
 405         cg = (color >> 8) & 0xF;
 406         cb = (color >> 4) & 0xF;
 407         ca = color & 0xF;
 408
 409         for (int i=0; i<size; i++)
 410         {
 411                 col = *dst;
 412                 a = (BYTE)(((col >> 12) & 0xF) - ca);
 413                 r = (BYTE)(((col >> 8) & 0xF) - cr);
 414                 g = (BYTE)(((col >> 4) & 0xF) - cg);
 415                 b = (BYTE)((col & 0xF) - cb);
 416                 *(dst++) = (a << 12) | (r << 8) | (g << 4) | b;
 417         }
 418 }
 419
 420 static void mod_tex_sub_col_mul_fac (WORD *dst, int size, DWORD color, DWORD factor)
 421 {
 422         float percent = factor / 255.0f;
 423         DWORD cr, cg, cb;
 424         WORD col, a;
 425         float r, g, b;
 426
 427         cr = (color >> 12) & 0xF;
 428         cg = (color >> 8) & 0xF;
 429         cb = (color >> 4) & 0xF;
 430
 431         for (int i=0; i<size; i++)
 432         {
 433                 col = *dst;
 434                 a = (BYTE)((col >> 12) & 0xF);
 435                 r = (float)((col >> 8) & 0xF);
 436                 r = (r - cr) * percent;
 437                 if (r > 15.0f) r = 15.0f;
 438                 if (r < 0.0f) r = 0.0f;
 439                 g = (float)((col >> 4) & 0xF);
 440                 g = (g - cg) * percent;
 441                 if (g > 15.0f) g = 15.0f;
 442                 if (g < 0.0f) g = 0.0f;
 443                 b = (float)(col & 0xF);
 444                 b = (b - cb) * percent;
 445                 if (b > 15.0f) b = 15.0f;
 446                 if (b < 0.0f) b = 0.0f;
 447
 448                 *(dst++) = (a << 12) | ((WORD)r << 8) | ((WORD)g << 4) | (WORD)b;
 449         }
 450 }
 451
 452 static void mod_col_inter_tex_using_col1 (WORD *dst, int size, DWORD color0, DWORD color1)
 453 {
 454         DWORD cr, cg, cb;
 455         WORD col, a;
 456         BYTE r, g, b;
 457
 458         float percent_r = ((color1 >> 12) & 0xF) / 15.0f;
 459         float percent_g = ((color1 >> 8) & 0xF) / 15.0f;
 460         float percent_b = ((color1 >> 4) & 0xF) / 15.0f;
 461         float percent_r_i = 1.0f - percent_r;
 462         float percent_g_i = 1.0f - percent_g;
 463         float percent_b_i = 1.0f - percent_b;
 464
 465         cr = (color0 >> 12) & 0xF;
 466         cg = (color0 >> 8) & 0xF;
 467         cb = (color0 >> 4) & 0xF;
 468
 469         for (int i=0; i<size; i++)
 470         {
 471                 col = *dst;
 472                 a = (BYTE)((col >> 12) & 0xF);
 473                 r = (BYTE)(percent_r * ((col >> 8) & 0xF) + percent_r_i * cr);
 474                 g = (BYTE)(percent_g * ((col >> 4) & 0xF) + percent_g_i * cg);
 475                 b = (BYTE)(percent_b * (col & 0xF) + percent_b_i * cb);
 476                 *(dst++) = (a << 12) | (r << 8) | (g << 4) | b;
 477         }
 478 }
 479
 480 static void mod_tex_inter_noise_using_col (WORD *dst, int size, DWORD color)
 481 {
 482         WORD col, a;
 483         BYTE r, g, b, noise;
 484
 485         float percent_r = ((color >> 12) & 0xF) / 15.0f;
 486         float percent_g = ((color >> 8) & 0xF) / 15.0f;
 487         float percent_b = ((color >> 4) & 0xF) / 15.0f;
 488         float percent_r_i = 1.0f - percent_r;
 489         float percent_g_i = 1.0f - percent_g;
 490         float percent_b_i = 1.0f - percent_b;
 491
 492         for (int i=0; i<size; i++)
 493         {
 494                 col = *dst;
 495                 a = col & 0xF000;
 496         noise = rand()%16;
 497                 r = (BYTE)(percent_r_i * ((col >> 8) & 0xF) + percent_r * noise);
 498                 g = (BYTE)(percent_g_i * ((col >> 4) & 0xF) + percent_g * noise);
 499                 b = (BYTE)(percent_b_i * (col & 0xF) + percent_b * noise);
 500                 *(dst++) = a | (r << 8) | (g << 4) | b;
 501         }
 502 }
 503
 504 static void mod_tex_inter_col_using_texa (WORD *dst, int size, DWORD color)
 505 {
 506         DWORD cr, cg, cb;
 507         WORD col;
 508         BYTE r, g, b;
 509         WORD a;
 510         float percent, percent_i;
 511
 512         cr = (color >> 12) & 0xF;
 513         cg = (color >> 8) & 0xF;
 514         cb = (color >> 4) & 0xF;
 515
 516         for (int i=0; i<size; i++)
 517         {
 518                 col = *dst;
 519                 a = col & 0xF000;
 520                 percent = (a >> 12) / 15.0f;
 521                 percent_i = 1.0f - percent;
 522                 r = (BYTE)(percent * cr + percent_i * ((col & 0x0F00) >> 8));
 523                 g = (BYTE)(percent * cg + percent_i * ((col & 0x00F0) >> 4));
 524                 b = (BYTE)(percent * cb + percent_i * (col & 0x000F));
 525                 *(dst++) = a | (r << 8) | (g << 4) | b;
 526         }
 527 }
 528
 529 static void mod_tex_mul_col (WORD *dst, int size, DWORD color)
 530 {
 531         float cr, cg, cb;
 532         WORD col;
 533         BYTE r, g, b;
 534         WORD a;
 535         float percent, percent_i;
 536
 537         cr = (float)((color >> 12) & 0xF)/16.0f;
 538         cg = (float)((color >> 8) & 0xF)/16.0f;
 539         cb = (float)((color >> 4) & 0xF)/16.0f;
 540
 541         for (int i=0; i<size; i++)
 542         {
 543                 col = *dst;
 544                 a = col & 0xF000;
 545                 percent = (a >> 12) / 15.0f;
 546                 percent_i = 1.0f - percent;
 547                 r = (BYTE)(cr * ((col & 0x0F00) >> 8));
 548                 g = (BYTE)(cg * ((col & 0x00F0) >> 4));
 549                 b = (BYTE)(cb * (col & 0x000F));
 550                 *(dst++) = a | (r << 8) | (g << 4) | b;
 551         }
 552 }
 553
 554 static void mod_tex_scale_fac_add_col (WORD *dst, int size, DWORD color, DWORD factor)
 555 {
 556         float percent = factor / 255.0f;
 557         DWORD cr, cg, cb;
 558         WORD col;
 559         float r, g, b;
 560
 561         cr = (color >> 12) & 0xF;
 562         cg = (color >> 8) & 0xF;
 563         cb = (color >> 4) & 0xF;
 564
 565         for (int i=0; i<size; i++)
 566         {
 567                 col = *dst;
 568                 r = cr + percent * (float)((col>>8)&0xF);
 569                 g = cg + percent * (float)((col>>4)&0xF);
 570                 b = cb + percent * (float)(col&0xF);
 571                 *(dst++) = (col&0xF000) | ((BYTE)r << 8) | ((BYTE)g << 4) | (BYTE)b;
 572         }
 573 }