




全文预览已结束
下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
#include #include #include #include #include #include #define UP 18432#define DOWN 20480#define ESC 283#define PI 3.1415926#define S 8051void xing(double ox,double oy,double r) double pointx5,pointy5,r1; double pointx15,pointy15; int i,j,k; r1=r*sin(18/180.0)*PI)/cos(36/180.0)*PI); for(i=0;i5;i+) pointxi=ox+r*sin(72/180.0)*PI*i); pointyi=oy-r*cos(72/180.0)*PI*i); for(i=0;i5;i+) pointx1i=ox+sin(72*i+36)/180.0)*PI)*r1; pointy1i=oy-cos(72*i+36)/180.0)*PI)*r1; setcolor(14); for(i=0;i5;i+) line(pointxi,pointyi,pointx1i,pointy1i); line(pointx1i,pointy1i,pointx(i+1)%5,pointy(i+1)%5); setfillstyle(1,14); floodfill(ox,oy,14);void qi1(double tx,double ty) double x; setcolor(4); moveto(tx,ty); for(x=0.0;xPI*5;x+=0.01) lineto(15*x+tx,15*sin(x)/2+ty); moveto(tx,ty+120); for(x=0.0;xPI*5;x+=0.01) lineto(15*x+tx,15*sin(x)/2+ty+120); line(tx,ty,tx,ty+120); line(15*PI*5+tx,15*sin(PI*5)/2+ty,15*PI*5+tx,15*sin(PI*5)/2+ty+120); setfillstyle(1,4); floodfill(tx+10,ty+10,4); setcolor(14); setlinestyle(0,0,3); line(tx,ty,tx,ty+300); xing(tx+40,ty+40.0,25); xing(tx+85.0,ty+20.0,8); xing(tx+90.0,ty+45.0,8); xing(tx+70.0,ty+70.0,8); xing(tx+30.0,ty+80.0,8);void qi2(double tx,double ty) double x; setcolor(4); moveto(tx,ty); for(x=0.0;xPI*5;x+=0.01) lineto(15*x+tx,15*cos(x)/2+ty); moveto(tx,ty+120); for(x=0.0;xPI*5;x+=0.01) lineto(15*x+tx,15*cos(x)/2+ty+120); line(tx,ty,tx,ty+120); line(15*PI*5+tx,15*cos(PI*5)/2+ty,15*PI*5+tx,15*cos(PI*5)/2+ty+120); setfillstyle(1,4); floodfill(tx+10,ty+10,4); setcolor(14); setlinestyle(0,0,3); line(tx,ty,tx,ty+300); xing(tx+40,ty+40.0,25); xing(tx+85.0,ty+20.0,8); xing(tx+90.0,ty+45.0,8); xing(tx+70.0,ty+70.0,8); xing(tx+30.0,ty+80.0,8);void welcome() int maxx,k; maxx=getmaxx(); setcolor(4); setlinestyle(0,1,3); outtextxy(300,100,Fluttering Red Flag); outtextxy(120,180,I LOVE CHINA!); qi1(50,30); settextstyle(1,0,4); setcolor(WHITE); outtextxy(100,250,Class: 计算机科学系 Name:tian); setcolor(WHITE); outtextxy(10,300,press be quikely,press be slowly); setcolor(RED); outtextxy(80,300, UP); outtextxy(390,300, DOWN); getch(); cleardevice();void main() int gdriver=VGA,gmode=VGAMED; int key,x0,y0,x=0,time,dtime=15000,sign; double y=0.0; initgraph(&gdriver,&gmode, ); setbkcolor(3); welcome(); cleardevice(); while(1) x0=random(500); /* 产生随机初始点*/ y0=random(100); time=random(80); if(time%4)sign=1; else sign=-1; for(x=x0;xx0+time;x=x+2*sign) if(xx0-time)break; while(kbhit() key=bioskey(0); switch(key) case UP: dtime=dtime/1.2;break; /* 加快移动速度*/ case DOWN: dtime=dtime*1.2;break; /* 减慢移动速度*/ case S: getch();break; /* 暂停一下*/ case ESC: goto end; /* 停止*/ y=y0-10+50*sin(x*5*PI/180.0); if(x-x0)%4=0)/*显示旗帜一*/ setvisualpage(0); delay(dtime); setactivepage(1); cleardevice(); setcolor(10); outtextxy(120,10,Made by auf 0503 NO.05); qi1(80+x,80+y); setcolor(4); outtextxy(140+x,220+y,I LOVE CHINA!); else /*显示旗帜二*/ setvisualpage(1); delay(dtime); setactivepage(0); clea
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 2026届云南省会泽县茚旺高级中学化学高三第一学期期中联考模拟试题含解析
- 砖厂设备维修合同范本
- 工装培训合同范本
- 工厂兼职住宿合同范本
- 高频所有知识完整课件
- 济宁市2024-2025学年九年级上学期语文月考模拟试卷
- 高铁安检课件培训
- 高血压病人护理
- 高血压对孕妇的影响
- 环卫保洁服务方案
- 肛肠科临床诊疗指南
- 自动化分选装置-洞察及研究
- 第1章 勾股定理 问题解决策略 课件 北师大版数学八年级上册
- 2025年中国白胡椒行业市场运营现状及投资方向研究报告
- 通海翡翠华庭建设项目 水土保持方案报告表
- 2025至2030年中国特种石墨行业市场发展态势及投资机会研判报告
- 小学科学新大象版一年级上册全册教案(2024秋)
- 乡村治理与乡村振兴规划
- T/CCMA 0206-2024混凝土机械液压平衡阀
- 奶茶店分红合同协议书
- 自闭症儿童空间设计
评论
0/150
提交评论