hedgewars/uGearsHedgehog.pas
changeset 7646 3c18ad8af8a2
parent 7623 addc5b262617
child 7647 e496587db93e
equal deleted inserted replaced
7645:0e3c2dd9fee6 7646:3c18ad8af8a2
   355                                  end;
   355                                  end;
   356                     amStructure: newGear:= AddGear(hwRound(lx) + hwSign(dX) * 7, hwRound(ly), gtStructure, gstWait, SignAs(_0_02, dX), _0, 3000);
   356                     amStructure: newGear:= AddGear(hwRound(lx) + hwSign(dX) * 7, hwRound(ly), gtStructure, gstWait, SignAs(_0_02, dX), _0, 3000);
   357                        amTardis: newGear:= AddGear(hwRound(X), hwRound(Y), gtTardis, 0, _0, _0, 5000);
   357                        amTardis: newGear:= AddGear(hwRound(X), hwRound(Y), gtTardis, 0, _0, _0, 5000);
   358                        amIceGun: newGear:= AddGear(hwRound(X), hwRound(Y), gtIceGun, 0, _0, _0, 0);
   358                        amIceGun: newGear:= AddGear(hwRound(X), hwRound(Y), gtIceGun, 0, _0, _0, 0);
   359              end;
   359              end;
   360              if altUse then
   360              if altUse and (newGear <> nil) then
   361                 begin
   361                 begin
   362                 newGear^.dX:= newDx / newGear^.Density;
   362                 newGear^.dX:= newDx / newGear^.Density;
   363                 newGear^.dY:= newDY / newGear^.Density
   363                 newGear^.dY:= newDY / newGear^.Density
   364                 end;
   364                 end;
   365              
   365