代码如下,看看当初写的代码,好稚嫩啊
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