H EQU 30H
关键字:单片机 电子琴 汇编程序
引用地址:单片机电子琴汇编程序
L EQU 31H
ORG 0000H
SJMP MAIN
ORG 0BH
SJMP INT_T0
ORG 0030H
SJMP MAIN
MAIN: MOV TMOD,#01H
SETB EA
SETB ET0
MOV TH0,#0F9H
MOV TL0,#21H
SETB TR0
MOV R2,#0
LOOP:MOV DPTR,#TAB
MOV A,R2
MOVC A,@A+DPTR
MOV H,A
MOV DPTR,#TAB2
MOV A,R2
MOVC A,@A+DPTR
MOV L,A
CALL DY
INC R2
CJNE R2,#7,LP
MOV R2,#0
LP: SJMP LOOP
DY: MOV R7,#10
D2: MOV R4,#187
D3: MOV R3,#248
DJNZ R3,$
DJNZ R4,D3
DJNZ R7,D2
RET
INT_T0: MOV TH0,H
MOV TL0,L
CPL P0.4
RETI
TAB: DB 0F9H,0F9H,0FAH,0FAH,0FBH,0FBH,0FCH
TAB2: DB 21H,0E1H,8CH,0D8H,68H,0E9H,5BH
END
上一篇:51单片机4位数码管电子钟源程序
下一篇:24C04扩展存储器C和汇编程序
小广播
热门活动
换一批
更多
设计资源 培训 开发板 精华推荐
最新单片机文章
更多精选电路图
更多热门文章
更多每日新闻
更多往期活动
- 2009 EEWORLD 年度人物大评选活动评奖揭晓
- 下载赢礼 | 雅特生 PMBus 接口非隔离数字 DC-DC 转换器
- 答题赢礼! | 如何利用PI Expert 电源设计工具快速搭建PD充电器
- Microchip有奖直播:VectorBlox™ SDK 报名中
- Mentor线上研讨会丨FPGA仿真验证平台ModelSim应用进阶
- 答题有礼|e络盟大讲堂:机器视觉在工业应用环境下的挑战
- 学习 Mentor 白皮书《端到端车辆验证》,涨知识赢好礼!
- 是德科技有奖问答活动之一,A4WP无线充电测试的示波器方案,答题闯关赢好礼!
- 助力EEWorld 19成长计划,赢取精美好礼!
- 西门子EDA直播:多板产品互联规划方案,为破局而来!
11月13日历史上的今天
厂商技术中心