久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 6259|回復: 1
打印 上一主題 下一主題
收起左側

蘭花草音樂播放程序:c51匯編與c51語言對照

[復制鏈接]
跳轉到指定樓層
樓主
ID:71259 發(fā)表于 2014-12-30 23:41 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式
  //     用stc89c52rc單片機和一蜂鳴器制作:
;蘭花草音樂播放程序**************************c51匯編語言
org 00h
jmp start
org 0bh
jmp tim0
start:;JB P3.7,$   ;檢測該口的按鍵是否按下?
      mov tmod,#01h
      mov ie,#82h
start0:mov 30h,#00
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
     jmp 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
     jmp next
  end0:clr tr0
       jmp start0
  tim0:push acc
       push psw
       mov tl0,20h
       MOV th0,21h
       cpl P1.6       ;由該口輸出音頻數(shù)據(jù);可以更改口線
       POP PSW
       pop acc
       reti
  delay:mov r7,#02
    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:db 42h,82h,82h,82h,84h,02h,72h
       db 62h,72h,62h,52h,48h
       db 0b2h,0b2h,0b2h,0b2h,0b4h,02h,0a2h
       db 12h,0a2h,0d2h,92h,88h
       db 82h,0b2h,0b2h,0a2h,84h,02h,72h
       db 62h,72h,62h,52h,44h,02h,12h
       db 12h,62h,62h,52h,44h,02h,82h
       db 72h,62h,52h,32h,48h
       db 00h
       end
*************************************************************************
***************************************c51語言編寫對照
#include"reg52.h"
#define uint unsigned int
#define uchar unsigned char
sbit speaker=P1^0;
uint a;
uint code table1[]={2,2,2,2,4,2,2,
            2,2,2,2,8,
            2,2,2,2,4,2,2,
            2,2,2,2,8,
            2,2,2,2,4,2,2,
            2,2,2,2,4,2,2,
            2,2,2,2,4,2,2,
            2,2,2,2,8 };
uint code table2[]={0x04,0x08,0x08,0x08,0x08,0x02,0x07,
      0x06,0x07,0x06,0x05,0x04,
      0x0b,0x0b,0x0b,0x0b,0x0b,0,0x0a,
      0x01,0x0a,0x0d,0x09,0x08,
      0x08,0x0b,0x0b,0x0a,0x08,0,0x07,
      0x06,0x07,0x06,0x05,0x04,0,0x01,
      0x01,0x06,0x06,0x05,0x04,0,0x08,
      0x07,0x06,0x05,0x03,0x04  };
uchar code table3[]={64021,64103,64260,64400,
         64524,64580,64684,64777,
         64820,64898,64968,65030,
         64934    };
void rhythm(uchar y)
{
TH0=(65536-y)/256;
TL0=(65536-y)%256;
TR0=1;//開啟定時器0
}
void init()
{
TMOD=0x01;
EA=1;
ET0=1;

}
void timer0 ()interrupt 1
{
speaker=1;
}
void delay(uint z,uchar temp)
{
uint x,j,k;
for(x=z;x>=0;x--)
{
  for(j=125;j>0;j--)
  {
   for(k=250;k>0;k--);
   rhythm(temp);
   speaker=0;
  }
}
}
void main()
{
while(1)
{
  init();
  for(a=0;a<60;a++)
  {
   delay(table1[a],table3[table2[a]]);
  }
}

}

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂 踩
回復

使用道具 舉報

沙發(fā)
ID:346807 發(fā)表于 2018-6-12 16:27 | 只看該作者
C語言的程序不行啊
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

手機版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網(wǎng)

快速回復 返回頂部 返回列表
主站蜘蛛池模板: 天天操夜夜操 | 精品久久久久久久久久久 | 黄色片视频网站 | 国产精品区二区三区日本 | 国产亚洲欧美另类一区二区三区 | 91福利在线导航 | 欧美1—12sexvideos | 精品国产乱码久久久久久影片 | 日朝毛片 | 精品国产一区二区三区久久久蜜月 | 综合久久色| 中文字幕亚洲一区 | 国产精品无码专区在线观看 | 国产成人一区二区三区电影 | 亚洲欧美综合精品另类天天更新 | 成人在线精品视频 | 最新av中文字幕 | 男女网站免费观看 | 久久国产精品一区二区三区 | 男人天堂手机在线视频 | 日韩精品一区二区三区视频播放 | 国产精品久久影院 | 精品久久久999 | 精品久久国产 | www.激情.com | 四虎影视一区二区 | 黄色片在线观看网址 | аⅴ资源新版在线天堂 | 国产高清在线观看 | 中文字幕国产视频 | 国产精品久久久久久久久久久免费看 | 99久久久久久99国产精品免 | 欧美自拍网站 | 精国产品一区二区三区四季综 | 亚洲欧美国产精品一区二区 | 毛片综合| 欧美日日 | 国产区第一页 | 国产精品久久久久久久久久免费看 | 美女福利视频一区 | 日日夜夜天天 |