function [TT, r]= open_tank(tank_loc)
% Open a TTank object

TT = actxcontrol('TTank.X');
TT.ConnectServer('Local','Jon');
r = TT.OpenTank(tank_loc,'R');

if r~=1
    error('Could not open the TTank object for some reason')
    
end
end

