导航:首页 > 操作系统 > 单片机代码歌

单片机代码歌

发布时间:2023-09-04 12:49:11

单片机蜂鸣器c语言《兰花草》音乐代码

程序名: MCS51U实验板配套程序-歌曲:兰花草
;电路介绍:蜂鸣器接P2.0;实验前要连接J12

;***********************************************************************
OUT BIT P2.0

ORG 0
AJMP START
ORG 0BH
AJMP TIM0
START: MOV TMOD,#1
MOV IE,#10000010B
START0: MOV 30H,#0
NEXT: MOV A,30H
MOV DPTR,#TABLE
MOVC A,@A+DPTR
MOV R2,A
JZ END0
ANL A,#0FH
MOV R5,A
MOV A,R2
SWAP A
ANL A,#0FH
JNZ SING
CLR TR0
AJMP D1
SING: DEC A
MOV 22H,A
RL A
MOV DPTR,#TABLE1
MOVC A,@A+DPTR
MOV TH0,A
MOV 21H,A
MOV A,22H
RL A
INC A
MOVC A,@A+DPTR
MOV TL0,A
MOV 20H,A
SETB TR0
D1: CALL DELAY
INC 30H
AJMP NEXT
END0: CLR TR0
AJMP START0
TIM0: PUSH ACC
PUSH PSW
MOV TL0,20H
MOV TH0,21H
CPL OUT
POP PSW
POP ACC
RETI
DELAY: MOV R7,#2
D2: MOV R4,#125
D3: MOV R3,#248
DJNZ R3,$
DJNZ R4,D3
DJNZ R7,D2
DJNZ R5,DELAY
RET
;====================================
TABLE1: DW 64021,64103,64260,64400
DW 64524,64580,64684,64777
DW 64820,64898,64968,65030
DW 64934
TABLE: ;1
DB 42H,82H,82H,82H,84H,02H,72H
DB 62H,72H,62H,52H,48H
DB 0B2H,0B2H,0B2H,0B2H,0B4H,02H,0A2H
;2
DB 12H,0A2H,0D2H,92H,88H
DB 82H,0B2H,0B2H,0A2H,84H,02H,72H
DB 62H,72H,62H,52H,44H,02H,12H
;3
DB 12H,62H,62H,52H,44H,02H,82H
DB 72H,62H,52H,32H,48H
DB 00H

END

Ⅱ 利用单片机播放音乐存放几首歌

利用单片机播放音乐存放三首歌。可以播放储存的三首歌曲,分别为《挥着翅膀的女孩》、《同一首歌》、《两只蝴蝶》,其他歌曲可以通过参考资料中的软件编码后写入单片机中,按键共有两个,一个是复位按键,按下后直接从第一首歌开始播放。另一个是暂停键,按下后暂停,指示灯点亮。

Ⅲ 单片机蜂鸣器c语言《兰花草》音乐代码

程序名: MCS51U实验板配套程序-歌曲:兰花草
;电路介绍:蜂鸣器接P2.0;实验前要连接J12

;***********************************************************************
OUT BIT P2.0

ORG 0
AJMP START
ORG 0BH
AJMP TIM0
START: MOV TMOD,#1
MOV IE,#10000010B
START0: MOV 30H,#0
NEXT: MOV A,30H
MOV DPTR,#TABLE
MOVC A,@A+DPTR
MOV R2,A
JZ END0
ANL A,#0FH
MOV R5,A
MOV A,R2
SWAP A
ANL A,#0FH
JNZ SING
CLR TR0
AJMP D1
SING: DEC A
MOV 22H,A
RL A
MOV DPTR,#TABLE1
MOVC A,@A+DPTR
MOV TH0,A
MOV 21H,A
MOV A,22H
RL A
INC A
MOVC A,@A+DPTR
MOV TL0,A
MOV 20H,A
SETB TR0
D1: CALL DELAY
INC 30H
AJMP NEXT
END0: CLR TR0
AJMP START0
TIM0: PUSH ACC
PUSH PSW
MOV TL0,20H
MOV TH0,21H
CPL OUT
POP PSW
POP ACC
RETI
DELAY: MOV R7,#2
D2: MOV R4,#125
D3: MOV R3,#248
DJNZ R3,$
DJNZ R4,D3
DJNZ R7,D2
DJNZ R5,DELAY
RET
;====================================
TABLE1: DW 64021,64103,64260,64400
DW 64524,64580,64684,64777
DW 64820,64898,64968,65030
DW 64934
TABLE: ;1
DB 42H,82H,82H,82H,84H,02H,72H
DB 62H,72H,62H,52H,48H
DB 0B2H,0B2H,0B2H,0B2H,0B4H,02H,0A2H
;2
DB 12H,0A2H,0D2H,92H,88H
DB 82H,0B2H,0B2H,0A2H,84H,02H,72H
DB 62H,72H,62H,52H,44H,02H,12H
;3
DB 12H,62H,62H,52H,44H,02H,82H
DB 72H,62H,52H,32H,48H
DB 00H

END

Ⅳ 单片机 音乐程序编写 歌曲《小星星》

只有音乐发声汇编程序,没有加入LED灯,供参考。数据代码已改为小星星发声
;**********************************************
ORG
0000H
SJMP
MAIN
ORG
0BH
AJMP
TIME0
;*************主程序************************
MAIN:
MOV
SP,#60
MOV
TMOD,#01H
;T0定时工作方式
MOV
IE,#82H
;CPU
中断允许,T0中断允许
START0:
MOV
30H,#00H
;TABLE
相对地址指针
NEXT:
MOV
A,30H

MOV
DPTR,#TABLE
;到TABLE处取
简谱码
节拍

MOVC
A,@A+DPTR
MOV
R2,A
;取到的简谱码
节拍码
暂存于R2中
JZ
ENDF
;取到
00
结束
ANL
A,#0FH
;否,取低四位
节拍

MOV
R5,A
;将节拍码存于R5中
MOV
A,R2
;简谱码
节拍

给A
SWAP
A
;高4位

低4位
交换
ANL
A,#0FH
;取简谱

JNZ
SING
;取到的简谱
码不是0,则去发声
CLR
TR0
;取到0
则不发声
SJMP
DLY1
;节拍延时子程序(
随节拍码变化,延时时间不同)
;---------------发声-----------------------
SING:
DEC
A
;取到的简谱码减1
;(简谱码计数值16位数据存储首地址从TABLE1
《相对地址》0处开始放起,所以要减1)
MOV
22H,A
;存入(22H)中
RL
A
;乘2
因为取的数据占两字节(16位)
;所以指针增加量要乘2
MOV
DPTR,#TABLE1
;...........简谱码转换为相应定时器16位计数值.............
MOVC
A,@A+DPTR
;到TABLE1取相应的高字节计数值
MOV
TH0,A
;高字节计数值存入TH0和(21H)中
MOV
21H,A
MOV
A,22H
;减1的简谱码给A
RL
A
;乘2
因为取的数据占两字节(16位)
;所以指针增加量要乘2
INC
A
;A
增加
取下一个字节计数值
;...........简谱码转换为相应定时器16位计数值.............
MOVC
A,@A+DPTR
;到TABLE1取相应的低字节计数值
MOV
TL0,A
;低字节计数值存入TL0和(20H)中
MOV
20H,A
SETB
TR0
;启动T0定时器让喇叭发出不同频率声音
;---------------节拍延时-------------------
DLY1:
ACALL
DELAY
;基本单位时间为1/4拍
187ms
INC
30H
;取下一个简谱码
节拍

SJMP
NEXT
;---------------歌放完结束---------------
ENDF:
CLR
TR0
;关闭T0定时器
AJMP
START0
;反复循环
;****T0中断子程序(用来驱动喇叭发出不同频率声音)**************
TIME0:
PUSH
ACC
PUSH
PSW
MOV
TL0,20H
;重装计数值
MOV
TH0,21H
CPL
P3.7
;驱动发声
POP
PSW
POP
ACC
RETI
;******************节拍延时187ms****************************
DELAY:
MOV
R7,#187
;187ms延时子程序
DLY2:
MOV
R4,#02
DLY3:
MOV
R3,#248
DJNZ
R3,$
DJNZ
R4,DLY3
DJNZ
R7,DLY2
DJNZ
R5,DELAY
RET
;*******音符T值表(用来让定时器发出不同的频率)**DW
表示一个
计数值
占两个字节存储单元***************
TABLE1:
DW
64260,64400,64524,64580,64684
;低音SO
低音LA
低音SI
/中音DO
中音RE
DW
64777,64820,64898,64968,65030
;中音MI
中音FA
中音SO
中音LA
中音SI
DW
65058,65110,65157,65178,65217
;高音DO
高音RE
高音MI
高音FA
高音SO
;*********简谱码
节拍码(高4位简谱码
,低4位节拍码)*************
TABLE:
DB
44H,44H,84H,84H

;
1
1
5
5
DB
094H,094H,88h

;
6
6
5
-
DB
74H,74H,63H,63H;
4
4
3
3
DB
52H,52H,48h
;
2
2
1-
DB
84H,84H,74H,74H
;
5
5
4
4
DB
64H,64H,58h;
3
3
2-
DB
84H,84H,74H,74H
;
5
5
4
4
DB
64H,64H,58h
;
3
3
2-
DB
44H,44H,84H,84H

;
1
1
5
5
DB
094H,094H,88h;
6
6
5
-


DB
74H,74H,63H,63H;
4
4
3
3
DB
52H,52H,48h;
2
2
1-
END
加入了LED灯,水平有限,效果有点不太好
;**********************************************
ORG
0000H
SJMP
MAIN
ORG
0BH
AJMP
TIME0
;*************主程序************************
MAIN:
MOV
SP,#60
MOV
TMOD,#01H
;TO定时工作方式
MOV
IE,#82H
;CPU
中断允许,TO中断允许
START0:
MOV
30H,#00H
;TABLE
相对地址指针
NEXT:
MOV
A,30H

MOV
DPTR,#TABLE
;到TABLE处取
简谱码
节拍

MOVC
A,@A+DPTR
MOV
R2,A
;取到的简谱码
节拍码
暂存于R2中
JZ
ENDF
;取到
00
结束
ANL
A,#0FH
;否,取低四位
节拍

MOV
R5,A
;将节拍码存于R5中
MOV
A,R2
;简谱码
节拍

给A
SWAP
A
;高4位

低4位
交换
ANL
A,#0FH
;取简谱

JNZ
SING
;取到的简谱
码不是0,则去发声
CLR
TR0
;取到0
则不发声
SJMP
DLY1
;节拍延时子程序(
随节拍码变化,延时时间不同)
;---------------发声-----------------------
SING:
DEC
A
;取到的简谱码减1
;(简谱码计数值16位数据存储首地址从TABLE1
《相对地址》0处开始放起,所以要减1)
MOV
22H,A
;存入(22H)中
RL
A
;乘2
因为取的数据占两字节(16位)
;所以指针增加量要乘2
MOV
DPTR,#TABLE1
;...........简谱码转换为相应定时器16位计数值.............
MOVC
A,@A+DPTR
;到TABLE1取相应的高字节计数值
MOV
TH0,A
;高字节计数值存入TH0和(21H)中
MOV
21H,A
MOV
A,22H
;减1的简谱码给A
RL
A
;乘2
因为取的数据占两字节(16位)
;所以指针增加量要乘2
INC
A
;A
增加
取下一个字节计数值
;...........简谱码转换为相应定时器16位计数值.............
MOVC
A,@A+DPTR
;到TABLE1取相应的低字节计数值
MOV
TL0,A
;低字节计数值存入TL0和(20H)中
MOV
20H,A
SETB
TR0
;启动T0定时器让喇叭发出不同频率声音
;---------------节拍延时-------------------
DLY1:
ACALL
DELAY
;基本单位时间为1/4拍
187ms
INC
30H
;取下一个简谱码
节拍

CPL
P1.0
LED灯
闪烁
CPL
P1.1

CPL
P1.2
CPL
P1.3
CPL
P1.4
CPL
P1.5
CPL
P1.6
CPL
P1.7
SJMP
NEXT
;---------------歌放完结束---------------
ENDF:
CLR
TR0
;关闭T0定时器
AJMP
START0
;反复循环
;****T0中断子程序(用来驱动喇叭发出不同频率声音)**************
TIME0:
PUSH
ACC
PUSH
PSW
MOV
TL0,20H
;重装计数值
MOV
TH0,21H
CPL
P3.7
;驱动发声
POP
PSW
POP
ACC
RETI
;******************节拍延时187ms****************************
DELAY:
MOV
R7,#187
;187ms延时子程序
DLY2:
MOV
R4,#02
DLY3:
MOV
R3,#248
DJNZ
R3,$
DJNZ
R4,DLY3
DJNZ
R7,DLY2
DJNZ
R5,DELAY
RET
;*******音符T值表(用来让定时器发出不同的频率)**DW
表示一个
计数值
占两个字节存储单元***************
TABLE1:
DW
64260,64400,64524,64580,64684
;低音SO
低音LA
低音SI
/中音DO
中音RE
DW
64777,64820,64898,64968,65030
;中音MI
中音FA
中音SO
中音LA
中音SI
DW
65058,65110,65157,65178,65217
;高音DO
高音RE
高音MI
高音FA
高音SO
;*********简谱码
节拍码(高位简谱码
,低位节拍码)*************
TABLE:
DB
44H,44H,84H,84H

;
1
1
5
5
DB
094H,094H,88h
;
6
6
5
--表示有节拍
DB
74H,74H,63H,63H
;
4
4
3
3
DB
52H,52H,48h
;
2
2
1-
DB
84H,84H,74H,74H
;
5
5
4
4
DB
64H,64H,58h
;
3
3
2-
DB
84H,84H,74H,74H
;
5
5
4
4
DB
64H,64H,58h
;
3
3
2-
DB
44H,44H,84H,84H

;
1
1
5
5
DB
094H,094H,88h
;
6
6
5
-


DB
74H,74H,63H,63H
;
4
4
3
3
DB
52H,52H,48h
;
2
2
1-
END

Ⅳ 单片机歌曲代码

#include "reg51.h"
#define uint unsigned int
#define uchar unsigned char
uchar * TABLE ;
code uint TABLE1 [15]={64260,64400,64524,64580,
64684,64777,64820,64898,
64968,65030,65058,65110,
65157,65178,65217};
code uchar SONG [ ]={
//1. 迟来的爱
};
code uchar SONG1 [ ]={
//2.两只蝴蝶
};
code uchar SONG3 [ ]={
//4.一个师傅三个徒弟
};

uchar hjsz;
uchar ljsz;
uchar jpm;
uchar yfm;
uchar t0 =0;
uint i=0;
sbit Speaker =P1^0;
uint k;
void Delay1()
{
for ( k=0;k<20000;k++);
}
void Lignt( )
{ uchar t;
for(t=0;t<10;t++)
{
P2=0xff;
Delay1();
P2=0x00;
Delay1();
}
}
void Lignt1( )
{
P2=0xaa;
Delay1();
P2=0x55;
Delay1();
}
void Delay(uchar t0)//延时
{
while(t0--) //决定节拍
Lignt1();
}
void Delay2(uchar w0)//延时
{
while(w0--) //决定节拍
Lignt();
}
void T0Int() interrupt 1//TIMER0
{
TL0 = ljsz;
TH0 = hjsz;
Speaker=!Speaker;
}
void ExtInt0() interrupt 0//INT0
{
if(t0>10)
t0=0;
i=0; // 全局变量,指向歌谱的第1个
switch(t0++)
{
case 0 : TABLE=SONG;break; //选择第1首
case 1 : TABLE=SONG1;break;//选择第2首
case 2 : TABLE=SONG2;break;//选择第3首
case 3 : TABLE=SONG3;break;//选择第4首
case 4 : TABLE=SONG4;break;//选择第5首
case 5 : TABLE=SONG5;break;//选择第6首
case 6 : TABLE=SONG6;break;//选择第7首
case 7 : TABLE=SONG7;break;//选择第8首
case 8 : TABLE=SONG8;break;//选择第9首
case 9 : TABLE=SONG9;break;//选择第10首
}
}
void songsing()//发音程序
{
i=0;
while(TABLE[i])
{
jpm=TABLE[i]&0x0f; //节拍值
yfm=(TABLE[i]>>0x04)&0x0f;//简谱值
if(yfm) //简谱为1,取计数值
{
yfm=yfm-1;
hjsz=(uchar)(TABLE1[yfm]>>0x08);//取计数值高字节
TH0 = hjsz;
ljsz=(uchar)(TABLE1[yfm]); //取计数值低字节
TL0 = ljsz;
TR0 = 1; //启动TIMER0
}
else TR0 = 0; //简谱为0,不发音
Delay(jpm); //节拍延时
i++;
}
}
void main(void)
{
TMOD =0X01;//设TIMER0在MODE1
TCON =0X01;//外部中断INT0,下降沿触发
IE =0x83;//开中断(INT0,TIMER0)
IP =0x00;//设置中断优先级
TABLE=SONG0;
while(1)
{
Lignt( );
songsing();//调用发音程序
TR0 = 0;//停止TIMER0
Delay2(1);
TABLE=SONG0;// 更改歌曲0
songsing();
}
}

Ⅵ 求单片机 音乐播放的c代码

代码的格式,是由编程者设计的,并没有统一的规范。
下面的链接可供参考。
http://hi..com/%d7%f6%b6%f8%c2%db%b5%c0/blog/item/88bfff323ec42ef21b4cff09.html

Ⅶ 怎么用单片机编写音乐程序

单片机比如51系列都有定时器,因此可以利用它来控制扬声器按一定频率发声,以下就是一个例程,用按键的按下和抬起来模拟电子琴的控制程序。

T0H EQU 30H

T0L EQU 31H

ORG 0000H

LJMP MAIN

ORG 000BH

LJMP T0ISR

ORG 0030H

MAIN:

MOV SP,#5FH

MOV TMOD,#01H

SETB ET0

SETB EA

LOOP:

MOV DPTR,#FREQ

MOV A,P2 ;控制高中低音区

MOV R1,#0

ANL A,#03H

JB ACC.0,LOOP01

MOV R1,#14

SJMP LOOP0

LOOP01:

JB ACC.1,LOOP0

MOV R1,#28

LOOP0:

JB P0.0,LOOP1 ;控制音频1234567

MOV A,R1

MOVC A,@A+DPTR

MOV T0H,A

INC DPTR

MOV A,R1

MOVC A,@A+DPTR

MOV T0L,A

LJMP LOOP

LOOP1:

JB P0.1,LOOP2

MOV A,R1

ADD A,#2

MOVC A,@A+DPTR

MOV T0H,A

INC DPTR

MOV A,R1

ADD A,#2

MOVC A,@A+DPTR

MOV T0L,A

LJMP LOOP

LOOP2:

JB P0.2,LOOP3

MOV A,R1

ADD A,#4

MOVC A,@A+DPTR

MOV T0H,A

INC DPTR

MOV A,R1

ADD A,#4

MOVC A,@A+DPTR

MOV T0L,A

LJMP LOOP

LOOP3:

JB P0.3,LOOP4

MOV A,R1

ADD A,#6

MOVC A,@A+DPTR

MOV T0H,A

INC DPTR

MOV A,R1

ADD A,#6

MOVC A,@A+DPTR

MOV T0L,A

LJMP LOOP

LOOP4:

JB P0.4,LOOP5

MOV A,R1

ADD A,#8

MOVC A,@A+DPTR

MOV T0H,A

INC DPTR

MOV A,R1

ADD A,#8

MOVC A,@A+DPTR

MOV T0L,A

LJMP LOOP

LOOP5:

JB P0.5,LOOP6

MOV A,R1

ADD A,#10

MOVC A,@A+DPTR

MOV T0H,A

INC DPTR

MOV A,R1

ADD A,#10

MOVC A,@A+DPTR

MOV T0L,A

LJMP LOOP

LOOP6:

JB P0.6,LOOP7

MOV A,R1

ADD A,#12

MOVC A,@A+DPTR

MOV T0H,A

INC DPTR

MOV A,R1

ADD A,#12

MOVC A,@A+DPTR

MOV T0L,A

LJMP LOOP

LOOP7:

CLR TR0

LJMP LOOP

;-----------------------------

T0ISR:

CLR TR0

MOV TH0,T0H

MOV TL0,T0L

SETB TR0

CPL P3.0

RETI

;-----------------------------

FREQ:

DB 0F2H,03DH ;低音1

DB 0F3H,0BDH ;低音2

DB 0F5H,014H ;低音3

DB 0F5H,0B1H ;低音4

DB 0F6H,0D0H ;低音5

DB 0F7H,0D1H ;低音6

DB 0F8H,0B5H ;低音7


DB 0F9H,01EH ;中音1

DB 0F9H,0DEH ;中音2

DB 0FAH,08AH ;中音3

DB 0FAH,0D8H ;中音4

DB 0FBH,068H ;中音5

DB 0FBH,0E8H ;中音6

DB 0FCH,05AH ;中音7

DB 0FCH,08FH ;高音1

DB 0FCH,0EFH ;高音2

DB 0FDH,045H ;高音3

DB 0FDH,06CH ;高音4

DB 0FDH,0B4H ;高音5

DB 0FDH,0F4H ;高音6

DB 0FEH,029H ;高音7

;-----------------------------

END


阅读全文

与单片机代码歌相关的资料

热点内容
华为云服务器登录密码和账号 浏览:154
中世纪java程序员 浏览:786
什么开发引擎使用python 浏览:176
sh脚本运行命令 浏览:316
广联达加密锁怎么看到期 浏览:172
cad轨迹命令 浏览:979
同事刷到女程序员自媒体视频 浏览:571
校验算法的缺点是什么 浏览:717
PHP商品分类功能实现 浏览:330
php取字符串中间 浏览:432
程序员经常用工具 浏览:837
降服主力指标源码主图 浏览:502
python实用库 浏览:692
电脑默认7个文件夹 浏览:13
新唐单片机安装c51后编译错误 浏览:532
红包源码引流神器 浏览:235
学生初中毕业撕书解压 浏览:748
命令方块刷铜点教学 浏览:691
php邮件订阅系统 浏览:999
柱梁底加密箍间距 浏览:31