第9单元 三维空间中的分形.pptVIP

参考书：《分形算法与程序设计》 9.4 Sierpinski海绵 ? x6=x+l/2; y6=y+l/2; z6=z+l/2; ? x7=x-l/2; y7=y+l/2; z7=z-l/2; ? x8=x+l/2; y8=y+l/2; z8=z-l/2; 9.4 Sierpinski海绵 void CRenderDlg::Drawscene(double x, double y, double z, double l,double n) { if (n 1) { //画一级Sierpinski海绵 l:=l/3; lft(x-l,y+l,z-l,l); //后左上 lft(x,y+l,z-l,l); //后中上 lft(x+l,y+l,z-l,l); //后右上 lft(x-l,y,z-l,l); //后左中 lft(x+l,y,z-l,l); //后右中 lft(x-l,y-l,z-l,l); //后左下 lft(x,y-l,z-l,l); //后中下 lft(x+l,y-l,z-l,l); //后右下 ? 9.4 Sierpinski海绵 lft(x-l,y+l,z,l); //中左上 lft(x+l,y+l,z,l); //中右上 lft(x-l,y-l,z,l); //中左下 lft(x+l,y-l,z,l); //中右下 ? lft(x-l,y+l,z+l,l); //前左上 lft(x,y+l,z+l,l); //前中上 lft(x+l,y+l,z+l,l); //前右上 lft(x-l,y,z+l,l); //前左中 lft(x+l,y,z+l,l); //前右中 lft(x-l,y-l,z+l,l); //前左下 lft(x,y-l,z+l,l); //前中下 lft(x+l,y-l,z+l,l); //前右下 9.4 Sierpinski海绵 else //递归调用画下一级Sierpinski海绵 glClear(GL_COLOR_BUFFER_BIT or GL_DEPTH_BUFFER_BIT); l:=l/3; Drawscene(x-l,y+l,z-l,l,n-1); //后左上 Drawscene(x,y+l,z-l,l,n-1); //后中上 Drawscene(x+l,y+l,z-l,l,n-1); //后右上 Drawscene(x-l,y,z-l,l,n-1); //后左中 Drawscene(x+l,y,z-l,l,n-1); //后右中 Drawscene(x-l,y-l,z-l,l,n-1); //后左下 Drawscene(x,y-l,z-l,l,n-1); //后中下 Drawscene(x+l,y-l,z-l,l,n-1); //后右下 9.4 Sierpinski海绵 Drawscene(x-l,y+l,z,l,n-1); //中左上 Drawscene(x+l,y+l,z,l,n-1); //中右上 Drawscene(x-l,y-l,z,l,n-1); //中左下 Drawscene(x+l,y-l,z,l,n-1); //中右下 ? Drawscene(x-l,y+l,z+l,l,n-1); //前左上 Drawscene(x,y+l,z+l,l,n-1); //前中上 Drawscene(x+l,y+l,z+l,l,n-1); //前右上 Drawscene(x-l,y,z+l,l,n-1); //前左中 Drawscene(x+l,y,z+l,l,n-1); //前右中 Drawscene(x-l,y-l,z+l,l,n-1); //前左下 Drawscene(x,y-l,z+l,l,n-1); //前中下 Dr