标题: 单片机+8255芯片实现简易电子琴程序与Proteus仿真 [打印本页]
作者: 999888555    时间: 2021-10-13 22:54
标题: 单片机+8255芯片实现简易电子琴程序与Proteus仿真
1到7为7个音节，8为送别，在播放音乐时操作按键无效，只有复位或等歌曲放完

仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）



单片机源程序如下:
  1. #include "reg52.h"
  2. #include "absacc.h"
  3. #include<stdio.h>
  4. #include"intrins.h"
  5. sbit CS =P2^7;        //8255片选端口
  6. sbit SPK=P1^0;  //定义音乐输出端口
  7. #define PA XBYTE[0x0000]
  8. #define PB XBYTE[0x0401]
  9. #define PC XBYTE[0x0802]
  10. #define CN XBYTE[0x0C03]
  11. #define RS_CLR PB &= ~(1<<0)                                                
  12. #define RS_SET PB |= (1<<0)
  13. #define RW_CLR PB &= ~(1<<1)
  14. #define RW_SET PB |= (1<<1)
  15. #define EN_CLR PB &= ~(1<<2)
  16. #define EN_SET PB |= (1<<2)
  17. #define DataPort PA
  18. unsigned char state = 0 ;
  19. unsigned char temp,num,updat ;
  20. unsigned table[ ]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};
  21. unsigned char number=0;
  22. unsigned char W=0,T;        //用于选择音乐
  23. unsigned char Timer0_H,Timer0_L,Time;
  24. void DelayMs(unsigned char t);

  26.                                                 //送别 数据表        音谱,高中低音,音长
  27. code unsigned char MUSIC1[174]={        5,2,2,                3,2,1,                5,2,1,                1,3,4,        
  28.                                                                         6,2,2,                1,3,2,                5,2,4,
  29.                                                                         5,2,2,                1,2,1,                2,2,1,                3,2,2,                2,2,1,                1,2,1,
  30.                                                                         2,2,8,
  31.                                                                         5,2,2,                3,2,1,                5,2,1,                1,3,3,                7,2,1,
  32.                                                                         6,2,2,                1,3,2,                5,2,4,
  33.                                                                         5,2,2,                2,2,1,                3,2,1,                4,2,3,                7,1,1,
  34.                                                                         1,2,8,
  35.                                                                         6,2,2,                1,3,2,                1,3,4,
  36.                                                                         7,2,2,                6,2,1,                7,2,1,                1,3,4,
  37.                                                                         6,2,1,                7,2,1,                1,3,1,                6,2,1,                6,2,1,                5,2,1,                3,2,1,                1,2,1,
  38.                                                                         2,2,8,
  39.                                                                         5,2,2,                3,2,1,                5,2,1,                1,3,3,                7,2,1,
  40.                                                                         6,2,2,                1,3,2,                5,2,4,
  41.                                                                         5,2,2,                2,2,1,                3,2,1,                4,2,3,                7,1,1,
  42.                                                                         1,2,8
  43.                                                                 };
  44.                          // 音阶频率表 高八位
  45. code unsigned char FREQH[]={
  46.                                 0xF2,0xF3,0xF5,0xF5,0xF6,0xF7,0xF8,
  47.                                 0xF9,0xF9,0xFA,0xFA,0xFB,0xFB,0xFC,0xFC, //1,2,3,4,5,6,7,8,i
  48.                                 0xFC,0xFD,0xFD,0xFD,0xFD,0xFE,
  49.                                 0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFF,
  50.                                } ;
  51.                          // 音阶频率表 低八位
  52. code unsigned char FREQL[]={
  53.                                  0x42,0xC1,0x17,0xB6,0xD0,0xD1,0xB6,
  54.                                  0x21,0xE1,0x8C,0xD8,0x68,0xE9,0x5B,0x8F, //1,2,3,4,5,6,7,8,i
  55.                                  0xEE,0x44, 0x6B,0xB4,0xF4,0x2D,
  56.                                  0x47,0x77,0xA2,0xB6,0xDA,0xFA,0x16,
  57.                                 };
  58. /*------------------------------------------------
  59.                 节拍延时函数
  60. 各调1/4节拍时间：
  61. 调4/4  125ms
  62. 调2/4  250ms
  63. 调3/4  187ms
  64. ------------------------------------------------*/
  65. void delay(unsigned char t)
  66. {
  67.     unsigned char i;
  68.         for(i=0;i<t;i++)
  69.             DelayMs(250);
  70.     TR0=0;
  71. }
  72. /*------------------------------------------------
  73.                定时器0中断
  74. ------------------------------------------------*/
  75. void TIM0_ISR() interrupt 1
  76. {
  77.         TR0=0;      
  78.         SPK=!SPK;
  79.         TH0=Timer0_H;
  80.         TL0=Timer0_L;
  81.         TR0=1;
  82. }
  83. /*------------------------------------------------
  84.                 歌曲处理函数
  85. ------------------------------------------------*/
  86. void Song()
  87. {
  88.         TH0=Timer0_H;//赋值定时器时间，决定频率
  89.         TL0=Timer0_L;
  90.         TR0=1;       //打开定时器
  91.         delay(Time); //延时所需要的节拍                     
  92. }
  93. //微妙延时函数
  94. void DelayUs2x(unsigned char t)
  95. {   
  96. while(--t);
  97. }
  98. //毫秒延时函数
  99. void DelayMs(unsigned char t)
  100. {

  102. while(t--)
  103. {
  104.      DelayUs2x(245);
  105.          DelayUs2x(245);
  106. }
  107. }
  108. //液晶写指令函数
  109. void LCD_Write_Com(unsigned char com)
  110. {  
  111. DelayMs(5);                //延时5毫秒
  112. RS_CLR;                         //指令数据端口设置为低电平，指令模式
  113. RW_CLR;                         //读写端口设置为写模式
  114. EN_SET;
  115. DataPort= com;                //写数据到液晶数据端口
  116. _nop_();
  117. EN_CLR;                        //EN产生下降沿讲数据写入到液晶中
  118. }
复制代码


全部资料51hei下载地址,注意仿真工程只能用Proteus7.5打开：
基于8255的LCD显示简易电子琴.7z (121.57 KB, 下载次数: 46)





欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1