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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 电子技术分类讨论区 › 资料共享 › 基于51单片机的DS18b20数字温度计（汇编）（原程序+prot ...
返回列表 发新帖
查看: 4443|回复: 2
收起左侧

基于51单片机的DS18b20数字温度计（汇编）（原程序+protues仿真）

[复制链接]
ID:551052 发表于 2019-6-10 11:20 | 显示全部楼层 |阅读模式
程序编写使用的是汇编语言，还有一些小问题，就是调温之后显示的温度值不改变，需要按几下复位键之后显示才会改变。


单片机源程序如下:
  1. TEMPER_L         EQU         36H        ;存放读出温度低位数据
  2.         TEMPER_H         EQU         35H        ;存放读出温度高位数据
  3.         TEMPER_NUM         EQU         60H        ;存放转换后的温度值
  4.         FLAG1                 BIT        00H
  5.         DQ                 BIT         P3.2        ;一线总线控制端口

  7.         ORG                0000H
  8.         LJMP        MAIN
  9.         ORG                0100H
  10. MAIN:
  11.         MOV         SP,#70H        
  12.         LCALL         GET_TEMPER        ;从DS18B20读出温度数据         
  13.         LCALL        TEMPER_COV        ;转换读出的温度数据并保存
  14.      
  15.         LCALL   SHUJU
  16.         LCALL   HEX2BCD
  17.         LCALL   LOOP
  18.         LCALL   DISPLAY
  19.         LCALL   TAB   
  20.         SJMP         [        DISCUZ_CODE_3        ]nbsp;             ;完成一次数字温度采集
  21.         
  22. ;-------读出转换后的温度值
  23. GET_TEMPER:
  24.         SETB         DQ                 ; 定时入口
  25. BCD:        LCALL         INIT_1820
  26.         JB         FLAG1,S22
  27.         LJMP         BCD                ; 若DS18B20不存在则返回
  28. S22:        LCALL         DELAY1
  29.         MOV         A,#0CCH         ; 跳过ROM匹配------0CC
  30.         LCALL         WRITE_1820
  31.         MOV         A,#44H                 ; 发出温度转换命令
  32.         LCALL         WRITE_1820
  33.         NOP
  34.         LCALL         DELAY
  35.         LCALL         DELAY
  36. CBA:        LCALL         INIT_1820
  37.         JB         FLAG1,ABC               
  38.         LJMP         CBA
  39. ABC:        LCALL         DELAY1
  40.         MOV         A,#0CCH         ; 跳过ROM匹配
  41.         LCALL         WRITE_1820
  42.         MOV         A,#0BEH         ; 发出读温度命令
  43.         LCALL         WRITE_1820
  44.         LCALL         READ_18200         ;READ_1820
  45.         RET

  47. ;-------读DS18B20的程序,从DS18B20中读出一个字节的数据
  48. READ_1820:
  49.         MOV         R2,#8
  50. RE1:        CLR         C
  51.         SETB         DQ
  52.         NOP
  53.         NOP
  54.         CLR         DQ
  55.         NOP
  56.         NOP
  57.         NOP
  58.         SETB         DQ
  59.         MOV         R3,#7
  60.         DJNZ         R3,$
  61.         MOV         C,DQ
  62.         MOV         R3,#23
  63.         DJNZ         R3,$
  64.         RRC         A
  65.         DJNZ         R2,RE1
  66.         RET

  68. ;-------写DS18B20的程序
  69. WRITE_1820:
  70.         MOV         R2,#8
  71.         CLR         C
  72. WR1:        CLR         DQ
  73.         MOV         R3,#6
  74.         DJNZ         R3,$
  75.         RRC         A
  76.         MOV         DQ,C
  77.         MOV         R3,#23
  78.         DJNZ         R3,$
  79.         SETB         DQ
  80.         NOP
  81.         DJNZ         R2,WR1
  82.         SETB         DQ
  83.         RET

  85. ;-------读DS18B20的程序,从DS18B20中读出两个字节的温度数据
  86. READ_18200:
  87.         MOV         R4,#2         ; 将温度高位和低位从DS18B20中读出
  88.         MOV         R1,#36H ; 低位存入36H(TEMPER_L),高位存入35H(TEMPER_H)
  89. RE00:        MOV         R2,#8
  90. RE01:        CLR         C
  91.         SETB         DQ
  92.         NOP
  93.         NOP
  94.         CLR         DQ
  95.         NOP
  96.         NOP
  97.         NOP
  98.         SETB         DQ
  99.         MOV         R3,#7
  100.         DJNZ         R3,$
  101.         MOV         C,DQ
  102.         MOV         R3,#23
  103.         DJNZ         R3,$
  104.         RRC         A
  105.         DJNZ         R2,RE01
  106.         MOV         @R1,A
  107.         DEC         R1
  108.         DJNZ         R4,RE00
  109.         RET

  111. ;-------将从DS18B20中读出的温度数据进行转换
  112. TEMPER_COV:
  113.         MOV         A,#0F0H
  114.         ANL         A,TEMPER_L ; 舍去温度低位中小数点后的四位温度数值
  115.         SWAP         A
  116.         MOV         TEMPER_NUM,A
  117.         MOV         A,TEMPER_L
  118.         JNB         ACC.3,TEMPER_COV1 ; 四舍五入去温度值
  119.         INC         TEMPER_NUM
  120.         
  121. TEMPER_COV1:
  122.         MOV         A,TEMPER_H
  123.         ANL         A,#07H
  124.         SWAP         A
  125.         ADD         A,TEMPER_NUM
  126.         MOV         TEMPER_NUM,A ; 保存变换后的温度数据

  128.         RET

  130. ;-------DS18B20初始化程序
  131. INIT_1820:
  132.         CLR         DQ
  133.         MOV         R0,#0FBH
  134. TSR1:        DJNZ         R0,TSR1 ; 延时
  135.         SETB         DQ
  136.         MOV         R0,#25H ;96US-25H
  137. TSR2:        DJNZ         R0,TSR2

  139. TSR3:        SETB         FLAG1         ; 置标志位,表示DS1820存在
  140. TSR6:        DJNZ         R0,TSR6 ; 延时
  141. TSR7:        SETB         DQ
  142.         RET

  144. ;-------重新写DS18B20暂存存储器设定值
  145. RE_CONFIG:
  146.         JB         FLAG1,RE_CONFIG1 ; 若DS18B20存在,转RE_CONFIG1
  147.         RET
  148. RE_CONFIG1:
  149.         MOV         A,#0CCH ; 发SKIP ROM命令
  150.         LCALL         WRITE_1820
  151.         MOV         A,#4EH ; 发写暂存存储器命令
  152.         LCALL         WRITE_1820
  153.         
  154.         MOV         A,#00H ; TH(报警上限)中写入00H
  155.         LCALL         WRITE_1820
  156.         MOV         A,#00H ; TL(报警下限)中写入00H
  157.         LCALL         WRITE_1820
  158.         MOV         A,#7FH ; 选择12位温度分辨率
  159.         LCALL         WRITE_1820
  160.         RET

  162. ;------------------延时子程序
  163. DELAY:
  164.         MOV         R7,#00H

  166. MIN:        DJNZ         R7,YS500
  167.         RET
  168. YS500:        LCALL         YS500US
  169.         LJMP         MIN
  170. YS500US:MOV         R6,#00H
  171.         DJNZ         R6,$
  172.         RET
  173. DELAY1:        MOV         R7,#20H
  174.         DJNZ         R7,$
  175.         RET        

  177. SHUJU:      
  178.          MOV R0,    #0H   
  179.              MOV R1, TEMPER_NUM   
  180.              CALL HEX2BCD      ;调用子程序把R0 R1中的数字，转换成BCD码，送到R2 R3 R4;-------下面，把万千百十个位，分别存入R4 R3 R2 R1 R0     
  181.              MOV A,   R4     
  182.              MOV B,   #16   
  183.              DIV AB                ;除以16，目的是分离出高、低四位     
  184.              MOV 42H, A            ;存放十位     
  185.              MOV 43H, B            ;存放个位;   
  186.              MOV A,   R2     
  187.              MOV R4, A            ;存放万位;     
  188.              MOV A,   R3     
  189.              MOV B,   #16     
  190.              DIV AB     
  191.              MOV 40H, A   
  192.              MOV 41H, B     
  193.              SJMP  DISPLAY               
  194. HEX2BCD:     CLR A     ;把R0 R1中的数字，转换成BCD码，送到R2 R3 R4     
  195.              MOV R2, A            ;先清零   
  196.              MOV R3, A      
  197.              MOV R4, A      
  198.              MOV R5, #16       ;共转换十六位数
  199. LOOP:        CLR C     
  200.              MOV A,R1           ;从待转换数的高端移出一位到Cy     
  201.              RLC A     
  202.              MOV R1,A     
  203.              MOV A, R0     ;搜索
  204.              RLC A     
  205.              MOV R0,A     
  206.              MOV A,R4           ;送到BCD码的低端     
  207.              ADDC A,R4           ;带进位加。自身相加，相当于左移一位     
  208.              DA   A                 ;十进制调整，变成BCD码     
  209.              MOV R4,A     
  210.              MOV A,R3     
  211.              ADDC A,R3     
  212.              DA   A     
  213.              MOV R3,A                     
  214.              MOV A,R2     
  215.              ADDC A,R2   
  216.              MOV R2, A     
  217.              DJNZ R5, LOOP         ;共转换十六位数
  218.                 RET
  219.             
  220.         
  221. DISPLAY:MOV R1,#40H
  222.         INC R1
  223.         INC R1
  224.         MOV R5,#0F1H
  225.         MOV A,R5
  226.         MOV P0,#0FFH
  227.         MOV P2,A
  228.         MOV A,@R1
  229.         MOV DPTR,#TAB
  230.         MOVC A,@A+DPTR
  231.         MOV P0,A
  232.         NOP
  233.         NOP
  234.         NOP
  235.         NOP
  236.         NOP
  237.         NOP        
  238.         NOP   
  239.         NOP
  240.         NOP
  241.         NOP
  242.         NOP
  243.         NOP
  244.         NOP
  245.         NOP
  246.         NOP
  247.         NOP
  248.         NOP
  249.         NOP
  250.         NOP
  251.         NOP
  252.         NOP
  253.         NOP
  254.         NOP
  255.         NOP
  256.         NOP
  257.         NOP
  258.         NOP
  259.         NOP
  260.         NOP
  261.         INC R1
  262.         MOV R5,#0F2H
  263.         MOV A,R5
  264.         MOV P0,#0FFH
  265.         MOV P2,A
  266.         MOV A,@R1
  267.         MOV DPTR,#TAB
  268.         MOVC A,@A+DPTR
  269.         MOV R2,#80H
  270.         ADD A,R2
  271.         MOV P0,A
  272.         NOP
  273.         NOP
  274.         NOP
  275.         NOP
  276.         NOP
  277.         NOP        
  278.         NOP   
  279.         NOP
  280.         NOP
  281.         NOP
  282.         NOP
  283.         NOP
  284.         NOP
  285.         NOP
  286.         NOP
  287.         NOP
  288.         NOP
  289.         NOP
  290.         NOP
  291.         NOP
  292.         NOP
  293.         NOP
  294.         NOP
  295.         NOP
  296.         NOP
  297.         NOP
  298.         NOP
  299.         NOP
  300.         NOP
  301.         
  302.         
  303.         AJMP DISPLAY

  305.       
  306.       
  307. TAB:    DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,0FFH,88H,0BFH
  308.       

  310.        END
  311.             
复制代码

所有资料51hei提供下载:
由于有会员测试打不开,已经被管理删除


回复

使用道具 举报

ID:236933 发表于 2019-11-15 13:58 | 显示全部楼层
给的仿真文件打开之后是损坏的，资料无用
回复

使用道具 举报

ID:855478 发表于 2021-3-23 16:14 | 显示全部楼层
可惜没有仿真图
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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