電子圖板怎樣生成igs文件

代碼如下，看看當初寫的代碼，好稚嫩啊

main腳本文件

%產生數據並寫入iges文件

clc

clear

issearch=2%0表示只寫點，1表示只寫線，2表示點線都寫

fprintf('正在寫文件。。。n')

%產生正弦波文件

x=0:0.1:10

x=x'

y=sin(x)

Data=[x y]

Data(1，3)=0

write_iges('iges_'，Data，issearch)

%產生peaks文件

[x，y，z]=peaks(30)

xx=x(:)

yy=y(:)

zz=z(:)

Data=[xx zz yy]

write_iges('iges_'，Data，issearch)

%產生拋物線文件

[x，y]=meshgrid(-1:0.1:1)

z=x.^2+y.^2

xx=x(:)

yy=y(:)

zz=z(:)

Data=[xx yy zz]

write_iges('iges_'，Data，issearch)

%產生解釋文件

xx=[100]

yy=[010]

zz=[00]

Data=[xx yy zz]

write_iges(''，Data，0)

%產生Matlab圖標

[x，y]=meshgrid(linspace(-1，1，16))

z=membrane

z=z(1:2:end，1:2:end，1:2:end)

xx=x(:)

yy=y(:)

zz=z(:)

Data=[xx zz yy]

write_iges('iges_'，Data，issearch)

fprintf('寫文件結束。n')

add_start_global函數文件：

%構造開始段和全局段字符串

function [filename，file_str]=add_start_global(FileName)

%開始段信息

start='Matlab-IGES-UG，Proe'

%全局段信息

timedata=clock