以文本方式查看主题

-  曙海教育集团论坛  (http://www.sun4.cn/bbs/index.asp)
--  C语言开发  (http://www.sun4.cn/bbs/list.asp?boardid=62)
----  一个简单的一箭穿心程序  (http://www.sun4.cn/bbs/dispbbs.asp?boardid=62&id=2398)

--  作者:wangxinxin
--  发布时间:2010-12-10 10:29:29
--  一个简单的一箭穿心程序
程序如下:  
#include<graphics.h>
#include<math.h>  
#define FNX(x1) (int)(x (x1)*sl)
#define FNY(y1) (int)(MAXY-(y (y1)*sl))
#define R(theta) 1-pow(cos(1*theta),1)  
int sl=50,MAXY;
float x1,y1,xs,ys,r,theta;
/*画心*/
void draw(int x,int y)
{
for(theta=0;theta<2*3.14;theta =0.01)
{r=R(theta);
  x1=r*sin(theta);y1=r*cos(theta);
  xs=FNX(x1);ys=FNY(y1);
  if(theta==0)moveto(xs,ys);else lineto(xs,ys);
}
}  
/*画箭头*/
void jian()
{
line(205,235,200,240);
line(200,240,205,245);
line(200,240,214,240);
line(400,240,500,240);
line(485,235,480,240);
line(480,240,485,245);
line(490,235,485,240);
line(485,240,490,245);
line(495,235,490,240);
line(490,240,495,245);
line(500,235,495,240);
line(495,240,500,245);
line(505,235,500,240);
line(500,240,505,245);
line(485,235,505,235);
line(485,245,505,245);
}
/*主程序*/
main()
{int driver=DETECT,mode;
initgraph(&driver,&mode,"");
setbkcolor(1);
setcolor(4);
MAXY=getmaxy();
draw(280,280);/*左心*/
draw(370,280);/*右心*/
jian();
  getch();
closegraph();
}


看到大家讨论对编程好不关系的话题,真的感到失望,如果你不是来学习的,请不要回复本贴,但也看到大家对于一些人生攻击的醒悟,
象 Momoass 能用公平的态度来对待大家的发言.
    converse (创系) 也来劝大家说话和气.
   相信他们这样的人才有成功的品质,非常热情,做事情就需要这样的人.