1、精選優(yōu)質(zhì)文檔-傾情為你奉上. 微機(jī) 實(shí)驗(yàn)報(bào)告開課實(shí)驗(yàn)室：電子信息樓503 年 月 日學(xué)院年級(jí)、專業(yè)、班姓名學(xué)號(hào)課程名稱微機(jī)實(shí)驗(yàn)項(xiàng)目名稱空調(diào)溫度控制實(shí)驗(yàn)成績(jī)指導(dǎo)教師簽名一、實(shí)驗(yàn)?zāi)康?1了解閉環(huán)控制的基本原理。 2進(jìn)一步熟悉A/D變換原理和編程方法。 3進(jìn)一步了鍵盤掃描和LED顯示原理和編程方法。二、實(shí)驗(yàn)內(nèi)容利用實(shí)驗(yàn)儀上顯示電路，鍵盤電路，A/D變換電路，完成類似空調(diào)恒溫控制實(shí)驗(yàn)，可以利用實(shí)驗(yàn)儀上的電位器模仿溫度變化，加熱和致冷電機(jī)可以用發(fā)光管代替。要求可以用鍵盤設(shè)定恒溫溫度，當(dāng)外界溫度超過設(shè)定溫度+/-2時(shí)，就要啟動(dòng)加熱或致冷電機(jī)。三、實(shí)驗(yàn)原理LED顯示電路和鍵盤電路實(shí)驗(yàn)儀上已接好。 A/D變換

2、電路只要接上模擬量輸入和地址選擇信號(hào)即可。電位器模仿溫度采樣PA0口模仿加熱電機(jī)PA1口模仿致冷電機(jī)實(shí)驗(yàn)說(shuō)明連線連接孔1連接孔2連線連接孔1連接孔21AD_CSCS28AD的A1總線A12IN0電位器輸出9AD的A2總線A238255_CSCS010AD的OEOE_OUT4PA0L011AD的CLK分頻F/45PA1L1124MHZFin6KEY/LED_CSCS113AD的ALESTART7AD的A0總線A014STARTSTART_OUT 這是一個(gè)綜合硬件實(shí)驗(yàn),其中各部分實(shí)驗(yàn)已單獨(dú)做過.現(xiàn)聯(lián)合起來(lái)形成一個(gè)控制系統(tǒng). 其中LED顯示實(shí)驗(yàn)和鍵盤掃描實(shí)驗(yàn)可參見硬件實(shí)驗(yàn)五。A/D變換實(shí)驗(yàn)可參見實(shí)驗(yàn)

3、七。I/O口輸入輸出可參見8255硬件實(shí)驗(yàn)。實(shí)驗(yàn)程序框圖開始啟動(dòng)AD變換延時(shí)讀AD變換值返回A/D采樣子程序框圖否是否是是否否是開始關(guān)閉所有顯示位取出顯示數(shù)據(jù)輸出時(shí)鐘脈沖輸出位選通信號(hào)8位數(shù)據(jù)輸出延時(shí)位選通信號(hào)移位6位全顯示完？返回顯示數(shù)據(jù)移位LED顯示子程序框圖開始輸出列掃描信號(hào)列信號(hào)移位讀入行值取出數(shù)據(jù)一位輸出有鍵輸入6列掃描完？計(jì)算鍵值等待鍵松開查表得到鍵碼返回鍵盤掃描子程序框圖高2度+/-2度內(nèi)開始工始當(dāng)前溫度和設(shè)定溫度送顯示緩沖鍵盤值是？顯示溫度不變當(dāng)前溫度與設(shè)定溫度比較初始化溫度參數(shù)采樣當(dāng)前溫度加熱讀鍵盤致冷低2度向下鍵向上鍵設(shè)定溫度減1設(shè)定溫度加1溫度控制主程序框圖四、使用儀器、

4、材料1、電腦2、偉福編譯器3、偉福實(shí)驗(yàn)箱五、實(shí)驗(yàn)步驟(1) 在實(shí)驗(yàn)箱斷電的情況下連好線。(2) 輸入程序并檢查，保存程序。(3) “編譯”程序。(4) “全速執(zhí)行”程序。(5) 記錄實(shí)驗(yàn)結(jié)果及分析。六、實(shí)驗(yàn)原始程序mode equ 082hPORTA equ 08000hCTL equ 08003hOUTBIT equ 09002h ;數(shù)碼管位控制口OUTSEG equ 09004h ;數(shù)碼管段控制口IN equ 09001h ;鍵盤輸入口LEDBuf equ 60h ORG 0000H ljmp StartLEDMAP: db 3fh, 06h, 5bh, 4fh, 66h, 6dh, 7d

5、h, 07h db 7fh, 6fh, 77h, 7ch, 39h, 5eh, 79h, 71hDelay: mov r7, #0DelayLoop: djnz r7, DelayLoop djnz r6, DelayLoop retDisplayLED: ;數(shù)碼管顯示函數(shù) mov r0, #LEDBuf ;讀入數(shù)碼管段碼 mov r1, #6 ;6個(gè)數(shù)碼管 mov r2, #b ;從最左邊的開始亮起Loop: mov dptr, #OUTBIT mov a, #0 movx dptr, a mov a, r0 mov dptr, #OUTSEG movx dptr, a mov dptr,

6、#OUTBIT mov a, r2 movx dptr, a mov r6, #1 call Delay mov a, r2 rr a mov r2, a inc r0 djnz r1, Loop mov dptr, #OUTBIT mov a, #0 movx dptr, a ret ;函數(shù)返回TestKey: mov dptr, #OUTBIT mov a, #0 movx dptr, a ;關(guān)所有數(shù)碼管 mov dptr, #IN ;讀入鍵盤輸入 movx a, dptr cpl a anl a, #0fh ;與0fh比較看有沒按鍵被按下 ret ;函數(shù)返回KeyTable: db 16

7、h, 15h, 14h, 0ffh db 13h, 12h, 11h, 10h db 0dh, 0ch, 0bh, 0ah db 0eh, 03h, 06h, 09h db 0fh, 02h, 05h, 08h db 00h, 01h, 04h, 07hGetKey: ;獲鍵值 mov dptr, #OUTBIT mov P2, dph mov r0, #Low(IN) mov r1, #b mov r2, #6 ;掃描6列按鍵KLoop: mov a, r1 cpl a movx dptr, a cpl a rr a mov r1, a movx a, r0 cpl a anl a, #0f

8、h jnz Goon1 djnz r2, KLoop mov r2, #0ffh sjmp ExitGoon1: mov r1, a mov a, r2 dec a rl a rl a mov r2, a ; r2 = (r2-1)*4 mov a, r1 mov r1, #4LoopC: rrc a jc Exit inc r2 djnz r1, LoopCExit: mov a, r2 mov dptr, #KeyTable movc a, a+dptr ;查表得鍵值 mov r2, a ;放入r2WaitRelease: ;等待按鍵釋放 mov dptr, #OUTBIT clr a m

9、ovx dptr, a mov r6, #10 call Delay call TestKey jnz WaitRelease ;測(cè)試按鍵函數(shù)返回0則按鍵釋放 mov a, r2 ret ;函數(shù)返回; =UP equ 16h ; NextDOWN equ 15h ; LastLowLimit equ 10HighLimit equ 30LowTemp equ -40 ; A/D 0HighTemp equ 50 ; A/D 255ADPort equ 0a000hHeat equ 1Cool equ 2SetTemp equ 50hCurTemp equ 51hDisplayResult: ;

10、給6個(gè)數(shù)碼管緩沖賦值 mov a, CurTemp ;讀入當(dāng)前溫度 jnb acc.7, GE0 mov LEDBuf, #40h ;'-' dec a cpl a jmp GoonGE0: mov LEDBuf, #0 ;' 'Goon: mov b, #10 div ab mov dptr, #LEDMAP movc a, a+dptr mov LEDBuf+1, a mov a, b movc a, a+dptr mov LEDBuf+2, a mov LEDBuf+3, #0 ;' ' mov a, SetTemp mov b, #10

11、div ab movc a, a+dptr mov LEDBuf+4, a mov a, b movc a, a+dptr mov LEDBuf+5, a retReadAD: ;從AD讀入當(dāng)前溫度 mov dptr, #ADPort clr a movx dptr, a ; start A/D mov a, #0 djnz acc, $ ; delay movx a, dptr retReadTemp: ;讀當(dāng)前溫度函數(shù) mov r1, #0 mov r2, #0 mov r0, #16RLoop: call ReadAD add a, r2 mov r2, a jnc GN1 inc r1

12、GN1: djnz r0, RLoop mov a, r2 swap a anl a, #0fh xch a, r1 swap a anl a, #0f0h orl a, r1 ; a = r1r2/16 mov b, #(HighTemp-LowTemp) mul ab mov a, b ; /256 add a, #LowTemp mov CurTemp, a ret ;函數(shù)返回Start: mov sp, #70h mov a, #mode mov dptr, #CTL movx dptr, a ; 設(shè)置8255工作方式,PA,PC輸出,PB輸入 mov SetTemp, #20 ;初始

13、化溫度為20度MLoop: call TestKey ;跳轉(zhuǎn)到檢測(cè)按鍵函數(shù) jnz KeyPressed ;a不是0則有按鍵按下跳轉(zhuǎn)，是0則沒有按鍵按下繼續(xù)執(zhí)行 call DisplayResult ;跳轉(zhuǎn)到給6個(gè)數(shù)碼管緩沖賦值函數(shù) call DisplayLED ;跳轉(zhuǎn)到數(shù)碼管顯示函數(shù) call ReadTemp ;跳轉(zhuǎn)到讀當(dāng)前溫度函數(shù) mov a, CurTemp jb acc.7, LE0 clr c ;清進(jìn)位標(biāo)志 mov b, SetTemp dec b dec b subb a, b ;當(dāng)前溫度減去設(shè)定溫度 jnc GN2 ;沒有借位則表示當(dāng)前溫度設(shè)定溫度，跳轉(zhuǎn)到GN2LE0: mo

14、v a, #Heat ;當(dāng)前溫度比設(shè)定溫度低，開啟加熱電機(jī) mov dptr, #PORTA movx dptr, a ;點(diǎn)亮加熱電機(jī)指示燈LED0 sjmp GN4GN2: mov a, CurTemp setb c mov b, SetTemp inc b inc b subb a, b jc GN3 ;當(dāng)前溫度=設(shè)定溫度則跳轉(zhuǎn)到GN3 mov a, #Cool mov dptr, #PORTA movx dptr, a ;點(diǎn)亮制冷電機(jī)指示燈LED1 sjmp GN4GN3: mov a, #0 mov dptr, #PORTA movx dptr, a ;2個(gè)電機(jī)的指示燈都滅GN4: sjmp MLoopKeyPressed: call GetKey ;跳轉(zhuǎn)到獲鍵值函數(shù) mov b, a xrl a, #DOWN jnz Key0 ;不是按到鍵盤上的LAST鍵則跳轉(zhuǎn)到KEY0 mov a, SetTemp xrl a, #LowLimit jz Key1 ;超過最低溫度則跳轉(zhuǎn)到KEY1 dec SetTemp sjmp Key1 ;沒有超過最低溫度則設(shè)定溫度減1Key0: mov a, b xrl a, #UP jnz Key1 ;也不是按到鍵盤上的NEXT鍵則跳轉(zhuǎn)到KEY1 mov a, SetTemp