51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告

51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)實(shí)驗(yàn)內(nèi)容:1)編寫程序讓8只數(shù)碼管初始顯示0,每隔大約1s加1顯示(可以用延時(shí)函數(shù)實(shí)現(xiàn)),到數(shù)碼管顯示9后,再從0開始顯示,如此循環(huán)反復(fù)。2)C語言程序#include<reg52.h>#defineuintunsignedintvoiddisplay();voidnum();inti;unsignedcharcodetable[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e};//共陽極數(shù)碼管0-F編碼表voiddelayms(uint);voidmain(){while(1){51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告全文共9頁，當(dāng)前為第1頁。51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告全文共9頁，當(dāng)前為第1頁。num();display();}}voiddisplay(){P2=0xff;//消隱P0連接段選,P1節(jié)位選P1=0x00;//8個(gè)數(shù)碼管同時(shí)顯示P2=table[i];//數(shù)碼管顯示數(shù)碼0delayms(1000);//延時(shí)5ms}voidnum(){if(i<9)i++;elsei=0;51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告全文共9頁，當(dāng)前為第2頁。51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告全文共9頁，當(dāng)前為第2頁。}voiddelayms(uintx){uinti,j;for(i=0;i<x;i++)for(j=0;j<110;j++);}3)匯編語言:ORG0000HLJMPMAINORG0100H;P2連接段選,P1節(jié)位選MAIN:MOVP1,#00H;所有的數(shù)碼管都顯示MOVR2,#00H;從0開始顯示LOOP:MOVA,R2;為下面的基址加變址寄存器尋址方式做準(zhǔn)備MOVDPTR,#TAB1;把數(shù)組的首地址賦給DPTRMOVCA,@A+DPTR;取數(shù)組中的數(shù)字51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告全文共9頁，當(dāng)前為第3頁。51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告全文共9頁，當(dāng)前為第3頁。MOVP2,A;把取得的值送給P0口顯示ACALLDELAY;延時(shí)一會INCR2;為取下一個(gè)數(shù)加一CJNER2,#10,LOOP;只要數(shù)小于10就繼續(xù)循環(huán)顯示MOVR2,#00H;如果加到10后重新從0開始LJMPLOOP;進(jìn)入循環(huán)函數(shù);******************************************TAB1:DB0C0H,0F9H,0A4H,0B0H,99H;數(shù)組DB92H,82H,0F8H,80H,90HRET;******************************************DELAY:MOVR3,#3;延時(shí)函數(shù)DE1:MOVR4,#0FFHDE2:MOVR5,#0FFHDJNZR5,$DJNZR4,DE2DJNZR3,DE151單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告全文共9頁，當(dāng)前為第4頁。51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告全文共9頁，當(dāng)前為第4頁。RET;*************************************************END(3)編寫程序?qū)W習(xí)數(shù)碼管的動態(tài)顯示,讓8只數(shù)碼管從從左往右顯示1、2、3……8。C語言程序:#include<reg52.h>#defineuintunsignedintunsignedcharcodetable[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0x88,0x83,0xc6,0xa1,0x86,0x8e};//共陽極數(shù)碼管0-F編碼表voiddelayms(uintx);voidzuoyi();voidmain(){inti;while(1){51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告全文共9頁，當(dāng)前為第5頁。51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告全文共9頁，當(dāng)前為第5頁。P1=0xfe;for(i=0;i<8;i++){P2=table[i];delayms(3);zuoyi();}}}voiddelayms(uintx){uinti,j;for(i=0;i<x;i++)for(j=0;j<110;j++);}voidzuoyi(){51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告全文共9頁，當(dāng)前為第6頁。51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告全文共9頁，當(dāng)前為第6頁。inta;a=~P1;a=a<<1;P1=~a;}匯編語言:;數(shù)碼管動態(tài)顯示ORG0000HLJMPMAINORG0100H;P0連接段選,P1節(jié)位選MAIN:MOVR2,#0;從0開始顯示MOVP1,#0FEHLOOP:MOVA,R2MOVDPTR,#TAB1MOVCA,@A+DPTRMOVP2,A51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告全文共9頁，當(dāng)前為第7頁。51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告全文共9頁，當(dāng)前為第7頁。ACALLDELAYINCR2MOVA,P1RLAMOVP1,ACJNER2,#8,LOOPMOVR2,#0AJMPLOOP;******************************************TAB1:DB0C0H,0F9H,0A4H,0B0H,99H;數(shù)組DB92H,82H,0F8H,80H,90HRET;******************************************DELAY:MOVR3,#5H;延時(shí)函數(shù)DE1:MOVR4,#0FFHDJNZR4,$DJNZR3,DE1RET51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告全文共9頁，當(dāng)前為第8頁。51單片機(jī)數(shù)碼管顯示實(shí)驗(yàn)報(bào)告全文共9頁，當(dāng)前為第8頁。思考:(1)改變延時(shí)常數(shù),使發(fā)光二極管閃亮?xí)r間改變。(2)(2)修改程序,使發(fā)光二極管閃亮移位方向改變。答:(1)靜態(tài)顯示過程中改變delayms(uint