C语言实现玫瑰花(国外英文资料)
C语言实现玫瑰花(国外英文资料)
#包括<< DOS。”
#包括<
#包括<
玫瑰花/ * * /
#定义FNX(x)(int)(XO +(X)×1)
根据#定义(Y)(int)(getmaxy() -(哟+(Y)×1))
#定义fnx2(PHI)cos(PHI)*交罪(PHI)学士
#定义fny2(PHI)cos(PHI)* + sin(φ)* B
画旋转的椭圆/ * * /
无效的Elli(int XO，int，int，int哟，B，双θ
{
int i；
双大，C，S，交流，为BC，BS，XF，YF，PHI，X，Y；
θ＝θ* 0.01745
DA = 3 * 0.1745；
C =余弦(θ)；S＝θ(θ)
ac =；
x = fnx2(0)；y = fny2(0)；
moveTo(FNX(X)，根据(Y))；
对于(i = 1；i < 360；i + +)
{
φ=我*大；XF = X * cos(PHI)×0.1；YF = B *罪(PHI)* 0.1；
x = fnx2(PHI)；y = fny2(PHI)；
LineTo(FNX(X)，根据(Y))；
}
}
花/ * * /
空华(int x，int)
{
登记我；
画粉红色玫瑰/ * * /
设置颜色为红色(12)；
弧(x + 65，y8)；
弧(x + 66，y8)；
弧(x + 65，y-56,30230,10)；
弧(x + 64，y17)；
椭圆(x + 73，y27,40)；
椭圆(x + 59，y27,40)；
椭圆(x + 65，y20,30)；
设置填充模式(solid_fill，5)；
画线工具(x + 65，y-20,12)；
画红色玫瑰/ * * /
弧(x，y，150350,12)；
弧(x + 1，y + 8280470,12)；
弧(x，y + 2,30230,16)；
弧(x，y + 3,80240,28)；
弧(x + 2，y + 8180330,22)；
弧(X，Y + 2310460,25)；
椭圆(X-12，Y +30,40)；
椭圆(x + 10，y +30,42)；
椭圆(X-4，Y +30,40)；
设置填充模式(solid_fill，4)；
画线工具(x + 5，y + 31,12)；
画紫色花骨朵/ * * /
椭圆(x + 120，y + 5,0360,15,25)；
设置填充模式(solid_fill，1)；
画线工具(x + 120，y，12)；
画黄色花骨朵/ * * /
椭圆(X70，Y + 10,0360,14,20)；
设置填充模式(solid_fill，14)；
画线工具(X70，Y + 10、12)；
设置颜色为红色(10)；
画红花花萼/ * * /
椭圆(X-15，Y +30,35)；
椭圆(x + 16，y +26,35)；
椭圆(X，Y +43,50)；
弧(x，y +6)；
设置填充模式(solid_fill，2)；
画线工具(X，Y + 75,10)；
画粉花花萼/ * * /
椭圆(x + 50，y22,50)；
椭圆(x + 80，y22,50)；
椭圆(x + 65，y36,50)；
画线工具(x + 65，y + 18、10)；
画主枝/ * * /
对于(i = 0；i < 3；i +)
{
椭圆(x-98，y + 100 +我，255371100,80)；
椭圆(X-20，y + 30 +我，260358140140)；
椭圆(x + 224，y + 20 + i，180218160140)；
}
画侧枝/ * * /
椭圆(x + 70，y + 34180233140140)；
椭圆(x，y＋40205255100120)；
椭圆(x + 135，y72120)；
椭圆(x，y＋20263301100120)；
椭圆(x + 85，y-10278305100120)；
椭圆(x + 100，y-62282，
308,90120).
ellipse (x -, 50 -30120).
ellipse (x + y +52120, 70).
ellipse (x - 60, -52120).
ellipse (x + 79 -52120).
