- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
用递归的方法画分形图 - Read
用递归的方法画分形图作者:苍竹先生
下载源代码 分形几何是数学领域里新兴的课题,如果将图形的每个元素按某种规则进行变形,得到新的图形,以此类推,进行若干次变形后得到的图形就是分形图形。Couch曲线是最典型的分形图形:
将一条线段按照图1进行变换,得到图1,再将图1中的每条线段按图1的折线变换得到图2,以此类推,进行6次变换就得到图6,如果进行无限次变换,就得到的是Couch曲线,Couch曲线的维数不是整数维,更多详情请见分形方面的书籍。 用分形图形能画图许多漂亮的图案而被广泛地应用,下面将几个简单的分形图形的代码与图形大家分享。
//Couch曲线的画法
void Couch(CDC *pDC,int x1,int y1,int x2,int y2,int n)
{
//pDC是画图的设备上下文的指针
//x1,y1,x2,y2是起始的两点
//其中参数n是递归的层数
int x3,y3,x4,y4,x5,y5;
//以下是根据空间几何计算出来的坐标
x3=x1+(x2-x1)/3;
y3=y1+(y2-y1)/3;
x4=x1+(x2-x1)*2/3;
y4=y1+(y2-y1)*2/3;
x5=x3+(x4-x3)/2+int(sqrt(3)*(y4-y3)/2);
y5=y3-int(sqrt(3)*(x4-x3)/2)+(y4-y3)/2;
//递归最后一层,递归的出口
if(n==1)
{
pDC-MoveTo(x1,y1);
pDC-LineTo(x3,y3);
pDC-LineTo(x5,y5);
pDC-LineTo(x4,y4);
pDC-LineTo(x2,y2);
}
else
{
//递归画图
Couch(pDC,x1,y1,x3,y3,n-1);
Couch(pDC,x3,y3,x5,y5,n-1);
Couch(pDC,x5,y5,x4,y4,n-1);
Couch(pDC,x4,y4,x2,y2,n-1);
}
}
//斯宾斯基篓垫的画法
void Floor(CDC *pDC,int x1, int y1,int x2,int y2,int x3,int y3,int n)
{
//pDC是画图的设备上下文的指针
//x1,y1,x2,y2,x3,y3是起始的三角形的三点坐标
//其中参数n是递归的层数
int x11,x22,x33,y11,y22,y33;
//以下是根据空间几何计算出来的坐标
x11=(x2+x3)/2;
y11=(y2+y3)/2;
x22=(x1+x3)/2;
y22=(y1+y3)/2;
x33=(x1+x2)/2;
y33=(y1+y2)/2;
pDC-MoveTo(x11,y11);
pDC-LineTo(x22,y22);
pDC-MoveTo(x11,y11);
pDC-LineTo(x33,y33);
pDC-MoveTo(x22,y22);
pDC-LineTo(x33,y33);
//递归最后一层,递归的出口
if(n==1)
{
pDC-MoveTo(x11,y11);
pDC-LineTo(x22,y22);
pDC-LineTo(x33,y33);
pDC-LineTo(x11,y11);
}
else
{
//递归画图
Floor(pDC,x1,y1,x33,y33,x22,y22,n-1);
Floor(pDC,x33,y33,x2,y2,x11,y11,n-1);
Floor(pDC,x22,y22,x11,y11,x3,y3,n-1);
}
}
//分形矩形的画法
void Rect(CDC *pDC,int x1,int y1,int x2,int y2,int n)
{
//pDC是画图的设备上下文的指针
//x1,y1,x2,y2是起始矩形坐标
//其中参数n是递归的层数
int x3,y3,x4,y4,x5,y5,x6,y6;
//以下是根据空间几何计算出来的坐标
x3=x1+(x2-x1)/3;
y3=y1+(y2-y1)/3;
x4=x1+(x2-x1)*2/3;
y4=y1+(y2-y1)*2/3;
x5=x3+(y4-y3);
y5=y3-(x4-x3);
x6=x4-(y3-y4);
y6=y4+(x3-x4);
pDC-MoveTo(x1,y1);
pDC-LineTo(x3,y3);
pDC-MoveTo(x4,y4);
pDC-LineTo(x2,y2);
//递归最后一层,递归的出口
if(
您可能关注的文档
- dna 甲基化-非甲基化碱基间堆积作用的理论研究theoretical studies.pdf
- discovering epc 齐来认识产品电子代码 - gs1 hong kong.pdf
- dow corning toray es 5000 发泡硅橡胶 - xiameter.pdf
- e) publication, trade or electronic media出版、宣传或电子媒体.doc
- dna 甲基化-非甲基化碱基间堆积作用的理论研究 - 生物探索.pdf
- e+超能量饮浓缩液天然平衡的能量饮料 - isagenix.pdf
- cuisinart 4片烤面包机串联拆解 - ifixit.pdf
- e04长宁区建筑节能综合改造项目节能量审核报告模板.doc
- e 一高速摄影在潜孔冲击器设计中的应用e 一用高速摄影研究爆破中.pdf
- durel缓冲弹簧―― 优化了的能量吸收体系 - durel gmbh.pdf
最近下载
- 妊娠期哺乳期合理用药考核试题及答案(含抗菌药物).docx VIP
- 血液透析耗材业化建设环评报告.pdf VIP
- 《智能网联汽车高快速路测试技术规范》DB31T 1566-2025.docx VIP
- I如何设置WiFi密码才不会被WiFi万能钥匙破解.doc VIP
- 初中数学几何模型大全+经典题型(含答案).pdf VIP
- 静脉输液操作常见并发症的预防及处理规范.pdf VIP
- 虚拟仿真实验教学资源开发指南.pptx VIP
- 慢性肾功能不全护理查房.pptx VIP
- 2025年国培卫健、粤医云2月份基层护理培训项目考核答案(全).docx VIP
- 2025年宜昌市秭归县公开招聘5名社区专职工作人员 (网格员)笔试备考题库及答案解析.docx VIP
文档评论(0)