
    % Digital Output
    
    
dio_in = digitalio('nidaq', 1);
addline(dio_in, 0, 1, 'In');

% dutycycle=50;
% numPoints = 1000;
% t = linspace(0,2*pi,numPoints+1);
% t = t(1:end-1);
%    tmp = mod(t,2*pi);
%    w0 = 2*pi*dutycycle/100;
%    nodd = (tmp < w0);
%    y = 2*nodd-1;
% ondquad =y;
% t=[0:pi/2:1000];
% yy = abs(sin(t));

d=1;
while d~=0,

valor=(getvalue(dio_in))
% pause;
% dio = digitalio('nidaq', 1);
% addline(dio, 0:2, 1, 'Out');
% putvalue(dio, [1 1 0]);
end
delete(dio);

