工程家园's Archiver

紫色流星 发表于 2005-6-18 10:04

[原创]分形几何三角形

[原创]分形几何三角形

很有意思的一个分形三角形,最后可以变成一个雪花,如果你不停的放大,可以看到一模一样的小正三角形。

最后告诉大家,分形的增长是几何爆炸式的,大家最好不要输入过高的数,以免自己的CPU累死哦~:P

个人推荐3-5足可以了!

算法很简单。如果需要我可以贴出来

紫色流星 发表于 2005-6-18 10:06

这是exe可执行文件,给那些没有FLASH 7 播放器的人下载:P

这是swf文件压缩包。

hrbeu 发表于 2005-6-18 10:12

厉害,算法也贴出来 大家看看吧

紫色流星 发表于 2005-6-18 12:17

[code] on (release, keyPress "<Enter>") {
        nums = num>0 ? num-1 : 1;
        numMade = 0;
        maxGens = 0;
        for (var i = numMade; i<nums; i++) {
                maxGens += Math.pow(4, i);
        }
        maxGens *= 3;
        p1.play();
        p2.play();
        p3.play();
        b1.enabled = false;
}[/code]红色部分是计算要多少个分形,这是这部分的关键,大家可以看到,什么叫几何爆炸式增长!

这部分代码是按钮的代码

[[i] Last edited by 紫色流星 on 2005-6-20 at 11:17 [/i]]

紫色流星 发表于 2005-6-18 12:20

[code] if (_root.numMade<_root.maxGens) {
        _root.numMade++;
        finalScale = 100/3;
        for (i=1; i<=4; i++) {
                this.attachMovie("line", "k"+i, i);
                this["k"+i]._xscale = finalScale;
                this["k"+i]._yscale = finalScale;
        }
        this["k1"]._x = (-100);
        this["k1"]._y = 0;
        this["k2"]._x = (-25);
        this["k2"]._y = (-43.3);
        this["k2"]._rotation = (-60);
        this["k3"]._x = (25);
        this["k3"]._y = (-43.3);
        this["k3"]._rotation = (60);
        this["k4"]._x = (100);
        this["k4"]._y = 0;
        stop();
} else {
        prevFrame();
}[/code]这段代码是每次都在上一个MC上复制4个子MC,产生分形效果,代码不难理解。

[[i] Last edited by 紫色流星 on 2005-6-20 at 11:16 [/i]]

hxl268 发表于 2009-6-18 07:00

某些人还还根本不懂分形几何学
李炳铁说:“分形几何学上的V形棱角构成圆弧,_”_______说明李先生被严重误导了!60度的V形棱角是绝对不可构成圆弧的!李先生还根本不懂分形几何学啊!
[url]http://www.sciencenet.cn/bbs/showpost.aspx?id=49158[/url]

页: [1]

Powered by Discuz! Archiver 7.2  © 2001-2009 Comsenz Inc.