- 首页
-
- 问答
-
黑骑战队
-55~125度，你自己修改：;***************WAVE-E6000/T**********************;*MCU: AT892051 *;*MCU-crystal: 12M *;*Version: 01 *;*Last Updata: 2007-5-27 *;*Author: zhaojun *;*Description: *;DS18B20的读写程序,数据脚P3.4 *;温度传感器18B20汇编程序,采用器件默认的12位转化 *;最大转化时间750微秒,显示温度-55到+125度,显示精度*;为0.1度，显示采用4位LED共阳显示测温值 *;*************************************************;单片机内存分配申明!;*************************************************TEMPER_L EQU 40H ;用于保存读出温度的低8位TEMPER_H EQU 41H ;用于保存读出温度的高8位FLAG1 EQU 38H ;是否检测到DS18B20标志位SEC EQU 20H ;数码管个位数存放内存位置MIN EQU 21H ;数码管十位数存放内存位置TEMPL EQU 30H ;用于保存读出温度的低8位TEMPH EQU 31H ;用于保存读出温度的高8位TEMPHC EQU 32H ;温度转换寄存器低8位TEMPLC EQU 33H ;温度转换寄存器高8位BUF1 EQU 34H ;显示缓冲寄存器小数位BUF2 EQU 35H ;显示缓冲寄存器个数位BUF3 EQU 36H ;显示缓冲寄存器十数位BUF4 EQU 37H ;显示缓冲寄存器百数位TEMPDIN BIT P3.4 ;数据脚定义DIN BIT P1.7 ;小数点控制;********************************************** ORG 0000H ;主程序入口地址 AJMP MAIN ;转主程序 ORG 0003H ;外中断0中断入口 DB 00H,00H,00H,00H,00H,00H,00H; RETI ;跳至INTEX0执行中断服务程序 ORG 000BH ;定时器T0中断入口地址 DB 00H,00H,00H,00H,00H,00H,00H ; RETI ;跳至定时器T0执行中断服务程序 ORG 0013H ;外中断1中断入口 DB 00H,00H,00H,00H,00H,00H,00H ; RETI ;跳至INTEX1执行中断服务程序 ORG 001BH ;定时器T1中断入口地址 DB 00H,00H,00H,00H,00H,00H,00H ; RETI ;中断返回（不开中断） ORG 0023H ;串行口中断入口地址 DB 00H,00H,00H,00H,00H,00H,00H ; RETI ;中断返回（不开中断）;**********************************************;两位数码管来显示温度,显示范围00到99度,显示精度为1度;因为12位转化时每一位的精度为0.0625度,我们不要求显示小数所以可以抛弃29H的低4位;将28H中的低4位移入29H中的高4位,这样获得一个新字节,这个字节就是实际测量获得的温度;无需乘于0.0625系数;**********************************************MAIN: MOV SP, #50H ; MOV P1, #0FFH ;LPTEMP: LCALL GET_TEMPER ;调用读温度子程序 LCALL CONVTEMP ;温度BCD码计算处理子程序 LCALL DISPBCD ;显示区BCD码温度值刷新子程序;************************************* LCALL DISPLAY ;调用数码管显示子程序;************************************* ;CPL P3.0 ; AJMP LPTEMP ;;*************************************; 这是DS18B20复位初始化子程序;*************************************INIT_1820: SETB TEMPDIN NOP CLR TEMPDIN ;主机发出延时537微秒的复位低脉冲 MOV R1,#3TSR1: MOV R0,#107 DJNZ R0,$ DJNZ R1,TSR1 SETB TEMPDIN ;然后拉高数据线 NOP NOP NOP MOV R0,#25HTSR2: JNB TEMPDIN,TSR3 ;等待DS18B20回应 DJNZ R0,TSR2 LJMP TSR4 ;延时TSR3: SETB FLAG1 ;置标志位,表示DS1820存在 ;CLR P3.7 ;检查到DS18B20就点亮P3.7LED LJMP TSR5TSR4: CLR FLAG1 ;清标志位,表示DS1820不存在 ;CLR P3.1 LJMP TSR7TSR5: MOV R0,#117TSR6: DJNZ R0,TSR6 ;时序要求延时一段时间TSR7: SETB TEMPDIN ; RET;****************************************; 读出转换后的温度值;****************************************GET_TEMPER: SETB TEMPDIN ; LCALL INIT_1820 ;先复位DS18B20 JB FLAG1,TSS2 RET ;判断DS1820是否存在?若DS18B20不存在则返回TSS2: ;CLR P3.3 ;DS18B20已经被检测到!! MOV A,#0CCH ;跳过ROM匹配 LCALL WRITE_1820 MOV A,#44H ;发出温度转换命令 LCALL WRITE_1820;*****************************************;这里通过调用显示子程序实现延时一段时间,等待AD转换结束,12位的话750微秒;***************************************** LCALL DISPLAY;***************************************** LCALL INIT_1820 ;准备读温度前先复位 MOV A,#0CCH ;跳过ROM匹配 LCALL WRITE_1820 MOV A,#0BEH ;发出读温度命令 LCALL WRITE_1820 LCALL READ_18200 ;将读出的温度数据保存到35H/36H RET;*******************************************;写DS18B20的子程序(有具体的时序要求);*******************************************WRITE_1820: MOV R2,#8 ;一共8位数据 CLR C ;WR1: CLR TEMPDIN ; MOV R3,#6 DJNZ R3,$ RRC A MOV TEMPDIN,C ; MOV R3,#23 DJNZ R3,$ SETB TEMPDIN ; NOP DJNZ R2,WR1 ; SETB TEMPDIN ; RET;*************************************;处理温度BCD码子程序;*************************************CONVTEMP: MOV A,TEMPH ; ANL A,#80H ; JZ TEMPC1 ; 判断温度是否在零下？ CLR C ; 温度值补码 变成原码 MOV A,TEMPL ; CPL A ADD A,#01H ; MOV TEMPL,A ; MOV A, TEMPH ; - CPL A ; ADDC A,#00H ; MOV TEMPH,A ; TEMPHC HI=符号位 MOV TEMPHC,#0BH ; 置"-"标志 SJMP TEMPC11 ;TEMPC1: MOV TEMPHC,#0AH ; 置"+"标志;**************************************TEMPC11: MOV A,TEMPHC ; 计算小数位温度BCD值 SWAP A MOV TEMPHC,A ; MOV A,TEMPL ; ANL A,#0FH ; 乘0.0625 MOV DPTR,#TEMPDOTTAB ; MOVC A,@A+DPTR ; MOV TEMPLC,A ; TEMPLC LOW= 小数部分 BCD;************************************** MOV A,TEMPL ; 计算整数位温度BCD值 ANL A,#0F0H ; SWAP A ; MOV TEMPL,A ; MOV A,TEMPH ; ANL A,#0FH ; SWAP A ; ORL A,TEMPL ; MOV TEMPER_L ,A ; LCALL HEX2BCD1 ; 调用单字节十六进制转BCD子程序;************************************ MOV TEMPL,A ; ANL A,#0F0H ; SWAP A ; ORL A,TEMPHC ; TEMPHC LOW = 十位数 BCD MOV TEMPHC,A ; MOV A,TEMPL ; ANL A,#0FH ; SWAP A ; TEMPLC HI = 个位数 BCD ORL A,TEMPLC ; MOV TEMPLC,A ; MOV A,R7 ; JZ TEMPOUT ; ANL A,#0FH ; SWAP A ; MOV R7,A ; MOV A,TEMPHC ; TEMPHC HI = 百位数 BCD ANL A,#0FH ; ORL A,R7 ; MOV TEMPHC,A ;TEMPOUT: RET ;;**************************************;小数部分分码表;**************************************TEMPDOTTAB: DB 00H,01H,01H,02H,03H,03H,04H,04H,05H,06H DB 06H,07H,08H,08H,09H,09H ;;**************************************;显示区 BCD 码温度值刷新子程序;**************************************DISPBCD: MOV A,TEMPLC ; 温度数据移入显示寄存器 ANL A,#0FH ; MOV BUF1,A ; 显示小数 MOV A,TEMPLC ; SWAP A ; ANL A,#0FH ; MOV BUF2,A ; 显示个位 MOV A,TEMPHC ; ANL A,#0FH ; MOV BUF3,A ; 显示十位 MOV A,TEMPHC ; SWAP A ; ANL A,#0FH ; MOV BUF4,A ; 显示百位 MOV A,TEMPHC ; ANL A,#0F0H ; CJNE A,#10H,DISPBCD0 ; 百位数=0？ SJMP DISPOUT ;DISPBCD0: MOV A, TEMPHC ; ANL A, #0FH ; JNZ DISPOUT ; 十位数是0? MOV A,TEMPHC ; SWAP A ; ANL A,#0FH ; MOV BUF4,0AH ; 符号位不显示 MOV BUF3,A ; 十位数显示符号DISPOUT: RET ;;*************************************;单字节十六进制转BCD;*************************************HEX2BCD1:MOV B,#64H ; 十六进制 ->BCD DIV AB ; B=A%100 MOV R7,A ; R7=百位数 MOV A,#0AH ; XCH A,B ; DIV AB ; B=A%B SWAP A ; ORL A,B ; RET ;;*************************************; Calculate CRC-8 Values, Uses The;CCITT-8 Polynomial,Expressed As; X^8+X^5+X^4+1;*************************************CRC8CAL: PUSH ACC ; MOV R7,#08H ; Number Bits ByteCRC8LOOP1: XRL A,B ; Calculate CRC RRC A ; Move T0 Carry MOV A,B ; Get The Last CRC Value JNC CRC8LOOP2 ; Skip If Data==0 XRL A,#18H ; Update The CRC ValueCRC8LOOP2: RRC A ; Position The New CRC MOV B,A ; Store The New CRC POP ACC ; Get The Remaining Bits RR A ; Possition The Next Bit PUSH ACC ; Save The Remaining Bits DJNZ R7,CRC8LOOP1 ; Repeat For 9 Bits POP ACC ; RET ;;******************************************;读DS18B20的程序,从DS18B20中读出9个字节数据;开始的两个字节为温度数据;******************************************READ_18200: MOV R4,#9 ; 将温度高位和低位从DS18B20中读出 MOV R1,#TEMPER_L ; 低位存入29H(TEMPER_L),高位存入28H(TEMPER_H) MOV B, #00H ;;************************************RE00: MOV R2,#8 ; 数据一共有8位RE01: CLR C SETB TEMPDIN ; NOP NOP CLR TEMPDIN ; NOP NOP NOP SETB TEMPDIN ; MOV R3,#9RE10: DJNZ R3,RE10 ; MOV C,TEMPDIN ; MOV R3,#23RE20: DJNZ R3,RE20 ; RRC A DJNZ R2,RE01 ;;************************************ MOV @R1,A ; INC R1 ; LCALL CRC8CAL ; DJNZ R4,RE00 ; MOV A,B ; JNZ READ_OUT ; MOV TEMPL,TEMPER_L ; MOV TEMPH,TEMPER_H ;READ_OUT: RET;*****************************************;显示子程序;*****************************************DISPLAY: MOV DPTR,#NUMTAB ; 指定查表启始地址 MOV R0,#4DP11: MOV R1,#250 ; 显示1000次DPLP: SETB P1.7 MOV A,BUF1 ; 取小位数 MOVC A,@A+DPTR ; 查小位数的7段代码 MOV P1,A ; 送出小位的7段代码 CLR P3.0 ; 开小位显示 ACALL DL1ms ; 显示1ms SETB P3.0 ; MOV A,BUF2 ; 取个位数 MOVC A,@A+DPTR ; 查个位数的7段代码 MOV P1,A ; 送出个位的7段代码 CLR P1.7 CLR P3.1 ; 开个位显示 ACALL DL1ms ; 显示1ms SETB P3.1 ; SETB P1.7 MOV A,BUF3 ; 取十位数 MOVC A,@A+DPTR ; 查十位数的7段代码 MOV P1,A ; 送出十位的7段代码 CLR P3.2 ; 开十位显示 ACALL DL1ms ; 显示1ms SETB P3.2 ; SETB P1.7 MOV A,BUF4 ; 取百位数 MOVC A,@A+DPTR ; 查百位数的7段代码 MOV P1,A ; 送出百位的7段代码 CLR P3.3 ; 开百位显示 ACALL DL1ms ; 显示1ms SETB P3.3 ; DJNZ R1,DPLP ; 250次没完循环 DJNZ R0,DP11 ; 4个100次没完循环 RET;****************************************;0.2MS延时(按12MHZ算);****************************************DL1MS: MOV R7,#100 DJNZ R7,$ RET;****************************************;7段数码管0～9数字的共阳显示代码;****************************************NUMTAB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H,0FFH,0BFH ;; "0" "1" "2" "3" "4" "5" "6" "7" "8" "9" "不亮" "-";**************************************** END
-
匿名用户
这个电路很简单，我说一下就可以了。数字式温度传感器用最常用的DS18B20，它只有3个管脚，一个接电源，一个接地，另一个接8051单片机就可以了。温度值用数码管显示。这样整个电路就接好了。如果楼主觉得我回答的可以别忘了给我加分哦，为了你的问题我花费了半天的时间啊。程序如下：
#include
#include
#define uchar unsigned char #define uint unsigned int #define Self_Define_ISP_Download_Command 0x3D sfr IAP_CONTR=0xE7; sbit DQ = P3^5; //DS18B20接入口 uchar code table[]={ 0xc0,0xf9,0xa4,0xb0, 0x99,0x92,0x82,0xf8,0x80,0x90} ; char bai,shi,ge; //定义变量 void Init_Com(void) { TMOD = 0x20; SM0=0; SM1=1; REN=1; TH1 = 0xFd; TL1 = 0xFd; TR1 = 1; EA=1; ES=1; } /*延时子函数*/ void delay(uint num) { while(num--) ; } /*************DS18b20温度传感器函数*********************/ Init_DS18B20(void) //传感器初始化 { uchar x=0; DQ = 1; //DQ复位 delay(10); //稍做延时 DQ = 0; //单片机将DQ拉低 delay(80); //精确延时 大于 480us //450 DQ= 1; //拉高总线 delay(20); x=DQ; //稍做延时后 如果x=0则初始化成功 x=1则初始化失败 delay(30); } //读一个字节 ReadOneChar(void) { uchar i=0; uchar dat = 0; for (i=8;i>0;i--) { DQ = 0; // 给脉冲信号 dat>>=1; DQ = 1; // 给脉冲信号 if(DQ) dat|=0x80; delay(8); } return(dat); } //写一个字节 WriteOneChar(unsigned char dat) { uchar i=0; for (i=8; i>0; i--) { DQ = 0; DQ = dat&0x01; delay(10); DQ = 1; dat>>=1; } delay(8); } //读取温度 int ReadTemperature(void) { uchar a,b; uint t; float tt; Init_DS18B20(); WriteOneChar(0xCC); // 跳过读序号列号的操作 WriteOneChar(0x44); // 启动温度转换 Init_DS18B20(); WriteOneChar(0xCC); //跳过读序号列号的操作 WriteOneChar(0xBE); //读取温度寄存器等（共可读9个寄存器） 前两个就是温度 a=ReadOneChar();//低位 b=ReadOneChar();//高位 tt=(b*256+a)*0.0625*100;//2个8位合成16位 t=(int)tt; /*t=b; t<<=8; t=t|a; tt=t*0.0625; t= tt*10+0.5; */ return(t); } /*显示子函数*/ void display(int bai,int shi,int ge) { int temp; temp=ReadTemperature();//读温度 bai=temp/1000;//显示百位 shi=temp%1000/100;//显示十位 ge=temp%100/10;//显示个位 //xiao=temp%10; P2=0xfd; //位选 P0=0X7f; //显示小数点 delay(500); P2=0xfe; P0=table[bai];//显示千位 delay(500);//一小段延时动态显示 P2=0xfd; P0=table[shi];//显示百位 delay(500); P2=0xfb; P0=table[ge];//显示十位 delay(500); P2=0xf7;// 显示° P0=0x9c; // delay(50); } void main() { Init_Com(); while(1) { display(bai,shi,ge);//显示函数 } } void UART_Interrupt_Receive(void) interrupt 4 { unsigned char k=0; unsigned int a,b; if(RI==1) { RI=0; k=SBUF; if(k==Self_Define_ISP_Download_Command) { for(a=1000;a>0;a--) for(b=100;b>0;b--); //延时约1S IAP_CONTR = 0x60; } } else { TI=0; } }
-
-
-
-
-
-
-
-
求购
valiant 间断武器、机器人系统等各种实时控制系统、模糊控制等领域、计算机外部设备、在机电一体化中的应用机电一体化产品是指集机械技术，微电子技术，计算机技术于一体，洗衣机、汽车及通信系统、商业营销领域、安全防卫、收音机。在各类仪器仪表中引入单片机热心问友 2011-10-28单片机又称单片微控制器、电饭煲、微波炉、空调机、电冰箱，有利于提高系统的工作效率和产品的质量。4、在人们生活中的应用目前国内外各种家具已经普遍用单片机代替传统的控制电路，例如、过程监测、航空航天，保证系统工作在最佳状态,它不是完成某一个逻辑功能的芯片、音像、电风扇及许多高级电子玩具都配上了单片机。5、在其他方面的应用单片机还广泛应用于办公自动化领域。用单片机进行实时系统数据处理和控制,而是把一个计算机系统集成到一个芯片上。概括的讲。51单片机只是其中的一种。 追问： 大师傅，使其产品具有智能化特征的电子产品。它是机械工业发展的方向。3、在实时控制系统中的应用单片机广泛用于各种实时过程控制系统中，例如工业过程控制，使仪器仪表智能化，提高测试的自动化程度和精度，简化仪器仪表的硬件结构，提高其性能价格比。2：一块芯片就成了一台计算机。1、在智能仪表中的应用这是单片机应用最多最活跃的领域之一
165438c588fa 这个很简单的，波形实际是单片机输出的数字。 一直输出100，1S以后输出0，如此循环就是方波。 锯齿波就是从输出从0逐一增加到100，到一百后跳转到0，就在示波器上形成锯齿波形。 三角波就是从输出从0逐一增加到100，到一百后再逐一减少到0. 正弦波需要你计算下，假如波峰是100，波谷是0，你要计算下中间各点的数值，制作一个数据表，一个一个顺序输出，就能得到正弦波。 频率其实就是输出数字用的时间，幅值是你的数字多少。 这里不给出程序，建议你参考自己的教材自己尝试编写一下，这是单片机的一个重要实验，对你理解单片机和编写程序有很大帮助。 编程时先绘制流程图，再根据流程图，参照语法指令完成程序，调试后就可以了。 祝你成功。
1条回答
向死而生 
浅绿色 
带刺的红玫瑰 
随风远航 
