设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 51单片机温度控制高温低温报警 带proteus仿真和汇编源码
返回列表 发新帖
查看: 4232|回复: 2
打印 上一主题 下一主题
收起左侧

51单片机温度控制高温低温报警 带proteus仿真和汇编源码

[复制链接]
跳转到指定楼层
楼主
ID:164042 发表于 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                                ;启动转换
  45.                 JNB         EOC,$
  46.                 SETB         OE
  47.                 MOV         ADC,P1                        ;读取AD转换结果
  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                         ;数值转换
  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                        ;数码显示子程序
  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
复制代码


51单片机温度控制高温低温报警仿真工程文件和汇编源码下载：
55 Temperatuer Monitor.zip (55.01 KB, 下载次数: 41)

单片机

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏2 分享淘帖 顶顶 踩踩

相关帖子
回复

使用道具 举报

沙发
ID:170906 发表于 2017-3-15 16:35 | 只看该作者
先下载看看。
回复

使用道具 举报

板凳
ID:207506 发表于 2017-6-4 14:14 | 只看该作者
老哥，你这个不能用按键设置温度么
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表