equal
deleted
inserted
replaced
1319 Ammo^.Health:= 0; |
1319 Ammo^.Health:= 0; |
1320 while i > 0 do |
1320 while i > 0 do |
1321 begin |
1321 begin |
1322 dec(i); |
1322 dec(i); |
1323 Gear:= t^.ar[i]; |
1323 Gear:= t^.ar[i]; |
1324 if (Ammo^.Kind in [gtDEagleShot, gtSniperRifleShot, gtMinigunBullet, gtFirePunch]) |
1324 if (Ammo^.Kind in [gtDEagleShot, gtSniperRifleShot, gtMinigunBullet, |
|
1325 gtFirePunch, gtKamikaze]) |
1325 and (((Ammo^.Data <> nil) and (PGear(Ammo^.Data) = Gear)) |
1326 and (((Ammo^.Data <> nil) and (PGear(Ammo^.Data) = Gear)) |
1326 or (not UpdateHitOrder(Gear, Ammo^.WDTimer))) then |
1327 or (not UpdateHitOrder(Gear, Ammo^.WDTimer))) then |
1327 continue; |
1328 continue; |
1328 |
1329 |
1329 if ((Ammo^.Kind = gtFlame) or (Ammo^.Kind = gtBlowTorch)) and |
1330 if ((Ammo^.Kind = gtFlame) or (Ammo^.Kind = gtBlowTorch)) and |
1345 gtTarget, |
1346 gtTarget, |
1346 gtCase, |
1347 gtCase, |
1347 gtExplosives: //, |
1348 gtExplosives: //, |
1348 //gtStructure: |
1349 //gtStructure: |
1349 begin |
1350 begin |
1350 if (Ammo^.Kind = gtFirePunch) and (Gear^.Kind <> gtSMine) then |
1351 if (Ammo^.Kind in [gtFirePunch, gtKamikaze]) and (Gear^.Kind <> gtSMine) then |
1351 PlaySound(sndFirePunchHit); |
1352 PlaySound(sndFirePunchHit); |
1352 |
1353 |
1353 if Ammo^.Kind in [gtDEagleShot, gtSniperRifleShot, gtMinigunBullet] then |
1354 if Ammo^.Kind in [gtDEagleShot, gtSniperRifleShot, gtMinigunBullet] then |
1354 begin |
1355 begin |
1355 VGear := AddVisualGear(t^.cX[i], t^.cY[i], vgtBulletHit); |
1356 VGear := AddVisualGear(t^.cX[i], t^.cY[i], vgtBulletHit); |