科技行者

行者学院 转型私董会 科技行者专题报道 网红大战科技行者

知识库

知识库 安全导航

至顶网软件频道基础软件C语言程序开发经典实例之六

C语言程序开发经典实例之六

  • 扫一扫
    分享文章到微信

  • 扫一扫
    关注官方公众号
    至顶头条

学习使用按位与

作者:佚名 来源:唯c世界 2007年10月28日

关键字: Linux

  • 评论
  • 分享微博
  • 分享邮件
【程序58】

  题目:画图,学用rectangle画方形。   

  1.程序分析:利用for循环控制100-999个数,每个数分解出个位,十位,百位。

  2.程序源代码:

#include "graphics.h"
main()
{
 int x0,y0,y1,x1,driver,mode,i;
 driver=VGA;mode=VGAHI;
 initgraph(&driver,&mode,"");
 setbkcolor(YELLOW);
 x0=263;y0=263;y1=275;x1=275;
 for(i=0;i<=18;i++)
 {
  setcolor(1);
  rectangle(x0,y0,x1,y1);
  x0=x0-5;
  y0=y0-5;
  x1=x1+5;
  y1=y1+5;
 }
 settextstyle(DEFAULT_FONT,HORIZ_DIR,2);
 outtextxy(150,40,"How beautiful it is!");
 line(130,60,480,60);
 setcolor(2);
 circle(269,269,137);
}

  【程序59】

  题目:画图,综合例子。

  1.程序分析:

  2.程序源代码:

# define PAI 3.1415926
# define B 0.809
# include "graphics.h"
#include "math.h"
main()
{
int i,j,k,x0,y0,x,y,driver,mode;
float a;
driver=CGA;mode=CGAC0;
initgraph(&driver,&mode,"");
setcolor(3);
setbkcolor(GREEN);
x0=150;y0=100;
circle(x0,y0,10);
circle(x0,y0,20);
circle(x0,y0,50);
for(i=0;i<16;i++)
{
 a=(2*PAI/16)*i;
 x=ceil(x0+48*cos(a));
 y=ceil(y0+48*sin(a)*B);
 setcolor(2); line(x0,y0,x,y);}
setcolor(3);circle(x0,y0,60);
/* Make 0 time normal size letters */
settextstyle(DEFAULT_FONT,HORIZ_DIR,0);
outtextxy(10,170,"press a key");
getch();
setfillstyle(HATCH_FILL,YELLOW);
floodfill(202,100,WHITE);
getch();
for(k=0;k<=500;k++)
{
 setcolor(3);
 for(i=0;i<=16;i++)
 {
  a=(2*PAI/16)*i+(2*PAI/180)*k;
  x=ceil(x0+48*cos(a));
  y=ceil(y0+48+sin(a)*B);
  setcolor(2); line(x0,y0,x,y);
 }
 for(j=1;j<=50;j++)
 {
  a=(2*PAI/16)*i+(2*PAI/180)*k-1;
  x=ceil(x0+48*cos(a));
  y=ceil(y0+48*sin(a)*B);
  line(x0,y0,x,y);
 }
}
restorecrtmode();
}

  【程序60】

  题目:画图,综合例子。   

  1.程序分析:

  2.程序源代码:

#include "graphics.h"
#define LEFT 0
#define TOP 0
#define RIGHT 639
#define BOTTOM 479
#define LINES 400
#define MAXCOLOR 15
main()
{
int driver,mode,error;
int x1,y1;
int x2,y2;
int dx1,dy1,dx2,dy2,i=1;
int count=0;
int color=0;
driver=VGA;
mode=VGAHI;
initgraph(&driver,&mode,"");
x1=x2=y1=y2=10;
dx1=dy1=2;
dx2=dy2=3;
while(!kbhit())
{
 line(x1,y1,x2,y2);
 x1+=dx1;y1+=dy1;
 x2+=dx2;y2+dy2;
 if(x1<=LEFT||x1>=RIGHT)
 dx1=-dx1;
 if(y1<=TOP||y1>=BOTTOM)
  dy1=-dy1;
 if(x2<=LEFT||x2>=RIGHT)
  dx2=-dx2;
 if(y2<=TOP||y2>=BOTTOM)
  dy2=-dy2;
 if(++count>LINES)
 {
  setcolor(color);
  color=(color>=MAXCOLOR)?0:++color;
 }
}
closegraph();
}

查看本文来源

    • 评论
    • 分享微博
    • 分享邮件
    邮件订阅

    如果您非常迫切的想了解IT领域最新产品与技术信息,那么订阅至顶网技术邮件将是您的最佳途径之一。

    重磅专题
    往期文章
    最新文章