equal
deleted
inserted
replaced
104 else |
104 else |
105 PlaySound(sndOw1, PHedgehog(Gear^.Hedgehog)^.Team^.voicepack); |
105 PlaySound(sndOw1, PHedgehog(Gear^.Hedgehog)^.Team^.voicepack); |
106 |
106 |
107 for i:= min(12, (3 + dmg div 10)) downto 0 do begin |
107 for i:= min(12, (3 + dmg div 10)) downto 0 do begin |
108 particle := AddVisualGear(hwRound(Gear^.X) - 5 + Random(10), hwRound(Gear^.Y) + 12, vgtDust); |
108 particle := AddVisualGear(hwRound(Gear^.X) - 5 + Random(10), hwRound(Gear^.Y) + 12, vgtDust); |
109 particle^.dX := particle^.dX + (Gear^.dX / 5); |
109 if particle <> nil then particle^.dX := particle^.dX + (Gear^.dX / 5); |
110 end; |
110 end; |
111 |
111 |
112 ApplyDamage(Gear, dmg); |
112 ApplyDamage(Gear, dmg); |
113 end |
113 end |
114 end; |
114 end; |