数学艺术图案画-曼陀罗单色版(1)

数学艺术图案画-曼陀罗单色版(1)

曼陀罗图案画是一类经典的、具有长久历史的艺术形式。在多个种族文化和宗教传统中占据很特殊地位。

且不谈宗教方面,其图案在美学和艺术方面,就有那无与伦比的地位。图案通常以圆形呈现,它那几何图形的集合,图案的对称性、复杂性以及色彩的绚烂和变化多端,常能激起人们对美的憧憬和向往。

//** 图案绘出,pi/8 八角形 i*45度,pi/6 六角形 60度

//** k * n =椭圆比,k*1.5,可 set 0.5 >>> 2.5

//** 图案展示:图案和色彩 8次叠加,5圈展示5个图案

//** 图案采用多层图形多层色彩套叠设计方法

//** k 参数控制图形线条疏密和图形色彩变化:

if (k-k/3*3==0){ drawOval( ) ...... }

//** 设置颜色,取得颜色值 getcolor ();

//** 依取得颜色 >>> 颜色变化 a=150 半透明

cs.SetColor (150,r1+10,g1+k*15, 250-b1);

彩色版的曼陀罗图案的色彩设置可参阅我在本站发布的几个系列的博文。

本次推出几个黑白版,或是单色版的。线条绘制的图案也很有艺术性。

下面是源码和图例:

mandala16 (){

//** init round, n, center point px, py

px=360; py=360; //** 图案输出中心点

//** 重绘图案

//redraw16:

cs.SetFillMode (1);//0不填色,1填色

cs.SetColor (255,0,0,0);

cs.DrawRect (0,0,720,720); //页面重置

//** 设置颜色,取得颜色值 // getcolor ();

cs.SetColor (255,250,250,0);

//** 屏幕打印状态提示:

cs.SetTextSize (28);

cs.DrawText ("曼陀罗图案 (16) ",50,40);

ss=" 曼陀罗图案(16)单色版 ";

cs.DrawText (ss,50,680);

cs.Update ();

//** 图形区域框线

cs.SetFillMode (0);//0不填色,1填色

cs.DrawRect(50,50,670,650); //框线

cs.Update ();

//****** figure 1 ****** 图形叠加设计

for(i=0;i<12;i++){

a=2*pi/12*i ; L=150;

sx1=(float)(L*sin(a))+px;

sy1=(float)(-L*cos(a))+py;

sx2=(float)(L*sin(a))+px;

sy2=(float)(-L*cos(a))+py;

for (k=10;k<30;k++){

if (k-k/2*2==0){

cs.DrawOval (sx1,sy1,25,k*1.2,i*30);

cs.DrawCircle (sx1,sy1, k/3);

} } }

//****** figure 2 ****** 图形叠加设计

for(i=0;i<12;i++){

a=2*pi/12*i+pi/12 ; L=110;

sx1=(float)(L*sin(a))+px;

sy1=(float)(-L*cos(a))+py;

sx2=(float)(L*sin(a))+px;

sy2=(float)(-L*cos(a))+py;

for (k=10;k<40;k++){

if (k-k/2*2==0){

cs.DrawOval (sx1,sy1,30,k*1.5, i*30+15);

} } }

//****** figure 3 **** center figure

for(i=0;i<6;i++){

a=2*pi/6*i+pi/6 ; L=110;

sx1=(float)(L*sin(a))+px;

sy1=(float)(-L*cos(a))+py;

for (k=10;k<40;k++){

if (k-k/2*2==0){

cs.DrawOval (sx1,sy1, 30, k*1.2, i*60+30);

cs.DrawCircle (sx1, sy1, k/2);

} } }

//****** figure 4 **** center figure

for(i=0;i<6;i++){

a=2*pi/6*i ; L=20;

sx1=(float)(L*sin(a))+px;

sy1=(float)(-L*cos(a))+py;

a=2*pi/6*i+pi/6 ; L=60;

sx2=(float)(L*sin(a))+px;

sy2=(float)(-L*cos(a))+py;

for (k=10;k<30;k++){

if (k-k/2*2==0){

cs.DrawOval (sx1,sy1, 15, k*1.5, i*60);

cs.DrawOval (sx2,sy2, 20, k*0.8, i*60+30);

cs.DrawCircle (px, py, k/2);

} } }

cs.Update ();

}//test16

mandala13 (){

//** init round, n, center point px, py

px=360; py=360; //** 图案输出中心点

//** 重绘图案

//redraw13:

cs.SetFillMode (1);//0不填色,1填色

cs.SetColor (255,0,0,0);

cs.DrawRect (0,0,720,720); //页面重置

//** 设置颜色,取得颜色值 getcolor ();

cs.SetColor (255,250,250,250);

//** 屏幕打印状态提示:

cs.SetTextSize (28);

cs.DrawText ("曼陀罗图案 (13) ",50,40);

ss=" 曼陀罗图案(13)单色版 ";

cs.DrawText (ss,50,680);

cs.Update ();

//** 图形区域框线

cs.SetFillMode (0);//0不填色,1填色

cs.DrawRect(50,50,670,650); //框线

cs.Update ();

//****** figure 1 ****** 图形叠加设计

for(i=0;i<8;i++){ // pi/8 十字形 i*45 度

a=2*pi/8*i+pi/8 ; L=140;

sx1=(float)(L*sin(a))+px;

sy1=(float)(-L*cos(a))+py;

L=100;

sx2=(float)(L*sin(a))+px;

sy2=(float)(-L*cos(a))+py;

for (k=10;k<40;k++){

if (k-k/2*2==0){

cs.DrawOval (sx1,sy1,50,k*1.5,i*45+22.5);

cs.DrawCircle (sx1,sy1, k/3);

cs.DrawOval (sx2,sy2,30,k*1.2,i*45+22.5);

} } }

//****** figure 2 ****** 图形叠加设计

for(i=0;i<8;i++){

a=2*pi/8*i ; L=80;

sx1=(float)(L*sin(a))+px;

sy1=(float)(-L*cos(a))+py;

L=160;

sx2=(float)(L*sin(a))+px;

sy2=(float)(-L*cos(a))+py;

for (k=10;k<40;k++){

if (k-k/2*2==0){

cs.DrawOval (sx1,sy1,30,k*1.5,i*45);

cs.DrawCircle (sx2,sy2, k/2);

} } }

//****** figure 3 **** center figure

for(i=0;i<8;i++){

a=2*pi/8*i ; L=30;

sx1=(float)(L*sin(a))+px;

sy1=(float)(-L*cos(a))+py;

for (k=10;k<40;k++){

if (k-k/5*5==0){

cs.DrawOval (sx1,sy1, 15, k*1.8, i*45);

cs.DrawCircle (px,py, k/3);

} } }

cs.Update ();

}//test13 ()

相关推荐
月♡下ღchase梦14 小时前
Claude Code安装教程
经验分享·codex·claude code
灯厂码农17 小时前
C语言动态内存分配完全指南(malloc、calloc、realloc、free)
java·c语言·算法
Bomangedd17 小时前
NSK W1503FA-8G-C5T20 滚珠丝杠技术手册
经验分享·规格说明书
wuyk55517 小时前
24. C 语言模块化:不是拆几个.c 文件那么简单
c语言·开发语言·stm32·单片机
BomanGe417 小时前
NSK MCL06全系行程极限选型指南
经验分享·规格说明书
我叫罗叨叨18 小时前
# Claude Code vs Cursor vs Codex:我到底换了吗?
经验分享
qq_2415856118 小时前
可用在中断中浮点数打印类似printf
c语言
C语言小火车19 小时前
C++ 快速排序(Quick Sort)深度精讲:分治思想、Lomuto 分区法及三数取中优化,面试手撕必会
c语言·开发语言·c++·面试·排序算法·快速排序
BomanLj20 小时前
NSK滚珠丝杠W3215SS技术规格手册
经验分享·规格说明书
aaaameliaaa21 小时前
进制练习题【找出只出现一次的数字、交换两个变量(不创建临时变量)、统计二进制中1的个数、打印整数二进制的奇数位和偶数位、求两个数二进制中不同位的个数】
c语言·数据结构·笔记·算法