單片機(jī)實(shí)驗(yàn)報(bào)告

PAGEPAGE16成都理工大學(xué)核技術(shù)與自動(dòng)化工程學(xué)院實(shí)驗(yàn)報(bào)告課程名稱(chēng)：?jiǎn)纹瑱C(jī)原理實(shí)驗(yàn)姓名：學(xué)號(hào)：專(zhuān)業(yè)：機(jī)械_學(xué)期：2010上半學(xué)年任課教師：實(shí)驗(yàn)一：置數(shù)實(shí)驗(yàn)人員：指導(dǎo)老師：實(shí)驗(yàn)地點(diǎn)：6C701實(shí)驗(yàn)時(shí)間：周四晚1：實(shí)驗(yàn)要求：（1）向內(nèi)部RAM區(qū)30h-3fh連續(xù)送入0ffh。（2）向外部RAM區(qū)1000h-100fh連續(xù)送入0ffh。（3）將內(nèi)部ROM的表格送至內(nèi)部RAM區(qū)30h開(kāi)始的連續(xù)單元。2：實(shí)驗(yàn)原理：將要傳送的數(shù)據(jù)裝入累加器中，利用條件控制指令進(jìn)行循環(huán)送數(shù)，直到數(shù)據(jù)送滿16次結(jié)束循環(huán)。由于是向外部RAM區(qū)送數(shù)，除了利用循環(huán)指令外，需注意應(yīng)用到DPTR指針來(lái)進(jìn)行數(shù)據(jù)的中轉(zhuǎn)。首先在ROM區(qū)中定義一個(gè)數(shù)據(jù)表格。再利用循環(huán)指令送數(shù)，由于涉及到ROM區(qū)，因此需注意數(shù)據(jù)必須先通過(guò)MOVC指令利用DPTR指針?biāo)腿肜奂悠鰽中，再進(jìn)行傳送。3：實(shí)驗(yàn)程序設(shè)計(jì)：程序1：mova,#0ffh數(shù)據(jù)送入a中movr0,#30h送入目的地址movr1,#16送入循環(huán)次數(shù)loop:mov@r0,a開(kāi)始送數(shù)incr0r0置增djnzr1,loop至r1=0，停止循環(huán)ajmp$循環(huán)停止，原地等待end程序2：mova,#0ffh送入數(shù)據(jù)movdptr,#1000h送入目標(biāo)地址movr0,#16送入循環(huán)次數(shù)loop:movx@dptr,a開(kāi)始傳送incdptr指針置增1djnzr0,loopr0=0則循環(huán)借宿ajmp$原地等待end程序3：org0000hmain:movr0,#5計(jì)入表格數(shù)據(jù)個(gè)數(shù)movr1,#30h送入目標(biāo)地址movdptr,#table送入表格loop:movca,@a+dptr開(kāi)始傳送表格mov@r1,aclra累加器清0incdptr指針地址置增1incr1目標(biāo)地址置增1djnzr0,loopr0=0則結(jié)束循環(huán)org0100h給表格定義地址table:db50h,51h,52h,53h,54h表格內(nèi)容ajmp$原地等待end4：實(shí)驗(yàn)現(xiàn)象及結(jié)果（1）給內(nèi)部RAM30H開(kāi)始的單元置FFH（2）給外部RAM1000H開(kāi)始的單元置數(shù)FFH（3）向內(nèi)部RAM30H開(kāi)始的單元送入表格實(shí)驗(yàn)2：拆字、拼字實(shí)驗(yàn)人員：指導(dǎo)老師：實(shí)驗(yàn)地點(diǎn)：6C701實(shí)驗(yàn)時(shí)間：周四晚1：實(shí)驗(yàn)要求（1）拆字：將2000h的內(nèi)容拆開(kāi)，高位送入2001h低4位，低位送入2002h低4位，低2001h、2002h高4位均清0。（2）拼字：將2000h、2001h的低4位分別送入2002h高4位和低4位。2：實(shí)驗(yàn)原理（1）拆字：分別屏蔽2000h中內(nèi)容的高位和低位，對(duì)目標(biāo)地址清0，再將屏蔽后的數(shù)分別送入目的地址。（2）拼字：將2000h內(nèi)容屏蔽高位，再呼喚高低位后暫存r2，將2001h內(nèi)容屏蔽高位，再跟r2內(nèi)容相或后送入2002h中。3：實(shí)驗(yàn)程序設(shè)計(jì)：拆字程序：org0000hajmpmainmain:mov2000h,#3ah送3ah到2000hmova,2000hswapa交換高低位anla,#0fh屏蔽高位mov2001h,a送入2001hmova,r0再次送入3ahanla,#0fh屏蔽高位mov2002h,a送入2002hajmp$原地等待end拼字程序：org0000hajmpmainmain:mov2000h,#3Ah送3Ah到2000hmov2001h,#5Bh送5Bh到2001hmova,2000hanla,#0fh屏蔽3Ah高位swapa屏蔽后交換高地位movr2,a結(jié)果暫存r2mova,2001hanla,#0fh屏蔽5Bh高位orla,r2結(jié)果跟r2內(nèi)容相或mov2002h,a相或結(jié)果送入2002hajmp$原地等待end4:實(shí)驗(yàn)現(xiàn)象及結(jié)果：拆字： 拼字：實(shí)驗(yàn)3：數(shù)據(jù)傳送、排序、查找實(shí)驗(yàn)人員：指導(dǎo)老師：實(shí)驗(yàn)地點(diǎn)：6C701實(shí)驗(yàn)時(shí)間：周四晚1：實(shí)驗(yàn)要求：數(shù)據(jù)傳送：在r2、r3中輸入源首址，r4、r5中輸入目的地址，r6、r7中輸入字節(jié)數(shù)，運(yùn)行程序，檢查0000-1fffh中內(nèi)容是否和3000-4fffh內(nèi)容完全一致。排序：在RAM區(qū)50H-5AH中放入不等的數(shù)據(jù)，運(yùn)行所編寫(xiě)的程序后檢查50H-5AH中內(nèi)容是否按從小到大排列。查找相同數(shù)據(jù)個(gè)數(shù)：在2000h-200fh中查出有幾個(gè)字節(jié)是0，把個(gè)數(shù)放入2100h中。2：實(shí)驗(yàn)原理（1）：數(shù)據(jù)傳送：先送低位數(shù)據(jù)，待低位送滿ff次后，自動(dòng)向高位進(jìn)位，如此循環(huán)，待高位送滿1f次后，再次對(duì)低位送滿ff次。此時(shí)則完成了整個(gè)數(shù)據(jù)的傳輸。（2）：排序：利用冒泡排序原理，先對(duì)整串?dāng)?shù)據(jù)進(jìn)行第一輪排序，找出最大數(shù)后（若有N個(gè)數(shù)，則第一輪需排N-1次），再進(jìn)行第二輪排序，直到全部數(shù)據(jù)排完。（3）數(shù)據(jù)查找：將2000h中的數(shù)與0進(jìn)行比較，若為0，則計(jì)數(shù)器加1，直到比較完16次，結(jié)束循環(huán)，再將計(jì)數(shù)器內(nèi)的值送到2100h內(nèi)。3：實(shí)驗(yàn)程序設(shè)計(jì)：數(shù)據(jù)傳送程序：movr2,#00h定義源地址高位movr3,#00h定義源地址低位movr4,#30h定義目的地址高位movr5,#00h定義目的地址低位movr6,01fh定義字節(jié)數(shù)高位movr7,0ffh定義字節(jié)數(shù)低位loop:movdph,r2源地址賦給dptr指針movdpl,r3movxa,@dptr送源地址內(nèi)容到amovdph,r4目的地址賦給dptrmovdpl,r5movx@dptr,a將內(nèi)容送至目的地址incr3源地址低位置增1incr5目的地址低位置增1djnzr7,loop送滿0ff次停止循環(huán)（此時(shí)r7變?yōu)?，高位1f次送完1次）movdph,r2繼續(xù)源地址賦給dptrmovdpl,r3movxa,@dptr送源地址內(nèi)容到amovdph,r4目的地址賦給dptrmovdpl,r5movx@dptr,a送內(nèi)容至目的地址incr2源地址高位置增1incr3源地址低位置增1incr4目的地址高位置增1incr5目的地址低位置增1movr7,#0ffh重新賦0ffh值給r7（以使程序返回時(shí)能順利從loop程序開(kāi)始執(zhí)行）djnzr6,loopr6=0，則停止循環(huán)，ajmp$end（注：其中紅色部分是因?yàn)槊看蔚臀幌蚋呶贿M(jìn)位后，低位會(huì)變?yōu)?，所以需在低位執(zhí)行滿0ff次后，再對(duì)低位執(zhí)行一次，不然最終就只能完成1f00字節(jié)的傳送。）數(shù)據(jù)排序程序：movr2,#04h送入第一輪排序所需次數(shù)（即定義本程序參加排序的數(shù)據(jù)為5個(gè)） movr0,#50h送入存放數(shù)據(jù)的首地址 mov50h,#15h依次向地址賦入數(shù)據(jù) mov51h,#08h mov52h,#26h mov53h,#10h mov54h,#03hloop:movr0,#50hloop1: mov30h,@r0送第一個(gè)數(shù)據(jù)至30h中 incr0取第二個(gè)數(shù) mova,@r0送第二個(gè)數(shù)到31h中 mov31h,a clrc清0借位標(biāo)志 subba,30h用第二個(gè)數(shù)-第一個(gè)數(shù)比較 jncloop2沒(méi)有產(chǎn)生借位（說(shuō)明第二個(gè)數(shù)大于第一個(gè)數(shù)），則跳至loop2 mov@r0,30h有借位，（說(shuō)明第二個(gè)數(shù)小于第一個(gè)數(shù)），則進(jìn)行交換 decr0 mov@r0,31h incr0取下一個(gè)數(shù)進(jìn)行比較loop2: djnzr2,loop1r2=0則進(jìn)行下一輪排序（此時(shí)找出了最大數(shù)） movr2,#04h再送4到r2 decr2確定下一輪排序次數(shù) jnzloopr2≠0則重新跳至loop開(kāi)始執(zhí)行 ajmp$r2=0則原地等待 end程序結(jié)束數(shù)據(jù)查找程序：org0000hajmpmainorg0100hmain:movdptr,#2000h賦dptr地址為2000hmovr2,#10h送入比較次數(shù)16次movr0,#00h送入比較標(biāo)準(zhǔn)“0loop:movxa,@dptr送2000h內(nèi)的值到r1movr1,acjner1,#00h,check若r1≠0則跳至checkincr0r1=0則計(jì)數(shù)器內(nèi)容增1check:incdptr指針指向下一地址decr2比較次數(shù)減1mova,r2jnzloop若比較次數(shù)≠0跳至則返回loopmova,r0比較滿16次則送計(jì)數(shù)器內(nèi)容到amovdptr,#2100hmovx@dptr,a將r0內(nèi)容送至2001hajmp$原地等待end4：實(shí)驗(yàn)現(xiàn)象及結(jié)果：（1）數(shù)據(jù)傳送：源地址內(nèi)容目的地址內(nèi)容（成功進(jìn)行了數(shù)據(jù)的傳送）（2）排序：（正確進(jìn)行了數(shù)據(jù)從小到大的排列）查找數(shù)據(jù)：原始數(shù)據(jù)（表示這16個(gè)單元中只有3個(gè)非0）查找結(jié)果（結(jié)果為0D，表示查找有13個(gè)0），查找準(zhǔn)確實(shí)驗(yàn)4：?jiǎn)纹瑱C(jī)I/O控制實(shí)驗(yàn)人員：指導(dǎo)老師：實(shí)驗(yàn)地點(diǎn)：6C701實(shí)驗(yàn)時(shí)間：周四晚1:實(shí)驗(yàn)要求編寫(xiě)控制程序，用P1口作為控制端口，使D1區(qū)的LED輪流亮。編寫(xiě)控制程序，用P1.0-P1.6口控制LED，P1.7控制LED的亮和滅（按下時(shí)LED亮，再按一下LED熄滅）2：實(shí)驗(yàn)原理在仿真試驗(yàn)儀上LED燈為0時(shí)亮，為1時(shí)滅，故要左邊第一盞燈亮則需使P1口接受代碼為11111110，燈依次往右亮，則代碼依次變化，再分別對(duì)燈亮的盞數(shù)和熄滅次數(shù)通過(guò)循環(huán)進(jìn)行控制，即可達(dá)到控制LED等輪流亮的目的。將P1.7口接至開(kāi)關(guān)處，按下開(kāi)關(guān)，則執(zhí)行程序中的中斷，LED燈按（1）中一樣輪流亮，關(guān)掉開(kāi)關(guān)時(shí)，中斷停止，則程序無(wú)法順利運(yùn)行，代碼無(wú)法送至端口，LED全部處于熄滅狀態(tài)。3：實(shí)驗(yàn)程序設(shè)計(jì)（1）LED燈輪流亮：org0000hajmpmain org001bh定義T1入口地址 ajmpint org0030hmain: setbea開(kāi)總中斷 setbet1開(kāi)T1中斷 setbtr1啟動(dòng)定時(shí)器1 movth1,#3ch置計(jì)數(shù)初值 movtl1,#0b0h movb,#7fh送入7fh movr1,#03h送入循環(huán)次數(shù)3 movr2,#03h movr6,#08h送入循環(huán)次數(shù)8 movr7,#08h ajmp$等待中斷int: mova,r7送人循環(huán)次數(shù)8 jzaa若循環(huán)完則跳至aass: r7≠0則循環(huán)ssmova,b rla 7fh循環(huán)左移 movp1,a變成0feh后送至p1口使最左邊燈亮 movb,a同時(shí)將0feh送回blcallyanshi轉(zhuǎn)至執(zhí)行yanshi djnzr7,ss未循環(huán)滿8次則跳至ss繼續(xù) ajmpnext循環(huán)滿8次則跳至next重新置初值(此時(shí)循環(huán)滿8次后b內(nèi)值又還原為7fh）aa: mova,r1送入循環(huán)次數(shù)3次 jzdawn若r1=0則跳至downdou:r1≠0順序執(zhí)行dou mova,#00h送入00h movp1,a送00h到p1口使8盞燈同時(shí)亮 lcallyanshi轉(zhuǎn)至執(zhí)行yanshi mova,#0ffh送入0ffh movp1,a送0ffh到p1口使8盞燈同時(shí)滅 lcallyanshi轉(zhuǎn)至執(zhí)行yanshidjnzr1,dou如此未執(zhí)行滿3次則跳至dou繼續(xù) ajmpnext執(zhí)行完3次后跳至next重置初值dawn: mova,r6送入循環(huán)次數(shù)8 jzsasar6=0則跳至sasawin:r6≠0z則執(zhí)行win mova,b movp1,a送7fh到p1口（使最右邊燈亮） rra7fh執(zhí)行循環(huán)右移 movb,a右移后送回寄存器b lcallyanshi轉(zhuǎn)至執(zhí)行yanshi djnzr6,win為執(zhí)行滿8次則繼續(xù)win ajmpnext執(zhí)行完8次后跳至next重置初值sasa: mova,r2送入循環(huán)次數(shù)3次 jzloopr2=0則跳至looploop1:否則執(zhí)行l(wèi)oop1 mova,#00h送入00h movp1,a送00h到P1口（使8盞燈同時(shí)亮） lcallyanshi轉(zhuǎn)至執(zhí)行yanshi mova,#0ffh送人0ffh movp1,a送0ffh到p1口（使8盞燈同時(shí)滅） lcallyanshi轉(zhuǎn)至執(zhí)行yanshidjnzr2,loop1如此未循環(huán)滿3次則繼續(xù)loop1loop:循環(huán)滿3次則順序執(zhí)行l(wèi)oopmovb,#7fh要使LED燈一直如此循環(huán)亮，則再次 movr1,#03h送入全部初值 movr2,#03h movr6,#08h movr7,#08hnext:next對(duì)定時(shí)器置計(jì)數(shù)初值 movth1,#3ch movtl1,#0b0h retiyanshi:執(zhí)行延時(shí)1smovtmod,#01h置t0工作方式1 movth0,#3ch置計(jì)數(shù)初值 movtl0,#0b0h movr0,#20中斷次數(shù)（每次是50ms，故1s需20次） setbtr0啟動(dòng)定時(shí)器ns0: jbctf0,ns1查詢(xún)計(jì)數(shù)是否溢出？tf0=1則重置初值 sjmpns0tf0=0（說(shuō)明還未溢出）則繼續(xù)查詢(xún)ns1: movth0,#3ch置計(jì)數(shù)初值 movtl0,#0b0hdjnz r0,ns0未執(zhí)行滿20次則跳至ns0繼續(xù) retend 外部中斷控制LED等亮滅程序： org0000hajmpmain org0013h定義INT1入口地址 ajmpint org0030hmain: setbea開(kāi)總中斷 setbet1開(kāi)T1中斷 setbtr1啟動(dòng)定時(shí)器1 movth1,#3ch置計(jì)數(shù)初值 movtl1,#0b0h movb,#7fh送入7fh movr1,#03h送入循環(huán)次數(shù)3 movr2,#03h movr6,#08h送入循環(huán)次數(shù)8 movr7,#08h ajmp$等待中斷int: mova,r7送人循環(huán)次數(shù)8 jzaa若循環(huán)完則跳至aass: r7≠0則循環(huán)ssmova,b rla 7fh循環(huán)左移 movp1,a變成0feh后送至p1口使最左邊燈亮 movb,a同時(shí)將0feh送回blcallyanshi轉(zhuǎn)至執(zhí)行yanshi djnzr7,ss未循環(huán)滿8次則跳至ss繼續(xù) ajmpnext循環(huán)滿8次則跳至next中斷返回(此時(shí)循環(huán)滿8次后b內(nèi)值又還原為7fh）aa: mova,r1送入循環(huán)次數(shù)3次 jzdawn若r1=0則跳至downdou:r1≠0順序執(zhí)行dou mova,#00h送入00h movp1,a送00h到p1口使8盞燈同時(shí)亮 lcallyanshi轉(zhuǎn)至執(zhí)行yanshi mova,#0ffh送入0ffh movp1,a送0ffh到p1口使8盞燈同時(shí)滅 lcallyanshi轉(zhuǎn)至執(zhí)行yanshidjnzr1,dou如此未執(zhí)行滿3次則跳至dou繼續(xù) ajmpnext執(zhí)行完3次后跳至next中斷返回dawn: mova,r6送入循環(huán)次數(shù)8 jzsasar6=0則跳至sasawin:r6≠0z則執(zhí)行win mova,b movp1,a送7fh到p1口（使最右邊燈亮） rra7fh執(zhí)行循環(huán)右移 movb,a右移后送回寄存器b lcallyanshi轉(zhuǎn)至執(zhí)行yanshi djnzr6,win為執(zhí)行滿8次則繼續(xù)win ajmpnext執(zhí)行完8次后跳至next中斷返回sasa: mova,r2送入循環(huán)次數(shù)3次 jzloopr2=0則跳至looploop1:否則執(zhí)行l(wèi)oop1 mova,#00h送入00h movp1,a送00h到P1口（使8盞燈同時(shí)亮） lcallyanshi轉(zhuǎn)至執(zhí)行yanshi mova,#0ffh送人0ffh movp1,a送0ffh到p1口（使8盞燈同時(shí)滅） lcallyanshi轉(zhuǎn)至執(zhí)行yanshidjnzr2,loop1如此未循環(huán)滿3次則繼續(xù)loop1loop:循環(huán)滿3次則順序執(zhí)行l(wèi)oopmovb,#7fh要使LED燈一直如此循環(huán)亮，則再次 movr1,#03h送入全部初值 movr2,#03h movr6,#08h movr7,#08hnext:中斷返回 retiyanshi:執(zhí)行延時(shí)1smovtmod,#01h置t0工作方式1 movth0,#3ch置計(jì)數(shù)初值 movtl0,#0b0h movr0,#20中斷次數(shù)（每次是50ms，故1s需20次） setbtr0啟動(dòng)定時(shí)器ns0: jbctf0,ns1查詢(xún)計(jì)數(shù)是否溢出？tf0=1則重置初值 sjmpns0tf0=0（說(shuō)明還未溢出）則繼續(xù)查詢(xún)ns1: movth0,#3ch置計(jì)數(shù)初值 movtl0,#0b0hdjnz r0,ns0未執(zhí)行滿20次則跳至ns0繼續(xù) retend 4：實(shí)驗(yàn)現(xiàn)象及結(jié)果試驗(yàn)中，接通后，可觀察到LED燈先由左向右依次亮，時(shí)間間隔為1s,到最右端LED燈亮后，8盞燈先同時(shí)亮，1s后再同時(shí)熄滅，如此循環(huán)三次，接著再?gòu)淖钣疫叺臒糸_(kāi)始向左依次亮，時(shí)間間隔依然為1s，亮到最左邊后，同時(shí)亮，再同時(shí)滅，如此循環(huán)三次，時(shí)間間隔均為1s。再?gòu)淖筮呴_(kāi)始向右亮，如此循環(huán)下去。試驗(yàn)中，接通后，當(dāng)按下INT1接通的開(kāi)關(guān)后，發(fā)現(xiàn)LED燈會(huì)按照（1）中同樣的現(xiàn)象執(zhí)行下去，當(dāng)關(guān)掉開(kāi)關(guān)后，所有燈立即熄滅，再接通開(kāi)關(guān)后，LED燈又會(huì)從左邊最先亮開(kāi)始循環(huán)執(zhí)行。 實(shí)驗(yàn)5：串行口通信實(shí)驗(yàn)實(shí)驗(yàn)人員：指導(dǎo)老師：實(shí)驗(yàn)地點(diǎn)：6C701