function?b?=?ascread（filename）??????%read?my?file
format?long;
fi?=?fopen（filename‘r‘）;???????%openfile??‘r‘讀出參數(shù)
if?fi???error（sprintf（‘File?%s?not?found‘?filename））
end

templine?=?1;?%
a?=?sscanf（fgetl（fi）?‘%d‘）;%%fgetl從已經(jīng)打開的文件中讀取一行，并且丟掉末尾的換行符。
templine?=?templine?+1;

if?length（a）==1
????points=a（1）;
end

pointlist?=?zeros（3points）;

for?vnum?=?1?:?points
??coord?=?sscanf（fgetl（fi）?‘%e?%e?%e‘）;
??if?length（coord）?~=?3
????errmsg?=?sprintf（‘Each?vertex?line?must?contain?three?coordinates?（error?on?line?%d）‘?templine）;
????error（errmsg）;
??end
??templine?=?templine?+1;
??pointlist（:vnum）?=?coord;
end
b?=?cell（{points;pointlist}）;

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件????????704??2015-12-23?13:38??My_PFH\My_PFH\ascread.m

?????文件????1182978??2010-10-14?20:28??My_PFH\My_PFH\bun000.asc

?????文件????1161413??2010-10-14?20:28??My_PFH\My_PFH\bun045.asc

?????文件????????608??2018-04-03?18:47??My_PFH\My_PFH\lsqnormest.m

?????文件???????1719??2018-04-04?13:08??My_PFH\My_PFH\PFH_demo.m

?????文件???????2523??2017-01-12?16:41??My_PFH\My_PFH\PFH_demo2.m

?????文件???????2941??2018-04-03?20:38??My_PFH\My_PFH\PFH_demo3.m

?????文件???????1200??2016-03-09?17:27??My_PFH\My_PFH\Quater_Registration.m

?????目錄??????????0??2018-04-04?13:22??My_PFH\My_PFH

?????目錄??????????0??2019-08-08?10:51??My_PFH

-----------?---------??----------?-----??----

??????????????2354086????????????????????10