單片機(jī)+8255芯片實現(xiàn)簡易電子琴程序與Proteus仿真

ID:971484 · 發(fā)表于 2021-10-13 22:54

1到7為7個音節(jié)，8為送別，在播放音樂時操作按鍵無效，只有復(fù)位或等歌曲放完

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

單片機(jī)源程序如下:

#include "reg52.h"
#include "absacc.h"
#include<stdio.h>
#include"intrins.h"
sbit CS =P2^7; //8255片選端口
sbit SPK=P1^0; //定義音樂輸出端口
#define PA XBYTE[0x0000]
#define PB XBYTE[0x0401]
#define PC XBYTE[0x0802]
#define CN XBYTE[0x0C03]
#define RS_CLR PB &= ~(1<<0)
#define RS_SET PB |= (1<<0)
#define RW_CLR PB &= ~(1<<1)
#define RW_SET PB |= (1<<1)
#define EN_CLR PB &= ~(1<<2)
#define EN_SET PB |= (1<<2)
#define DataPort PA
unsigned char state = 0 ;
unsigned char temp,num,updat ;
unsigned table[ ]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};
unsigned char number=0;
unsigned char W=0,T; //用于選擇音樂
unsigned char Timer0_H,Timer0_L,Time;
void DelayMs(unsigned char t);
//送別數(shù)據(jù)表音譜,高中低音,音長
code unsigned char MUSIC1[174]={ 5,2,2, 3,2,1, 5,2,1, 1,3,4,
6,2,2, 1,3,2, 5,2,4,
5,2,2, 1,2,1, 2,2,1, 3,2,2, 2,2,1, 1,2,1,
2,2,8,
5,2,2, 3,2,1, 5,2,1, 1,3,3, 7,2,1,
6,2,2, 1,3,2, 5,2,4,
5,2,2, 2,2,1, 3,2,1, 4,2,3, 7,1,1,
1,2,8,
6,2,2, 1,3,2, 1,3,4,
7,2,2, 6,2,1, 7,2,1, 1,3,4,
6,2,1, 7,2,1, 1,3,1, 6,2,1, 6,2,1, 5,2,1, 3,2,1, 1,2,1,
2,2,8,
5,2,2, 3,2,1, 5,2,1, 1,3,3, 7,2,1,
6,2,2, 1,3,2, 5,2,4,
5,2,2, 2,2,1, 3,2,1, 4,2,3, 7,1,1,
1,2,8
};
// 音階頻率表高八位
code unsigned char FREQH[]={
0xF2,0xF3,0xF5,0xF5,0xF6,0xF7,0xF8,
0xF9,0xF9,0xFA,0xFA,0xFB,0xFB,0xFC,0xFC, //1,2,3,4,5,6,7,8,i
0xFC,0xFD,0xFD,0xFD,0xFD,0xFE,
0xFE,0xFE,0xFE,0xFE,0xFE,0xFE,0xFF,
} ;
// 音階頻率表低八位
code unsigned char FREQL[]={
0x42,0xC1,0x17,0xB6,0xD0,0xD1,0xB6,
0x21,0xE1,0x8C,0xD8,0x68,0xE9,0x5B,0x8F, //1,2,3,4,5,6,7,8,i
0xEE,0x44, 0x6B,0xB4,0xF4,0x2D,
0x47,0x77,0xA2,0xB6,0xDA,0xFA,0x16,
};
/*------------------------------------------------
節(jié)拍延時函數(shù)
各調(diào)1/4節(jié)拍時間：
調(diào)4/4 125ms
調(diào)2/4 250ms
調(diào)3/4 187ms
------------------------------------------------*/
void delay(unsigned char t)
{
unsigned char i;
for(i=0;i<t;i++)
DelayMs(250);
TR0=0;
}
/*------------------------------------------------
定時器0中斷
------------------------------------------------*/
void TIM0_ISR() interrupt 1
{
TR0=0;
SPK=!SPK;
TH0=Timer0_H;
TL0=Timer0_L;
TR0=1;
}
/*------------------------------------------------
歌曲處理函數(shù)
------------------------------------------------*/
void Song()
{
TH0=Timer0_H;//賦值定時器時間，決定頻率
TL0=Timer0_L;
TR0=1; //打開定時器
delay(Time); //延時所需要的節(jié)拍
}
//微妙延時函數(shù)
void DelayUs2x(unsigned char t)
{
while(--t);
}
//毫秒延時函數(shù)
void DelayMs(unsigned char t)
{
while(t--)
{
DelayUs2x(245);
DelayUs2x(245);
}
}
//液晶寫指令函數(shù)
void LCD_Write_Com(unsigned char com)
{
DelayMs(5); //延時5毫秒
RS_CLR; //指令數(shù)據(jù)端口設(shè)置為低電平，指令模式
RW_CLR; //讀寫端口設(shè)置為寫模式
EN_SET;
DataPort= com; //寫數(shù)據(jù)到液晶數(shù)據(jù)端口
_nop_();
EN_CLR; //EN產(chǎn)生下降沿講數(shù)據(jù)寫入到液晶中
}

復(fù)制代碼

全部資料51hei下載地址,注意仿真工程只能用Proteus7.5打開：

基于8255的LCD顯示簡易電子琴.7z (121.57 KB, 下載次數(shù): 46)

帳號		自動登錄	找回密碼
密碼			立即注冊

欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

單片機(jī)+8255芯片實現(xiàn)簡易電子琴程序與Proteus仿真

評分