【成图】

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

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

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

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

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

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

【代码】

<!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