1.#include
2.#include
3.#include
4./*玫瑰花*/
5.#define FNX(x) (int)(xo+(x)*1.0)
6.#define FNY(y) (int)(getmaxy()-(yo+(y)*1.0))
7.#define FNX2(phi) cos(phi)*ac-sin(phi)*bs
8.#define FNY2(phi) cos(phi)*as+sin(phi)*bc
9.
10./*画旋转的椭圆*/
11.void elli(int xo,int yo,int a,int b,double theta)
12.{
13.int i;
14.double da,c,s,ac,as,bc,bs,xf,yf,phi,x,y;
15.theta=theta*0.01745;
16.da=3*0.1745;
17.c=cos(theta);s=sin(theta);
18.ac=a*c;as=a*s;bc=b*c;bs=b*s;
19.x=FNX2(0);y=FNY2(0);
20.moveto(FNX(x),FNY(y));
21.for(i=1;i<=360;i++)
22.{
23.phi=i*da;xf=x*cos(phi)*0.1;yf=b*sin(phi)*0.1;
24.x=FNX2(phi);y=FNY2(phi);
25.lineto(FNX(x),FNY(y));
26.}
27.}
28.
29./*花*/
30.void hua(int x,int y)
31.{
32.register i;
33./*画粉红色玫瑰*/
34.setcolor(12);
35.arc(x+65,y-60,150,350,8);
36.arc(x+66,y-54,300,470,8);
37.arc(x+65,y-56,30,230,10);
38.arc(x+64,y-57,300,490,17);
39.ellipse(x+73,y-30,250,450,27,40);
40.ellipse(x+59,y-30,100,290,27,40);
41.ellipse(x+65,y-40,140,270,20,30);
42.setfillstyle(SOLID_FILL,5);
43.floodfill(x+65,y-20,12);
44./*画红色玫瑰*/
45.arc(x,y,150,350,12);
46.arc(x+1,y+8,280,470,12);
47.arc(x,y+2,30,230,16);
48.arc(x,y+3,80,240,28);
49.arc(x+2,y+8,180,330,22);
50.arc(x-2,y+2,310,460,25);
51.ellipse(x-12,y+30,120,300,30,40);
52.ellipse(x+10,y+28,250,423,30,42);
53.ellipse(x-4,y+10,290,393,30,40);
54.setfillstyle(SOLID_FILL,4);
55.floodfill(x+5,y+31,12);
56./*画紫色花骨朵*/
57.ellipse(x+120,y+5,0,360,15,25);
58.setfillstyle(SOLID_FILL,1);
59.floodfill(x+120,y,12);
60./*画黄色花骨朵*/
61.ellipse(x-70,y+10,0,360,14,20);
62.setfillstyle(SOLID_FILL,14);
63.floodfill(x-70,y+10,12);
64.setcolor(10);
65./*画红花花萼*/
66.ellipse(x-15,y+32,190,310,30,35);
67.ellipse(x+16,y+32,235,355,26,35);
68.ellipse(x,y+35,190,350,43,50);
69.arc(x,y+82,190,350,6);
70.setfillstyle(SOLID_FILL,2);
71.floodfill(x,y+75,10);
72./*画粉花花萼*/
73.ellipse(x+50,y-48,190,320,22,50);
74.ellipse(x+80,y-48,220,350,22,50);
75.ellipse(x+65,y-28,180,360,36,50);
76.floodfill(x+65,y+18,10);
77./*画主枝*/
78.for(i=0;i<3;i++ )
79.{
80.ellipse(x-98,y+100+i,255,371,100,80);
81.ellipse(x-20,y+30+i,260,358,140,140);
82.ellipse(x+224,y+20+i,180,218,160,140);
83.}
84./*画侧枝*/
85.ellipse(x+70,y+34,180,233,140,140);
86.ellipse(x,y+40,205,255,100,120);
87.ellipse(x+135,y-30,209,249,72,120);
88.ellipse(x,y+20,263,301,100,120);
89.ellipse(x+85,y-10,278,305,100,120);
90.ellipse(x+100,y-62,282,308,90,120);