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和汇编程序
- 热门资源推荐
- 热门放大器推荐
54FCT521ALB
小广播
热门活动
换一批
更多
设计资源 培训 开发板 精华推荐
- 【下载】LAT1439 关于STM32H745的MC SDK电机控制工程问题的解决办法
- 【下载】LAT1444 ADC采样中的阻抗匹配计算方法
- 【下载】LAT1446 TrustZone应用中串口通信的DMA传输失败问题
- 【下载】LAT1450 不断电情况下修改RDP选项并生效的解决方案
- 【下载】LAT1455 分辨OEMiROT的Bash与BAT脚本
- 【下载】LAT1457 Keil工程使用NEAI库的异常问题
最新单片机文章
- 纳芯微联合芯弦推出NS800RT系列实时控制MCU11月20日，纳芯微宣布联合芯弦半导体（ChipSine），推出NS800RT系列实时控制MCU。该系列MCU凭借更加高效、功能更强大的实时控制能力和丰富 ...
- 如何学习基于ARM平台的嵌入式系统一、嵌入式系统的概念着重理解"嵌入"的概念主要从三个方面上来理解 1、从硬件上,将基于CPU的处围器件,整合到CPU芯片内部,比如早期基于X86体 ...
- 有关 jffs2_scan_eraseblock 问题小结总结前面遇到的问题：1 有关类似：mtd->read(0x44 bytes from 0x68cf44) returned ECC errorjffs2_get_inode_nodes(): CRC failed ...
- SPCOMM控件在Delphi7.0串口通信中的应用摘要：利用Delphi开发工业控制系统软件成为越来越多的开发人员的选择，而串口通信是这个过程中必须解决的问题之一。本文在对几种常用串口通 ...
- Delphi环境下利用TComm组件实现串行通信摘要：利用Delphi开发工业控制系统软件成为越来越多的开发人员的选择，而串口通信是这个过程中必须解决的问题之一。本文在对几种常用串口通 ...
- 嵌入式开发实践的柱状图代码
- 嵌入式开发学习（10）<汇编写启动代码之设置栈、调用c语言、开关看门狗和开关iCache>
- 嵌入式开发学习（8）<一步一步点亮LED灯>
- 嵌入式开发学习（6）
更多精选电路图
更多热门文章
更多每日新闻
更多往期活动
- 2009 EEWORLD 年度人物大评选活动评奖揭晓
- 下载赢礼 | 雅特生 PMBus 接口非隔离数字 DC-DC 转换器
- 答题赢礼！ | 如何利用PI Expert 电源设计工具快速搭建PD充电器
- Microchip有奖直播：VectorBlox™ SDK 报名中
- Mentor线上研讨会丨FPGA仿真验证平台ModelSim应用进阶
- 答题有礼|e络盟大讲堂：机器视觉在工业应用环境下的挑战
- 学习 Mentor 白皮书《端到端车辆验证》，涨知识赢好礼！
- 是德科技有奖问答活动之一，A4WP无线充电测试的示波器方案，答题闯关赢好礼！
- 助力EEWorld 19成长计划，赢取精美好礼！
- 西门子EDA直播：多板产品互联规划方案，为破局而来！
11月21日历史上的今天
厂商技术中心
京公网安备 11010802033920号