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

　數(shù)據(jù)傳送 (RA Ｍ – 〉ＸＲＡ M)

　一、實(shí)驗(yàn)?zāi)康?/p>

　熟悉星研集成環(huán)境軟件或熟悉 Keiｌ Ｃ5１集成環(huán)境軟件得使用方法。

　熟悉 MＣS51 匯編指令,能自己編寫簡(jiǎn)單得程序，掌握數(shù)據(jù)傳輸?shù)梅椒ā?/p>

　二、實(shí)驗(yàn)內(nèi)容

　1、熟悉星研集成環(huán)境軟件或熟悉Ｋｅｉl Ｃ51 集成環(huán)境軟件得安裝與使用方法。

　２、編寫程序，實(shí)現(xiàn)內(nèi)外部數(shù)據(jù)段得傳送、校驗(yàn)。

　三、程序框圖

　開(kāi)始 堆棧指針初始化計(jì)數(shù)器、地址初始化內(nèi)部RAM數(shù)據(jù)傳送外部RAM一次地址指針+1

　 計(jì)數(shù)器-1=0？計(jì)數(shù)器、地址指針復(fù)位取內(nèi)部RAM和對(duì)應(yīng)的外部RAM比較是否相等地址指針+1

　計(jì)數(shù)器-1=0？傳送正確傳送錯(cuò)誤結(jié)束NNYYYN數(shù)據(jù)傳送程序框圖 四、實(shí)驗(yàn)步驟

　MAR 據(jù)數(shù)部外測(cè)檢，序程試調(diào)式方點(diǎn)斷、步單用使;據(jù)數(shù)入輸中ＨF３～ H03 MＡR 部?jī)?nèi)在?得 10０0H ~1０0FH 中得內(nèi)容。熟悉查瞧特殊功能寄存器、內(nèi)部數(shù)據(jù) RＡM、外部數(shù)據(jù)空間得各種方法. 五、程序清單

　；將內(nèi)部ＲAＭ Address1 開(kāi)始得 1６個(gè)字節(jié)送到外部ＲAＭ從 Aｄdress２開(kāi)始得單元里,再作比較。

　Adｄress1 ＤAＴＡ 30H

　Address2 XDATＡ １000H

　 ORＧ 00０0H

　 LJＭP STAＲ

　 OＲG 0100H

　STＡR: MOV SP,#6０H

　 ＭＯV Ｒ0，＃Ａddrｅss1

　 MOV DPTR，＃Addrｅss2

　 MＯV R7,#１0H

　STAＲ1: MOV A,R0 ;傳送

　 ＭOVX DＰTＲ，A

　 IＮC R0

　 IＮC DPTR

　 DJNZ R7,STAR1

　 MOＶ R０,#Adｄreｓs１

　 MＯＶ DPTＲ,#Addｒeｓｓ２

　 ＭOV R7，＃１０H

　STAＲ2: MOV B，Ｒ0 ；比較

　MOＶX A，DPＴR

　 ＣJＮE A，Ｂ，STAR３

　 ＩNC Ｒ0

　 INC ＤPＴＲ

　 DＪNZ R7，STAR2

　 SJMP ＄ ;傳送正確 ＳTAR3: SJＭP $ ;傳送錯(cuò)誤

　ENＤ

　 實(shí)驗(yàn)二

　雙字節(jié) D BCD 碼( ( 十進(jìn)制數(shù)) ) 加法

　一、實(shí)驗(yàn)?zāi)康?/p>

　熟悉５1 匯編指令,學(xué)會(huì)使用星研集成環(huán)境軟件,能自己編寫簡(jiǎn)單得程序,熟悉ＢCD 碼,了解如何調(diào)用系統(tǒng)提供得子程序. 二、實(shí)驗(yàn)內(nèi)容

　從鍵盤上輸入４位被加數(shù)、加數(shù),實(shí)現(xiàn)雙字節(jié) BCD 碼（四位數(shù)）得加法,結(jié)果顯示在數(shù)碼管上；熟悉使用斷點(diǎn)、單步進(jìn)入、單步、運(yùn)行到光標(biāo)處、修改 PC 指針、全速運(yùn)行等各種調(diào)試手段；熟悉查瞧特殊功能寄存器、內(nèi)部數(shù)據(jù)ＲAM、外部數(shù)據(jù)空間得各種方法。

　三、實(shí)驗(yàn)框圖

　開(kāi)始初始化堆棧設(shè)定"先清LED,再接收鍵輸入"標(biāo)志通過(guò)鍵盤獲得4位被加數(shù)(壓縮BCD碼）置位"接收到第一個(gè)鍵后才清除LED"標(biāo)志通過(guò)鍵盤獲得4位加數(shù)(壓縮BCD碼）被加數(shù)與加數(shù)的低位字節(jié)不帶進(jìn)位加法被加數(shù)與加數(shù)的高位字節(jié)帶進(jìn)位加法十進(jìn)制調(diào)整十進(jìn)制調(diào)整壓縮BCD碼(結(jié)果)轉(zhuǎn)換為非壓縮BCD碼高位0消隱顯示結(jié)果雙字節(jié)BCD加法程序框圖

　四、實(shí)驗(yàn)步驟

　、１ ：明說(shuō)線連?D3 區(qū) :ＣLＫ －- B２區(qū):２M D3 區(qū) ：CS -- A3 區(qū):CS5 Ｄ３區(qū) :Ａ0 -— A３區(qū):Ａ０ ２、在 F4 區(qū)得鍵盤上輸入 4 位被加數(shù)、加數(shù) 3、結(jié)果顯示在 F4 區(qū)得數(shù)碼管上 五、程序清單

　EXＴＲN CＯDＥ（Diｓpｌay８， GｅtBCDKｅy)

　 Buffeｒ ＤAＴA 30H ;8 字節(jié)顯示緩沖區(qū) F１ BＩT 0Ｄ１H ;PSW、１

　ORG 00０0Ｈ

　 ＬＪMＰ STAＲT

　 ＯRG 0１00H

　START: MOＶ SP，＃6０Ｈ

　 CLR F1 ;先清除顯示,再接收鍵輸入 ＳTART1: ＭOＶ R0，＃buffeｒ

　 MOV Ａ，#4 ;按鍵次數(shù)

　LCALL GetＢＣDＫeｙ ;得到雙字節(jié)十進(jìn)制數(shù)（被加數(shù))

　SEＴＢ F1 ;接收到第一個(gè)鍵，才清除顯示

　MOV R0,#buffer＋4

　 ＭOV A，#４ ；按鍵次數(shù)

　LCAＬL GｅtＢＣDKｅｙ ;得到雙字節(jié)十進(jìn)制數(shù)（加數(shù))

　 MOV Ａ，bｕfｆer+1

　 AＤＤ A,bｕffｅr+5

　 DA A

　 MＯV ｂuffer+5,A

　 MOV Ａ，buffer

　 AＤＤC A，buｆfer+4

　 ＤA Ａ

　 MＯV ｂｕffeｒ+4，A

　 CＬＲ A

　 ＲLＣ A

　Dｉsplay: PUSH ACC ；顯示結(jié)果

　ＭOＶ R0，#buffeｒ

　 MOＶ A，bｕｆｆｅｒ＋5 ;低位

　ACALL B１toＢ2 ；壓縮 BＣD 碼轉(zhuǎn)換成非壓縮 BCD 碼

　MＯＶ A,ｂｕｆfer＋4 ；高位

　ACALL B1ｔoB２

　 POP ＡＣC ；進(jìn)位

　ACAＬL B1toＢ２

　 MOV R０,#1０H ;最高二位消隱

　INC R0

　 MOV R0,#10H

　 MＯV R0,#bｕfｆeｒ+5

　 MOＶ R7,#5

　 ACALＬ BlaｃkDiｓｐlay ;將高位 0 消隱

　MOV R0,#ｂuｆfer

　 LＣALL Displaｙ8

　 ＳＪMP ＳTART1

　;將一個(gè)字節(jié)壓縮 BＣD 碼轉(zhuǎn)換成二個(gè)字節(jié)非壓縮 BCD 碼 B１ｔｏB2: PUSH ＡCC

　 ANＬ A，＃0FＨ

　 ＭOＶ Ｒ0,A

　 INC R０

　 ＰOP ＡCＣ

　 ANL A,＃0F0H

　 SWAP A

　 MＯV R0,A

　 IＮC Ｒ0

　 REＴ

　 Bla ｃkDisplay: MOV A，R0 ;將高位０消隱

　JNZ Exit

　 ＭOＶ A,#１0H

　 ＭOＶ R0,A

　 ＤEC Ｒ0

　 DJＮＺ R7,BｌacｋDｉｓpｌａy

　Exit: RＥT

　ＥNＤ

　 實(shí)驗(yàn)三

　雙字節(jié) D BCD 碼（十進(jìn)制數(shù)）減法

　一、實(shí)驗(yàn)?zāi)康?/p>

　熟悉５1 匯編指令,學(xué)會(huì)使用星研集成環(huán)境軟件，掌握匯編語(yǔ)言得設(shè)計(jì)與調(diào)試方法.能瞧懂程序流程框圖,能自己設(shè)計(jì)程序，熟悉 BCD 碼、補(bǔ)碼，了解如何調(diào)用系統(tǒng)提供得子程序。

　二、實(shí)驗(yàn)內(nèi)容

　從鍵盤上輸入４位被減數(shù)、減數(shù),實(shí)現(xiàn)雙字節(jié) BCD 碼（四位數(shù))得減法,結(jié)果顯示在數(shù)碼管上；進(jìn)一步熟悉使用斷點(diǎn)、單步進(jìn)入、單步、運(yùn)行到光標(biāo)處、修改 PＣ指針、全速運(yùn)行等各種調(diào)試手段;熟悉查瞧特殊功能寄存器、內(nèi)部數(shù)據(jù) RＡM、外部數(shù)據(jù)空間得各種方法。

　三、程序框圖

　設(shè)定"先清LED,再接收鍵輸入"標(biāo)志堆棧初始化開(kāi)始通過(guò)鍵盤獲得雙字節(jié)十進(jìn)制被減數(shù)(壓縮BCD碼)置位"接收到第一個(gè)鍵后才清除LED"標(biāo)志通過(guò)鍵盤獲得雙字節(jié)十進(jìn)制減數(shù)(壓縮BCD碼)減數(shù)進(jìn)行十進(jìn)制取補(bǔ)雙字節(jié)十進(jìn)制加法操作C=1?C=0,有進(jìn)位(結(jié)果為負(fù)),再執(zhí)行一次求補(bǔ)運(yùn)算,調(diào)整為正數(shù)高位0消隱,若結(jié)果為負(fù),前面加上"-"顯示結(jié)果YN雙字節(jié)十進(jìn)制減法程序框圖

　四、實(shí)驗(yàn)步驟

　、１ :明說(shuō)線連?D3 區(qū) :CＬK —— Ｂ２區(qū):２M

　Ｄ3 區(qū) :CS —— A3 區(qū):CS5 D3 區(qū) :Ａ0 —— A3 區(qū)：A0 2、在 F4 區(qū)得鍵盤上輸入 4 位被減數(shù)、減數(shù) ３、結(jié)果顯示在 F４區(qū)得數(shù)碼管上 五、程序清單

　EXTＲN CODＥ(Ｄｉsplａy8， ＧetBＣDKey)

　 Buｆfer DATA 30H ；8 字節(jié)顯示緩沖區(qū) F1 BIＴ 0D1H ；PSW、1

　ORG 0000Ｈ

　 LJＭP STARＴ

　 ORG 0100H

　START：

　MOV SP,＃6０H

　 CＬR F１ ;先清除顯示,再接收鍵輸入 SＴＡＲＴ1: ＭＯV R0，#buffer

　 MOV A,#4 ;按鍵次數(shù)

　LCALL ＧｅtＢCＤKｅy ;得到雙字節(jié)十進(jìn)制數(shù)(被減數(shù))

　ＳETB Ｆ1 ；接收到第一個(gè)鍵,才清除顯示

　MＯＶ R0，#buffｅｒ+4

　 MOV A，#4 ；按鍵次數(shù)

　LCALL GetBCDＫey ；得到雙字節(jié)十進(jìn)制數(shù)(減數(shù))

　MOV A，＃9AＨ

　 CLR C

　 ＳUBB A,buffeｒ+5

　 MOV buｆｆeｒ+5，Ａ

　 MＯV A,#９９H

　 ＣLR C

　 SUＢB Ａ,buffｅr+4

　 ＭOV bｕffer＋4，A ；減數(shù)取補(bǔ)

　MOV Ａ，bufｆer+1

　 ADＤ A,buffer+5

　 DA Ａ

　 ＭOV bｕｆfｅr+5,A

　 MＯＶ A,buffeｒ

　 ADＤC A,buｆfer＋4

　 DＡ Ａ

　 MＯV buffer＋４，A

　 MOＶ Ｆ０,C ；借位標(biāo)志

　JC Disｐlay

　 ＭOV A,＃９ＡＨ

　 SUＢB A,ｂuffer＋５

　 ＭOV ｂuｆfer+5,A

　 MOＶ A,＃99H

　 ＳUBB A,buffeｒ＋４

　 XＣH Ａ,buffｅr+５

　 ADD Ａ,＃０0H

　 DA A

　 XＣH A,bufｆer+5

　 ＡDDC A,#00H

　 ＤＡ A

　 ＭＯV buffeｒ＋4,A

　Ｄispｌay：

　ＭOV R0,＃bufｆｅr ；顯示結(jié)果

　ＭOV A,ｂｕffeｒ＋5 ;低位

　ACALL B1toB2 ;壓縮ＢCD 碼轉(zhuǎn)換成非壓縮 BCD 碼

　MOＶ A,bｕｆfer+4 ;高位

　ＡCALL B１toB2

　 MOV Ｒ０,#１0H ；最高四位消隱

　IＮC R0

　 MOV R0,＃10H

　 INＣ R0

　 MOV R0，#１0H

　 INC Ｒ０

　 ＭＯＶ R０,#10H

　 MＯV Ｒ0，＃buffｅr+３

　 ＭＯＶ R7,＃3

　 ACＡＬL ＢlaｃkDｉsplａy ;將高位 0 消隱

　MOV R０,#bｕｆfer

　 LＣAＬＬ Diｓpｌay８

　 SJMP SＴAＲT1

　BlackDi ｓplay：

　ＭＯＶ A,R0 ;將高位 0 消隱

　JNZ Eｘit

　 ＭOV A,＃10Ｈ

　 MOV R０,Ａ

　 ＤEＣ R0

　 DJNZ R7, Ｂ l ａ c ｋDisplａy

　Exiｔ: JB F0，Exit1

　 INC R0

　 ＭOV R0,＃11Ｈ ;負(fù)數(shù)標(biāo)志 Ｅxit1: RET

　 B1toB2: PUSH ACC

　ＡNL A,#0FH

　 ＭOV R０,Ａ

　 ＩNC R0

　 ＰOP ACC

　 ＡNＬ A,＃0F0Ｈ

　 SＷAP A

　 MOV Ｒ０,A

　 INC R0

　 RET

　 BlackDispl ａy：

　MOＶ A,R0

　 JＮZ Ｅｘit

　 MOV A，#１0Ｈ

　 MOV R0，A

　 DEC R0

　 ＤＪNZ R7,ＢｌacｋＤisｐｌａy

　Exit：

　RET

　 EＮD

　四 實(shí)驗(yàn)四 數(shù)制進(jìn)十轉(zhuǎn)數(shù)制進(jìn)六十節(jié)字四? 四字節(jié)十六進(jìn)制數(shù)轉(zhuǎn)十進(jìn)制數(shù)

　一、實(shí)驗(yàn)?zāi)康?/p>

　進(jìn)一步熟悉５1 匯編指令，了解十六進(jìn)制數(shù)轉(zhuǎn)十進(jìn)制數(shù)得方法. 二、實(shí)驗(yàn)內(nèi)容

　從鍵盤上輸入 8 位十六進(jìn)制數(shù),實(shí)現(xiàn)四字節(jié)十六進(jìn)制數(shù)轉(zhuǎn)８位十進(jìn)制數(shù)，并在數(shù)碼管上顯示。注意輸入數(shù)據(jù)必須在０0000000H～0５F０0000H 范圍,否則，結(jié)果超出８位十進(jìn)制數(shù)，無(wú)法正確顯示。

　三、程序框圖

　初始化堆棧開(kāi)始設(shè)定"先清LED,再接收鍵輸入"標(biāo)志通過(guò)鍵盤獲得4字節(jié)十六進(jìn)制數(shù)置位"接收到第一個(gè)鍵后,才清除LED"標(biāo)志十六進(jìn)制轉(zhuǎn)十進(jìn)制子程序顯示開(kāi)始0→R4,R5,R6,R7(用于存放壓縮BCD碼)32→B(循環(huán)次數(shù)）CLR

　 C四字節(jié)十六進(jìn)制數(shù)帶進(jìn)位左移一位(R4R5R6R7)×2+進(jìn)位位C→(R4R5R6R7)，同時(shí)進(jìn)行十進(jìn)制調(diào)整主程序 十六進(jìn)制轉(zhuǎn)十進(jìn)制子程序NY返回B-1=0？ 四、實(shí)驗(yàn)步驟

　、1

　:明說(shuō)線連?D３區(qū) :CＬK -- B2 區(qū):2M D3 區(qū) ：CS -— A３區(qū):CS5 D３區(qū) :A0 —- A３區(qū):A0 2、在 F４區(qū)得鍵盤上輸入 8 位十六進(jìn)制數(shù) 3、結(jié)果顯示在 F4 區(qū)得數(shù)碼管上 五、程序清單

　 ?EXTRＮ COＤE(Ｄｉｓplay８, GeｔKey) Ｂｕffｅr ＤATＡ 30H ；8 字節(jié)顯示緩沖區(qū) Ｆ１ BIＴ 0D1H ；PSＷ、1

　ORG 0０0０H

　 LJMP SＴARＴ

　 OＲG ０100H

　STARＴ: MＯＶ ＳP，#60Ｈ

　 ＣＬR F１ ；先清除顯示,再接收鍵輸入 STARＴ1: MＯＶ Ｒ0,#buffeｒ

　 MOV A,#8 ;按鍵次數(shù)

　LCALL GｅtKey ；得到４字節(jié)十六進(jìn)制數(shù)

　SETＢ Ｆ1 ;接收到第一個(gè)鍵后，才清除顯示

　MOＶ R0,bｕｆfer

　 ＭＯV R1,buffｅr+１

　 ＭOV R２，buffer＋2

　 ＭOV R3，ｂuffer＋3

　 ACALＬ B4tｏD4 ；轉(zhuǎn)換成十進(jìn)制數(shù) Disｐlａy: MOV R0,＃buｆｆｅr ;顯示結(jié)果

　ＭＯV A，Ｒ７ ;低位

　 ACＡLL Ｂ１ｔｏB２ ;壓縮ＢCD 碼轉(zhuǎn)換成非壓縮ＢCD 碼

　ＭOV A,R6

　 ＡCAＬＬ B１tｏB2

　 MOV A, R5

　 ＡCALL Ｂ１toB２

　 ＭＯＶ A，R4 ;高位

　Ａ Ｃ Ａ ＬＬ B1tｏＢ2

　 ＭOV R0，#ｂuffｅr＋7

　 MOV R7，＃7

　 ＡＣAＬL ＢｌackＤisplay ；將高位０消隱

　MＯＶ R0,#buffer

　 LCAＬL Diｓｐlａy8

　 SJMP START1

　；四字節(jié)十六進(jìn)制數(shù)轉(zhuǎn)十進(jìn)制數(shù):Ｒ0Ｒ1R2Ｒ３為十六進(jìn)制,R４R５Ｒ6R７為壓縮 BCＤ碼 B4ｔoD4:

　ＣLＲ A

　 MＯV R4，A

　 MOV R５，Ａ

　 MOV Ｒ6,A

　 MOＶ Ｒ7，A

　 ＭOＶ B，#32

　ＬOＯP：

　CLＲ C

　 ＭOV A，R3

　 RLＣ Ａ

　 ＭＯＶ R3,Ａ

　 MOＶ A,Ｒ2

　 ＲLＣ A

　 MOV R２，A

　 MOV A，R１

　 RＬC Ａ

　 MOV R1，Ａ

　 MOV Ａ,R0

　 RLC A

　 ＭOV R0,A

　 MＯV A,R7

　 AＤDC Ａ，R７

　 ＤＡ A

　 MOV R7,A

　 MOV A,R6

　 ＡDＤＣ A,Ｒ６

　 ＤＡ A

　 MＯＶ R６,Ａ

　 MOV A,R5

　 ＡDDC A，R５

　 DA A

　 MOV R5,Ａ

　 MＯＶ Ａ,R4

　 AＤDＣ A,R4

　 ＤA A

　 ＭOＶ R4,A

　 DＪNZ Ｂ，LＯOＰ

　 RET

　 B1toＢ2: PUSH ＡCC

　 AＮL A,#0FＨ

　 ＭOV R0，A

　 INC R0

　 POP ACC

　 ANL A，#0Ｆ0H

　 SWAP A

　 MＯV Ｒ0，Ａ

　 IＮC R０

　 RＥT

　 ＢlaｃkDispｌay: ＭOV A,Ｒ０ ；將高位 0 消隱

　JNＺ Exit

　 ＭＯV A,#10H

　 MＯＶ R0，A

　 DEC Ｒ0

　 DJNZ R7, Ｂ lac ｋDisplay

　Exit: RＥT

　 END

　五 實(shí)驗(yàn)五 節(jié)字雙? 雙字節(jié) D BCD 碼( ( 十 進(jìn)制數(shù)) ) 乘法

　一、實(shí)驗(yàn)?zāi)康?/p>

　進(jìn)一步熟悉５1 匯編指令,掌握匯編語(yǔ)言得設(shè)計(jì)與調(diào)試方法.根據(jù)程序流程圖,自己設(shè)計(jì)程序,了解如何調(diào)用系統(tǒng)提供得子程序。

　二、實(shí)驗(yàn)內(nèi)容

　從鍵盤上輸入 4 位被乘數(shù)、乘數(shù)，實(shí)現(xiàn)四位十進(jìn)制數(shù)得乘法,結(jié)果顯示在數(shù)碼管上。

　三、程序框圖

　開(kāi)始初始化堆棧設(shè)定"先清LED再接收鍵輸入"標(biāo)志通過(guò)鍵盤獲得4位十進(jìn)制被乘數(shù)轉(zhuǎn)換成二進(jìn)制數(shù)并壓棧暫存置位"接收到第一個(gè)鍵后,才清除LED"標(biāo)志通過(guò)鍵盤獲得4位十進(jìn)制乘數(shù)轉(zhuǎn)換成二進(jìn)制數(shù)(R2R3)被乘數(shù)出棧(R0R1)雙字節(jié)十六進(jìn)制乘法子程序十六進(jìn)制結(jié)果轉(zhuǎn)十進(jìn)制壓縮BCD碼轉(zhuǎn)非壓縮BCD碼將高位0消隱顯示雙字節(jié)BCD乘法程序框圖

　(R0)(R1) × (R2)(R3)(R3R1H)(R3R1L)(R3R0H)(R3R0L)(R2R1H)(R2R1L)(R2R0H)(R2R0L)R0

　 R1

　 R2

　 R3+雙字節(jié)十六進(jìn)制乘法示意圖

　四、實(shí)驗(yàn)步驟

　、１

　:明說(shuō)線連?Ｄ3 區(qū) :CLK -— Ｂ２區(qū)：2M Ｄ3 區(qū) :ＣS -— A３區(qū):CS5 Ｄ３區(qū) :A0 —— A3 區(qū):A０ 2、在Ｆ4 區(qū)得鍵盤上輸入 4 位被乘數(shù)、乘數(shù) 3、結(jié)果顯示在 F4 區(qū)得數(shù)碼管上 五、程序清單

　 EＸTRN CODE(Dｉsplay8， GｅtBCDＫeｙ）

　Ｂufｆｅr DATA ３０H ；８字節(jié)顯示緩沖區(qū) F1 BＩT 0Ｄ1H ;PSW、1

　ＯRＧ ０000H

　 LJMP START

　 ORG 010０H

　STAＲＴ: MOV SP,#60Ｈ

　 CLR F1 ;先清除顯示，再接收鍵輸入 STＡRＴ1: MOV R0，#buｆｆer

　 ＭOＶ A，#4 ;按鍵次數(shù)

　LＣALL ＧetＢＣＤＫey ;得到雙字節(jié)十進(jìn)制數(shù)(被乘數(shù))

　ＭOＶ R0，#ｂuffer

　 AＣAＬＬ D4tｏＢ2 ;轉(zhuǎn)換成二進(jìn)制數(shù)

　PＵSＨ ０2H

　 PUＳH 03H

　 SEＴB F１ ；接收到第一個(gè)鍵,才清除顯示

　ＭOV R0，#buffeｒ

　 MＯV A,＃４ ;按鍵次數(shù)

　ＬCALL GｅｔBCDKｅｙ ；得到雙字節(jié)十進(jìn)制數(shù)(乘數(shù))

　MOV R0，#buffeｒ

　 ＡCＡＬL D4tｏB２ ;轉(zhuǎn)換成二進(jìn)制數(shù)

　POP 01H

　 POP 00H

　 ACＡLL WｏrdMｕl ;(Ｒ0R1）＊（R２R3)=R０R１R2R3

　AＣAＬＬ Ｂ4toD4 ;轉(zhuǎn)換成十進(jìn)制數(shù) Disｐlaｙ: MOV R０，#buffer ；顯示結(jié)果

　ＭOＶ A，Ｒ7 ；低位

　ACＡLＬ Ｂ1ｔoB２ ;壓縮 BＣD 碼轉(zhuǎn)換成非壓縮 BＣD 碼

　MOV Ａ,Ｒ6

　 ACALL B1toB２

　 MOV A, Ｒ5

　 ACALL B1toB2

　 MOＶ A，R４ ；高位

　ACAＬL Ｂ1toB2

　 ＭOV R0，#buｆfeｒ＋7

　 ＭOV R7,#７

　 ACALL BlacｋDispｌａy ；將高位 0 消隱

　MOＶ R0，#buffer

　 ＬＣＡLL Display８

　 SJＭP STAＲＴ1

　;雙字節(jié)十六進(jìn)制數(shù)乘以雙字節(jié)十六進(jìn)制數(shù)子程序 WordMul：

　MＯV A,Ｒ3 ; （

　)1R()0R? MOV B，R１ ;

　×

　 （R2）(R3)

　MUL AＢ ;—- － ---—-———-—— －——————－--———

　ＸＣＨ A,R3 ；

　 (Ｒ3R１H)(Ｒ3Ｒ1L)

　MＯV Ｒ7,Ｂ ;

　 （R3Ｒ0H)(R3R0L)

　MOV B,R0 ;

　 (Ｒ2R1H）(Ｒ２R1L）

　MUL AB ;（Ｒ2R0H)（R2R0L)

　ADD A，R7 ； — － － --——-— －————-—-—----－－————-－——

　MＯV Ｒ7,A ；

　R0

　 R１

　 R2

　 R3

　CLＲ A

　 ADDC A,B

　 XＣH Ａ,R1

　 MOV B，Ｒ２

　 ＭＵＬ AB

　 ＡDD A，R７

　 XCH A,Ｒ2

　 ＰＵSH AＣC

　 MOＶ A,B

　 ADDＣ A,R1

　 MOV Ｒ１，A

　 ＣLR A

　 RLC A

　 XＣH Ａ,R0

　 ＰOP B

　 MUL ＡB

　 AＤD A,Ｒ1

　 ＭOV R1,A

　 MOＶ Ａ,R０

　 ＡＤＤC A,Ｂ

　 MOＶ R０，Ａ

　 REＴ

　 ;雙字節(jié)十進(jìn)制數(shù)轉(zhuǎn)二進(jìn)制數(shù) ,R０-—指向雙字節(jié)十進(jìn)制數(shù)，結(jié)果在 R2Ｒ3 中 Ｄ4toＢ２: MOV A,R0

　 ANL A,＃0FH

　 XＣＨ Ａ，R0

　 ANL Ａ,＃0F0H

　 ＳWＡＰ A

　 MOＶ B,＃１0

　 MUL AＢ

　 ADD A，Ｒ０

　 ＩＮC R0

　 MOV B,#10

　 MUL AB

　 ＭＯV R2，B

　 MOＶ R3,A

　 MOV A，R０

　 ＡNL A，#０FH

　 ＸＣＨ A,R0

　 ＡＮL A，#0F０Ｈ

　 SWＡP A

　 ADD A，R3

　 ＸCH Ａ,R2

　 ADDC A，#0

　 MOV B，＃10

　 MUL AB

　 XCH A,Ｒ２

　 MOV B,＃1０

　 MUL ＡＢ

　 ADD A,R０

　 MＯV R３,A

　 ＭOV A，R２

　 ADDC Ａ,B

　 MＯV R2，A

　 ＲET

　 B１toＢ2：

　PUＳＨ ＡCC

　 AＮL Ａ，#0FＨ

　 MOV R0,Ａ

　 IＮC Ｒ0

　 ＰOP ACC

　 ANL Ａ，＃0F０H

　 SＷAP A

　 ＭOV R0，A

　 INC R0

　 RET

　 BlackDisplay: MOＶ A,R０ ;將高位 0 消隱

　JNZ Exｉt

　 MOV A,＃10Ｈ

　 MOV R０，A

　 DＥC R０

　 DJNZ Ｒ７,BlaｃkDｉｓpｌay

　B4ｔoD４：

　? CLR A

　 MOV R4,A

　 ＭOV R５，A

　 MOV R６,A

　 MOV R7,A

　 MOV B,＃３2

　Eｘｉt: REＴ EＮD 實(shí)驗(yàn)六

　雙字節(jié)ＢC C Ｄ碼除于單字節(jié) D BCD 碼

　一、實(shí)驗(yàn)?zāi)康?/p>

　進(jìn)一步熟悉 51 匯編指令,掌握匯編語(yǔ)言得設(shè)計(jì)與調(diào)試方法.自己設(shè)計(jì)程序，了解如何調(diào)用系統(tǒng)提供得子程序。

　二、實(shí)驗(yàn)內(nèi)容

　從鍵盤上輸入 4 位被除數(shù)、二位除數(shù)，實(shí)現(xiàn)雙字節(jié) BCＤ碼除于單字節(jié)ＢＣD 碼,結(jié)果顯示在數(shù)碼管上。

　三、程序框圖

　開(kāi)始初始化堆棧設(shè)定"先清LED,再接收鍵輸入"標(biāo)志通過(guò)鍵盤獲得4位被除數(shù),轉(zhuǎn)換為十六進(jìn)制數(shù)并暫存通過(guò)鍵盤獲得單字節(jié)除數(shù)，轉(zhuǎn)換為16進(jìn)制數(shù)顯示子程序置位"接收到第一個(gè)鍵后,才清除LED"標(biāo)志單字節(jié)除法:被除數(shù)的高字節(jié)除以除數(shù),結(jié)果為最終商的高8位雙字節(jié)除以單字節(jié)（商為16位）雙字節(jié)除以單字節(jié)(商只有8位)子程序最終獲得結(jié)果（16位的商，8位余數(shù)）雙字節(jié)除以單字節(jié)(商為16位)子程序循環(huán)次數(shù)8→R716位被除數(shù)(R2,R3)帶進(jìn)位左移一位(最低位補(bǔ)0， C →F0)R2-除數(shù)(B)F0=1？C=1？差→R2，R3自加1R7-1=0?雙字節(jié)除以單字節(jié)(商為8位)子程序開(kāi)始 開(kāi)始返回返回主程序YYYNNN雙字節(jié)BCD除法程序框圖 四、實(shí)驗(yàn)步驟

　 1、連線說(shuō)明：

　D3 區(qū) :CLＫ —— B2 區(qū)：2Ｍ D3 區(qū) ：ＣS -- A３區(qū):ＣＳ5 Ｄ3 區(qū) ：A0 —— A3 區(qū):Ａ0 2、在 F4 區(qū)得鍵盤上輸入 4 位被乘數(shù)、乘數(shù) 3、使用各種手段調(diào)試程序 4、結(jié)果顯示在 F4 區(qū)得數(shù)碼管上 單 五、程序清單 ??

　 ?EXＴRＮ ? CODE(Diｓplay８, GetBCDKｅy) Buffｅr DＡTA ３0Ｈ ;8 字節(jié)顯示緩沖區(qū) F1 BIT 0D１Ｈ ;PSW、1

　ＯRＧ 0000H

　 LJＭP STARＴ

　 OＲG 0１0０Ｈ

　SＴＡRT: MOＶ ? SP,＃60H

　 CLR F1 ;先清除顯示,再接收鍵輸入 ＳTAＲT1: MOV R0,＃bｕffer

　 ＭOV A,#4 ;按鍵次數(shù)

　LCALL ＧｅtBＣDＫey ;得到雙字節(jié)十進(jìn)制數(shù)(被除數(shù))

　SETB F1 ；接收到第一個(gè)鍵,才清除顯示

　MＯＶ R0,＃buffer

　 ACＡＬL Ｄ4tｏB２ ;轉(zhuǎn)換成二進(jìn)制數(shù)

　ＭOＶ R0，#ｂuffer

　 MOＶ A,#2

　 LCALL GｅtBCDKey ；得到 1 字節(jié)十進(jìn)制數(shù)（除數(shù))

　MＯＶ R0,#bｕfｆｅr

　 ACＡLL D２toB２ ;轉(zhuǎn)換成二進(jìn)制數(shù)

　JNＺ SＴＡRＴ２

　 ACALL DｉsplayＥrrｏr ;除數(shù)為０,出錯(cuò)

　SJＭP ＳTARＴ

　ＳＴARＴ２：

　ACALL B2_DIＶ_B1 ;被除數(shù) / 除數(shù)

　ACAＬL Dispｌaｙ ；顯示商與被除數(shù)

　SJＭP STＡRT1

　； 雙字節(jié)除于單字節(jié),R2R３為 1６位二進(jìn)制數(shù),B 為除數(shù),商在 R2R３中, 余數(shù)在 A 中 B2_DIV_B1：

　PUSＨ B

　 MＯV A,R2

　 ＤＩＶ AB

　 MＯV R2，B

　 ＰOP Ｂ

　 PUＳＨ ＡCC

　 CＡLL ＤIV_B２_Ｂ１

　 ＰOP AＣＣ

　 ＸCH Ａ,R2

　 ＲET

　 ;雙字節(jié)除于單字節(jié),R2R3 為被除數(shù),Ｂ為除數(shù),結(jié)果:商 R3 中，余數(shù)在 R２中 DIV_B2＿B1: MＯV Ｒ7，#８ ;雙字節(jié)除于單字節(jié) DＩV2: CLＲ Ｃ ;R2R3 為被除數(shù),B 為除數(shù),

　MOＶ A，R３ ;結(jié)果：商Ｒ3 中，余數(shù)在 R2 中

　ＲLC ? A

　 MＯＶ R3,A

　 ＭOＶ A,Ｒ2

　 RLC A

　 MＯV R2,A

　 MＯV F0,Ｃ

　 CLR Ｃ

　 ＳＵBB A,B

　 ＪB F０，ＤIV3

　 JC DＩＶ4

　DIV３: ＭOV R2,A

　 ＩＮＣ ? R3

　DIV4: DＪNZ R７，DＩＶ2

　 RET

　 ;4 字節(jié)二進(jìn)制數(shù)轉(zhuǎn)十進(jìn)制數(shù),R2R3 為 1６位二進(jìn)制數(shù),R4R５R６為壓縮ＢＣD 碼 B２toD5：

　CLＲ

　Ａ

　 MOV R４,A ;

　MOV Ｒ5,A

　 ＭOＶ Ｒ6，A

　 ＭOＶ R7，＃16

　LOOP：

　ＣLR ? C

　 MOV A,R３

　 RLC ? A

　 MOV R3,A

　 MＯＶ A，R2

　 RＬＣ ? A

　 MＯV Ｒ２，Ａ

　 MＯＶ A,R6

　 ADDC A,R6

　 DA ? Ａ

　 ＭOV R6，A

　 MOV A,R5

　 ADＤＣ A，Ｒ5

　 DA ? Ａ

　 ＭOV R５,A

　 MOV Ａ，R4

　 ＡDDC

　Ａ,R4

　 DＡ ? A

　 MＯV R4，A

　 DＪNＺ Ｒ７,ＬOＯP

　 ＲET

　 Ｄ2toB2: MOV A,Ｒ0 ；1 字節(jié)十進(jìn)制數(shù)轉(zhuǎn)二進(jìn)制數(shù)

　ANＬ A,#０FH ；Ｒ０——指向 1 字節(jié)十進(jìn)制數(shù),結(jié)果在Ｂ中

　XCH A，R０

　 ANL A，＃0F0Ｈ

　 ＳＷAP Ａ

　 MＯV B,#1０

　 MUL AB

　 ＡDD A，R０ ；轉(zhuǎn)換成二進(jìn)制數(shù)

　MＯＶ B,A

　 RＥT

　 Ｄｉsplaｙ：

　ＰUSH ACＣ ;商在低四位,余數(shù)在高三位

　AＣＡLL B2toD５ ;二進(jìn)制數(shù)轉(zhuǎn)十進(jìn)制數(shù)

　MＯV R0,＃buffer

　 MOV Ａ，R６

　 ACALＬ B1toB2 ;壓縮ＢCＤ碼轉(zhuǎn)換成非壓縮 BCD 碼

　ＭＯV A，R5

　 ＡCALL B１toＢ2

　 ＤＥC R０

　 MOV R７,＃3

　 ACALＬ BlaｃkＤｉsplａy ;將高位０消隱

　MOV bｕffｅr＋4,#10H ；消隱

　 MOV R0，＃buffｅｒ＋7

　 POＰ ? ＡCC

　 MOＶ

　B,＃１00

　 ＤIV ? AＢ

　 MOＶ R0，Ａ

　 DＥC R0

　 MＯV Ａ,B

　 MOＶ Ｂ，#1０

　 DIV ? AB

　 ＭOＶ R0，A

　 DEC R0

　 MOＶ Ｒ０，B

　 MOＶ R0，#ｂuｆfer+7

　 MOV R7，＃2

　 ACＡLL BｌａckDispｌay ；將高位 0 消隱

　ＭＯV R0,#bｕｆfeｒ

　 LＣALL Ｄisplay８

　 ＲET

　 Displa ｙ E ｒror：

　MOV

　R0,#buffｅr

　 MOV Ｒ7，＃8

　 MＯＶ A,#0ＦH

　DisｐlayEｒrｏr1：

　MＯV ? R０，A

　 INC ? R0

　 DJＮZ R７，ＤｉｓｐlayＥrrｏr1

　 MOV Ｒ0，＃buffｅr

　 ＬCALL Dispｌａy8

　 RＥT

　 D4ｔoB2：

　MOＶ A，R0

　 ANL A,＃０ＦH

　 ＸＣH A，R０

　 ANＬ A，＃０F0H

　 SWAP A

　 MOV B，#10

　 ＭＵL AＢ

　 ADD A,R0

　 ＩNC Ｒ０

　 MＯV Ｂ,#1０

　 MUＬ AB

　 MOV R2,B

　 MOV R3,A

　 MＯV A,R0

　 ＡNL A,#0FH

　 XCH Ａ,R０

　 ＡNL A,#0F０H

　 SＷAP Ａ

　 ADD A,R３

　 ＸCH A,R2

　 ＡDＤC Ａ，#０

　 MOV Ｂ，＃10

　 MUL AB

　 XＣH A,R2

　 MOＶ Ｂ,#10

　 MUＬ AB

　 ADD A,R0

　 MOV R3，A

　 MOV A,R2

　 AＤDC A,B

　 ＭOV R２,Ａ

　 RET

　 B1toＢ２：

　PUSＨ ＡCC

　 AＮＬ Ａ,＃0ＦH

　 MOV Ｒ0,A

　 IＮＣ Ｒ0

　 PＯP ACＣ

　 ANL A,#０Ｆ0H

　 SWAＰ A

　 MOV R0,A

　 IＮＣ R0

　 REＴ

　 Blac ｋ Ｄ i ｓplay：

　MOＶ A，R0 ；將高位０消隱

　JNZ Exit

　 MOＶ A，#10H

　 MＯＶ R０,Ａ

　 DEC R0

　 DＪＮＺ Ｒ 7 ， Bl ａ ckD ｉsplaｙ

　END

　實(shí)驗(yàn)八

　冒泡排序

　一、實(shí)驗(yàn)?zāi)康?/p>

　熟悉使用 MCS51 指令,掌握匯編語(yǔ)言得設(shè)計(jì)與調(diào)試方法,了解如何使用高效方法對(duì)數(shù)據(jù)排序． 二、實(shí)驗(yàn)內(nèi)容

　。列排新重大到小從據(jù)數(shù)組一將法泡冒用使求要,序程序排個(gè)一試調(diào)并寫編?

　三、程 序框圖

　開(kāi)始初始化堆棧將待排序數(shù)組轉(zhuǎn)移到內(nèi)部30H開(kāi)始的RAM中數(shù)據(jù)數(shù)-1→R7，數(shù)據(jù)交換標(biāo)志bSort=0

　PUSH

　07H被比較數(shù)地址R0=30H比較數(shù)地址R1=R0+1DEC

　 R7@R0>@R1?@R0與@R1互換1→bSortINC R0INC R1POP R7R7=R7-1 R7=0?bSort=0?結(jié)束NNNYYY冒泡排序程序框圖 四、實(shí)驗(yàn)步驟

　 。列排序順得大到小從按否是就據(jù)數(shù)中 HF3~H03 ＭAＲ部?jī)?nèi)查檢,序程試調(diào)式方點(diǎn)斷用使?單 五、程序清單 ? ?bSｏrｔ BIＴ F0

　 OＲＧ 0000Ｈ

　 LＪMＰ ＳTAR

　 ＯRG 010０H

　STＡR: MOV SP,＃60H ；堆棧

　MOV R0,#30H ；存放待排序數(shù)據(jù)得首地址

　MＯV R7，＃16 ；數(shù)據(jù)個(gè)數(shù)

　MOV DPTR，#TAＢ＿１

　ＳTAR1：

　ＣLR A

　 ＭOVＣ A，A＋DＰＴR

　 ＭOＶ Ｒ０，Ａ ;將數(shù)據(jù)移入內(nèi)部 RAＭ中

　INC R0

　 IＮC DPTR

　 DＪNＺ R7,SＴAR1

　 MＯＶ R７，＃１６-1 ;存放比較次數(shù) STAR2: PUSH ０７Ｈ

　 ＭOＶ R0,＃３0H ；存放啟始地址

　CLR bSort

　 MOV R1，00H

　 INＣ R１

　 MＯV A，R0

　STＡR3：

　ＭOＶ Ｂ，A

　 MOV A,R1

　 CJNE A，B，$+3

　 JNＣ

　SＴＡR5

　 XＣH A，R0

　 ＭＯＶ R1，Ａ

　 SEＴB ｂＳorｔ

　ＳＴＡR５: INC R０

　 INＣ R1

　 DJNZ R7,STAＲ3

　 POP 07Ｈ

　 ＪNB bSorｔ,Ｅｘiｔ

　 ＤEＣ R7

　 ＳJMP SＴAR２

　Exit:

　SJMP $

　TAB＿1：

　DB 0Ｈ，5Ｈ，6Ｈ,3H,8H，９2H，0４H，57Ｈ,４6H，０1H,０FＦH,0A0H,45H，99H,55H，66H

　END

推薦訪問(wèn)： 單片機(jī) 實(shí)驗(yàn) 報(bào)告