问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

C语言播放器

发布网友 发布时间:2024-10-07 04:45

我来回答

1个回答

热心网友 时间:2024-11-01 17:22

声明一下,纯属抄袭,并非原创,善用百度
#include <dos.h>
#include <stdio.h>
#include <stdlib.h>
#include <malloc.h>
#include <string.h>
#include <conio.h>
void main()
{
void set(int *set1,int *set2,char *f,char *n,int *t,int rate,int num);
void music(int *set1,int *set2,int num);
int flag=0;
FILE *f1;
int t;
int rate;
char in[3];
int i;
int n;
char *frequency;
char *note;
int *time;
int *set1;
int *set2;
int menu;
int FileName[30];
while(1)
{
f1=NULL;
flag=0;
frequency=NULL;
note=NULL;
time=NULL;
set1=NULL;
set2=NULL;
i=n=0;
printf("1 播放程序自带的音乐music1\n");
printf("2 播放程序自带的音乐music2\n");
printf("3 通过输入文件名进行音乐的播放\n");
printf("4 退出\n");

while(1)
{
scanf("%d",&menu);
if(menu==1)
{
strcpy(FileName,"music1.txt");
break;
}
if(menu==2)
{
strcpy(FileName,"music2.txt");
break;
}
if(menu==3)
{
scanf("%s",FileName);
break;
}
if(menu==4)
exit(1);

}
printf("\n该文件的音乐编码如下:\n");

/*-------------------------------------*/
if((f1=fopen(FileName,"r"))==NULL)
{
printf("不能打开文件!\n");
exit(1);
}
/*-------------------------------------*/

fscanf(f1,"%d",&rate);

frequency=(char *)malloc(sizeof(char));

note=(char *)malloc(sizeof(char));

time=(int *)malloc(sizeof(int));

while(!feof(f1)&&flag!=1)
{
fscanf(f1,"%s%d",in,&t);
if(t!=-1)
{
printf("%s %d ",in,t);
frequency[i]=in[0];
note[i]=in[1];
time[i]=t;
i++;
n++;
frequency=(char *)realloc(frequency,(i+1)*sizeof(char));
note=(char *)realloc(note,(i+1)*sizeof(char));
time=(int *)realloc(time,(i+1)*sizeof(int));
}
else
flag=1;
}
fclose(f1);

for(i=0;i<n;i++)
{
switch(frequency[i])
{

case 'h':
switch(note[i])
{
case '1':
note[i]=523;
time[i]=time[i]*rate;
break;
case '2':
note[i]=587;
time[i]=time[i]*rate;
break;
case '3':
note[i]=659;
time[i]=time[i]*rate;
break;
case '4':
note[i]=698;
time[i]=time[i]*rate;
break;
case '5':
note[i]=784;
time[i]=time[i]*rate;
break;
case '6':
note[i]=880;
time[i]=time[i]*rate;
break;
case '7':
note[i]=988;
time[i]=time[i]*rate;
break;
}
break;
case 'm':
switch(note[i])
{
case '1':
note[i]=262;
time[i]=time[i]*rate;
break;
case '2':
note[i]=296;
time[i]=time[i]*rate;
break;
case '3':
note[i]=330;
time[i]=time[i]*rate;
break;
case '4':
note[i]=349;
time[i]=time[i]*rate;
break;
case '5':
note[i]=392;
time[i]=time[i]*rate;
break;
case '6':
note[i]=440;
time[i]=time[i]*rate;
break;
case '7':
note[i]=494;
time[i]=time[i]*rate;
break;
}
break;
case 'l':
switch(note[i])
{
case '1':
note[i]=131;
time[i]=time[i]*rate;
break;
case '2':
note[i]=147;
time[i]=time[i]*rate;
break;
case '3':
note[i]=165;
time[i]=time[i]*rate;
break;
case '4':
note[i]=175;
time[i]=time[i]*rate;
break;
case '5':
note[i]=196;
time[i]=time[i]*rate;
break;
case '6':
note[i]=220;
time[i]=time[i]*rate;
break;
case '7':
note[i]=247;
time[i]=time[i]*rate;
break;
}
break;

}
for(i=0;i<n;i++)
{
sound(note[i]);
delay(time[i]);
nosound();
}

free(frequency);
free(note);
free(time);
free(set1);
free(set2);
putchar('\n');
}

}

}
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
临沂比较有名的男装品牌 呼伦贝尔市悦动网络科技有限公司怎么样? 呼伦贝尔中汇实业有限公司怎么样? 呼伦贝尔油玉不绝电子商务有限公司怎么样? 如何避免wps卡顿? 属鼠的男人找对象是属什么,属鼠的人和什么属相合 96年鼠的姻缘在哪年 属相相合年份运势提升 2024属鼠找对象属什么最佳 黑客攻击网站能报案吗 黑客攻击报案有用吗 ...MP4或者MP5,全触屏的,300以下。最好分辨率和音质高点。谢谢!_百度... coreldraw中字体用不了的解决办法? 去清远宝晶宫国际旅游度假区打卡,有哪些推荐的线路? 明日之后邮箱在哪里 教你顺利找到邮箱 有好的古董如何卖出去呢? 谁有冀教版初三英语单词表 急!!! 清远宝晶宫国际旅游度假区应该如何游览? 启动u盘用那一种牌子的u盘稳定 “学习型组织”理论的九个特点 明日之后邮箱怎么破解介绍_明日之后邮箱怎么破解是什么 安卓手机root时卸载那个软件就不能安装软件 《华豫之门》海选什么时侯有 “大同公交APP”上线新功能 实时显示车厢满载程度-公交资讯 我手机root后卸载过系统软件,现在想更新系统更不了,有什么办法? 电脑间歇性卡,重新安装了系统依然有问题,用软件检测硬盘,有如图警告提 ... 联想s658t手机,我用root权限将乐安全卸载了之后,现在怎么装不上去了 看电影买MP4好还是MP5好?各位给推荐个价格在300元以下的不错的机子... 每月200-300元做基金定投,不知道选哪个好,请教老师 古玩鉴定有免费的吗? 想买一台MP4\MP5,价格300元左右,触摸+按键(触摸不一定要非常灵敏,但... 求推荐300元以内的MP5,要屏幕大点,分辨率稍微高点 耐用质量好。 4技能牛头,SE,高反,夜战,高鬼魂,攻资1197,防1300+,速1100+,体4000+,成... 如何参加4月3日在廊坊新华街125号古玩城的海选活动? 去张家川回族自治县旅行时你拍到过什么绝美的风景照? 什么品牌的U盘可量产也可用做启动盘 梦幻西游69SE牛头马面要多少钱? 梦幻西游SE牛头 清远宝晶宫景点介绍 梦幻的SE牛头马面问题 看看这牛头 电脑间歇性卡,重新安装了系统依然有问题,用软件检测硬盘,有如图警告提 ... 这只垃圾SE牛头能秒吗 梦幻西游,好的善恶牛头马面各方面数据大约是多少?要花多少钱,梦幻币... 想在建行每月定投200,定投20年,希望高手能指点 求一部小时候的动画电影 一开始的序幕是有很多奇怪的礼物一个企鹅打开里... 原来看过的一个电影 人物和场景什么的都是橡皮泥类似的东西 内容是 App设计理念有哪些? 2017年10月24日保定天气 ...剧情是 有个像橡皮泥一样的东西贴到一个小男孩的脸 跑商时从长安到长寿最近的路线是哪一条?拜托各位大神