恒溫電熱椅墊設(shè)計(jì)2

恒溫電熱椅墊設(shè)計(jì)一、實(shí)驗(yàn)?zāi)康模毫私鉁囟葌鞲衅麟娐返墓ぷ髟?；了解閉環(huán)控制的基本原理；熟悉A/D變換原理和編程方法；熟悉鍵盤、顯示接口電路使用和編程方法；掌握單片機(jī)應(yīng)用系統(tǒng)硬件及軟件的設(shè)計(jì)方法。二、實(shí)驗(yàn)內(nèi)容：根據(jù)各自設(shè)計(jì)方案，選擇并連接各小模塊電路構(gòu)成恒溫電熱椅墊溫度采集與控制的實(shí)驗(yàn)電路，編寫并調(diào)試程序?qū)崿F(xiàn)對(duì)恒溫電熱椅溫度的采集、檢測、實(shí)現(xiàn)溫度恒溫控制。并顯示溫度值。恒溫電熱椅墊設(shè)計(jì)三、實(shí)驗(yàn)設(shè)計(jì)思想及方案提示：1.設(shè)計(jì)思路：溫度轉(zhuǎn)換電路A/D轉(zhuǎn)換電路單片機(jī)控制鍵盤、顯示電路加熱裝置圖1系統(tǒng)設(shè)計(jì)思路框圖恒溫電熱椅墊設(shè)計(jì)2.硬件電路方案①要求：實(shí)現(xiàn)對(duì)溫度的采集、檢測、進(jìn)行控制計(jì)算處理后輸出顯示；其溫度控制為開環(huán)控制，采用發(fā)光二極管亮?xí)r表示加熱狀態(tài)，滅時(shí)為不加熱狀態(tài)。②實(shí)驗(yàn)硬件電路：前端測溫電路使用綜合實(shí)驗(yàn)儀上的模塊電路(模數(shù)轉(zhuǎn)換、溫度傳感器)＋7279顯示電路搭成實(shí)驗(yàn)電路；見實(shí)驗(yàn)連線框圖4，（其溫度傳感器為熱敏電阻）。

恒溫電熱椅墊設(shè)計(jì)實(shí)驗(yàn)裝置提供的模塊電路及連線1.單元電路：圖1溫度轉(zhuǎn)換電路電橋信號(hào)轉(zhuǎn)換恒溫電熱椅墊設(shè)計(jì)圖2.數(shù)∕模轉(zhuǎn)換模塊電路恒溫電熱椅墊設(shè)計(jì)圖3.7279鍵盤顯示電路恒溫電熱椅墊設(shè)計(jì)

圖4實(shí)驗(yàn)連線框圖恒溫電熱椅墊設(shè)計(jì)3.軟件方案提示：主程序流程

AD采樣流程

恒溫電熱椅墊設(shè)計(jì)四、實(shí)驗(yàn)要求及步驟:①見實(shí)驗(yàn)系統(tǒng)連線框圖4所示，按圖連線構(gòu)成實(shí)驗(yàn)電路；②控制溫度最高為T℃，低于此溫度發(fā)光管亮，否則滅。③用手捏著熱敏電阻，觀察顯示器上溫度值有何變化。恒溫電熱椅墊設(shè)計(jì)七、程序清單及注釋:ORG0000HLJMPMAINORG000BHLJMPINT_T0Delay:movr7,#00H;延時(shí)子程序DELAYLOOP1:MOVR6,#00HDelayLoop:djnzr6,DelayLoopdjnzr7,DelayLoop1ret恒溫電熱椅墊設(shè)計(jì)SDelay:；延時(shí)8us MOVR6,#08HLP5: DJNZR6,LP5 retLDelay:；延時(shí)50us MOVR6,#32HWAIT: DJNZR6,WAIT ret恒溫電熱椅墊設(shè)計(jì)STFS:；調(diào)發(fā)送一字節(jié)程序

CLRP1.0 LCALLLDelay

MOVR7,#08HLP1: RLCA MOVP1.2,C SETBP1.1 LCALLSDelay

CLRP1.1 LCALLSDelay

DJNZR7,LP1 CLRP1.2 RET恒溫電熱椅墊設(shè)計(jì)INIT7279:MOVA,#0A4H；7279初始化程序

LCALLSTFSRETDISP:MOVR5,#08H；調(diào)顯示子程序

MOVR0,#40HMOVR2,#97HDP1:MOVDPTR,#TAB1 MOVA,R2LCALLSTFS LCALLSDelay

LCALLSDelay

MOVA,@R0恒溫電熱椅墊設(shè)計(jì)MOVCA,@A+DPTRACALLSTFSINCR0DECR2DJNZR5,DP1RETTAB1:DB7EH,30H,6DH,79H,33H,5BH,5FH,70H,7FH,7BHDB77H,1FH,4EH,3DH,4FH,47H,0FEH,0B0H,0EDHDB0F9H,0B3H,0DBH,0DFH,0F0H,0FFH,0FBH,08HDB67H,00H,5EH,1DH,3DH,76H,1FH,4FH,4EH,37H恒溫電熱椅墊設(shè)計(jì)AD0809:mova,#00h；AD采樣子程序

mov

dptr,#0a000h;0809AD的通道開始轉(zhuǎn)換嗎?

movx@dptr,a

movr7,#20hloop2:djnzr7,loop2

movxa,@dptr

MOV4CH,A;存儲(chǔ)溫度采樣值

RET;************************************************恒溫電熱椅墊設(shè)計(jì);單字節(jié)帶符號(hào)數(shù)減法;被減數(shù)R1,符號(hào)20H（正為0負(fù)為1）;減數(shù)R2,符號(hào)21H;差R3,符號(hào)22HDJF:JB20H,DJF4 ;被減數(shù)為負(fù),轉(zhuǎn)DJF4JB21H,DJF2 ;被減數(shù)為正,判斷減數(shù)CLRC ;兩數(shù)為正,直接減,清標(biāo)志位MOVA,R1SUBBA,R2MOVR3,AJCDJF1 ;不夠減轉(zhuǎn)DJF1,求補(bǔ)CLR22H ;夠減差為正RET恒溫電熱椅墊設(shè)計(jì)DJF1:MOVA,R3 ;求補(bǔ)CPLAADDA,#01HMOVR3,ASETB22H;符號(hào)為負(fù)RETDJF2:MOVA,R1;被減數(shù)為正,減數(shù)為負(fù)兩數(shù)絕對(duì)值相加ADDA,R2MOVR3,AJNCDJF3MOVR3,#0FFH ;超過FF則為FFDJF3:CLR22H ;差為正符號(hào)為0RET恒溫電熱椅墊設(shè)計(jì)DJF4:JB21H,DJF6 ;被減為負(fù),判斷減數(shù)MOVA,R1 ;被減為負(fù),減數(shù)為正,兩數(shù)絕對(duì)值相加ADDA,R2MOVR3,AJNCDJF5MOVR3,#0FFH ;超過FF,設(shè)為FFDJF5:SETB22H ;差為負(fù)RET恒溫電熱椅墊設(shè)計(jì)DJF6:CLRC;兩數(shù)均為負(fù),減數(shù)（絕對(duì)值）減被除數(shù)減數(shù)（絕對(duì)值）MOVA,R2SUBBA,R1MOVR3,AJCDJF1 ;跳到DJF1求補(bǔ)CLR22H ;差為正,符號(hào)置0RET;雙字節(jié)帶符號(hào)數(shù)加法程序 ;被加數(shù)R1（高8位）R2（低8位）,符號(hào)位23H ;加數(shù)R3（高位）R4（低位）,符號(hào)位24H ;和R5（高位）R6（低位）,符號(hào)25H恒溫電熱椅墊設(shè)計(jì)SJF:JB23H,SJF3 ;被加數(shù)為正,若為負(fù)轉(zhuǎn)SJF3JB24H,SJF2 ;被加數(shù)為正,判斷加數(shù)MOVA,R2 ;均為正,直接相加ADDA,R4MOVR6,AMOVA,R1ADDCA,R3MOVR5,AJNCSJF1MOVR5,#0FFH ;若超過FFFF則為FFFFMOVR6,#0FFHSJF1:CLR25H ;和為正符號(hào)為0RET恒溫電熱椅墊設(shè)計(jì)SJF2:CLRC;被加數(shù)為正,加數(shù)為負(fù)則被加數(shù)減加數(shù)絕對(duì)值MOVA,R2SUBBA,R4MOVR6,AMOVA,R1SUBBA,R3MOVR5,AJCSJF4 ;不夠減,跳到SJF求補(bǔ)CLR25H ;和為正,符號(hào)為0RET恒溫電熱椅墊設(shè)計(jì)SJF3:JB24H,SJF5 ;被加數(shù)為負(fù),判斷加數(shù)CLRC ;被加數(shù)為負(fù),加數(shù)為正,加數(shù)減被加數(shù)絕對(duì)值MOVA,R4SUBBA,R2MOVR6,AMOVA,R3SUBBA,R1MOVR5,AJCSJF4 ;不夠減跳到SJF4求補(bǔ)CLR25H ;和為正RET恒溫電熱椅墊設(shè)計(jì)SJF4:MOVA,R6 ;求補(bǔ),雙字節(jié)求反加1CPLAADDA,#01HMOVR6,AMOVA,R5CPLAADDCA,#00HMOVR5,ASETB25H ;和為負(fù)符號(hào)置1RET恒溫電熱椅墊設(shè)計(jì)SJF5:MOVA,R2 ;兩數(shù)均為負(fù),絕對(duì)值相加ADDA,R4MOVR6,AMOVA,R1ADDCA,R3MOVR5,AJNCSJF6MOVR5,#0FFH;超過#OFFFFH則為#OFFFFHMOVR6,#0FFHSJF6:SETB25H ;和為負(fù)置1RET;***********************************恒溫電熱椅墊設(shè)計(jì)NBSW:MOVA,48H SUBBA,4CH JCNBSW1 CLRP1.4 RETNBSW1:SETBP1.4RETCHANGE: MOVR5,#00H MOVR6,#00H MOVR7,#00HMOVR2,#03HMOVR3,#0EBH恒溫電熱椅墊設(shè)計(jì)MOVR7,4CH

QMUL:MOVA,R3 MOVB,R7 MULAB XCHA,R7 MOVR6,B MOVB,R2 MULAB ADDA,R6 MOVR6,A CLRA ADDCA,B MOVR5,A MOVA,R6恒溫電熱椅墊設(shè)計(jì)MOVR3,A MOVA,R5MOVR2,AMOVR0,#44HMOVR7,#10HMOVR5,#00HMOVR6,#00HLP2:CLRCMOVA,R3RLCAMOVR3,AMOVA,R2RLCAMOVR2,A恒溫電熱椅墊設(shè)計(jì)MOVA,R6ADDCA,R6DAAMOVR6,AMOVA,R5ADDCA,R5DAAMOVR5,ADJNZR7,LP2MOVA,R5LCALLAMMOVA,R6INCR0LCALLAM恒溫電熱椅墊設(shè)計(jì)

MOVA,46H ADDA,#10H MOV46H,ARETAM:MOVR4,ASWAPAANLA,#0FHMOV@R0,AINCR0MOVA,R4ANLA,#0FHMOV@R0,ARET恒溫電熱椅墊設(shè)計(jì)ZKB: MOVR5,#00H MOVR6,#00H MOVR7,#00HMOVR2,7BHMOVR3,7CH MOVR7,#0FFHQMUL1:MOVA,R3 MOVB,R7 MULAB XCHA,R7 MOVR6,B MOVB,R2 MULAB恒溫電熱椅墊設(shè)計(jì)ADDA,R6 MOVR6,A CLRAADDCA,B MOVR5,A MOV49H,R5 RETINT_T0:PUSHACCPUSHPSWMOVPSW,#08HMOVTH0,#0ECHMOVTL0,#78HINC3EHLCALLAD0809恒溫電熱椅墊設(shè)計(jì)LCALLCHANGELCALLNBSWLCALLZKB MOVA,3EHCLRCSUBBA,#64HJCINTLP1LCALLDISPMOV3EH,#00H LJMPINTTC2INTLP1:MOVA,3EHCLRCSUBBA,49H JNCINTLP2恒溫電熱椅墊設(shè)計(jì)SETBP1.3 SETBP1.4LJMPINTTC2INTLP2:CLRP1.3 CLRP1.4INTTC2:POPPSWPOPACCRETIMAIN: MOVSP,#0E0H LCALLINIT7279 MOVR0,#20H恒溫電熱椅墊設(shè)計(jì)MOVR7,#20HCC0:MOVA,#00H MOV@R0,AINCR0DJNZR7,CC0 MOVR0,#40HMOVR7,#0AHCC1:MOVA,#00H MOV@R0,AINCR0DJNZR7,CC1