unitable.m

来自「MATLAB扩展编程by 孙永康.ZIP.有需要的朋友请来下载.」· M 代码 · 共 24 行

function uni = unitable

uni = zeros(7445,2);
i   = 1;

fin = fopen('GB2312.txt', 'rt');
while 1

	s = fgets(fin);
	if (feof(fin))
		break;
	end

	if s(1)=='#'
		continue;
	end

	x = sscanf(s, '%x', 2);
	uni(i,:)=x';
	i = i + 1;
end

fclose(fin);