代码如下,看看当初写的代码,好稚嫩啊

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_sin.igs',Data,issearch)

%产生peaks文件

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

xx=x(:)

yy=y(:)

zz=z(:)

Data=[xx zz yy]

write_iges('iges_peaks.igs',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_paowu.igs',Data,issearch)

%产生解释文件

xx=[100]

yy=[010]

zz=[00]

Data=[xx yy zz]

write_iges('igesforexplain.igs',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_matlab.igs',Data,issearch)

fprintf('写文件结束。n')

add_start_global函数文件:

%构造开始段和全局段字符串

function [filename,file_str]=add_start_global(FileName)

%开始段信息

start='Matlab-IGES-UG,Proe'

%全局段信息

timedata=clock