多边形裁剪编程与结果.doc

计算机图形学试验报告二实验(实习)名称 多边形裁剪 理学 系 专业年级 信息与计算科学 班次 09信计 姓名 徐娇虹 学号 20092314026 日期 得分 指导教师 费文龙 实验目的：练习多边形的裁剪算法实验内容：用Sutherland-Hodgeman算法实现多边形的裁剪。已知裁剪多边形P的控制点为：-2,4,-2,-3,3,-3,3,4，被裁剪多边形Q的控制点为：-3,5,-3,2,2,-2,2,1,6,2,2,6实验要求：1、 在同一坐标下画出原裁减多边形P和被裁剪多边形Q的图形；2、 编程用P中四条边依次对Q进行裁剪，并画出每次裁剪后的图形；3、 撰写实验报告并附上所用程序和结果。实验程序：1.Sutherland.m文件，调用了inside.m和intersect.m文件function f=Sutherland() figure(1); clf; P=-2,4;-2,-3;3,-3;3,4;-2,4; Q=-3,5;-3,2;2,-2;2,1;6,2;2,6;-3,5; subplot(3,2,1); plot(P(:,1),P(:,2),-) hold on; plot(Q(:,1),Q(:,2),-) Q1=Q; for i=1:4 Q2=; if(inside(Q1(1,:),P(i,:),i)=1) Q2=Q2;Q1(1,:); end for j=1:length(Q1)-1 if(inside(Q1(j,:),P(i,:),i)=1) if(inside(Q1(j+1,:),P(i,:),i)=1) Q2=Q2;Q1(j+1,:); else Q2=Q2;intersect(Q1(j,:),Q1(j+1,:),P(i:i+1,:); end else if(inside(Q1(j+1,:),P(i,:),i)=1) Q2=Q2;intersect(Q1(j+1,:),Q1(j,:),P(i:i+1,:); Q2=Q2;Q1(j+1,:); end end end subplot(3,2,i+1); plot(P(:,1),P(:,2),-) hold on; plot(Q2(:,1),Q2(:,2),-*) Q1=Q2;Q2(1,:); end end2 inside.m文件function f=inside(Q,P,i)f=0; switch i case 1 if (Q(1)=P(1) f=1; end case 2 if(Q(2)=P(2) f=1; end case 3 if(Q(1)=P(1) f=1; end case 4 if(Q(2)=P(2) f=1; endendend 3Intersect.m文件function f=intersect(Q1,Q2,P) %Q1在窗口内，Q2在窗口外，P为用于裁减的边 f=0,0; if P(1,2)=P(2,2) f(2)=P(1,2); f(1)=Q1(1)+(P(1,2)-Q1(2)*(Q2(1)-Q1(1)/(Q2(2)-Q1(2); else f(1)=P(1