hedgewars/uTeams.pas
changeset 57 e1a77ae57065
parent 49 3afe33c1cf06
child 64 9df467527ae5
equal deleted inserted replaced
56:a29135563e94 57:e1a77ae57065
   242         then begin
   242         then begin
   243         Gear.State:= Gear.State or      gstHHChooseTarget;
   243         Gear.State:= Gear.State or      gstHHChooseTarget;
   244         isCursorVisible:= true
   244         isCursorVisible:= true
   245         end else begin
   245         end else begin
   246         Gear.State:= Gear.State and not gstHHChooseTarget;
   246         Gear.State:= Gear.State and not gstHHChooseTarget;
   247         AdjustMPoint;
       
   248         isCursorVisible:= false
   247         isCursorVisible:= false
   249         end;
   248         end;
   250      ShowCrosshair:= (Propz and ammoprop_NoCrosshair) = 0
   249      ShowCrosshair:= (Propz and ammoprop_NoCrosshair) = 0
   251      end
   250      end
   252      end
   251      end