【Canvas与诗词】录李梦唐诗《咏史》(覆舟水是苍生泪 不到横流君不知)

【成图】

1

2

3

4

5

6

【代码】

<!DOCTYPE html>
<html lang="utf-8">
<meta http-equiv="Content-Type" content="text/html; charset=utf-8"/>
<head>
     <title>不到横流君不知 Draft1</title>
     <style type="text/css">
     .centerlize{
        margin:0 auto;
        width:1200px;
     }
     </style>
     </head>

     <body onload="init();">
        <div class="centerlize">
            <canvas id="myCanvas" width="12px" height="12px" style="border:1px dotted black;">
                如果看到这段文字说您的浏览器尚不支持HTML5 Canvas，请更换浏览器再试.
            </canvas>
        </div>
     </body>
</html>
<script type="text/javascript">
<!--
/*****************************************************************
* 将全体代码(从<!DOCTYPE到script>)拷贝下来，粘贴到文本编辑器中，
* 另存为.html文件，再用chrome浏览器打开，就能看到实现效果。
******************************************************************/

// canvas的绘图环境
var ctx;

// 高宽
const WIDTH=512;
const HEIGHT=512;

// 舞台对象
var stage;

//-------------------------------
// 初始化
//-------------------------------
function init(){
    // 获得canvas对象
    var canvas=document.getElementById('myCanvas');  
    canvas.width=WIDTH;
    canvas.height=HEIGHT;

    // 初始化canvas的绘图环境
    ctx=canvas.getContext('2d');  
    ctx.translate(WIDTH/2,HEIGHT/2);// 原点平移

    // 准备
    stage=new Stage();    
    stage.init();

    // 开幕
    animate();
}

// 播放动画
function animate(){    
    stage.update();    
    stage.paintBg(ctx);
    stage.paintFg(ctx);     

    // 循环
    if(true){
        //sleep(100);
        window.requestAnimationFrame(animate);   
    }
}

// 舞台类
function Stage(){
    // 初始化
    this.init=function(){
        
    }

    // 更新
    this.update=function(){    
        
    }

    // 画背景
    this.paintBg=function(ctx){
        ctx.clearRect(-WIDTH/2,-HEIGHT/2,WIDTH,HEIGHT);// 清屏    
    }

    // 画前景
    this.paintFg=function(ctx){
        // 底色
        ctx.save();
        ctx.fillStyle = "white";
        ctx.fillRect(-WIDTH/2,-HEIGHT/2,WIDTH,HEIGHT);
        ctx.restore();

        const R=220;// 基准尺寸

        // 第1圈
        ctx.save();    
        var r=R*1.00;
        drawSolidCircle(ctx,0,0,r,"rgb(181,113,0)");
        ctx.restore();

        // 第2圈
        ctx.save();    
        var r=R*0.995;
        var gnt=ctx.createLinearGradient(0,-r,0,r);
        gnt.addColorStop(0,"rgb(243,214,88)");
        gnt.addColorStop(0.5,"rgb(201,153,42)");    
        gnt.addColorStop(1,"rgb(166,109,38)");;
        drawSolidCircle(ctx,0,0,r,gnt);
        ctx.restore();

        // 第3圈
        ctx.save();    
        var r=R*0.985;
        var gnt=ctx.createLinearGradient(0,-r,0,r);
        gnt.addColorStop(0,"rgb(246,225,132)");
        gnt.addColorStop(0.5,"rgb(187,124,47)");    
        gnt.addColorStop(1,"rgb(204,166,101)");;
        drawSolidCircle(ctx,0,0,r,gnt);
        ctx.restore();

        // 第4圈
        ctx.save();    
        var r=R*0.96;
        var gnt=ctx.createLinearGradient(0,-r,0,r);
        gnt.addColorStop(0,"rgb(166,109,38)");
        gnt.addColorStop(0.5,"rgb(201,153,42)");    
        gnt.addColorStop(1,"rgb(243,214,88)");;
        drawSolidCircle(ctx,0,0,r,gnt);
        ctx.restore();

        // 第5圈
        ctx.save();    
        var r=R*0.95;
        var gnt=ctx.createLinearGradient(0,-r,0,r);
        gnt.addColorStop(0,"rgb(194,137,56)");
        gnt.addColorStop(0.5,"rgb(213,177,91)");    
        gnt.addColorStop(1,"rgb(242,226,130)");;
        drawSolidCircle(ctx,0,0,r,gnt);
        ctx.restore();

        // 第6圈
        ctx.save();    
        var r=R*0.945;
        drawSolidCircle(ctx,0,0,r,"rgb(7,5,6)");
        ctx.restore();

        // 第7圈
        ctx.save();    
        var r=R*0.93;
        var gnt=ctx.createRadialGradient(0,0,0,0,0,r);// 辐射渐变圈
        gnt.addColorStop(0,"rgba(25,76,69,0.2)");
        gnt.addColorStop(0.90,"rgba(50,152,139,0.2)");
        gnt.addColorStop(1,"rgba(77,196,181,0.1)");
        drawSolidCircle(ctx,0,0,r,gnt);
        ctx.restore();

        // 第8圈
        ctx.save();    
        var r=R*0.91;
        var gnt=ctx.createRadialGradient(r/2,r/2,r*0.9,r/Math.sqrt(2),r/Math.sqrt(2),r/10);// 辐射渐变圈
        gnt.addColorStop(0,"rgb(8,37,32)");
        gnt.addColorStop(1,"rgb(39,100,85)");
        drawSolidCircle(ctx,0,0,r,gnt);
        ctx.restore();

        // 第9圈
        ctx.save();    
        var r=R*0.93;
        
        ctx.fillStyle="rgb(28,88,80)";
        ctx.beginPath();
        ctx.arc(0,0,r,-Math.PI/12,Math.PI/2+Math.PI/12,true);
        ctx.arc(r/Math.sqrt(2),r/Math.sqrt(2),r,Math.PI-Math.PI/12,Math.PI/2*3+Math.PI/12,false);
        ctx.closePath();
        ctx.fill();
        
        drawCnLoopOnmt(ctx,0,0,r*0.90,r/50,24,"rgb(151,96,39)");// 中式回文
        
        ctx.restore();

        // #10 诗文
        ctx.save();
        var r=R*1.00;
        var center=createPt(0,0);
        var w=1.5*r;
        var h=w;
        drawPoem(ctx,center.x,center.y,w,h,r*0.25,r*0.1,r*0.10,
        "高阁垂裳调鼎时 可怜天下有微词 覆舟水是苍生泪 不到横流君不知",
        r*0.14+"px 方正宋刻本秀楷简体","rgb(255,249,183)");        
        ctx.restore();
        
        writeText(ctx,WIDTH/2-30,HEIGHT/2-5,"逆火制图","8px consolas","grey");// 版权
    }
}

/*----------------------------------------------------------
函数:函数化写诗
ctx:绘图上下文
x:矩形中心横坐标
y:矩形中心纵坐标
width:矩形宽
height:矩形高
（以上四个变量控制了诗文所在的矩形范围）
horizontalMagin:左右留白
verticalMagin:上下留白
yOffset:文本的垂直偏移值
text:诗文文本（以英文半角空格作为分隔符,分隔后的数组长度为列数，最长一句的文本书为行数）
font:字体
color:颜色
----------------------------------------------------------*/
function drawPoem(ctx,x,y,width,height,horizontalMagin,verticalMagin,yOffset,text,font,color){
        height-=2*verticalMagin;        // 高
        width-=2*horizontalMagin;       // 宽
        var arr=text.split(" ");        // 存储单个文字的数组
        var cols=arr.length;            // 列数    
        var rows=-1;                    // 定义行数
        for(var i=0;i<arr.length;i++){  // 取得行数
            var line=arr[i];
            var len=line.split("").length;
            if(len>rows){
                rows=len;
            }
        }
        var xStep=width/cols;            // 横向步进
        var yStep=height/rows;            // 竖向步进
        
        // 写诗
        for(var i=0;i<cols;i++){        
            for(var j=0;j<rows;j++){
                var a=createPt(x+width/2-(i+0.5)*xStep,y-height/2+(j+0.5)*yStep);// 定位
                var line=arr[i];         // 取得每一行
                var words=line.split("");// 代表每一行的数组
                if(j<line.length){
                    var word=words[j];   // 具体的行列对应的字
                    writeText(ctx,a.x,a.y+yOffset,word,font,color);
                }
            }
        }
}

/*----------------------------------------------------------
函数:用于绘制中式回环边纹，用于圆形内外装饰
ctx:绘图上下文
x:边纹中心横坐标
y:边纹中心纵坐标
radius:边纹内半径
thickness:边纹线之间的厚度
n:边纹个数
color:描边颜色或填充颜色
----------------------------------------------------------*/
function drawCnLoopOnmt(ctx,x,y,radius,thickness,n,color){
    const R=radius;
    const T=thickness;
    const N=n;
    const PART=Math.PI*2/N/12;

    ctx.save();
    ctx.lineWidth=2;
    ctx.strokeStyle=color;
    ctx.translate(x,y);
    for(var i=0;i<N;i++){
        var theta=Math.PI*2/N*i;
        
        var r=R;
        var a=createPt(r*Math.cos(theta),r*Math.sin(theta));

        var angle=theta+6*PART;
        r=R;
        var b=createPt(r*Math.cos(angle),r*Math.sin(angle));

        angle=theta+6*PART;
        r=R+3*T;
        var c=createPt(r*Math.cos(angle),r*Math.sin(angle));

        angle=theta+2*PART;
        r=R+3*T;
        var d=createPt(r*Math.cos(angle),r*Math.sin(angle));

        angle=theta+2*PART;
        r=R+2*T;
        var e=createPt(r*Math.cos(angle),r*Math.sin(angle));

        angle=theta+5*PART;
        r=R+2*T;
        var f=createPt(r*Math.cos(angle),r*Math.sin(angle));

        angle=theta+5*PART;
        r=R+1*T;
        var g=createPt(r*Math.cos(angle),r*Math.sin(angle));

        angle=theta+1*PART;
        r=R+1*T;
        var h=createPt(r*Math.cos(angle),r*Math.sin(angle));

        angle=theta+1*PART;
        r=R+4*T;
        var j=createPt(r*Math.cos(angle),r*Math.sin(angle));

        angle=theta+12*PART;
        r=R+4*T;
        var k=createPt(r*Math.cos(angle),r*Math.sin(angle));

        angle=theta+12*PART;
        r=R+1*T;
        var l=createPt(r*Math.cos(angle),r*Math.sin(angle));

        angle=theta+8*PART;
        r=R+1*T;
        var m=createPt(r*Math.cos(angle),r*Math.sin(angle));

        angle=theta+8*PART;
        r=R+2*T;
        var n=createPt(r*Math.cos(angle),r*Math.sin(angle));

        angle=theta+11*PART;
        r=R+2*T;
        var p=createPt(r*Math.cos(angle),r*Math.sin(angle));

        angle=theta+11*PART;
        r=R+3*T;
        var q=createPt(r*Math.cos(angle),r*Math.sin(angle));

        angle=theta+7*PART;
        r=R+3*T;
        var s=createPt(r*Math.cos(angle),r*Math.sin(angle));

        angle=theta+7*PART;
        r=R+0*T;
        var t=createPt(r*Math.cos(angle),r*Math.sin(angle));

        angle=theta+12*PART;
        r=R+0*T;
        var u=createPt(r*Math.cos(angle),r*Math.sin(angle));

        ctx.beginPath();
        ctx.moveTo(a.x,a.y);
        ctx.arc(0,0,R,theta,theta+6*PART,false);
        ctx.lineTo(b.x,b.y);
        ctx.lineTo(c.x,c.y);
        ctx.arc(0,0,R+3*T,theta+6*PART,theta+2*PART,true);
        ctx.lineTo(d.x,d.y);
        ctx.lineTo(e.x,e.y);
        ctx.arc(0,0,R+2*T,theta+2*PART,theta+5*PART,false);
        ctx.lineTo(f.x,f.y);
        ctx.lineTo(g.x,g.y);
        ctx.arc(0,0,R+1*T,theta+5*PART,theta+1*PART,true);
        ctx.lineTo(h.x,h.y);
        ctx.lineTo(j.x,j.y);
        ctx.arc(0,0,R+4*T,theta+1*PART,theta+12*PART,false);
        ctx.lineTo(k.x,k.y);
        ctx.lineTo(l.x,l.y);
        ctx.arc(0,0,R+1*T,theta+12*PART,theta+8*PART,true);
        ctx.lineTo(m.x,m.y);
        ctx.lineTo(n.x,n.y);
        ctx.arc(0,0,R+2*T,theta+8*PART,theta+11*PART,false);
        ctx.lineTo(p.x,p.y);
        ctx.lineTo(q.x,q.y);
        ctx.arc(0,0,R+3*T,theta+11*PART,theta+7*PART,true);
        ctx.lineTo(s.x,s.y);
        ctx.lineTo(t.x,t.y);
        ctx.arc(0,0,R+0*T,theta+7*PART,theta+12*PART,false);
        ctx.lineTo(u.x,u.y);

        ctx.stroke();
    }
    ctx.restore();
}

/*----------------------------------------------------------
函数:用于绘制实心圆,用途是标记点以辅助作图
ctx:绘图上下文
x:矩形中心横坐标
y:矩形中心纵坐标
r:圆半径
color:填充圆的颜色
----------------------------------------------------------*/
function drawSolidCircle(ctx,x,y,r,color){
    ctx.fillStyle=color;
    ctx.beginPath();
    ctx.arc(x,y,r,0,Math.PI*2,false);
    ctx.closePath();
    ctx.fill();
}

/*----------------------------------------------------------
函数:创建一个二维坐标点
baseX:基准点横坐标
baseY:基准点纵坐标
radius:当前点到基准点的距离
theta:当前点到基准点的角度
Pt即Point
----------------------------------------------------------*/
function createPt2(baseX,baseY,radius,theta){
    var retval={};
    retval.x=baseX+radius*Math.cos(theta);
    retval.y=baseY+radius*Math.sin(theta);
    return retval;
}

/*----------------------------------------------------------
函数:创建一个二维坐标点
x:横坐标
y:纵坐标
Pt即Point
----------------------------------------------------------*/
function createPt(x,y){
    var retval={};
    retval.x=x;
    retval.y=y;
    return retval;
}

/*----------------------------------------------------------
函数:延时若干毫秒
milliseconds:毫秒数
----------------------------------------------------------*/
function sleep(milliSeconds) {
    const date = Date.now();
    let currDate = null;
    while (currDate - date < milliSeconds) {
        currDate = Date.now();
    } 
}

/*----------------------------------------------------------
函数:书写文字
ctx:绘图上下文
x:横坐标
y:纵坐标
text:文字
font:字体
color:颜色
----------------------------------------------------------*/
function writeText(ctx,x,y,text,font,color){
    ctx.save();
    ctx.textBaseline="bottom";
    ctx.textAlign="center";
    ctx.font = font;
    ctx.fillStyle=color;
    ctx.fillText(text,x,y);
    ctx.restore();
}

/*-------------------------------------------------------------
李梦唐(1964.11-2016.9.16)
原名宗金柱，河北任丘人，曾经任中国新闻社编委、摄影部原主任，2016
年在北京因病去世，终年52岁。
李梦唐以古体诗闻名，其作品《咏史》、《葡京妓》在民间均有广泛
影响，世人皆赞其功力在晚唐诗里也不虚古人。

以下收录了他的三篇名作

《咏史》
高阁垂裳调鼎时 可怜天下有微词 覆舟水是苍生泪 不到横流君不知

《葡京妓》
才洗缁衣北地尘 未通南语粉先匀 本为脱困多碾转 缠头偏遇故乡人

《剑桥大学》
学府名高仰拜伦 依然金柳曳青裙 神州十万官商子 来看康桥五色云

梦唐公乃今人七绝圣手，佳作极多，可以到知乎、搜韵去查阅欣赏。
--------------------------------------------------------------*/
//-->
</script>

END

posted @ 2017-08-26 13:17  逆火狂飙  阅读(216)  评论(0)    收藏  举报
生当作人杰 死亦为鬼雄 至今思项羽 不肯过江东