C语言动画程序源码(6页).doc
![资源得分’ title=](/images/score_1.gif)
![资源得分’ title=](/images/score_1.gif)
![资源得分’ title=](/images/score_1.gif)
![资源得分’ title=](/images/score_1.gif)
![资源得分’ title=](/images/score_05.gif)
《C语言动画程序源码(6页).doc》由会员分享,可在线阅读,更多相关《C语言动画程序源码(6页).doc(6页珍藏版)》请在淘文阁 - 分享文档赚钱的网站上搜索。
1、-C语言动画程序源码-第 6 页C语言动画程序#include #include #include #include #define pi 3.1415926535 double ca3mm1(double m1,double m2); double ca3fm1(double cosine,double sine); double ca5fm2(double a6m,double a5m,double a4m,double a4f,int shang); double ca6fm2(double a4m ,double a4f,double a5m , double a5f); char i
2、nbox(int x,int y,int x1,int y1); char buf(); main() double m=3.0; double xo=100.0,yo=200.0,a1=30.0,t1=pi; double xc=xo+m*a1,yc=yo; double a2=8.0,a3,a4=25.0,a5=30.0,a6=20.0,a7=35.0; double t2,t3,t4,t5,t6,t7; double xo1=xo+m*150,yo1=yo; double xc1=xo1-m*a1,yc1=yo1; double i,j,k; double l1; double n=11
3、6.1,nt; initscreen(); setfillstyle(SOLID_FILL,DARKGRAY); bar(0,0,640,480); mybutton(10,10,BEGIN,1,0); mybutton(500,10,EXIT,1,0); line(0,69,640,69); mouseinit(); changemousecross(); setmousexy(320,20); mouseshow(); setmousearea(0,0,640,60); do if(inbox(10,10,70,26)&button()=1) mousehide(); mybutton(1
4、0,10,BEGIN,0,0); mouseshow(); mousehold(); mousehide(); mybutton(10,10,BEGIN,1,7); mouseshow(); break; if(inbox(500,10,555,26)&button()=1) mousehide(); mybutton(500,10,EXIT,0,0); mouseshow(); mousehold(); mousehide(); mybutton(500,10,EXIT,1,7); mouseshow(); exit(0); if(buf()=56) for(i=0;i10000;i+) s
5、witch (buf() case 18: mousehide(); mybutton(500,10,EXIT,0,0); mouseshow(); delay(4000); mousehide(); mybutton(500,10,EXIT,1,7); mouseshow(); exit(0); case 48: mousehide(); mybutton(10,10,BEGIN,0,0); mouseshow(); delay(4000); mousehide(); mybutton(10,10,BEGIN,1,7); mouseshow(); goto run; default:brea
6、k; while(1); run: drawjijia(xo,yo,1); drawjijia(xc,yc,1); drawjijia(xo1,yo1,1); drawjijia(xc1,yc1,1); setwritemode(1); do for(i=0;i360.0;i+=1.0) t2=i; a3=ca3mm1(a1*cos(t1)+a2*cos(t2*pi/180.0),a1*sin(t1)+a2*sin(t2*pi/180.0); t3=ca3fm1(a1*cos(t1)+a2*cos(t2*pi/180.0),a1*sin(t1)+a2*sin(t2*pi/180.0); a4=
7、a3; t4=t3; t5=ca5fm2(a6,a5,a4,t4,0); t6=ca6fm2(a4,t4,a5,t5); t7=t6-90.0; l1=xc1-xc-2*m*a7*cos(t7*pi/180); nt=(asin(l1/2/(n/2)*180/pi)-90.0; drawline(xo,yo,a2,t2,m,LIGHTGRAY); drawline(xo+m*a2*cos(t2*pi/180),yo-m*a2*sin(t2*pi/180),a5,t5,m,LIGHTGRAY); drawline(xc,yc,a6,t6,m,LIGHTGRAY); drawline(xc,yc,
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 语言 动画 程序 源码
![提示](https://www.taowenge.com/images/bang_tan.gif)
限制150内