本页主题: [转贴][超级NB!] 20行javascript写成的超漂亮分形动画 打印 | 加为IE收藏 | 复制链接 | 收藏主题 | 上一主题 | 下一主题

bbsriver
杀人游戏MVP勋章I 杀人游戏MVP勋章II
级别: 管理员


精华: 52
发帖: 17391
威望: 8729 点
金钱: 7064 静电币
支持度: 19901 点
在线时间:13725(小时)
注册时间:2002-11-21
最后登录:2016-12-22

 [转贴][超级NB!] 20行javascript写成的超漂亮分形动画

看过256字节编程大赛,也看过疯狂科学家的dHTML Scene地下比赛

这次暴了个猛的,用canvas标签,加上20行javascript,就成了这个效果(你需要一个支持canvas标签的浏览器,例如SafariFirefox或者Opera):



http://www.p01.org/releases/DHTML_contests/files/20lines_hypno_trip_down_the_fractal_rug/

Copy code
/*    */
/*    */
/*    */    //    chain( func )
/*    */    //    make func chainable by making it return itsReturnValue||this
/*    */    function chain( func )
/*    */    {
/* 01 */         return function()
/*    */        {
/* 02 */            return func.apply( this, arguments )||this;
/*    */        }
/*    */    }
/*    */
/*    */
/*    */    //    initialize everything
/*    */    onload = function()
/*    */    {
/*    */        //    initialize the contexts and the fractal
/* 03 */        window.fx =
/*    */        {
/*    */            'barCtx':        document.getElementById('bar'    ).getContext('2d'),
/*    */            'fooCtx':        document.getElementById('foo'    ).getContext('2d'),
/*    */            'logicCtx':        document.getElementById('logic'    ).getContext('2d'),
/*    */            'renderCtx':    document.getElementById('render').getContext('2d'),
/*    */            'fractal':        [0,0,0,0,2,0,0,0,0],
/*    */            CanvasRenderingContext2D:    (window.CanvasRenderingContext2D?CanvasRenderingContext2D.prototype:document.getElementById('bar'    ).getContext('2d').__proto__)
/*    */        }
/*    */
/*    */        //    set( what, to )
/*    */        //    sets a property of the CanvasRenderingContext2D, making such operation chainable
/*    */        window.fx.CanvasRenderingContext2D.set = function( what, to )
/*       */        {
/* 04 */            this[what] = to;
/*    */        }
/*    */
/*    */        //    switchTo( context )
/*    */        //    return another CanvasRenderingContext2D, making such operation chainable
/*    */        window.fx.CanvasRenderingContext2D.switchTo = function( context )
/*       */        {
/* 05 */            return context;
/*    */        }
/*    */
/*    */        //    chain a bunch of CanvasRenderingContext2D methods
/* 06 */        for( chainThat in {set:1,switchTo:1,clearRect:1,save:1,translate:1,rotate:1,drawImage:1,scale:1,restore:1,fillRect:1,moveTo:1,lineTo:1,beginPath:1,closePath:1,stroke:1,fill:1,arc:1} )
/*       */        {
/* 07 */            window.fx.CanvasRenderingContext2D[chainThat] = chain( window.fx.CanvasRenderingContext2D[chainThat] );
/*    */        }
/*    */
/*    */        //    let's get the party started
/* 08 */        render();
/*    */    }
/*    */
/*    */
/*    */    //    render()
/*    */    function render()
/*    */    {
/*    */        //    the time is now
/* 09 */        var    now        = new Date().getTime();
/*    */
/*    */        //    mutate the outer cells of the rug
/* 10 */        fx
/*    */            .fractal[ Math.floor(Math.random()*8+5)%9 ] = Math.floor( Math.random()*3 );
/*    */
/*    */        //    softly kills the previous generations of the rug
/* 11 */        fx
/*    */            .fooCtx
/*    */                .set( 'fillStyle', 'rgba(0,0,0,.1)' )
/*    */                .fillRect( 0, 0, 192, 192 )
/*    */                .set( 'fillStyle', '#653' )
/*    */            .switchTo( fx.barCtx )
/*    */                .clearRect( 0, 0, 192, 192 );
/*    */
/*    */        //    render 1st generation of the rug
/* 12 */        for( var i=-1; i<9; fx.fooCtx.fillRect( (++i%3)*64+1,Math.floor(i/3)*64+1,(fx.fractal[i]&1)*62,(fx.fractal[i]&1)*62 ))
/*    */        {
/*    */        }
/*    */        //    render next generations of the rug
/* 13 */        for( var j=0; j++<3; fx.fooCtx.drawImage( fx.barCtx.canvas,0,0 ) )
/*    */        {
/* 14 */            for( var i=-1; ++i<9; fx.barCtx.drawImage( fx.fooCtx.canvas,0,0,192,192, (i%3)*64+1,Math.floor(i/3)*64+1, (fx.fractal[i]&2)*31, (fx.fractal[i]&2)*31 ) )
/*    */            {
/*    */            }
/*    */        }
/*    */
/*    */        //    render rotozoomed rug
/* 15 */        fx
/*    */            .logicCtx
/*    */                .set( 'globalCompositeOperation', 'source-over' )
/*    */                .clearRect( 0, 0, 256, 192 )
/*    */                .save()
/*    */                .translate( 96, 96 )
/*    */                .rotate( (now/5841%2)*Math.PI )
/*    */                .scale( 1+2*((now/1274)%1), 1+2*((now/1274)%1) )
/*    */                .drawImage( fx.fooCtx.canvas,0,0,192,192, -288,-288,576,576 )
/*    */                .drawImage( fx.fooCtx.canvas,0,0,192,192, -96 ,-96 ,192,192 )
/*    */                .drawImage( fx.fooCtx.canvas,0,0,192,192, -32 ,-32 ,64 ,64  )
/*    */                .restore()
/*    */                .set( 'globalCompositeOperation', 'copy' )
/*    */            //    prepare for hypnoglow
/*    */            .switchTo( fx.renderCtx )
/*    */                .set( 'globalCompositeOperation', 'source-over' )
/*    */                .clearRect( 0, 0, 192, 192 )
/*    */                .drawImage( fx.logicCtx.canvas, 0, 0 )
/*    */                .set( 'globalCompositeOperation', 'lighter' );
/*    */
/*    */        //    hypnoglow
/* 16 */        for( var i=-1; ++i<6; fx.renderCtx.drawImage( fx.logicCtx.drawImage( fx.logicCtx.canvas, 0, 0, 192>>i, 192>>i, 0, 0, 96>>i, 96>>i ).canvas, 0, 0, 96>>i,  96>>i, 0, 0, 192, 192 ) )
/*    */        {
/*    */        }
/*    */
/*    */        //    here we go again
/* 17 */        setTimeout( render, 25 );
/*    */    }
/*    */
/*    */


你可以看看类似的256byte汇编版本 12(友情提示,Vista以上操作系统没法看。因为微软的cmd显示驱动不兼容DOS全屏绘图,不过可以试试DOSBox

reddit上评论说:这个哪里才20行呀,要80个字符一行,20行写出这个效果才牛B,嘿嘿~~
Posted: 2008-06-18 23:22 | [楼 主]
st0n3
级别: 嘉宾


精华: 4
发帖: 1870
威望: 909 点
金钱: 10 静电币
支持度: 52 点
在线时间:315(小时)
注册时间:2002-08-24
最后登录:2024-07-15

 

被骗了~

他这一行一忒长了~~
其次,它这个代码核心就是个算法而已,其实还是canvas强大~~  
wh3n a 1itt1e b0y fa11  in l0v3 with a 10v31y 1ady...
Posted: 2008-06-19 00:06 | 1 楼
温柔公子
级别: 风云使者


精华: 1
发帖: 545
威望: 574 点
金钱: 12622 静电币
支持度: 0 点
在线时间:414(小时)
注册时间:2008-03-27
最后登录:2016-07-25

 

被骗了
还是用汇编写出的代码技巧性强, 原来看到过德国老外用汇编写的动画, 非常强悍
君子进德业.  忠信, 所以进德也. 修辞立其诚, 所以居业也.  知至至之, 可与言几也. 知终终之, 可与存义也. 是故居上位而不骄, 在下位而不忧.  故乾乾因其时而惕, 虽危而不咎也.
Posted: 2008-06-19 08:19 | 2 楼
dkwang
DK
级别: 贵宾


精华: 0
发帖: 4774
威望: 2110 点
金钱: -10 静电币
支持度: 2547 点
在线时间:2107(小时)
注册时间:2005-07-29
最后登录:2020-03-06

 

完全看不懂
DK
Posted: 2008-06-19 19:22 | 3 楼
不似荇菜
水精灵菜菜
杀人游戏MVP勋章I
级别: 论坛版主


精华: 3
发帖: 1412
威望: 1289 点
金钱: 491 静电币
支持度: 11340 点
在线时间:1470(小时)
注册时间:2007-02-03
最后登录:2016-07-25

 

我用Firefox,看到一个华丽丽的旋转玻璃幕墙,真是华丽啊,看久了眼睛疼
东风夜放花千树,更吹落,星如雨
Posted: 2008-06-19 22:38 | 4 楼
yingerlee
风里来的人
级别: 论坛版主


精华: 17
发帖: 6225
威望: 4185 点
金钱: 290 静电币
支持度: 11947 点
在线时间:901(小时)
注册时间:2005-07-06
最后登录:2010-06-24

 

俺的IE不支持呀。
青青子衿,悠悠我心。纵我不往,子宁不嗣音?
青青子佩,悠悠我思。纵我不往,子宁不来?
挑兮达兮,在城阙兮。一日不见,如三月兮。
Posted: 2008-06-20 09:05 | 5 楼
帖子浏览记录 版块浏览记录
狗狗静电BBS - wwW.DoGGiEhoMe.CoM » 哇啦哇啦 Discuss & Talk aloud

沪ICP备05008186号
Powered by PHPWind Styled by MagiColor