找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 4621|回復(fù): 2
打印 上一主題 下一主題
收起左側(cè)

51單片機溫度控制高溫低溫報警 帶proteus仿真和匯編源碼

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:164042 發(fā)表于 2017-2-11 15:51 | 只看該作者 |只看大圖 回帖獎勵 |倒序瀏覽 |閱讀模式
proteus仿真圖


51單片機溫度控制高溫低溫報警匯編語言源程序：
  1. LED_0        EQU         30H
  2. LED_1         EQU         31H
  3. LED_2         EQU         32H
  4. ADC                EQU                35H
  5. TCNTA        EQU                36H
  6. TCNTB        EQU                37H
  7. H_TEMP        EQU                38H                                ;溫度上限
  8. L_TEMP        EQU                39H                                ;溫度下限
  9. FLAG        BIT                00H
  10. H_ALM        BIT                P3.0
  11. L_ALM        BIT                P3.1
  12. SOUND        BIT                P3.7
  13. CLOCK        BIT                P2.4
  14. ST                 BIT         P2.5
  15. EOC         BIT         P2.6
  16. OE                 BIT         P2.7

  18.                 ORG         00H
  19.                 SJMP        START
  20.                 ORG                0BH
  21.                 LJMP        INT_T0
  22.                 ORG                1BH
  23.                 LJMP        INT_T1
  24.                
  25. START:        MOV                LED_0,#00H
  26.                 MOV                LED_1,#00H
  27.                 MOV                LED_2,#00H
  28.                 MOV                DPTR,#TABLE
  29.                 MOV                H_TEMP,#153
  30.                 MOV                L_TEMP,#77
  31.                 MOV                TMOD,#12H
  32.                 MOV                TH0,#245
  33.                 MOV                TL0,#0
  34.                 MOV                TH1,#(65536-1000)/256
  35.                 MOV                TL1,#(65536-1000)MOD 256
  36.                 MOV                IE,#8aH
  37.                 CLR                C
  38.                 SETB        TR0                                ;為ADC0808提供時鐘

  40. WAIT:        SETB        H_ALM
  41.                 SETB        L_ALM
  42.                 CLR         ST
  43.                 SETB         ST
  44.                 CLR         ST                                ;啟動轉(zhuǎn)換
  45.                 JNB         EOC,$
  46.                 SETB         OE
  47.                 MOV         ADC,P1                        ;讀取AD轉(zhuǎn)換結(jié)果
  48.                 CLR         OE
  49.                 MOV                A,ADC

  51.                 SUBB        A,#77                           ;判斷是否低于下限
  52.                 JC                LALM
  53.                 MOV                A,H_TEMP
  54.                 MOV                R0,ADC
  55.                 SUBB        A,R0                        ;判斷是否高于上限
  56.                 JC                HALM
  57.                 CLR                TR1
  58.                 LJMP        PROC

  60. LALM:                                                        ;低溫報警
  61.                 CLR                L_ALM
  62.                 SETB        TR1
  63.                 CLR                FLAG
  64.                 LJMP        PROC

  66. HALM:                                                           ;高溫報警
  67.                 CLR                H_ALM
  68.                 SETB        TR1
  69.                 SETB        FLAG
  70.                 LJMP        PROC

  72. PROC:        MOV         A,ADC                         ;數(shù)值轉(zhuǎn)換
  73.                 MOV         B,#100
  74.                 DIV         AB
  75.                 MOV         LED_2,A
  76.                 MOV         A,B
  77.                 MOV         B,#10
  78.                 DIV         AB
  79.                 MOV         LED_1,A
  80.                 MOV         LED_0,B
  81.                 LCALL        DISP
  82.                 SJMP         WAIT

  84. INT_T0:        CPL                CLOCK                           ;提供ADC0808時鐘
  85.                 RETI

  87. INT_T1:        MOV                TH1,#(65536-1000)/256
  88.                 MOV                TL1,#(65536-1000)MOD 256
  89.                 CPL                SOUND
  90.                 INC                TCNTA
  91.                 MOV                A,TCNTA
  92.                 JB                FLAG,I1                           ;判斷是高溫警報還是低溫警報
  93.                 CJNE        A,#30,RETUNE        ;低溫警報聲
  94.                 SJMP        I2
  95.         I1:        CJNE        A,#20,RETUNE        ;高溫警報聲
  96.         I2:        MOV                TCNTA,#0
  97.                 INC                TCNTB
  98.                 MOV                A,TCNTB
  99.                 CJNE        A,#25,RETUNE
  100.                 MOV                TCNTA,#0
  101.                 MOV                TCNTB,#0
  102.                 LCALL        DELAY2
  103. RETUNE:        RETI
  104.                
  105. DISP:        MOV                A,LED_0                        ;數(shù)碼顯示子程序
  106.                 MOVC        A,@A+DPTR
  107.                 CLR                P2.3
  108.                 MOV                P0,A
  109.                 LCALL        DELAY
  110.                 SETB        P2.3

  112.                 MOV                A,LED_1
  113.                 MOVC        A,@A+DPTR
  114.                 CLR                P2.2
  115.                 MOV                P0,A
  116.                 LCALL        DELAY
  117.                 SETB        P2.2

  119.                 MOV                A,LED_2
  120.                 MOVC        A,@A+DPTR
  121.                 CLR                P2.1
  122.                 MOV                P0,A
  123.                 LCALL        DELAY
  124.                 SETB        P2.1
  125.                 RET

  127. DELAY:        MOV                R6,#10
  128. D1:                MOV                R7,#250
  129.                 DJNZ        R7,$
  130.                 DJNZ        R6,D1
  131.                 RET
  132. DELAY2:        MOV                R5,#20
  133. D2:                MOV                R6,#20
  134. D3:                MOV                R7,#250
  135.                 DJNZ        R7,$
  136.                 DJNZ        R6,D3
  137.                 DJNZ        R5,D2
  138.                 RET
  139. TABLE:         DB                 3FH,06H,5BH,4FH,66H
  140.                 DB                 6DH,7DH,07H,7FH,6FH
  141.                 END
復(fù)制代碼


51單片機溫度控制高溫低溫報警仿真工程文件和匯編源碼下載：
55 Temperatuer Monitor.zip (55.01 KB, 下載次數(shù): 41)

評分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵！

查看全部評分

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏2 分享淘帖 頂頂 踩踩

相關(guān)帖子
回復(fù)

使用道具 舉報

沙發(fā)
ID:170906 發(fā)表于 2017-3-15 16:35 | 只看該作者
先下載看看。
回復(fù)

使用道具 舉報

板凳
ID:207506 發(fā)表于 2017-6-4 14:14 | 只看該作者
老哥，你這個不能用按鍵設(shè)置溫度么
回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

手機版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機教程網(wǎng)

快速回復(fù) 返回頂部 返回列表