hedgewars/uGearsRender.pas
changeset 7730 2013733f9ca9
parent 7721 2b1ad418ba39
child 7829 c1dc7839d7b9
equal deleted inserted replaced
7729:c374746bb56e 7730:2013733f9ca9
   626                 amDynamite: DrawSpriteRotated(sprHandDynamite, hx, hy, sign, aangle);
   626                 amDynamite: DrawSpriteRotated(sprHandDynamite, hx, hy, sign, aangle);
   627                 amHellishBomb: DrawSpriteRotated(sprHandHellish, hx, hy, sign, aangle);
   627                 amHellishBomb: DrawSpriteRotated(sprHandHellish, hx, hy, sign, aangle);
   628                 amGasBomb: DrawSpriteRotated(sprHandCheese, hx, hy, sign, aangle);
   628                 amGasBomb: DrawSpriteRotated(sprHandCheese, hx, hy, sign, aangle);
   629                 amMine: DrawSpriteRotated(sprHandMine, hx, hy, sign, aangle);
   629                 amMine: DrawSpriteRotated(sprHandMine, hx, hy, sign, aangle);
   630                 amSMine: DrawSpriteRotated(sprHandSMine, hx, hy, sign, aangle);
   630                 amSMine: DrawSpriteRotated(sprHandSMine, hx, hy, sign, aangle);
       
   631                 amKnife: DrawSpriteRotatedF(sprHandKnife, hx, hy, 0, sign, aangle);
   631                 amSeduction: begin
   632                 amSeduction: begin
   632                              DrawSpriteRotated(sprHandSeduction, hx, hy, sign, aangle);
   633                              DrawSpriteRotated(sprHandSeduction, hx, hy, sign, aangle);
   633                              DrawCircle(ox, oy, 248, 4, $FF, $00, $00, $AA); 
   634                              DrawCircle(ox, oy, 248, 4, $FF, $00, $00, $AA); 
   634                              //Tint($FF, $0, $0, $AA);
   635                              //Tint($FF, $0, $0, $AA);
   635                              //DrawTexture(ox - 240, oy - 240, SpritesData[sprVampiric].Texture, 10);
   636                              //DrawTexture(ox - 240, oy - 240, SpritesData[sprVampiric].Texture, 10);
   986            gtSMine: if (((Gear^.State and gstAttacking) = 0)or((Gear^.Timer and $3FF) < 420)) and (Gear^.Health <> 0) then
   987            gtSMine: if (((Gear^.State and gstAttacking) = 0)or((Gear^.Timer and $3FF) < 420)) and (Gear^.Health <> 0) then
   987                            DrawSpriteRotated(sprSMineOff, x, y, 0, Gear^.DirAngle)
   988                            DrawSpriteRotated(sprSMineOff, x, y, 0, Gear^.DirAngle)
   988                        else if Gear^.Health <> 0 then
   989                        else if Gear^.Health <> 0 then
   989                            DrawSpriteRotated(sprSMineOn, x, y, 0, Gear^.DirAngle)
   990                            DrawSpriteRotated(sprSMineOn, x, y, 0, Gear^.DirAngle)
   990                        else DrawSpriteRotated(sprMineDead, x, y, 0, Gear^.DirAngle);
   991                        else DrawSpriteRotated(sprMineDead, x, y, 0, Gear^.DirAngle);
       
   992            gtKnife: DrawSpriteRotatedF(sprKnife, x, y, 0, hwSign(Gear^.dX), Gear^.DirAngle);
   991                        
   993                        
   992             gtCase: begin
   994             gtCase: begin
   993                     if Gear^.Timer > 1000 then
   995                     if Gear^.Timer > 1000 then
   994                         begin
   996                         begin
   995                         if ((Gear^.Pos and posCaseAmmo) <> 0) then
   997                         if ((Gear^.Pos and posCaseAmmo) <> 0) then