230 |
230 |
231 defaultPos:= true; |
231 defaultPos:= true; |
232 HatVisible:= false; |
232 HatVisible:= false; |
233 |
233 |
234 |
234 |
235 if HH^.Effects[hePoisoned] then |
235 if HH^.Effects[hePoisoned] <> 0 then |
236 begin |
236 begin |
237 Tint($00, $FF, $40, $40); |
237 Tint($00, $FF, $40, $40); |
238 DrawTextureRotatedF(SpritesData[sprSmokeWhite].texture, 2, 0, 0, sx, sy, 0, 1, 22, 22, (RealTicks shr 36) mod 360); |
238 DrawTextureRotatedF(SpritesData[sprSmokeWhite].texture, 2, 0, 0, sx, sy, 0, 1, 22, 22, (RealTicks shr 36) mod 360); |
239 Tint($FF, $FF, $FF, $FF) |
239 Tint($FF, $FF, $FF, $FF) |
240 end; |
240 end; |
875 if (Gear^.State and gstHHThinking) <> 0 then |
875 if (Gear^.State and gstHHThinking) <> 0 then |
876 DrawSprite(sprQuestion, ox - 10, oy - cHHRadius - 34, (RealTicks shr 9) mod 8) |
876 DrawSprite(sprQuestion, ox - 10, oy - cHHRadius - 34, (RealTicks shr 9) mod 8) |
877 end |
877 end |
878 end; |
878 end; |
879 |
879 |
880 if HH^.Effects[hePoisoned] then |
880 if HH^.Effects[hePoisoned] <> 0 then |
881 begin |
881 begin |
882 Tint($00, $FF, $40, $80); |
882 Tint($00, $FF, $40, $80); |
883 DrawTextureRotatedF(SpritesData[sprSmokeWhite].texture, 1.5, 0, 0, sx, sy, 0, 1, 22, 22, 360 - (RealTicks shr 37) mod 360); |
883 DrawTextureRotatedF(SpritesData[sprSmokeWhite].texture, 1.5, 0, 0, sx, sy, 0, 1, 22, 22, 360 - (RealTicks shr 37) mod 360); |
884 end; |
884 end; |
885 if HH^.Effects[heResurrected] then |
885 if HH^.Effects[heResurrected] <> 0 then |
886 begin |
886 begin |
887 Tint($f5, $db, $35, $20); |
887 Tint($f5, $db, $35, $20); |
888 DrawSprite(sprVampiric, sx - 24, sy - 24, 0); |
888 DrawSprite(sprVampiric, sx - 24, sy - 24, 0); |
889 end; |
889 end; |
890 |
890 |
912 startX, endX, startY, endY: LongInt; |
912 startX, endX, startY, endY: LongInt; |
913 begin |
913 begin |
914 if Gear^.Target.X <> NoPointX then |
914 if Gear^.Target.X <> NoPointX then |
915 if Gear^.AmmoType = amBee then |
915 if Gear^.AmmoType = amBee then |
916 DrawSpriteRotatedF(sprTargetBee, Gear^.Target.X + WorldDx, Gear^.Target.Y + WorldDy, 0, 0, (RealTicks shr 3) mod 360) |
916 DrawSpriteRotatedF(sprTargetBee, Gear^.Target.X + WorldDx, Gear^.Target.Y + WorldDy, 0, 0, (RealTicks shr 3) mod 360) |
917 else |
917 else if Gear^.AmmoType = amIceGun then |
918 DrawSpriteRotatedF(sprTargetP, Gear^.Target.X + WorldDx, Gear^.Target.Y + WorldDy, 0, 0, (RealTicks shr 3) mod 360); |
918 DrawSprite(sprSnowDust, Gear^.Target.X + WorldDx, Gear^.Target.Y + WorldDy, (RealTicks shr 3) mod 360) |
|
919 else |
|
920 DrawSpriteRotatedF(sprTargetP, Gear^.Target.X + WorldDx, Gear^.Target.Y + WorldDy, 0, 0, (RealTicks shr 3) mod 360); |
919 |
921 |
920 case Gear^.Kind of |
922 case Gear^.Kind of |
921 gtGrenade: DrawSpriteRotated(sprBomb, x, y, 0, Gear^.DirAngle); |
923 gtGrenade: DrawSpriteRotated(sprBomb, x, y, 0, Gear^.DirAngle); |
922 gtSnowball: DrawSpriteRotated(sprSnowball, x, y, 0, Gear^.DirAngle); |
924 gtSnowball: DrawSpriteRotated(sprSnowball, x, y, 0, Gear^.DirAngle); |
923 gtGasBomb: DrawSpriteRotated(sprCheese, x, y, 0, Gear^.DirAngle); |
925 gtGasBomb: DrawSpriteRotated(sprCheese, x, y, 0, Gear^.DirAngle); |