You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
31 lines
707 B
31 lines
707 B
function [Signal] = CliffRightSignalStrengthRoomba(serPort);
|
|
%[Signal] = CliffRightSignalStrengthRoomba(serPort)
|
|
%Displays the strength of the right cliff sensor's signal.
|
|
%Ranges between 0-100 percent signal
|
|
|
|
|
|
% By; Joel Esposito, US Naval Academy, 2011
|
|
|
|
%Initialize preliminary return values
|
|
Signal = nan;
|
|
|
|
try
|
|
|
|
%Flush Buffer
|
|
N = serPort.BytesAvailable();
|
|
while(N~=0)
|
|
fread(serPort,N);
|
|
N = serPort.BytesAvailable();
|
|
end
|
|
|
|
warning off
|
|
global td
|
|
fwrite(serPort, [142]); fwrite(serPort,31);
|
|
|
|
Strength = fread(serPort, 1, 'uint16');
|
|
Signal=(Strength/4095)*100;
|
|
|
|
pause(td)
|
|
catch
|
|
disp('WARNING: function did not terminate correctly. Output may be unreliable.')
|
|
end
|