• 大小: 4.01M
    文件类型: .zip
    金币: 2
    下载: 1 次
    发布日期: 2023-10-01
  • 语言: 其他
  • 标签: 其他  

资源简介

单片机音乐代码生成器.zip

资源截图

代码片段和文件信息

/*******************************************/
/* 音乐:两只蝴蝶                          */
/* 设计:科学男孩                          */
/* 日期:2011年春天                        */
/* 博客:http://hi.baidu.com/kexuenanhai   */
/*******************************************/
#include 
#define uchar unsigned char
sbit beepIO=P1^0;
uchar mn; 
uchar code T[49][2]={{00}
{0xF80x8B}{0xF80xF2}{0xF90x5B}{0xF90xB7}{0xFA0x14}{0xFA0x66}{0xFA0xB9}{0xFB0x03}{0xFB0x4A}{0xFB0x8F}{0xFB0xCF}{0xFC0x0B}
{0xFC0x43}{0xFC0x78}{0xFC0xAB}{0xFC0xDB}{0xFD0x08}{0xFD0x33}{0xFD0x5B}{0xFD0x81}{0xFD0xA5}{0xFD0xC7}{0xFD0xE7}{0xFE0x05}
{0xFE0x21}{0xFE0x3C}{0xFE0x55}{0xFE0x6D}{0xFE0x84}{0xFE0x99}{0xFE0xAD}{0xFE0xC0}{0xFE0x02}{0xFE0xE3}{0xFE0xF3}{0xFF0x02}
{0xFF0x10}{0xFF0x1D}{0xFF0x2A}{0xFF0x36}{0xFF0x42}{0xFF0x4C}{0xFF0x56}{0xFF0x60}{0xFF0x69}{0xFF0x71}{0xFF0x79}{0xFF0x81}
};
uchar code music[][2]={{04}
{234}{214}{2316}{234}{214}{234}{214}{1916}{164}{194}{218}{214}{234}{214}{194}{164}{194}{1424}
{234}{214}{2316}{234}{214}{234}{214}{1924}{164}{194}{218}{214}{234}{214}{194}{164}{194}{2124}

{234}{214}{2316}{234}{214}{234}{214}{1916}{164}{194}{218}{214}{234}{214}{194}{164}{194}{1424}
{234}{264}{2616}{264}{284}{264}{2324}{214}{234}{218}{214}{234}{214}{194}{164}{162}{192}{1924}{020}
{264}{264}{284}{314}{304}{304}{284}{234}{214}{214}{2316}{04}{234}{234}{264}{288}{2812}{164}{234}{214}
{2124}{234}{264}{264}{234}{268}{04}{318}{304}{284}{304}{238}{04}{284}{284}{304}{284}{264}{234}{218}{234}{214}{234}{2616}
{0xFF0xFF}};

void delay(uchar p)
{
    uchar ij; 
    for(;p>0;p--)
    for(i=181;i>0;i--)
    for(j=181;j>0;j--);
}

void pause()
{
    uchar ij;
    for(i=150;i>0;i--)
    for(j=150;j>0;j--);
}

void T0_int() interrupt 1
{
 beepIO=!beepIO;
 TH0=T[m][0]; TL0=T[m][1];
}

void main()
{
 uchar i=0; 
 TMOD=0x01;  EA=1; ET0=1; 
 while(1) 
      {
        m=music[i][0];n=music[i][1]; 
           if(m==0x00)
             {TR0=0;delay(n);i++;} 
           else if(m==0xFF)
             {TR0=0;delay(30);i=0;} 
           else if(m==music[i+1][0]) 
             {TR0=1;delay(n);TR0=0;pause();i++;}
           else
             {TR0=1;delay(n);i++;}
      }
}

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2012-08-02 15:11  单片机音乐代码生成器\
     文件      299008  2011-04-24 17:57  单片机音乐代码生成器\51Music.exe
     目录           0  2012-08-02 15:11  单片机音乐代码生成器\示例音乐\
     目录           0  2012-08-02 15:11  单片机音乐代码生成器\示例音乐\两只蝴蝶\
     文件     1984756  2011-04-24 16:24  单片机音乐代码生成器\示例音乐\两只蝴蝶\Last Loaded 两只蝴蝶.DBK
     文件        3635  2011-04-24 17:09  单片机音乐代码生成器\示例音乐\两只蝴蝶\两只蝴蝶
     文件        2553  2011-04-24 17:09  单片机音乐代码生成器\示例音乐\两只蝴蝶\两只蝴蝶.c
     文件     1984756  2011-04-24 17:16  单片机音乐代码生成器\示例音乐\两只蝴蝶\两只蝴蝶.DSN
     文件        1640  2011-04-24 17:09  单片机音乐代码生成器\示例音乐\两只蝴蝶\两只蝴蝶.hex
     文件          33  2011-04-24 17:09  单片机音乐代码生成器\示例音乐\两只蝴蝶\两只蝴蝶.lnp
     文件        4473  2011-04-24 17:09  单片机音乐代码生成器\示例音乐\两只蝴蝶\两只蝴蝶.LST
     文件        4844  2011-04-24 17:09  单片机音乐代码生成器\示例音乐\两只蝴蝶\两只蝴蝶.M51
     文件        4097  2011-04-24 17:09  单片机音乐代码生成器\示例音乐\两只蝴蝶\两只蝴蝶.OBJ
     文件         400  2011-04-24 17:09  单片机音乐代码生成器\示例音乐\两只蝴蝶\两只蝴蝶.plg
     文件         742  2011-04-24 17:51  单片机音乐代码生成器\示例音乐\两只蝴蝶\两只蝴蝶.PWI
     文件       55230  2011-04-24 17:09  单片机音乐代码生成器\示例音乐\两只蝴蝶\两只蝴蝶.uvopt
     文件       13247  2011-04-24 16:48  单片机音乐代码生成器\示例音乐\两只蝴蝶\两只蝴蝶.uvproj
     文件       55234  2011-04-24 16:48  单片机音乐代码生成器\示例音乐\两只蝴蝶\两只蝴蝶_uvopt.bak
     文件       13248  2010-09-19 22:29  单片机音乐代码生成器\示例音乐\两只蝴蝶\两只蝴蝶_uvproj.bak
     目录           0  2012-08-02 15:11  单片机音乐代码生成器\示例音乐\刀剑如梦\
     文件     1984756  2011-04-24 16:24  单片机音乐代码生成器\示例音乐\刀剑如梦\Last Loaded 刀剑如梦.DBK
     文件        3778  2011-04-24 17:06  单片机音乐代码生成器\示例音乐\刀剑如梦\刀剑如梦
     文件        3053  2011-04-24 17:06  单片机音乐代码生成器\示例音乐\刀剑如梦\刀剑如梦.c
     文件     1984756  2011-04-24 17:14  单片机音乐代码生成器\示例音乐\刀剑如梦\刀剑如梦.DSN
     文件        2043  2011-04-24 17:06  单片机音乐代码生成器\示例音乐\刀剑如梦\刀剑如梦.hex
     文件          33  2011-04-24 17:06  单片机音乐代码生成器\示例音乐\刀剑如梦\刀剑如梦.lnp
     文件        5079  2011-04-24 17:06  单片机音乐代码生成器\示例音乐\刀剑如梦\刀剑如梦.LST
     文件        4844  2011-04-24 17:06  单片机音乐代码生成器\示例音乐\刀剑如梦\刀剑如梦.M51
     文件        4240  2011-04-24 17:06  单片机音乐代码生成器\示例音乐\刀剑如梦\刀剑如梦.OBJ
     文件         400  2011-04-24 17:06  单片机音乐代码生成器\示例音乐\刀剑如梦\刀剑如梦.plg
     文件         742  2011-04-24 17:50  单片机音乐代码生成器\示例音乐\刀剑如梦\刀剑如梦.PWI
............此处省略186个文件信息

评论

共有 条评论