tcmain.c

PC与单片机双向通讯智能温控程序 #include <AT89X51.H> #include <intrins.h> #define Key_UP P1_0 #def

#include <AT89X51.H>
#include <intrins.h>
#define Key_UP            P1_0 
#define Key_DOWN          P1_1   
#define Key_SET           P1_2   
#define RelayOutPort      P2_0  
#define LEDPort           P0      
#define DELPort           P2_1   
#define LEDTwoC           P3_6    
#define LEDThreeC         P3_7    
#define TMPort			  P2_7
#define INBUF_LEN 5 //数据长度
unsigned char inbuf1[INBUF_LEN]={'0','0','0','0','0'};//发送缓冲区
unsigned char inbuf2[50];//接收缓冲区
unsigned char count3;
void init_serialcomm( void )
{
SCON = 0x50 ; //SCON: serail mode 1, 8-bit UART, enable ucvr
TMOD |= 0x20 ; //TMOD: timer 1, mode 2, 8-bit reload
PCON |= 0x80 ; //SMOD=1;
TH1 = 0xFA ; //Baud:4800 fosc=11.0592MHz
IE |= 0x90 ; //Enable Serial Interrupt
TR1 = 1 ; // timer 1 run
}
//向串口发送一个字符
void send_char_com( unsigned char ch)
{
SBUF=ch;
while (TI== 0 );
TI= 0 ;
}
//向串口发送一个字符串，strlen 为该字符串长度
void send_string_com( unsigned char *str, unsigned int strlen)
{
unsigned int k= 0 ;
do
{
send_char_com(*(str + k));
k++;
} while (k < strlen);
}
//串口接收中断函数
void serial () interrupt 4 using 3
{
if (RI) //RI==开始接收
{
unsigned char ch;
RI = 0 ; //软件RI=0
ch=SBUF;
if (ch> 1 )
{
count3= 0 ;
inbuf2[count3]=ch;
}
else
{
count3++;
inbuf2[count3]=ch;
}
}
}	

unsigned char code LEDDis[]={0xC0,0xF9,0xA4,0xB0,0x99,0x92,0x82,0xF8,0x80,0x90,0xFF,0xBF}; //0-9的LED笔划,0xFF为空,0xF7为负号
unsigned char dis_8[12]={'0','1','2','3','4','5','6','7','8','9',' ','-'};
static unsigned char bdata StateREG;	//可位寻址的状态寄存器
sbit DS1820ON = StateREG^0;	          //DS1820是否存在
sbit SetTF = StateREG^1;              //是否是在温度设置状态
sbit KeySETDown = StateREG^2;         //是否已按过SET键标识
sbit PowTF = StateREG^3;              //电源电源标识
sbit KeyTF = StateREG^4;							//键盘是否允许

//sbit KeySETDowning = StateREG^5;			//SET是否正在按下
static unsigned char bdata TLV _at_ 0x0029;         //温度变量高低位
static unsigned char bdata THV _at_ 0x0028;
static signed char TMV;       //转换后的温度值
static unsigned char KeyV,TempKeyV;      //键值
static unsigned char Second;
static unsigned char flag;
static signed char TMRomV _at_ 0x0027;    //高温限制
static signed char TMSetV _at_ 0x0026;    //温度设定值
static unsigned char KSDNum;    //SET键连按时的采集次数
static unsigned char IntNum,IntNum2,IntNum3;    //中断发生次数，IntNum用于SET长按检测，IntNum2用于设定状态时LED闪烁
static signed char LED_One,LED_Two,LED_Three;  //LED的显示位 LED_One为十位，LED_Two为个位
static unsigned char Sign; //负号标识

void main(void)
{

	void InitDS1820(void);   //定义函数
	void ROMDS1820(void);
	void TMVDS1820(void);
	void TMRDS1820(void);
	void TMWDS1820(void);
	void TMREDS1820(void);
	void TMERDS1820(void);
	void ReadDS1820(void);
	void WriteDS1820(void);
	void Delay_510(void);
	void Delay_110(void);
	void Delay_10ms(void);
	void Delay_4s(void);
	void V2ToV(void);
	
	 DELPort=1;
	StateREG = 0;   //初始化变量
	SetTF = 0;	
	PowTF = 0;			//关电源
	THV = 0;
	TLV = 0;
	TMV = 0;
	KeyV = 0;
	TempKeyV = 0;
	KSDNum = 0;
	IntNum = 0;
	IntNum2 = 0;
	IntNum3 = 0;
	LED_One = 0;
	LED_Two	= 0;

	InitDS1820(); //初始化
	ROMDS1820(); 	//跳过ROM
	TMERDS1820();  //E2PRAM中温度上限值调入RAM
	InitDS1820(); //初始化
	ROMDS1820(); 	//跳过ROM
	TMRDS1820(); 	//读出温度指令
	ReadDS1820(); //读出温度值和上限值
	TMSetV = TMRomV;  //拷贝保存在DS18B20ROM里的上限值到TMSetV

	EA = 1;					//允许CPU中断
	ET0 = 1; 				//定时器0中断打开
	TMOD = 0x1;			//设定时器0为模式1，16位模式
	TH0=0xB1;
	TL0=0xDF;				//设定时值为20000us（20ms）
	TR0 = 1;
	
	while(1){				//开始定时

	

	 


if (flag==0){
if (Second==1){
			Delay_4s();
			Delay_4s();
			Delay_4s();
			Delay_4s();
			Delay_4s();
			Delay_4s();
			
		  DELPort=0; 
		  Second=0;
		  }
		   }
		 }
	
	
}

//定时器0中断外理中键扫描和显示
void KeyAndDis_Time0(void) interrupt 1 using 2
{
  TH0=0xB1;
	TL0=0xDF;				//设定时值为20000us（20ms)

	LEDPort = 0xFF;
	
   
	   if (inbuf2[0]==0x33){
	   send_char_com('O');
	   send_char_com('O');
	   send_char_com('O');
	   SetTF = 1;
//send_string_com(inbuf2,1);
//BEEP=0;
//RELAY=0;
send_char_com('O');
     //inbuf2[0]=0x00;
	 inbuf2[0]=0x00;
} 

if (inbuf2[0]==0x36){

//send_string_com(inbuf2,1);
//BEEP=1;
send_char_com('N');
send_char_com('N');
send_char_com('N');
SetTF = 0;

inbuf2[0]=0x00;

} 

if (inbuf2[0]==0x34){
	   KeyV=2;
//send_string_com(inbuf2,1);
//BEEP=0;
//RELAY=0;
  TMSetV = TMSetV - 1;
    inbuf2[0]=0x00;
} 

if (inbuf2[0]==0x35){

//send_string_com(inbuf2,1);
//BEEP=1;
//RELAY=1;
 TMSetV = TMSetV + 1;    //上调温度
 inbuf2[0]=0x00;
} 

if (inbuf2[0]==0x74){
	 KeyV=2;
//send_string_com(inbuf2,1);
//BEEP=1;
//RELAY=1;
} 

if (inbuf2[0]==0x90){
	 KeyV=1;
//send_string_com(inbuf2,1);
//BEEP=1;
//RELAY=1;
} 


  if (!Key_UP)
    KeyV = 1;
  if (!Key_DOWN)
    KeyV = 2;
  if (!Key_SET)
    KeyV = 3;
	//KeySETDowning = 0;  //清除
  if (KeyV != 0)      //有键按下
    {
      Delay_10ms();   //延时防抖  按下10ms再测
      if (!Key_UP)
        TempKeyV = 1;
      if (!Key_DOWN)
        TempKeyV = 2;
      if (!Key_SET)
        TempKeyV = 3;
      if (KeyV == TempKeyV)   //两次值相等为确定接下了键
        {
          if (KeyV == 3)      //按下SET键，如在SET状态就退出，否则进入
            {
							//KeySETDowning = 1; //表明SET正在按下
							
			
              PowTF = 0;      //电源标识开
							if (!KeyTF)
              	if (SetTF){
				send_char_com('N');
send_char_com('N');
send_char_com('N');
                		SetTF = 0;    //标识位标识退出设定
						
										InitDS1820(); //初始化
  									ROMDS1820(); 	//跳过ROM
  									TMWDS1820(); 	//写温度上限指令
										WriteDS1820(); 	//写温度上限到DS18B20ROM
										WriteDS1820(); 	//写温度上限到DS18B20ROM
										WriteDS1820(); 	//写温度上限到DS18B20ROM
										InitDS1820(); //初始化
  									ROMDS1820(); 	//跳过ROM
  									TMREDS1820(); 	//温度上限值COPY回E2PRAM
									}
              	else {
				send_char_com('O');
	   send_char_com('O');
	   send_char_com('O');
                	SetTF = 1;}
					 
				   
              if (!KeySETDown) //没有第一次按下SET时，KeySETDown标识置1
                KeySETDown = 1;
              else
                KSDNum = KSDNum + 1;  //前一秒内有按过SET则开始计数
            }
          if (SetTF)  //在SET状态下
            {
			 
              if ((KeyV == 1) && (!KeyTF))
                TMSetV = TMSetV + 1;    //上调温度
              if ((KeyV == 2) && (!KeyTF))
                TMSetV = TMSetV - 1;    //下调温度
              if (TMSetV <= 20)          //限制温度上下限
                TMSetV = 20;
              if (TMSetV >= 75)
                TMSetV = 75;
            }
		if ((!KeyTF) && (IntNum3 == 0)) KeyTF = 1; //当键盘处于可用时，锁定
        }

     
    }
  KeyV = 0;
  TempKeyV = 0;   //清空变量准备下次键扫描

  if (!PowTF)
    {
      InitDS1820();	//初始化
      ROMDS1820(); 	//跳过ROM
      TMVDS1820();  //温度转换指令

      Delay_510();
      Delay_510();  //延时等待转换完成

      InitDS1820(); //初始化
      ROMDS1820(); 	//跳过ROM
      TMRDS1820(); 	//读出温度指令
      ReadDS1820(); //读出温度值

      V2ToV();        //转换显示值
      if (TMV > TMSetV)   //根据采集到的温度值控制继电器
        {
          RelayOutPort = 0;
		  flag=0;
		  }
      else
		    {
          RelayOutPort = 1;
		  DELPort=1; 
		  Second=1;
		  flag=1;

		
  		  }

      if (SetTF) IntNum2 = IntNum2 + 1; //用于闪烁计数
      if (IntNum2 > 50 ) IntNum2 = 0;
			if (KeyTF) IntNum3 = IntNum3 + 1; //用于防止按键连按
			if (IntNum3 > 25) 
				{
					IntNum3 = 0;
					KeyTF = 0;
				}

      if ((SetTF) && (IntNum2 < 25)) goto InitEnd;  //计数在后半段时显示
         
	  LEDPort = LED_Two;
      LEDTwoC = 0;
      Delay_510();
      LEDTwoC = 1;    //显示十位数
      LEDPort = LED_Three;
      LEDThreeC = 0;
      Delay_510();
      LEDThreeC = 1;    //显示个位数
    }
InitEnd:;
}

void V2ToV(void)	//数值转换
{
  TLV = TLV >> 4;			
  THV = THV << 4;			//读出的高低位数值移位
  TMV = TLV | THV;		//合并高低位放入TM为实际温度值
	Sign = 0;
  if (SetTF || !Key_SET)
    Sign = TMSetV >> 7;          //取符号
  else
     Sign = TMV >> 7;

	if (Sign)
		{
  		if (SetTF || !Key_SET)
				{
    			LED_One = (~(TMSetV-1)) / 100;          //SET状态下显示设定值
    			LED_Two = ((~(TMSetV-1)) - LED_One * 100)/10;
			    LED_Three = (~(TMSetV-1)) - LED_One * 100 - LED_Two * 10;
				inbuf1[0]=dis_8[LED_Two];
  inbuf1[1]=dis_8[LED_Three];
  //inbuf1[2]=dis_8[ LED_Three];
  inbuf1[2]=0x0d;
  inbuf1[3]=0x0a;
				}
  		else
				{
    			LED_One = (~(TMV-1)) / 100;							//转换百位值		
    			LED_Two = ((~(TMV-1)) - LED_One * 100)/10;
			    LED_Three = (~(TMV-1)) - LED_One * 100 - LED_Two * 10;
					inbuf1[0]=dis_8[LED_Two];
  inbuf1[1]=dis_8[LED_Three];
 inbuf1[2]=dis_8[0];
  inbuf1[3]=0x0d;
  inbuf1[4]=0x0a;
				}
		}
	else
		{ 
  		if (SetTF || !Key_SET)
				{
    			LED_One = (TMSetV) / 100;          //SET状态下显示设定值
    			LED_Two = (TMSetV - LED_One * 100)/10;
			    LED_Three = TMSetV - LED_One * 100 - LED_Two * 10;
					inbuf1[0]=dis_8[LED_Two];
  inbuf1[1]=dis_8[LED_Three];
 inbuf1[2]=dis_8[0];
  inbuf1[3]=0x0d;
  inbuf1[4]=0x0a;
				}
  		else
				{
    			LED_One = (TMV) / 100;							//转换百位值		
    			LED_Two = (TMV - LED_One * 100)/10;
			    LED_Three = TMV - LED_One * 100 - LED_Two * 10;
					inbuf1[0]=dis_8[LED_Two];
  inbuf1[1]=dis_8[LED_Three];
 inbuf1[2]=dis_8[0];
  inbuf1[3]=0x0d;
  inbuf1[4]=0x0a;
				}
		}

   init_serialcomm(); //初始化串口

//while ( 1 )
//{
send_string_com(inbuf1,INBUF_LEN);

 //转LED字段	
	if (LED_One) //超过百时十位的处理
		LED_Two = LEDDis[LED_Two];		
	else
		{
			if (LED_Two == 0)
				LED_Two = LEDDis[10];
			else
				LED_Two = LEDDis[LED_Two];
		}
	if (Sign)
		LED_One = LEDDis[11];
	else
		{
			if (LED_One == 0)
				LED_One = LEDDis[10];
			else
				LED_One = LEDDis[LED_One];
		}
	LED_Three = LEDDis[LED_Three];
}

void InitDS1820(void)		//初始化DS1820
{
	TMPort = 1;		//拉高TMPort
	_nop_();      //保持一个周期
	TMPort = 0;		//拉低TMPort
  Delay_510();  //延时  DS1820复位时间要500us的低电平
  TMPort = 1;   //拉高TMPort
	_nop_();      //保持  
	_nop_();
	_nop_();

  Delay_110();  //延时110us 等待DS1820回应
  if (!TMPort)  //回应信号为低电平
    DS1820ON = 1;
  else
    DS1820ON = 0;
  Delay_110();  //延时
  Delay_110();
  TMPort = 1;   //拉高TMPort
}

void ROMDS1820(void)  //跳过ROM匹配
{
#pragma asm
  MOV A,#0CCH
  MOV R2,#8
  CLR C
  WR1:
  CLR P2_7
  MOV R3,#6
  DJNZ R3,$
  RRC A
  MOV P2_7,C
  MOV R3,#23
  DJNZ R3,$
  SETB P2_7
  NOP
  DJNZ R2,WR1
  SETB P2_7
#pragma endasm
}

void TMVDS1820(void)  //温度转换指令
{
#pragma asm
  MOV A,#44H
  MOV R2,#8
  CLR C
  WR2:
  CLR P2_7
  MOV R3,#6
  DJNZ R3,$
  RRC A
  MOV P2_7,C
  MOV R3,#23
  DJNZ R3,$
  SETB P2_7
  NOP
  DJNZ R2,WR2
  SETB P2_7
#pragma endasm
}

void TMRDS1820(void)  //读出温度指令
{
#pragma asm
  MOV A,#0BEH
  MOV R2,#8
  CLR C
  WR3:
  CLR P2_7
  MOV R3,#6
  DJNZ R3,$
  RRC A
  MOV P2_7,C
  MOV R3,#23
  DJNZ R3,$
  SETB P2_7
  NOP
  DJNZ R2,WR3
  SETB P2_7
#pragma endasm
}

void TMWDS1820(void)  //写入温度限制指令
{
#pragma asm
  MOV A,#04EH
  MOV R2,#8
  CLR C
  WR13:
  CLR P2_7
  MOV R3,#6
  DJNZ R3,$
  RRC A
  MOV P2_7,C
  MOV R3,#23
  DJNZ R3,$
  SETB P2_7
  NOP
  DJNZ R2,WR13
  SETB P2_7
#pragma endasm
}

void TMREDS1820(void)		//COPY RAM to E2PRAM
{
#pragma asm
  MOV A,#48H
  MOV R2,#8
  CLR C
  WR33:
  CLR P2_7
  MOV R3,#6
  DJNZ R3,$
  RRC A
  MOV P2_7,C
  MOV R3,#23
  DJNZ R3,$
  SETB P2_7
  NOP
  DJNZ R2,WR33
  SETB P2_7
#pragma endasm
}

void TMERDS1820(void)		//COPY E2PRAM to RAM
{
#pragma asm
  MOV A,#0B8H
  MOV R2,#8
  CLR C
  WR43:
  CLR P2_7
  MOV R3,#6
  DJNZ R3,$
  RRC A
  MOV P2_7,C
  MOV R3,#23
  DJNZ R3,$
  SETB P2_7
  NOP
  DJNZ R2,WR43
  SETB P2_7
#pragma endasm
}

void WriteDS1820(void)	//写入温度限制值
{
#pragma asm
	MOV A,26H					//发出4EH写ROM指令后连发两个字节分别为上下限
  MOV R2,#8
  CLR C
  WR23:
  CLR P2_7
  MOV R3,#6
  DJNZ R3,$
  RRC A
  MOV P2_7,C
  MOV R3,#23
  DJNZ R3,$
  SETB P2_7
  NOP
  DJNZ R2,WR23
  SETB P2_7       
#pragma endasm
}

void ReadDS1820(void) //读出温度值
{
#pragma asm
  MOV R4,#3 ; 将温度高位和低位，高温限制位从DS18B20中读出
  MOV R1,#29H ; 低位存入29H(TEMPER_L),高位存入28H(TEMPER_H)，高温限制位存入27H(TMRomV)
  RE00:
  MOV R2,#8
  RE01:
  CLR C
  SETB P2_7
  NOP
  NOP
  CLR P2_7
  NOP
  NOP
  NOP
  SETB P2_7
  MOV R3,#09
  RE10: 
  DJNZ R3,RE10
  MOV C,P2_7
  MOV R3,#23
  RE20: 
  DJNZ R3,RE20
  RRC A
  DJNZ R2,RE01
  MOV @R1,A
  DEC R1
  DJNZ R4,RE00
#pragma endasm
}

void Delay_510(void)	//延时510微秒
{
#pragma asm
	MOV R0,#7DH
	MOV R1,#02H
	TSR1:
	DJNZ R0,TSR1
	MOV R0,#7DH
	DJNZ R1,TSR1
#pragma endasm
}

void Delay_110(void)	//延时110微秒
{
#pragma asm
	MOV R0,#19H
	MOV R1,#02H
	TSR2:
	DJNZ R0,TSR2
	MOV R0,#19H
	DJNZ R1,TSR2
#pragma endasm
}

void Delay_10ms(void)	//延时10ms
{
#pragma asm
	MOV R0,#19H
	MOV R1,#0C8H
	TSR3:
	DJNZ R0,TSR3
	MOV R0,#19H
	DJNZ R1,TSR3
#pragma endasm
}

void Delay_4s(void)	//延时4s
{
#pragma asm
  MOV R2,#28H
  TSR5:
	MOV R0,#0FAH
	MOV R1,#0C8H
	TSR4:
	DJNZ R0,TSR4
	MOV R0,#0FAH
	DJNZ R1,TSR4
  DJNZ R2,TSR5
#pragma endasm
}