372 amLandGun: newGear:= AddGear(hwRound(X), hwRound(Y), gtLandGun, 0, xx * _0_5, yy * _0_5, 0); |
372 amLandGun: newGear:= AddGear(hwRound(X), hwRound(Y), gtLandGun, 0, xx * _0_5, yy * _0_5, 0); |
373 amResurrector: begin |
373 amResurrector: begin |
374 newGear:= AddGear(hwRound(lx), hwRound(ly), gtResurrector, 0, _0, _0, 0); |
374 newGear:= AddGear(hwRound(lx), hwRound(ly), gtResurrector, 0, _0, _0, 0); |
375 newGear^.SoundChannel := LoopSound(sndResurrector); |
375 newGear^.SoundChannel := LoopSound(sndResurrector); |
376 end; |
376 end; |
377 amStructure: newGear:= AddGear(hwRound(lx) + hwSign(dX) * 7, hwRound(ly), gtStructure, gstWait, SignAs(_0_02, dX), _0, 3000); |
377 //amStructure: newGear:= AddGear(hwRound(lx) + hwSign(dX) * 7, hwRound(ly), gtStructure, gstWait, SignAs(_0_02, dX), _0, 3000); |
378 amTardis: newGear:= AddGear(hwRound(X), hwRound(Y), gtTardis, 0, _0, _0, 5000); |
378 amTardis: newGear:= AddGear(hwRound(X), hwRound(Y), gtTardis, 0, _0, _0, 5000); |
379 amIceGun: newGear:= AddGear(hwRound(X), hwRound(Y), gtIceGun, 0, _0, _0, 0); |
379 amIceGun: newGear:= AddGear(hwRound(X), hwRound(Y), gtIceGun, 0, _0, _0, 0); |
380 end; |
380 end; |
381 if altUse and (newGear <> nil) then |
381 if altUse and (newGear <> nil) then |
382 begin |
382 begin |
402 amSwitch, amRCPlane, |
402 amSwitch, amRCPlane, |
403 amKamikaze, amCake, |
403 amKamikaze, amCake, |
404 amSeduction, amBallgun, |
404 amSeduction, amBallgun, |
405 amJetpack, amBirdy, |
405 amJetpack, amBirdy, |
406 amFlamethrower, amLandGun, |
406 amFlamethrower, amLandGun, |
407 amResurrector, amStructure, |
407 amResurrector, //amStructure, |
408 amTardis, amPiano, |
408 amTardis, amPiano, |
409 amIceGun: CurAmmoGear:= newGear; |
409 amIceGun: CurAmmoGear:= newGear; |
410 end; |
410 end; |
411 |
411 |
412 if ((CurAmmoType = amMine) or (CurAmmoType = amSMine)) and (GameFlags and gfInfAttack <> 0) then |
412 if ((CurAmmoType = amMine) or (CurAmmoType = amSMine)) and (GameFlags and gfInfAttack <> 0) then |