2018-02-10@keil與proteus

生日快樂

[(⊙o⊙)…額帮寻!哈哈援制!]昨天晚上好不容易搞好軟件問題【(~ ̄(OO) ̄)ブ】,那不得趁熱打鐵趕緊整一下使自己玩玩货徙,就照書打了代碼花了原理圖左权,成功聽到仿真聲音,不覺有些小激動(dòng)

電路圖

書中代碼區(qū)

#include <reg52.h>
#include<intrins.h>

#define uchar unsigned char
#define uint unsigned int

sbit BEEP=P1^0;         //定義喇叭輸出端口
uchar tick,t1,th;           //定義節(jié)拍和T0初始變量
uchar TABLE[]={         //音符節(jié)拍碼表
    0x82,0x01,0x81,0x94,0x84,0xB4,0xA4,0X04,
    0X82,0X01,0X81,0X94,0X84,0XC4,0XB4,0X04,
    0X82,0X01,0X81,0XF4,0XD4,0XB4,0XA4,0X94,
    0XE2,0X01,0XE1,0XD4,0XB4,0XC4,0XB4,0X04,
    0X82,0X01,0X81,0X94,0X84,0XB4,0XA4,0X04,
    0X82,0X01,0X81,0X94,0X84,0XC4,0XB4,0X04,
    0X82,0X01,0X81,0XF4,0XD4,0XB4,0XA4,0X94,
    0XE2,0X01,0XE1,0XD4,0XB4,0XC4,0XB4,0X04,
    0X00,
};

uchar TABLE1[]={                                                    //音符對應(yīng)的定時(shí)器初始表
    0xfd,0x04,0xfd,0x90,0xfc,0x09,0xfc,0x44,
    0xfc,0xac,0xfb,0x09,0xfb,0x34,0xfb,0x82,
    0xfb,0xc8,0xfe,0x06,0xfe,0x22,0xfe,0x56,
    0xfe,0x85,0xfe,0x9a,0xfe,0xc1,  
};

/********************************T0中斷服務(wù)函數(shù)    *******************************/
timer0() interrupt 1 using 1{
    TL0=t1;TH0=th;  //重裝定時(shí)初值
    BEEP=~BEEP;     //喇叭輸出定時(shí)取反
}
/***************************基本單位延時(shí)函數(shù)*************************/
void delay1(){
    uint i;
    for(i=0;i<20000;i++);
}

/*****************************節(jié)拍延時(shí)函數(shù)**************************/

void delay(tt){

    uchar i;
    for (i=0;i<=tt;i++) delay1();
}

/***********************************主函數(shù)******************************/
void main(){

    uchar t,t1,k=0;
    while(1){
        TMOD=0X01;IE=0X82;          //定義T0工作方式痴颊,開中斷
        while (TABLE[k]!=0){            //判斷節(jié)拍碼是否為結(jié)束碼
            tick=(TABLE[k])&0x0f;   //不是則取節(jié)拍碼
            t=(_crol_(TABLE[k],4))&0x0f;//取音符碼
            if(t!=0){                   //判斷取得的音符碼是否為0
                t1=--t*2+1;             //不是根據(jù)取得的音符碼計(jì)算T0初值
                t=t*2;
                t1=TL0=TABLE1[t1];
                th=TH0=TABLE1[t];
                TR0=1;                  //啟動(dòng)T0
            }
            else TR0=0;                 //取得音符碼為0則停止T0
            delay(tick);                //根據(jù)節(jié)拍碼延時(shí)
            k++;
        }
        TR0=0;                          //取得結(jié)束碼則停止T0
    }
}
最后編輯于
?著作權(quán)歸作者所有,轉(zhuǎn)載或內(nèi)容合作請聯(lián)系作者
  • 序言:七十年代末赏迟,一起剝皮案震驚了整個(gè)濱河市,隨后出現(xiàn)的幾起案子祷舀,更是在濱河造成了極大的恐慌瀑梗,老刑警劉巖烹笔,帶你破解...
    沈念sama閱讀 206,013評論 6 481
  • 序言:濱河連續(xù)發(fā)生了三起死亡事件裳扯,死亡現(xiàn)場離奇詭異抛丽,居然都是意外死亡,警方通過查閱死者的電腦和手機(jī)饰豺,發(fā)現(xiàn)死者居然都...
    沈念sama閱讀 88,205評論 2 382
  • 文/潘曉璐 我一進(jìn)店門亿鲜,熙熙樓的掌柜王于貴愁眉苦臉地迎上來,“玉大人冤吨,你說我怎么就攤上這事蒿柳。” “怎么了漩蟆?”我有些...
    開封第一講書人閱讀 152,370評論 0 342
  • 文/不壞的土叔 我叫張陵垒探,是天一觀的道長。 經(jīng)常有香客問我怠李,道長圾叼,這世上最難降的妖魔是什么? 我笑而不...
    開封第一講書人閱讀 55,168評論 1 278
  • 正文 為了忘掉前任捺癞,我火速辦了婚禮夷蚊,結(jié)果婚禮上,老公的妹妹穿的比我還像新娘髓介。我一直安慰自己惕鼓,他們只是感情好,可當(dāng)我...
    茶點(diǎn)故事閱讀 64,153評論 5 371
  • 文/花漫 我一把揭開白布唐础。 她就那樣靜靜地躺著箱歧,像睡著了一般。 火紅的嫁衣襯著肌膚如雪一膨。 梳的紋絲不亂的頭發(fā)上叫胁,一...
    開封第一講書人閱讀 48,954評論 1 283
  • 那天,我揣著相機(jī)與錄音汞幢,去河邊找鬼驼鹅。 笑死,一個(gè)胖子當(dāng)著我的面吹牛森篷,可吹牛的內(nèi)容都是我干的输钩。 我是一名探鬼主播,決...
    沈念sama閱讀 38,271評論 3 399
  • 文/蒼蘭香墨 我猛地睜開眼仲智,長吁一口氣:“原來是場噩夢啊……” “哼买乃!你這毒婦竟也來了?” 一聲冷哼從身側(cè)響起钓辆,我...
    開封第一講書人閱讀 36,916評論 0 259
  • 序言:老撾萬榮一對情侶失蹤剪验,失蹤者是張志新(化名)和其女友劉穎肴焊,沒想到半個(gè)月后,有當(dāng)?shù)厝嗽跇淞掷锇l(fā)現(xiàn)了一具尸體功戚,經(jīng)...
    沈念sama閱讀 43,382評論 1 300
  • 正文 獨(dú)居荒郊野嶺守林人離奇死亡娶眷,尸身上長有42處帶血的膿包…… 初始之章·張勛 以下內(nèi)容為張勛視角 年9月15日...
    茶點(diǎn)故事閱讀 35,877評論 2 323
  • 正文 我和宋清朗相戀三年,在試婚紗的時(shí)候發(fā)現(xiàn)自己被綠了啸臀。 大學(xué)時(shí)的朋友給我發(fā)了我未婚夫和他白月光在一起吃飯的照片届宠。...
    茶點(diǎn)故事閱讀 37,989評論 1 333
  • 序言:一個(gè)原本活蹦亂跳的男人離奇死亡,死狀恐怖乘粒,靈堂內(nèi)的尸體忽然破棺而出豌注,到底是詐尸還是另有隱情,我是刑警寧澤灯萍,帶...
    沈念sama閱讀 33,624評論 4 322
  • 正文 年R本政府宣布轧铁,位于F島的核電站,受9級特大地震影響旦棉,放射性物質(zhì)發(fā)生泄漏齿风。R本人自食惡果不足惜,卻給世界環(huán)境...
    茶點(diǎn)故事閱讀 39,209評論 3 307
  • 文/蒙蒙 一他爸、第九天 我趴在偏房一處隱蔽的房頂上張望聂宾。 院中可真熱鬧,春花似錦诊笤、人聲如沸系谐。這莊子的主人今日做“春日...
    開封第一講書人閱讀 30,199評論 0 19
  • 文/蒼蘭香墨 我抬頭看了看天上的太陽纪他。三九已至,卻和暖如春晾匠,著一層夾襖步出監(jiān)牢的瞬間茶袒,已是汗流浹背。 一陣腳步聲響...
    開封第一講書人閱讀 31,418評論 1 260
  • 我被黑心中介騙來泰國打工凉馆, 沒想到剛下飛機(jī)就差點(diǎn)兒被人妖公主榨干…… 1. 我叫王不留薪寓,地道東北人。 一個(gè)月前我還...
    沈念sama閱讀 45,401評論 2 352
  • 正文 我出身青樓澜共,卻偏偏與公主長得像向叉,于是被迫代替她去往敵國和親。 傳聞我的和親對象是個(gè)殘疾皇子嗦董,可洞房花燭夜當(dāng)晚...
    茶點(diǎn)故事閱讀 42,700評論 2 345

推薦閱讀更多精彩內(nèi)容