1、地学信息三维可视化实习报告班级：姓名：学号：上交日期：2016.11.16实习一1.利用对象图形法创建一个三维立方体 ， 并将各顶点设置为不同的颜色对象法是IDL5.0引入面向对象编程概念后出现的 ， 面向对象的基础也就是对象类的使用 。
对象类允许编程者将数据和方法封装成一个包 ， 称之为对象 。
一个对象类可以重 复利用生成多个对象 。
IDL的三维坐标系使用的是右手笛卡尔坐标系 ， 与MicrosoftDirect3D的左手坐标系相区别 ， 示意图如下 。
右手坐标系#IDL Object Window 23程序：PRO triangularprismoWindow = OBJ_NEW(IDLgrWindow,dimens 。

2、ion =400 , 400 ,retain =2)oView = OBJ_NEW( IDLgrView,viewPlane_Rect =-1,- 1,3, 3,zClip =2,- 1,eye =10)oModel = OBJ_NEW( IDLgrModel );
创建多边形oPoly = OBJ_NEW( IDLgrPolygon );
设置对象层次体系结构oView- add ,oModeloModel- add ,oPoly;
顶点坐标verts = 0, 0, 0,1,0, 0,0, 1, 0,0,0,1;
顶点链接顺序connect =3, 0, 1, 2, 3, 0, 2, 3, 3,。

3、0, 1, 3, 3, 1, 2, 3;
设置多边形顶点与链接关系 ， 类型显示为线oPoly- setproperty,data =https://www.renrendoc.com/paper/verts, polygo ns = conn ect,style =1;
选择45oModel- rotate， -1,0,- 1 , 45;
绘制显示oWindow- draw ,oView;
设置立方体顶点颜色vertscolor =fix (randomu (undefinevar, 3,4)* 255 )oPoly- setproperty , vert_color = vertsColoroWindow- draw ,oView;
设置立方体面显示 ， 并渲染显示颜色 。

【地学|地学信息三维可视化实习报告】4、oPoly- setproperty , shadi ng =1 ,style= 2oWindow- draw ,oViewEND2.读取head.dat中的数据 ， 进行体数据的显示 ， 并实现切片提取操作iTools是IDL6.0以后版本提供的功能强大的交互式分析工具 。
IDL初学者可以利用这套智能工具快捷轻松地实现数据读入 ， 数据分析和数据可视化 ， 并且可以输出制作令人眩 目的精美图形图像 。
有经验的IDL程序员使用它 ， 可以减少程序开发工作量 ， 甚至可以 在iTools框架的基础上创建全新的可视化应用环境 。
打开iVolume ， 在 Operations宀Volume t Image Plane中可以选择切片 。

5、IDL 他eFwpro headfile =C:UserssiyuanDesktopIDL实习题 第一次课 数据 head.datdata = https://www.renrendoc.com/paper/READ_BINARY (file, DATA_DIMS = 80,100,57)IVOLUME , dataend3.读取elev_t.jpg图像以及elevbin.dat中的DEM数据： 利用直接图形法显示DEM曲面利用对象图形法创建曲面对象和纹理对象并进行叠加显示程序:pro test demfile = elevb in. datC:Userssiyua nDesktopIDL实习题第一次课数据dem =read_b inary(demfile 。

6、,data_dims =imagefile =C:Userssiyua nDesktopIDLelev_t.jpgread_jpeg ,imagefile,dem =con grid(dem,device ,decomposed = window , 0,title = shade surf64 , 64 )实习题第一次课数据omodel =oview = osurface =image128 , 128 ， /interp)0 ,retain =dem ,xsize =800 ,ysize =600,demobj_new (idlgrmodel obj_new (idlgrview ) obj_ 。

7、new (idlgrsurfaceobj_new (idlgrimage2)oimage =;
计算归一化显示比例 ， 并在各个方向平移 osurface. getproperty(xr)0.5xs =norm coord,dem,style =,image ,interleave =-0.5， 从而使图像居中0,/i nterpolate),xrange = xr,yra nge = yr,zra nge = zrxs ys = ys zs =0 = xs 0- norm coord0 = ys 0- norm coord(yr)0.5(zr)0.5zs osurface. setproperty 。

8、0 = zs 0-,xcoord_c onv= xs,ycoord_c onv=ys,zcoord_c onv=zs;
曲面上添加纹理对象osurface. setproperty;
构建对象体系omodel. add ,osurfaceopolygons =OBJ_NEW( idlgrpolygon, shading =data = https://www.renrendoc.com/paper/vertices, polygo ns = polygo ns, color =,texture_map = oimage,color =255 , 255 , 255 255 , 255 , 255 , $texture_coord=texure_coordi n 。

9、ates,texture_map=oimage,/texturenterp)omodel - add, opolygo ns & omodel -ROTATE, 1 , 0, 0, -90omodel - ROTATE, 0,1,0,30 & xobjview , omodel, /blockend实习二1.绘制函数 ， 其中的网格曲面图程序：pro surfacemyvalue=https://www.renrendoc.com/paper/( findgen ( 100 )- 50)* 0.1x=reb in(myvalue, 100 , 100 ， /sample)y=rebi n(reform(myvalue,1, 100 ),100 , 100 ， /sam 。

10、ple)z=-(xA2+yA 2- 2)* exp (-(xA2+yA 2)/ 2)window ,title=laplace of gaussiansurface ,z,x,yend图片I Al Laplaoe 亡Cj2UE5 an2.读取head.dat中的三维动画数组 ， 播放该动画 ， 并存储该动画的像素映射图 程序：pro catoonOPENR,unit, FILEPATH (head.dat ,SUBDIRECTORY= examples , data ),/GETLUNpro testope nr ,un it,filepath(C:Userssiyua nDesktopIDL实习题第 。

11、一次课数据head.dat ),/get_l unh= bytarr ( 80, 100, 57 ， /nozero)readu ,unit,hclose ,un itxinteranimate,set= 80 , 100 , 57 ,/showloadfor j= 0, 56 do xinteranimate,frame=j,image=h*,*,jxinteranimate, 50 ， /keep_pixmapsend图片町 XlnterAninn,Fr afTisE/Sefl： 21.3O-Acti ve 51 i ley3.载入avhrr.png中的数据 ， 并加以显示将其转换到“ Interru 。

来源：(未知)

【学习资料】网址：/a/2021/0413/0021925078.html

标题：地学|地学信息三维可视化实习报告