实验一_计算机图形学_北信科.doc

实 验 报 告课程名称 计算机图形学 实验项目 实验一 数值微分法DDA画直线 系 别 计算机学院 班级/学号 计科1104班/2011011? 姓 名 日 期 2013年 9月20日 指导 教师 谷 葆 春 成 绩 一、 实验目的1. 熟悉并掌握Visual Studio 2008使用方法。2. 了解计算机图形学的运行环境，及生成图形的方法。3. 熟练掌握DDA算法生成直线。二、 实验内容使用DDA算法生成直线。总共有8种情况。设斜率为k： k1时，y+，x=x+1/k 情况（正画） k1时，y-，x=x-1/k 情况（反画） k-1时，y-，x=x-1/k 情况（正画） k-1时，y+，x=x+1/k 情况（反画） 0k1时，x+，y=y+k 情况（正画） 0k1时，x-，y=y-k 情况（反画） -1k0时，x+，y=y+k 情况（正画） -1k0时，x+，y=y+k 情况（反画）分别用以上算法生成直线。三、 实验过程及步骤1、 运行Visual Studio 2008，文件新建项目visual c+CLRwindows窗体运行程序。2、 打开Form1窗口源代码界面。将实验函数代码打在总代码最后#pragma endregion后。3、 打开Form1窗口的属性，将事件里的外观paint项改为Form1_Paint。4、 使用DDA算法生成直线的8种情况。k1时，y+，x=x+1/k情况 （20，20）到（40，100）System:Void Form1_Paint(System:Object sender,System:Windows:Forms:PaintEventArgs e) int x1=20,y1=20,x2=40,y2=100; int y; float dx,dy,k,x; Pen myPen=gcnew Pen(Color:Pink,1.0f); dx=x2-x1; dy=y2-y1; k=dy/dx; x=x1; for(y=y1;yGraphics-DrawRectangle(myPen,r1); x=x+1/k; k1时，y-，x=x-1/k情况 （40，100）到（20，20）System:Void Form1_Paint(System:Object sender,System:Windows:Forms:PaintEventArgs e) int x1=40,y1=100,x2=20,y2=20; int y; float dx,dy,k,x; Pen myPen=gcnew Pen(Color:Pink,1.0f); dx=x2-x1; dy=y2-y1; k=dy/dx; x=x1; for(y=y1;y=y2;y-) Rectangle r1=Rectangle(int(x+0.5),y,1,1); e-Graphics-DrawRectangle(myPen,r1); x=x-1/k; k=y2;y-) Rectangle r1=Rectangle(int(x+0.5),y,1,1); e-Graphics-DrawRectangle(myPen,r1); x=x-1/k; k-1时，y+，x=x+1/k情况 （40，20）到（20，100）System:Void Form1_Paint(System:Object sender,System:Windows:Forms:PaintEventArgs e) int x1=40,y1=20,x2=20,y2=100; int y; float dx,dy,k,x; Pen myPen=gcnew Pen(Color:Pink,1.0f); dx=x2-x1; dy=y2-y1; k=dy/dx; x=x1; for(y=y1;yGraphics-DrawRectangle(myPen,r1); x=x+1/k; 0k1时，x+，y=y+k情况 （20，20）到（100，40）System:Void Form1_Paint(System:Object sender,System:Windows:Forms:PaintEventArgs e) int x1=20,y1=20,x2=100,y2=40; int x; float dx,dy,k,y; Pen myPen=gcnew Pen(Color:Pink,1.0f); dx=x2-x1; dy=y2-y1; k=dy/dx; y=y1; for(x=x1;xGraphics-DrawRectangle(myPen,r1); y=y+k; 0k=x2;x-) Rectangle r1=Rectangle(x,int(y+0.5),1,1); e-Graphics-DrawRectangle(myPen,r1); y=y-k; -1k0时，x+，y=y+k情况 （20，40）到（100，20）System:Void Form1_Paint(System:Object sender,System:Windows:Forms:PaintEventArgs e) int x1=20,y1=40,x2=100,y2=20; int x; float dx,dy,k,y; Pen myPen=gcnew Pen(Color:Pink,1.0f); dx=x2-x1; dy=y2-y1; k=dy/dx; y=y1; for(x=x1;xGraphics-DrawRectangle(myPen,r1); y=y+k; -1k=x2;x-) Rectangle r1=Rectangle(x,int(y+0.5),1,1); e-Graphics-DrawRectangle(myPen,r1); y=y-k; 四、 实验总结通过