


全文预览已结束
下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
美丽的彩色时钟#include#include#include#define CENTERX 320#define CENTERY 175#define CLICK 100#define CLICKDELAY 30#define HEBEEP 10000#define LOWBEEP 500#define BEEPDELAY 200int Mrk_18=-5,-160,5,-160,5,-130,-5,-130, ;int Mrk_28=-5,-160,5,-160,2,-130,-2-130, ;int HourHand8=-3,-100,3,-120,4, 10,-4,10;int MiHand8=-3,-120,3,-120,4, 10,-4,10;int SecHand8=-2,-150,2,-150,3, 10,-3,10;void Click()sound(CLICK);delay(CLICKDELAY);nosound();void HighBeep()sound(HEBEEP);delay(BEEPDELAY);nosound;void LowBeep()sound(LOWBEEP);void DrawPoly(int *data,int angle,int color)int usedata8;float sinang,cosang;int i;sinang=sin(float)angle/180*3.14);cosang=cos(float)angle/180*3.14);for(i=0;i8;i+=2)usedatai =CENTERX+ cosang*datai-sinang*datai+1+.5;usedatai+1=CENTERY+sinang*datai+cosang*datai+1+.5;setfillstyle(SOLID_FILL,color);fillpoly(4,usedata);void DrawClock(struct time *cutime)int ang;float hourrate,minrate,secrate;setbkcolor(BLUE);cleardevice();setcolor(WH99vE);for(ang=0;angti_sec/60;minrate=(float)cutime-ti_min+secrate)/60;hourrate=(float)cutime-ti_hour/12)+minrate)/12;ang=hourrate*360;DrawPoly(HourHand,ang,YELLOW);/*画时针*/ang=minrate*360;DrawPoly(MiHand,ang, GREEN);/*画分针*/ang=secrate*360;DrawPoly(SecHand,ang, RED);/*画秒针*/main()int gdriver=EGA,gmode=EGAHI;int curpage;struct time curtime ,newtime ;initgraph(&gdriver,&gmode,c:tc);setbkcolor(BLUE);cleardevice();gettime(&curtime);curpage=0;DrawClock(&curtime);while(1)if(kbhit()break;gettime(&newtime);if(newtime.ti_sec!=curtime.ti_sec)if(curpage=0)curpage=1;elsecurpage=0;curtime=newtime;setactivepage(curpage);DrawClock(&curtime);setvisualpage(curpage);if(newtime.ti_min=0&newtime.ti_sec=0)HighBeep();elseif(newtime.ti_
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 部编人教版三年级语文下册《习作:身边那些有特点的人》公开课教学课件
- 能否取消拍卖合同协议书
- 物业合同续签申请协议书
- 电力器材回收合同协议书
- 材料被盗调解协议书模板
- 碎石机加工样本合同协议
- 门店客户股东合伙协议书
- 高档小区房屋置换协议书
- 物业旧物回收合同协议书
- 聘用兼职人员协议书范本
- 刨削刀头产品技术要求deyidamei
- 2021-2022年度广东省职业院校学生专业技能大赛信息网络布线赛项规程
- 2024至2030年中国演出行业市场发展监测及投资前景展望报告
- GB/T 2039-2024金属材料单轴拉伸蠕变试验方法
- JBT 5300-2024 工业用阀门材料 选用指南(正式版)
- 2024年苏州历史文化名城建设集团有限公司招聘笔试冲刺题(带答案解析)
- 汽车底盘DFMEA-减震器总成
- (2024年)诊疗规范培训课件
- 2024年广东汕头市投资控股集团有限公司招聘笔试参考题库含答案解析
- 盐城市2022-2023学年七年级下学期数学期末试卷(含答案解析)
- 膝关节退行性变的护理
评论
0/150
提交评论