收藏 分销(赏)

C语言课程设计源程序.doc

上传人:pc****0 文档编号:7779710 上传时间:2025-01-16 格式:DOC 页数:3 大小:31KB 下载积分:10 金币
下载 相关 举报
C语言课程设计源程序.doc_第1页
第1页 / 共3页
C语言课程设计源程序.doc_第2页
第2页 / 共3页


点击查看更多>>
资源描述
#include <graphics.h> #include <stdio.h> #include <math.h> #include <dos.h> #include <bios.h> void my_delay(int clicks) { unsigned int far *clock=(unsigned int far *)0x0000046CL; unsigned int now; now=*clock; while(abs(*clock-now)<clicks){} } wenzixianshi() { int x,y,i; char ch[2]; char str[]="1234567qwertyuasdfghj"; x=100; settextstyle(0,0,2); outtextxy(90,100,"Please use A-U to make sound"); settextstyle(0,0,1); outtextxy(120,320,"Press ESC to exit."); setcolor(RED); for(i=0;i<21;i++) { ch[0]=str[i]; ch[1]=0; outtextxy(x+5,160,ch); x+=20; } return(0); } donghua() { int i,j,x,stepx=100,stepy=180; char ch,str[2]; unsigned int fre; wenzixianshi(); while(1){ setcolor(BLUE); for(i=0;i<21;i++) { rectangle(stepx+i*20,stepy+0,stepx+i*20+20,stepy+100); } ch=bioskey(0); if(ch==27) break; /*frq[3][7]={262,294,330,349,392,440,494, 524,587,659,698,784,880,988, 1024,1174,1318,1396,1568,1760,1976}; */ switch(ch) { case'1':i=0;j=262;break; case'2':i=1;j=294;break; case'3':i=2;j=330;break; case'4':i=3;j=349;break; case'5':i=4;j=392;break; case'6':i=5;j=440;break; case'7':i=6;j=494;break; case'q':i=7;j=524;break; case'w':i=8;j=587;break; case'e':i=9;j=659;break; case'r':i=10;j=698;break; case't':i=11;j=784;break; case'y':i=12;j=880;break; case'u':i=13;j=988;break; case'a':i=14;j=1024;break; case's':i=15;j=1174;break; case'd':i=16;j=1318;break; case'f':i=17;j=1396;break; case'g':i=18;j=1568;break; case'h':i=19;j=1760;break; case'j':i=20;j=1976;break; default :continue; } setfillstyle(1,15); bar(stepx+i*20,stepy+0,stepx+i*20+20,stepy+100); sound(j); my_delay(3); nosound(); setfillstyle(1,0); bar(stepx+i*20,stepy+0,stepx+i*20+20,stepy+100); } return(0); } main() { int mode; int driver=DETECT; initgraph(&driver,&mode,""); cleardevice(); donghua(); closegraph(); return(0); }
展开阅读全文

开通  VIP会员、SVIP会员  优惠大
下载10份以上建议开通VIP会员
下载20份以上建议开通SVIP会员


开通VIP      成为共赢上传

当前位置:首页 > 百科休闲 > 其他

移动网页_全站_页脚广告1

关于我们      便捷服务       自信AI       AI导航        抽奖活动

©2010-2026 宁波自信网络信息技术有限公司  版权所有

客服电话:0574-28810668  投诉电话:18658249818

gongan.png浙公网安备33021202000488号   

icp.png浙ICP备2021020529号-1  |  浙B2-20240490  

关注我们 :微信公众号    抖音    微博    LOFTER 

客服