equal
deleted
inserted
replaced
1320 begin |
1320 begin |
1321 Gear^.Tag:= -1; |
1321 Gear^.Tag:= -1; |
1322 Gear^.X:= int2hwFloat(LAND_WIDTH + 1024); |
1322 Gear^.X:= int2hwFloat(LAND_WIDTH + 1024); |
1323 end; |
1323 end; |
1324 |
1324 |
1325 Gear^.Y:= -_300; |
1325 Gear^.Y:= -_300; // TODO - consider making this proportional to topY to reduce spread on low maps |
1326 Gear^.dX:= int2hwFloat(TargetPoint.X - 5 * Gear^.Tag * 15); |
1326 Gear^.dX:= int2hwFloat(TargetPoint.X - 5 * Gear^.Tag * 15); |
1327 |
1327 |
1328 if int2hwFloat(TargetPoint.Y) - Gear^.Y > _0 then |
1328 if int2hwFloat(TargetPoint.Y) - Gear^.Y > _0 then |
1329 Gear^.dX:= Gear^.dX - cBombsSpeed * hwSqrt((int2hwFloat(TargetPoint.Y) - Gear^.Y) * 2 / cGravity) * Gear^.Tag; |
1329 Gear^.dX:= Gear^.dX - cBombsSpeed * hwSqrt((int2hwFloat(TargetPoint.Y) - Gear^.Y) * 2 / cGravity) * Gear^.Tag; |
1330 |
1330 |