一個簡單的一箭穿心程序

其實這個程序也不難，只要用心形線方程(1-ρ×cosθ)來繪圖就可以了。

作者：張躍華???????????? 學校：云南農業大學

程序如下：

#include

#include

#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();

}

[1]

總結

以上是生活随笔為你收集整理的一箭穿心程序编码c语言,一个简单的一箭穿心程序的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。