226         isCursorVisible:= true

   226         isCursorVisible:= true

   227         end else begin

   227         end else begin

   228         Gear.State:= Gear.State and not gstHHChooseTarget;

   228         Gear.State:= Gear.State and not gstHHChooseTarget;

   229         AdjustMPoint;

   229         AdjustMPoint;

   230         isCursorVisible:= false

   230         isCursorVisible:= false

   232      end

   233      end

   233      end

   234      end

   234 end;

   235 end;

   235 

   236 

   236 procedure PackAmmo(Ammo: PHHAmmo; Slot: integer);

   237 procedure PackAmmo(Ammo: PHHAmmo; Slot: integer);