hedgewars/uGearsHedgehog.pas
changeset 12903 8a40ce061d94
parent 12846 afd312fc270d
child 12917 a840fd55caa6
equal deleted inserted replaced
12896:856570ddd409 12903:8a40ce061d94
   313                                  newGear:= AddGear(hwRound(lx), hwRound(ly), gtKnife,    0, xx*Power/cPowerDivisor, yy*Power/cPowerDivisor, 0);
   313                                  newGear:= AddGear(hwRound(lx), hwRound(ly), gtKnife,    0, xx*Power/cPowerDivisor, yy*Power/cPowerDivisor, 0);
   314                                  newGear^.State:= newGear^.State or gstMoving;
   314                                  newGear^.State:= newGear^.State or gstMoving;
   315                                  newGear^.Radius:= 4 // temporarily shrink so it doesn't instantly embed in the ground
   315                                  newGear^.Radius:= 4 // temporarily shrink so it doesn't instantly embed in the ground
   316                                  end;
   316                                  end;
   317                        amDEagle: newGear:= AddGear(hwRound(lx + xx * cHHRadius), hwRound(ly + yy * cHHRadius), gtDEagleShot, 0, xx * _0_5, yy * _0_5, 0);
   317                        amDEagle: newGear:= AddGear(hwRound(lx + xx * cHHRadius), hwRound(ly + yy * cHHRadius), gtDEagleShot, 0, xx * _0_5, yy * _0_5, 0);
       
   318                       amMinigun: newGear:= AddGear(hwRound(lx + xx * cHHRadius), hwRound(ly + yy * cHHRadius), gtMinigun, 0, xx * _0_5, yy * _0_5, 0);
   318                       amSineGun: newGear:= AddGear(hwRound(lx + xx * cHHRadius), hwRound(ly + yy * cHHRadius), gtSineGunShot, 0, xx * _0_5, yy * _0_5, 0);
   319                       amSineGun: newGear:= AddGear(hwRound(lx + xx * cHHRadius), hwRound(ly + yy * cHHRadius), gtSineGunShot, 0, xx * _0_5, yy * _0_5, 0);
   319                     amPortalGun: begin
   320                     amPortalGun: begin
   320                                  newGear:= AddGear(hwRound(lx + xx * cHHRadius), hwRound(ly + yy * cHHRadius), gtPortal, 0, xx * _0_6, yy * _0_6,
   321                                  newGear:= AddGear(hwRound(lx + xx * cHHRadius), hwRound(ly + yy * cHHRadius), gtPortal, 0, xx * _0_6, yy * _0_6,
   321                                  // set selected color
   322                                  // set selected color
   322                                  CurWeapon^.Pos);
   323                                  CurWeapon^.Pos);
   464                    amSeduction, amBallgun,
   465                    amSeduction, amBallgun,
   465                      amJetpack, amBirdy,
   466                      amJetpack, amBirdy,
   466                 amFlamethrower, amLandGun,
   467                 amFlamethrower, amLandGun,
   467                  amResurrector, //amStructure,
   468                  amResurrector, //amStructure,
   468                       amTardis, amPiano,
   469                       amTardis, amPiano,
   469                       amIceGun, amRubber: CurAmmoGear:= newGear;
   470                       amIceGun, amRubber,
       
   471                       amMinigun: CurAmmoGear:= newGear;
   470             end;
   472             end;
   471             if CurAmmoType = amCake then FollowGear:= newGear;
   473             if CurAmmoType = amCake then FollowGear:= newGear;
   472             if CurAmmoType = amAirMine then newGear^.Hedgehog:= nil;
   474             if CurAmmoType = amAirMine then newGear^.Hedgehog:= nil;
   473 
   475 
   474             if ((CurAmmoType = amMine) or (CurAmmoType = amSMine) or (CurAmmoType = amAirMine)) and (GameFlags and gfInfAttack <> 0) then
   476             if ((CurAmmoType = amMine) or (CurAmmoType = amSMine) or (CurAmmoType = amAirMine)) and (GameFlags and gfInfAttack <> 0) then