hedgewars/uRenderUtils.pas
branchqmlfrontend
changeset 10886 99273b7afbff
parent 10860 891bf0aca23e
child 11046 47a8c19ecb60
--- a/hedgewars/uRenderUtils.pas	Mon Feb 16 22:33:15 2015 +0300
+++ b/hedgewars/uRenderUtils.pas	Thu Apr 02 21:09:56 2015 +0300
@@ -171,7 +171,7 @@
             r0:= (r0 * (255 - LongInt(a1)) + r1 * LongInt(a1)) div 255;
             g0:= (g0 * (255 - LongInt(a1)) + g1 * LongInt(a1)) div 255;
             b0:= (b0 * (255 - LongInt(a1)) + b1 * LongInt(a1)) div 255;
-            a0:= (a0 * (255 - LongInt(a1)) + a1 * LongInt(a1)) div 255;
+            a0:= a0 + ((255 - LongInt(a0)) * a1 div 255);
             destPixels^[i]:= SDL_MapRGBA(dest^.format, r0, g0, b0, a0);
             end;
         end;