⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 p3.3小喇叭---生日快乐.0.htm

📁 包含大量程序:AD转换类
💻 HTM
字号:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=(0039)http://www.8951.com/test/test/music.htm -->
<HTML><HEAD><TITLE>单片机音乐试验</TITLE><LINK href="P3.3小喇叭---生日快乐.0.files/gpszx.css" 
type=text/css rel=stylesheet><LINK href="../index.files/gpszx.css" type=text/css 
rel=stylesheet>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content="MSHTML 6.00.2900.2523" name=GENERATOR>
<META content=FrontPage.Editor.Document name=ProgId></HEAD>
<BODY>
<DIV align=center>
<CENTER>
<TABLE height=356 cellSpacing=0 cellPadding=0 width=769 bgColor=#66ccff 
borderColorLight=#000000 border=0>
  <TBODY>
  <TR>
    <TD align=middle width=752 bgColor=#ffffff colSpan=5 height=356><FONT 
      font><FONT color=#ff0000>单片机提高</FONT><FONT color=#ff0000><IMG height=11 
      src="P3.3小喇叭---生日快乐.0.files/gif091.gif" width=28 border=0></FONT><FONT 
      color=#454545>WWW.51C51.COM 
      自学单片机的网站:作中国单片机编程技术普及推广第一站!倚天一出宝刀屠龙</FONT></FONT><IMG height=100 
      src="P3.3小喇叭---生日快乐.0.files/titou2.jpg" width=760 border=0> <FONT 
      color=#454545 font><A href="http://www.8951.com/index.htm">返回主页 给我留言</A> 
      <A href="http://www.8951.com/jiaoxue.htm">单片机教学</A> <A 
      href="http://www.8951.com/tigao.htm">单片机提高</A>&nbsp; <A 
      href="http://www.8951.com/pinzhi.htm">品质技术</A> <A 
      href="http://www.8951.com/1000/WANGZHI.HTM">单片机网址</A> <A 
      href="http://www.8951.com/down/down.htm">软件下载</A>&nbsp; <A 
      href="http://www.8951.com/yejin/yejin.htm">学液晶显示</A> <A 
      href="http://www.8951.com/chanpin.htm">产品介绍</A> <A 
      href="http://www.8951.com/10/huikan.htm">如何购买</A></FONT>
      <CENTER></CENTER>
      <P 
      align=left>;P3.3小喇叭---生日快乐。<BR>;***************************************************************************<BR>;* 
      (程序转载请著明出处 ,未声明可适应本站腾龙/isp开发套件/倚天版开发套件&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
      *<BR>;*&nbsp; E-mail:sxj1974@163.com (51c51 test web)&nbsp; 
      51单片机学习网,自学单片机的网站&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
      *<BR>;* Create by :石学军 <A 
      href="http://www.51c51.com/">http://www.51c51.com/</A>&nbsp;&nbsp; 
      www.8951.com 
      更多例程请登陆网站&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
      *<BR>;*************************************************************************** 
      <BR>ORG 0000H<BR>LJMP START<BR>ORG 000BH<BR>INC 20H ;中断服务,中断计数器加1<BR>MOV 
      TH0,#0D8H<BR>MOV TL0,#0EFH ;12M晶振,形成10毫秒中断<BR>RETI<BR>START:&nbsp;<BR>MOV 
      SP,#50H<BR>MOV TH0,#0D8H<BR>MOV TL0,#0EFH<BR>MOV TMOD,#01H<BR>MOV 
      IE,#82H<BR>MUSIC0:<BR>NOP<BR>MOV DPTR,#DAT ;表头地址送DPTR<BR>MOV 20H,#00H 
      ;中断计数器清0<BR>MOV B,#00H ;表序号清0<BR>MUSIC1:<BR>NOP<BR>CLR A<BR>MOVC A,@A+DPTR 
      ;查表取代码<BR>JZ END0 ;是00H,则结束<BR>CJNE A,#0FFH,MUSIC5<BR>LJMP 
      MUSIC3<BR>MUSIC5:<BR>NOP<BR>MOV R6,A<BR>INC DPTR<BR>MOV A,B<BR>MOVC 
      A,@A+DPTR ;取节拍代码送R7<BR>MOV R7,A<BR>SETB TR0 ;启动计数<BR>MUSIC2:<BR>NOP<BR>CPL 
      P3.3<BR>MOV A,R6<BR>MOV R3,A<BR>LCALL DEL<BR>MOV A,R7<BR>CJNE A,20H,MUSIC2 
      ;中断计数器(20H)=R7否?<BR>;不等,则继续循环<BR>MOV 20H,#00H ;等于,则取下一代码<BR>INC DPTR<BR>; 
      INC B<BR>LJMP MUSIC1<BR>MUSIC3:<BR>NOP<BR>CLR TR0 ;休止100毫秒<BR>MOV 
      R2,#0DH<BR>MUSIC4:<BR>NOP<BR>MOV R3,#0FFH<BR>LCALL DEL<BR>DJNZ 
      R2,MUSIC4<BR>INC DPTR<BR>LJMP MUSIC1<BR>END0:<BR>NOP<BR>MOV R2,#64H 
      ;歌曲结束,延时1秒后继续<BR>MUSIC6:<BR>MOV R3,#00H<BR>LCALL DEL<BR>DJNZ 
      R2,MUSIC6<BR>LJMP MUSIC0<BR>DEL:<BR>NOP<BR>DEL3:&nbsp;<BR>MOV 
      R4,#02H<BR>DEL4:&nbsp;<BR>NOP<BR>DJNZ R4,DEL4<BR>NOP<BR>DJNZ 
      R3,DEL3<BR>RET<BR>NOP<BR>DAT:<BR>db 
      26h,20h,20h,20h,20h,20h,26h,10h,20h,10h,20h,80h,26h,20h,30h,20h<BR>db 
      30h,20h,39h,10h,30h,10h,30h,80h,26h,20h,20h,20h,20h,20h,1ch,20h<BR>db 
      20h,80h,2bh,20h,26h,20h,20h,20h,2bh,10h,26h,10h,2bh,80h,26h,20h<BR>db 
      30h,20h,30h,20h,39h,10h,26h,10h,26h,60h,40h,10h,39h,10h,26h,20h<BR>db 
      30h,20h,30h,20h,39h,10h,26h,10h,26h,80h,26h,20h,2bh,10h,2bh,10h<BR>db 
      2bh,20h,30h,10h,39h,10h,26h,10h,2bh,10h,2bh,20h,2bh,40h,40h,20h<BR>db 
      20h,10h,20h,10h,2bh,10h,26h,30h,30h,80h,18h,20h,18h,20h,26h,20h<BR>db 
      20h,20h,20h,40h,26h,20h,2bh,20h,30h,20h,30h,20h,1ch,20h,20h,20h<BR>db 
      20h,80h,1ch,20h,1ch,20h,1ch,20h,30h,20h,30h,60h,39h,10h,30h,10h<BR>db 
      20h,20h,2bh,10h,26h,10h,2bh,10h,26h,10h,26h,10h,2bh,10h,2bh,80h<BR>db 
      18h,20h,18h,20h,26h,20h,20h,20h,20h,60h,26h,10h,2bh,20h,30h,20h<BR>db 
      30h,20h,1ch,20h,20h,20h,20h,80h,26h,20h,30h,10h,30h,10h,30h,20h<BR>db 
      39h,20h,26h,10h,2bh,10h,2bh,20h,2bh,40h,40h,10h,40h,10h,20h,10h<BR>db 
      20h,10h,2bh,10h,26h,30h,30h,80h,00H<BR><BR>END 
<BR><BR></P></TD></TR></TBODY></TABLE></DIV></CENTER></BODY></HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -