C语言特效集锦.docVIP

C语言特效集锦 小第在此抛砖引玉 希望各位踊跃跟贴 把自己的收藏贡献出来 ???本人声明?以下代码从各处网站收集而来??非原传 /*非常漂亮的4-瓣花型图案*/ #includemath.h #includegraphics.h #define?PI?3.14159 #define?D?100 main() {?float?a,e,x1,y1,x2,y2; int?gdriver=VGA,gmode=VGAHI; initgraph(gdriver,gmode,c:\\tc); cleardevice(); setcolor(GREEN);?setbkcolor(0); for(a=0.0;a2*PI;a+=2*PI/720) { e=D*(1+sin(4*a)); x1=320+e*cos(a); x2=320+e*cos(a+PI/5); y1=240+e*sin(a); y2=240+e*sin(a+PI/5); line(x1,y1,x2,y2); } getch(); closegraph();?}  作者： HYPERLINK /?detailaid=6default_tab=1un=jyh527 \t _blank jyh527?? 2007-1-31 16:33 　 HYPERLINK /f?kz=168310962 \l sub#sub 回复此发言 ? 2 回复：C语言特效集锦 /*流星飞逝,用鼠标控制方向*/ #include?DOS.H? #includegraphics.h? #includestdlib.h? #includemath.h? #define?maxcircle?20? main()? {union?REGS?r;? int?dr=DETECT,mode=0;? int?mx,my,mc;? int?i,ds,?color[maxcircle];? double?fx,fy,force=0;? double?s,x[maxcircle],y[maxcircle],rr[maxcircle];? initgraph(dr,mode,c:\\tc);? r.x.ax=0;? int86(0X33,r,r);? r.x.ax=2;? int86(0x33,r,r);? for(i=0;imaxcircle;i++)? {color[i]=random(16)+1;? x[i]=random(640);? y[i]=random(480);? rr[i]=random(5)+1;?}? while(!kbhit())? {?r.x.ax=3;? int86(0x33,r,r);? mx=r.x.cx;? my=r.x.dx;? mc=r.x.bx;? for(i=0;imaxcircle;i++)? {?fx=mx-320;? fy=my-240;? s=sqrt(fx*fx+fy*fy);? if(s!=0)? {?setcolor(0);? ?setfillstyle(1,0);? fillellipse(x[i],y[i],rr[i],rr[i]);? setcolor(color[i]);? setfillstyle(1,color[i]);? ?force=random(50)/(double)10;? x[i]+=fx/s*force;? y[i]+=fy/s*force;? if(x[i]640)x[i]=0;? if(x[i]0)x[i]=640;? if(y[i]480)y[i]=0;? if(y[i]0)y[i]=480;? fillellipse(x[i],y[i],rr[i],rr[i]);?}?}? if(mc==1)? {? cleardevice();? for(i=0;imaxcircle;i++)? {x[i]=random(640);? y[i]=random(480);? rr[i]=random(5)+1;? ?color[i]=random(16)+1;? fillellipse(x[i],y[i],rr[i],rr[i]);? }?}?} }? 作者： HYPERLINK /?detailaid=6default_tab=1un=jyh527 \t _blank jyh527?? 2007-1-31 16:34 　 HYPERLINK /f?kz=168310962 \l sub#sub 回复此发言 ? 3 回复：C语言特效集锦 /*?旋转的立体椭球?*/ #i