1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
function [lines,indexes] = readlines(fname)
%
% [lines,indexes] = readlines(fname)
% Read Edges points from .Ins file produced by "getlines"
% lines: a num_pointsx2 matrix of the edge points
% indexes: the braking point the lines
%
fid = fopen(fname,'r');
done = 0;
lines = [];
indexes = [];
first_line = fscanf(fid,'%s',1);
while (~done),
num_lines = sscanf(first_line(3:length(first_line)),'%d');
disp(num_lines);
indexes = [indexes,num_lines];
a = fscanf(fid,'%f',[2,num_lines]);
lines = [lines;a'];
first_line = fscanf(fid,'%s',1);
if (first_line == []),
done = 1;
end
end
|
