valve control figures programme.c

阀门控制器程序

/* ========================================================
* 这是阀门控制器主程序， 文件名是 GAO26.C 
* =========================================================*/
//#define PRIVILEGE                    //定义条件编译
/*如果最高波特率为9600，必须屏蔽上一句*/
#include <reg52.h>                      //单片机头文件
#include <stdio.h>
#include <math.h>
#include <absacc.h>
#include <ctype.h>
#include <string.h>
#include <stdlib.h>
#include <Intrins.h>
#include <Stdarg.h>

#define uchar unsigned char            //简化定义
#define uint unsigned int
#define lint unsigned long int

void timedelay(uint timess);           //函数说明 
void delay1(uint x);
void pick(void);
void inp0(void);
void inp2(void);
void inp3(void);
void inp4(void);
void delay2(void);
void delay3(void);
void delay4(void);
void comerr(void);

extern  uchar chai;                     //把全局变量chai声明为外部变量
extern  uchar a_func(uchar);            //把a_func声明为外部函数－A/D转换程序   

uint data  arc,crc;                     //变量说明
uchar data sbufda,tx_count,sent;
uchar idata *aba,*abc;
uchar idata temp1,temp2,kcc1,kcc0,aaa,bbb,flag ;
uchar idata rxbuf[8];
uchar idata txbuf[18];
uchar idata bote,addr,ad11,ad22;
float idata ad1,ad2;
uint crc16(uchar *str,uint num);

uint code  crctable[]={                  //CRC计算用表
         0x0000,0xC0C1,0xC181,0x0140,0xC301,0x03C0,0x0280,0xC241,
         0xC601,0x06C0,0x0780,0xC741,0x0500,0xC5C1,0xC481,0x0440,
         0xCC01,0x0CC0,0x0D80,0xCD41,0x0F00,0xCFC1,0xCE81,0x0E40,
         0x0A00,0xCAC1,0xCB81,0x0B40,0xC901,0x09C0,0x0880,0xC841,
         0xD801,0x18C0,0x1980,0xD941,0x1B00,0xDBC1,0xDA81,0x1A40,
         0x1E00,0xDEC1,0xDF81,0x1F40,0xDD01,0x1DC0,0x1C80,0xDC41,
         0x1400,0xD4C1,0xD581,0x1540,0xD701,0x17C0,0x1680,0xD641,
         0xD201,0x12C0,0x1380,0xD341,0x1100,0xD1C1,0xD081,0x1040,
         0xF001,0x30C0,0x3180,0xF141,0x3300,0xF3C1,0xF281,0x3240,
         0x3600,0xF6C1,0xF781,0x3740,0xF501,0x35C0,0x3480,0xF441,
         0x3C00,0xFCC1,0xFD81,0x3D40,0xFF01,0x3FC0,0x3E80,0xFE41,
         0xFA01,0x3AC0,0x3B80,0xFB41,0x3900,0xF9C1,0xF881,0x3840,
         0x2800,0xE8C1,0xE981,0x2940,0xEB01,0x2BC0,0x2A80,0xEA41,
         0xEE01,0x2EC0,0x2F80,0xEF41,0x2D00,0xEDC1,0xEC81,0x2C40,
         0xE401,0x24C0,0x2580,0xE541,0x2700,0xE7C1,0xE681,0x2640,
         0x2200,0xE2C1,0xE381,0x2340,0xE101,0x21C0,0x2080,0xE041,
         0xA001,0x60C0,0x6180,0xA141,0x6300,0xA3C1,0xA281,0x6240,
         0x6600,0xA6C1,0xA781,0x6740,0xA501,0x65C0,0x6480,0xA441,
         0x6C00,0xACC1,0xAD81,0x6D40,0xAF01,0x6FC0,0x6E80,0xAE41,
         0xAA01,0x6AC0,0x6B80,0xAB41,0x6900,0xA9C1,0xA881,0x6840,
         0x7800,0xB8C1,0xB981,0x7940,0xBB01,0x7BC0,0x7A80,0xBA41,
         0xBE01,0x7EC0,0x7F80,0xBF41,0x7D00,0xBDC1,0xBC81,0x7C40,
         0xB401,0x74C0,0x7580,0xB541,0x7700,0xB7C1,0xB681,0x7640,
         0x7200,0xB2C1,0xB381,0x7340,0xB101,0x71C0,0x7080,0xB041,
         0x5000,0x90C1,0x9181,0x5140,0x9301,0x53C0,0x5280,0x9241,
         0x9601,0x56C0,0x5780,0x9741,0x5500,0x95C1,0x9481,0x5440,
         0x9C01,0x5CC0,0x5D80,0x9D41,0x5F00,0x9FC1,0x9E81,0x5E40,
         0x5A00,0x9AC1,0x9B81,0x5B40,0x9901,0x59C0,0x5880,0x9841,
         0x8801,0x48C0,0x4980,0x8941,0x4B00,0x8BC1,0x8A81,0x4A40,
         0x4E00,0x8EC1,0x8F81,0x4F40,0x8D01,0x4DC0,0x4C80,0x8C41,
         0x4400,0x84C1,0x8581,0x4540,0x8701,0x47C0,0x4680,0x8641,
         0x8201,0x42C0,0x4380,0x8341,0x4100,0x81C1,0x8081,0x4040};

sbit opentop1=P1^0;
sbit closetop1=P1^1;
sbit error1=P1^2;
sbit ctr1 = P1^3;
sbit p14=P1^4;
sbit p15=P1^5;
sbit p16=P1^6;
sbit p17=P1^7;

sbit zhan=P3^4;
sbit fan=P3^5;
sbit beep=P3^6;
sbit weidog=P3^7;

sbit open=P2^0;
sbit stop=P2^1;
sbit close=P2^2;
sbit farner=P2^3;
sbit opentop=P2^4;
sbit closetop=P2^5;
sbit error=P2^6;
sbit p27=P2^7;

//*****************************************
void sio1(void) interrupt 4 using 1     /*串行通讯口中断服务子程序*/
     {
     uchar i,point,der;

     if (_testbit_(TI))                 //JBC TI NEXT
           {
           sbufda++;
           if (sbufda<=tx_count)
             {
               ctr1 = 0;                 //准备发送
               SBUF =txbuf[sbufda];
             } else
                 {
                 ctr1=1;                  //准备接受
                 sbufda=0;;
                 }

          _nop_();
          _nop_();

            }
      if (_testbit_(RI))                    //JBC RI NEXT
            {                               //把收到的数放进队列 
           rxbuf[0]=rxbuf[1];
           rxbuf[1]=rxbuf[2];
           rxbuf[2]=rxbuf[3];
           rxbuf[3]=rxbuf[4];
           rxbuf[4]=rxbuf[5];
           rxbuf[5]=rxbuf[6];
           rxbuf[6]=rxbuf[7];
           rxbuf[7] = SBUF;
           if(rxbuf[0] == addr)             //本站地址为addr  
                 {
                      crc = 0xFFFF;         //modbus_crc 初值
                      for (i=0; i<=7;i++ )  //CRC校验 
                           {
                           arc= (rxbuf[i] ^ crc) & 0x00FF;  //异或
                           crc=_irol_(crc,8);
                           crc= crc & 0x00FF;
                           crc= crc ^ crctable[arc];        //异或
                           _nop_();
                            }

                     if (crc == 0)
                         {
                    switch (rxbuf[1])
                    { case 0x03:                 //读寄存器
                           txbuf[0]=rxbuf[0];    //txbuf[i]为返回的数据
                           txbuf[1]=rxbuf[1];
                           txbuf[2]=(rxbuf[5])*2;
                           point=txbuf[2];
                           sent=3;
                           aba=rxbuf[3];
                           for(i=0;i<point;i++)   //将指定地址单元的内容取出
                                {
                                 txbuf[sent]=*aba;
                                 aba++;
                                 sent++;
                                }
                            crc=crc16(txbuf,sent); //CRC校验 
                            abc=&crc;
                            _nop_();
                            sent++;
                            txbuf[sent]=*abc;
                            abc++;
                            sent--;
                            txbuf[sent]= *abc;
                            ctr1 = 0;
                            SBUF = txbuf[0];
                            ES=1;
                            sent++;
                            tx_count=sent;
                            sbufda=0;
                            break;
                      case 0x04:             //读寄存器
                           txbuf[0]=rxbuf[0];
                           txbuf[1]=rxbuf[1];
                           txbuf[2]=2;
                           txbuf[3]=0x00;
                           txbuf[4]=kcc0;
                           sent=5;
                           crc=crc16(txbuf,sent);
                           abc=&crc;
                           _nop_();
                           sent++;
                           txbuf[sent]=*abc;
                           abc++;
                           sent--;
                           txbuf[sent]= *abc;
                           ctr1 = 0;
                           SBUF = txbuf[0];
                           ES=1;
                           tx_count=6;
                           sbufda=0;
                           break;
                      case 0x06:                //写寄存器
                           txbuf[0]=rxbuf[0];   //txbuf[i]为返回的数据
                           txbuf[1]=rxbuf[1];
                           txbuf[2]=rxbuf[2];
                           txbuf[3]=rxbuf[3];
                           txbuf[4]=rxbuf[4];
                           txbuf[5]=rxbuf[5];
                           txbuf[6]=rxbuf[6];
                           txbuf[7]=rxbuf[7];
                           aaa=rxbuf[4];        //aaa,bbb 为上位机发来的命令   
                           bbb=rxbuf[5];
                           ctr1 = 0;
                           SBUF = txbuf[0];
                           ES=1;
                           tx_count=7;
                           sbufda=0;
                           break;
                      default :
                            return;
                      }            //switch
                           }
                    }
             }

           ES=1;
     }

uint crc16(uchar *str,uint num)    //CRC计算子程序
{
uint i, crc;
crc=0xffff;
for (i=0; i<num ;i++ )
    {
     arc= (str[i] ^ crc) & 0x00ff;
     crc=_irol_(crc,8);
     crc= crc & 0x00ff;
     crc= crc ^ crctable[arc];
     }
   return(crc);
}

void inp0(void)               //读入开关量
{
    kcc1=P0;
    //kcc1=kcc1&0x1f;
    delay2();
}
void inp2(void)               //读入开关量
{
    kcc1=P2;
    delay2();
}



void inp4(void)              //波特率设定程序1
{
    kcc1=P3;
    kcc1=kcc1>>2;
    kcc1=kcc1&0x03;
    if (kcc1==0) {bote=0xf4; goto in2;}    //2400
    if (kcc1==1) {bote=0xfa; goto in2;}    //4800
    if (kcc1==2) {bote=0xfd; goto in2;}    //9600
    if (kcc1==3) {bote=0xfd; PCON=0x80;}   //19200 smod=1
in2:delay2();