hedgewars/uVisualGears.pas
changeset 5065 0c2c509ccc7b
parent 5014 adc340265ccf
child 5121 2d34ec60992c
equal deleted inserted replaced
5064:8de3d20b501e 5065:0c2c509ccc7b
   427         end;
   427         end;
   428             if (cReducedQuality and rqAntiBoom) = 0 then
   428             if (cReducedQuality and rqAntiBoom) = 0 then
   429                 case Gear^.Kind of
   429                 case Gear^.Kind of
   430                     vgtSmoke: DrawSprite(sprSmoke, round(Gear^.X) + WorldDx - 11, round(Gear^.Y) + WorldDy - 11, 7 - Gear^.Frame);
   430                     vgtSmoke: DrawSprite(sprSmoke, round(Gear^.X) + WorldDx - 11, round(Gear^.Y) + WorldDy - 11, 7 - Gear^.Frame);
   431                     vgtSmokeWhite: DrawSprite(sprSmokeWhite, round(Gear^.X) + WorldDx - 11, round(Gear^.Y) + WorldDy - 11, 7 - Gear^.Frame);
   431                     vgtSmokeWhite: DrawSprite(sprSmokeWhite, round(Gear^.X) + WorldDx - 11, round(Gear^.Y) + WorldDy - 11, 7 - Gear^.Frame);
   432                     vgtDust: DrawSprite(sprDust, round(Gear^.X) + WorldDx - 11, round(Gear^.Y) + WorldDy - 11, 7 - Gear^.Frame);
   432                     vgtDust: if Gear^.State = 1 then
       
   433                                 DrawSprite(sprSnowDust, round(Gear^.X) + WorldDx - 11, round(Gear^.Y) + WorldDy - 11, 7 - Gear^.Frame)
       
   434                              else
       
   435                                 DrawSprite(sprDust, round(Gear^.X) + WorldDx - 11, round(Gear^.Y) + WorldDy - 11, 7 - Gear^.Frame);
   433                     vgtFire: if (Gear^.State and gstTmpFlag) = 0 then
   436                     vgtFire: if (Gear^.State and gstTmpFlag) = 0 then
   434                                  DrawSprite(sprFlame, round(Gear^.X) + WorldDx - 8, round(Gear^.Y) + WorldDy, (RealTicks shr 6 + Gear^.Frame) mod 8)
   437                                  DrawSprite(sprFlame, round(Gear^.X) + WorldDx - 8, round(Gear^.Y) + WorldDy, (RealTicks shr 6 + Gear^.Frame) mod 8)
   435                              else
   438                              else
   436                                  DrawTextureF(SpritesData[sprFlame].Texture, Gear^.FrameTicks / 900, round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, (RealTicks shr 7 + Gear^.Frame) mod 8, 1, 16, 16);
   439                                  DrawTextureF(SpritesData[sprFlame].Texture, Gear^.FrameTicks / 900, round(Gear^.X) + WorldDx, round(Gear^.Y) + WorldDy, (RealTicks shr 7 + Gear^.Frame) mod 8, 1, 16, 16);
   437                     vgtSplash: if SuddenDeathDmg then
   440                     vgtSplash: if SuddenDeathDmg then