- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
51单片机汇编语言音乐程序
01两只老虎
NEXT BIT 10H ;定义标志位
ORG 0000H
JMP MAIN
ORG 000BH
JMP TONE
ORG 001BH
JMP BEAT
ORG 0100H
MAIN: MOV TMOD,#11H
MOV TH0,R2
MOV TL0,R3
MOV TH1,#3CH
MOV TL1,#0B0H
MOV R4,#00H
MOV DPTR,#TAB
YD: MOV A,R4 ;取音调数据
MOVC A,@A+DPTR
MOV R2,A
XRL A,#00H
JNZ JP ;直接取节拍
INC R4
CALL PD ;判断指针是否溢出
MOV A,R4
MOVC A,@A+DPTR
MOV R3,A
XRL A,#0FFH
JZ JP
MOV A,R2
XRL A,#0FFH
JNZ MAIN
JP: INC R4 ;取节拍数据
CALL PD
MOV A,R4
MOVC A,@A+DPTR
MOV R5,A
SETB EA
SETB ET0
SETB ET1
SETB TR0
SETB TR1
SETB NEXT
JB NEXT,$
INC R4
CALL PD
JMP YD
PD: MOV A,R4
CJNE A,#00H,L1
INC DPH
L1: RET
;音调产生子程序
TONE: CPL P2.0
MOV TH0,R2
MOV TL0,R3
RETI
;节拍产生子程序
BEAT: DJNZ R5,L2
MOV TH1,#3CH
MOV TL1,#0B0H
L3: RETI
L2: CLR TR0
CLR TR1
CLR NEXT
JMP L3
;两只老虎音符表
TAB: DB 0FBH,0F9H,08H,0FCH,066H,08H,0FCH,0C7H,08H,0FBH,0F9H,08H
DB 0FBH,0F9H,08H,0FCH,066H,08H,0FCH,0C7H,08H,0FBH,0F9H,08H
DB 0FCH,0C7H,08H,0FCH,0F3H,08H,0FDH,4AH,10H,0FCH,0C7H,08H
DB 0FCH,0F3H,08H,0FDH,4AH,08H,0FDH,4AH,04H,0FDH,95H,04H
DB 0FDH,4AH,04H,0FCH,0F3H,04H,0FCH,0C7H,08H,0FBH,0F9H,08H
DB 0FDH,4AH,04H,0FDH,95H,04H,0FDH,4AH,04H,0FCH,0F3H,04H
DB 0FCH,0C7H,08H,0FBH,0F9H,08H,0FCH,66H,08H,0FAH,93H,08H
DB 0FBH,0F9H,08H,00H,08H,0FCH,66H,04H,0FAH,93H,08H
DB 0FBH,0F9H,08H,00H,10H,0FFH,0FFH
END
02祝你平安
ORG 0000H
LJMP START
ORG 000BH
INC 20H ;中断服务,中断计数器加1
MOV TH0,#0D8H
MOV TL0,#0EFH ;12M晶振,形成10毫秒中断
RETI
START:
MOV SP,#50H
MOV TH0,#0D8H
MOV TL0,#0EFH
MOV TMOD,#01H
MOV IE,#82H
MUSIC0:
NOP
MOV DPTR,#DAT ;表头地址送DPTR
MOV 20H,#00H ;中断计数器清0
MOV B,#00H ;表序号清0
MUSIC1:
NOP
CLR A
MO
文档评论(0)