hedgewars/uGearsList.pas
changeset 15246 ebbc2f04b863
parent 15244 32678e65b25e
child 15251 4576e41c0692
equal deleted inserted replaced
15245:f16376e9374f 15246:ebbc2f04b863
   223 if WorldEdge = weBounce then
   223 if WorldEdge = weBounce then
   224     if (hwRound(gear^.X) - Gear^.Radius < leftX) or (hwRound(gear^.X) + Gear^.Radius > rightX) then
   224     if (hwRound(gear^.X) - Gear^.Radius < leftX) or (hwRound(gear^.X) + Gear^.Radius > rightX) then
   225         case gear^.Kind of
   225         case gear^.Kind of
   226             // list all gears here that could collide with the bounce world edge
   226             // list all gears here that could collide with the bounce world edge
   227             gtHedgehog,
   227             gtHedgehog,
       
   228             gtFlame,
   228             gtMine,
   229             gtMine,
   229             gtAirBomb,
   230             gtAirBomb,
   230             gtDrill,
   231             gtDrill,
   231             gtNapalmBomb,
   232             gtNapalmBomb,
   232             gtCase,
   233             gtCase,