开启辅助访问

amobbs.com 阿莫电子技术论坛

登录 注册 找回密码
搜索
amobbs.com 阿莫电子技术论坛»论坛首页 › 单片机 › AVR › Modbus Master Source Code(纯C语言，非分百通用) ...
bottom↓
返回列表 发新帖
回复: 49

Modbus Master Source Code(纯C语言，非分百通用)

[复制链接]
mimikankan

出0入0汤圆
发表于 2006-11-17 12:05:46 | 显示全部楼层 |阅读模式
#define READ_COIL     01

#define READ_DI       02

#define READ_HLD_REG  03

#define READ_AI       04

#define SET_COIL      05

#define SET_HLD_REG   06

#define READ_FIFO     24

#define PROTOCOL_EXCEPTION 0x81

#define PROTOCOL_ERR  1

#define FRM_ERR       2





const unsigned char auchCRCHi[] = {

0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81,

0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0,

0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01,

0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41,

0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81,

0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0,

0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01,

0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40,

0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81,

0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0,

0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01,

0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41,

0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81,

0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0,

0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01,

0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41,

0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81,

0x40

} ;



const unsigned  char auchCRCLo[] = {

0x00, 0xC0, 0xC1, 0x01, 0xC3, 0x03, 0x02, 0xC2, 0xC6, 0x06, 0x07, 0xC7, 0x05, 0xC5, 0xC4,

0x04, 0xCC, 0x0C, 0x0D, 0xCD, 0x0F, 0xCF, 0xCE, 0x0E, 0x0A, 0xCA, 0xCB, 0x0B, 0xC9, 0x09,

0x08, 0xC8, 0xD8, 0x18, 0x19, 0xD9, 0x1B, 0xDB, 0xDA, 0x1A, 0x1E, 0xDE, 0xDF, 0x1F, 0xDD,

0x1D, 0x1C, 0xDC, 0x14, 0xD4, 0xD5, 0x15, 0xD7, 0x17, 0x16, 0xD6, 0xD2, 0x12, 0x13, 0xD3,

0x11, 0xD1, 0xD0, 0x10, 0xF0, 0x30, 0x31, 0xF1, 0x33, 0xF3, 0xF2, 0x32, 0x36, 0xF6, 0xF7,

0x37, 0xF5, 0x35, 0x34, 0xF4, 0x3C, 0xFC, 0xFD, 0x3D, 0xFF, 0x3F, 0x3E, 0xFE, 0xFA, 0x3A,

0x3B, 0xFB, 0x39, 0xF9, 0xF8, 0x38, 0x28, 0xE8, 0xE9, 0x29, 0xEB, 0x2B, 0x2A, 0xEA, 0xEE,

0x2E, 0x2F, 0xEF, 0x2D, 0xED, 0xEC, 0x2C, 0xE4, 0x24, 0x25, 0xE5, 0x27, 0xE7, 0xE6, 0x26,

0x22, 0xE2, 0xE3, 0x23, 0xE1, 0x21, 0x20, 0xE0, 0xA0, 0x60, 0x61, 0xA1, 0x63, 0xA3, 0xA2,

0x62, 0x66, 0xA6, 0xA7, 0x67, 0xA5, 0x65, 0x64, 0xA4, 0x6C, 0xAC, 0xAD, 0x6D, 0xAF, 0x6F,

0x6E, 0xAE, 0xAA, 0x6A, 0x6B, 0xAB, 0x69, 0xA9, 0xA8, 0x68, 0x78, 0xB8, 0xB9, 0x79, 0xBB,

0x7B, 0x7A, 0xBA, 0xBE, 0x7E, 0x7F, 0xBF, 0x7D, 0xBD, 0xBC, 0x7C, 0xB4, 0x74, 0x75, 0xB5,

0x77, 0xB7, 0xB6, 0x76, 0x72, 0xB2, 0xB3, 0x73, 0xB1, 0x71, 0x70, 0xB0, 0x50, 0x90, 0x91,

0x51, 0x93, 0x53, 0x52, 0x92, 0x96, 0x56, 0x57, 0x97, 0x55, 0x95, 0x94, 0x54, 0x9C, 0x5C,

0x5D, 0x9D, 0x5F, 0x9F, 0x9E, 0x5E, 0x5A, 0x9A, 0x9B, 0x5B, 0x99, 0x59, 0x58, 0x98, 0x88,

0x48, 0x49, 0x89, 0x4B, 0x8B, 0x8A, 0x4A, 0x4E, 0x8E, 0x8F, 0x4F, 0x8D, 0x4D, 0x4C, 0x8C,

0x44, 0x84, 0x85, 0x45, 0x87, 0x47, 0x46, 0x86, 0x82, 0x42, 0x43, 0x83, 0x41, 0x81, 0x80,

0x40

};





const unsigned char char_tab[128]=

{

    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                       

    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                     

    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                       

    0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 0, 0, 0, 0, 0, 0,                     

    0, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0, 0, 0, 0, 0, 0, 0, 0, 0,   

    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                     

    0, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0, 0, 0, 0, 0, 0, 0, 0, 0,   

    0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0                        

};

   

   

const unsigned char tab_char[16]=

{

    '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'A', 'B', 'C', 'D', 'E', 'F'

};



const unsigned int bit_tab[]=

{

    BIT0, BIT1, BIT2, BIT3, BIT4, BIT5, BIT6, BIT7,

    BIT8, BIT9, BITA, BITB, BITC, BITD, BITE, BITF

};



unsigned short crc(unsigned char *puchMsg , unsigned short usDataLen)

{

    unsigned char uchCRCHi = 0xFF ; /* high byte of CRC initialized */

    unsigned char uchCRCLo = 0xFF ; /* low byte of CRC initialized */

    unsigned uIndex ;  /* will index into CRC lookup table */

   

    while (usDataLen--) /* pass through message buffer */

    {

   

   

     uIndex = uchCRCHi ^ *puchMsg++ ; /* calculate the CRC */

     uchCRCHi = uchCRCLo ^ auchCRCHi[uIndex];

     uchCRCLo = auchCRCLo[uIndex] ;

    }

    return (uchCRCHi << 8 | uchCRCLo) ;

}



unsigned char a2toh(unsigned char *str)

{

    unsigned char tmp;

    tmp = 0;

   

    tmp = char_tab[*str];

    str++;

    tmp = tmp*16 + char_tab[* str];

    return tmp;

}



int get_bit( unsigned int data, int bit )

{

    if (bit > 16) return 0;

    if (data & bit_tab[bit]) return 1;

    else return 0;

}



void htoa(  char *str, unsigned char num)

{

    unsigned char tmp;

    tmp = num;

    tmp = tmp & 0xf0;

    tmp >>= 4;

    *str = tab_char [ tmp];

    str++;

    *str = tab_char [ num & 0x0f];

}



int  asctortu( unsigned char *dest, unsigned char *source)

{

    unsigned char *tmp;

    unsigned char i;

    i=0;

    tmp = dest;

   

    if( *source !=':') return 0;

    source ++;

   

    while ( *source != 0x0d)

    {

       *tmp = a2toh( source);

       tmp ++;

       source ++;

       source ++;

       i++;

    }

    source ++;

    if ( *source != 0x0a) return 0;

    else

    {

       return i;

    }

}





void rtutoascii( unsigned char *dest, unsigned char *source, int lenth)

{

    dest ++;

         

    for ( ; lenth>0; lenth--)

    {

       htoa( dest, *source);

       dest++;

       dest++;

       source++;

   

    }   

}





void rtutoasc( unsigned char *dest, unsigned char *source, int lenth)



{

    dest ++;

         

    for ( ; lenth>0; lenth--)

    {

       htoa( dest, *source);

       dest++;

       dest++;

       source++;

     

     }   

}





unsigned char lrc(unsigned char *str,int lenth)

{

    unsigned char tmp;

    tmp = 0;

   

    while (lenth-- )

    {

       tmp += *str++;

   

    }

    return ((unsigned char)(-((char)tmp)));

}





void construct_ascii_frm ( unsigned char *dst_buf, unsigned char *src_buf, unsigned char lenth)

{

     unsigned char lrc_tmp;

     

     lrc_tmp = lrc( src_buf, lenth);

     *(src_buf+lenth) = lrc_tmp;

     lenth++;

     *dst_buf = ':';

     rtutoascii( dst_buf,src_buf, lenth);

     *(dst_buf + 2 * lenth+1) = 0x0d;

     *(dst_buf + 2 * lenth+2) = 0x0a;

}





void construct_rtu_frm ( unsigned char *dst_buf,unsigned char *src_buf,unsigned char lenth)

{

    unsigned short  crc_tmp;

    crc_tmp = crc(src_buf, lenth);

     

    *(src_buf+lenth) = crc_tmp >> 8 ;

    *(src_buf+lenth+1) = crc_tmp & 0xff;

    lenth++;

    lenth++;



    while ( lenth--)

    {

       *dst_buf = *src_buf;

       dst_buf++;

       src_buf++;       

    }

}



/*

1 读取继电器状态

发送：

*/



int ascii_read_coil_status ( unsigned char board_adr, unsigned char *com_buf,int start_address,int lenth)



{

    unsigned char tmp[256],tmp_lenth;

    tmp[0] = board_adr;

    tmp[1] = READ_COIL;

    tmp[2] = HI(start_address);

    tmp[3] = LOW(start_address);

    tmp[4] = HI(lenth);

    tmp[5] = LOW(lenth);

    tmp_lenth = 6;

    construct_ascii_frm (com_buf, tmp, tmp_lenth);

    return 18;

}





int rtu_read_coil_status ( unsigned char board_adr,unsigned char *com_buf,int start_address,int lenth)

{

    unsigned char tmp[256], tmp_lenth;

   

    tmp[0] = board_adr;

    tmp[1] = READ_COIL;

    tmp[2] = HI(start_address);

    tmp[3] = LOW(start_address);

    tmp[4] = HI(lenth);

    tmp[5] = LOW(lenth);

    tmp_lenth = 6;

    construct_rtu_frm ( com_buf, tmp, tmp_lenth);

    return 8;

}



/*

2 读取开关量输入

发送：

*/



int ascii_read_input_status ( unsigned char board_adr,unsigned char *com_buf,int start_address,int lenth)

{

    unsigned char tmp[256], tmp_lenth;

   

    tmp[0] = board_adr;

    tmp[1] = READ_DI;

    tmp[2] = HI(start_address);

    tmp[3] = LOW(start_address);

    tmp[4] = HI(lenth);

    tmp[5] = LOW(lenth);

    tmp_lenth = 6;

    construct_ascii_frm ( com_buf, tmp, tmp_lenth);

    return 18;

}





int rtu_read_input_status ( unsigned char board_adr,unsigned char *com_buf,int start_address,int lenth)

{

    unsigned char tmp[256], tmp_lenth;

   

    tmp[0] = board_adr;

    tmp[1] = READ_DI;

    tmp[2] = HI(start_address);

    tmp[3] = LOW(start_address);

    tmp[4] = HI(lenth);

    tmp[5] = LOW(lenth);

    tmp_lenth = 6;

    construct_rtu_frm ( com_buf,tmp,tmp_lenth);

    return 8;

}





/*

3 读取保持寄存器

发送：

*/



int ascii_read_hldreg ( unsigned char board_adr,unsigned char *com_buf,int start_address,int lenth)

{

    unsigned char tmp[256], tmp_lenth;

   

    tmp[0] = board_adr;

    tmp[1] = READ_HLD_REG;

    tmp[2] = HI(start_address);

    tmp[3] = LOW(start_address);

    tmp[4] = HI(lenth);

    tmp[5] = LOW(lenth);

    tmp_lenth = 6;

    construct_ascii_frm ( com_buf, tmp, tmp_lenth);

    return 18;

}



int  rtu_read_hldreg ( unsigned char board_adr,unsigned char *com_buf,int start_address,int lenth)

{

    unsigned char tmp[256], tmp_lenth;

   

    tmp[0] = board_adr;

    tmp[1] = READ_HLD_REG;

    tmp[2] = HI(start_address);

    tmp[3] = LOW(start_address);

    tmp[4] = HI(lenth);

    tmp[5] = LOW(lenth);

    tmp_lenth = 6;

    construct_rtu_frm ( com_buf,tmp,tmp_lenth);

    return 8;

}





// 4 发送读取模拟量输入

int ascii_read_anloginput( unsigned char board_adr,unsigned char *com_buf,int start_address,int lenth)

{

    unsigned char tmp[256], tmp_lenth;

   

    tmp[0] = board_adr;

    tmp[1] = READ_AI;

    tmp[2] = HI(start_address);

    tmp[3] = LOW(start_address);

    tmp[4] = HI(lenth);

    tmp[5] = LOW(lenth);

    tmp_lenth = 6;

    construct_ascii_frm ( com_buf, tmp, tmp_lenth);

    return 18;

}





int rtu_read_anloginput( unsigned char board_adr,unsigned char *com_buf,int start_address,int lenth)

{

unsigned char tmp[256],tmp_lenth;

    tmp[0] = board_adr;

    tmp[1] = READ_AI;

    tmp[2] = HI(start_address);

    tmp[3] = LOW(start_address);

    tmp[4] = HI(lenth);

    tmp[5] = LOW(lenth);

    tmp_lenth = 6;

    construct_rtu_frm ( com_buf,tmp,tmp_lenth);

    return 8;

}





/*

5 设置继电器

发送：status =0 继电器释放 否则继电器吸合,address 为吸合的继电器编号，0为第一个继电器，依次类推

*/



int ascii_set_coil ( unsigned char board_adr,unsigned char *com_buf,int start_address,int status )

{

    unsigned char tmp[256], tmp_lenth;

     

    tmp[0] = board_adr;

    tmp[1] = SET_COIL ;  

    tmp[2] = HI(start_address);

    tmp[3] = LOW(start_address);



    if ( status )

    {

       tmp[4] = 0xff;

       tmp[5] = 0;

    }

    else

    {

       tmp[4]= 0;

       tmp[5]= 0;

    }



    tmp_lenth = 6;

    construct_ascii_frm ( com_buf, tmp, tmp_lenth);

    return 18;

}





int  rtu_set_coil ( unsigned char board_adr,unsigned char *com_buf,int start_address,int status )

{

    unsigned char tmp[256], tmp_lenth;

   

    tmp[0] = board_adr;

    tmp[1] = SET_COIL ;

    tmp[2] = HI(start_address);

    tmp[3] = LOW(start_address);



    if ( status )

    {

       tmp[4] = 0xff;

       tmp[5] = 0;

    }

    else

    {

       tmp[4]= 0;

       tmp[5]= 0;

    }



    tmp_lenth = 6;

    construct_rtu_frm ( com_buf, tmp, tmp_lenth);

    return 8 ;

}





/*

6 设置保持寄存器

*/



int ascii_set_hldreg( unsigned char board_adr,unsigned char *com_buf,int start_address,unsigned int value )

{

    unsigned char tmp[256], tmp_lenth;

   

    tmp[0] = board_adr;

    tmp[1] = SET_HLD_REG;

    tmp[2] = HI(start_address);

    tmp[3] = LOW(start_address);

    tmp[4] = HI(value);

    tmp[5] = LOW(value);   

    tmp_lenth = 6;

    construct_ascii_frm ( com_buf, tmp, tmp_lenth);

    return 18;

}





int rtu_set_hldreg( unsigned char board_adr,unsigned char *com_buf, int start_address, unsigned int value )

{

    unsigned char tmp[256], tmp_lenth;

   

    tmp[0] = board_adr;

    tmp[1] = SET_HLD_REG;

    tmp[2] = HI(start_address);

    tmp[3] = LOW(start_address);

    tmp[4] = HI(value);

    tmp[5] = LOW(value);   

    tmp_lenth = 6;

    construct_rtu_frm ( com_buf, tmp, tmp_lenth);

    return 8 ;

}







/*

7

接收分析：

dest_p 接收到数据指针

sourc_p 串口接收缓冲区指针

data_start_address 开始地址

*/



/* RTU  接收分析 */

int rtu_data_anlys( int  *dest_p, unsigned char *source_p, int data_start_address, int fr_lenth)

{

    unsigned short crc_result, crc_tmp;

    unsigned char tmp1, tmp2, shift;

   

    crc_tmp = *(source_p + fr_lenth-2); // crc  第一字节

    crc_tmp = crc_tmp * 256 + *( source_p+fr_lenth-1); // CRC 值

    crc_result = crc(source_p, fr_lenth-2); // 计算CRC 值

   

   

    if ( crc_tmp != crc_result ) // CRC 校验正确

    {

       hld_reg[0x31]++;

       return -1;

    }

    switch ( *(source_p+1) ) // 功能码

    {

       case READ_COIL:                   /*读取继电器状态 */

       for ( tmp1=0; tmp1<*( source_p+2); tmp1++)

       {

            shift = 1;

            for ( tmp2=0; tmp2<8; tmp2++)

            {

                 *(dest_p+data_start_address+tmp1*8+tmp2) = shift & *( source_p+3);

                 *( source_p+3) >>= 1;

           

            }

       }

       break;



       case READ_DI: /*读取开关量输入*/

       for ( tmp1=0; tmp1<*( source_p+2); tmp1++)

       {

            shift = 1;

            for (tmp2=0; tmp2<8; tmp2 ++)

            {

                     *(dest_p+data_start_address+tmp1*8+tmp2) = shift & *( source_p+3);

                 *( source_p+3)>>=1;

              

            }

       }

       break;



       case READ_HLD_REG:  /*读取保持寄存器*/

       for ( tmp1=0; tmp1<*( source_p+2); tmp1+=2)

       {

            *(dest_p + data_start_address+ tmp1/2)= *( source_p+tmp1+3)*256 +  *( source_p+tmp1+4) ;

         

       }

       break ;



       case 4:      /*读取模拟量输入*/

       for ( tmp1=0; tmp1<*( source_p+2); tmp1+=2)

       {

            *(dest_p + data_start_address+ tmp1/2) = *( source_p+tmp1+3)*256 +  *( source_p+tmp1+4) ;

        

       }

       break;



       case PROTOCOL_EXCEPTION:

       return -1*PROTOCOL_ERR;   

       //break;



       default:

       return -1*PROTOCOL_ERR;

       // break;

    }

    return 0;

}

       

       

int  ascii_data_anlys( int   *dest_p,char *source_p,int data_start_address)

{

    unsigned char tmp[256];

    int lenth;

    int tmp1, tmp2;

    char shift;



    lenth = asctortu(tmp, source_p);

    if ( lenth==0) return -1* FRM_ERR;

    switch (tmp[1] )

    {

       case READ_COIL:                   /*读取继电器状态 */

       for ( tmp1=0; tmp1<tmp[2]; tmp1++)

       {

            shift = 1;

            for ( tmp2=0; tmp2<8; tmp2++)

            {

                        *(dest_p+data_start_address+tmp1*8+tmp2) = shift & tmp [tmp1+3];

      

                 tmp [tmp1+3] >>= 1;

            }

       }

       break;



       case READ_DI: /*读取开关量输入*/

       for ( tmp1=0; tmp1<tmp[2]; tmp1++)

       {

            shift = 1;

            for (tmp2=0; tmp2<8; tmp2 ++)

            {

                      *(dest_p+data_start_address+tmp1*8+tmp2)= shift & tmp [tmp1+3];

                  tmp [tmp1+3]>>=1;



            }

       }

       break;



       case READ_HLD_REG:  /*读取保持寄存器*/

       for (tmp1=0; tmp1<tmp[2]; tmp1+=2)

       {

            *(dest_p + data_start_address+ tmp1/2) = tmp[tmp1+3]*256 +  tmp[tmp1+4] ;

  

       }

       break ;



       case 4:      /*读取模拟量输入*/

       for (tmp1=0; tmp1<tmp[2]; tmp1+=2)

       {

            *(dest_p+data_start_address+ tmp1/2) = tmp[tmp1+3]*256 +  tmp[tmp1+4] ;

  

       }

       break;



       case PROTOCOL_EXCEPTION:

       return -1*PROTOCOL_ERR;   

       //break;



       default:

       break;

    }

    return 0;

}





/*

主程序按照一定的顺序调用 1～6子程序，然后把生成的缓存内容写入串口。

接收到数据送给7的子程序分析即可。

ASCII 方式下，用0X0D, 0X0A作为帧结束判断的依据

RTU方式下，以两个字节间的时间间隔大于3.5倍的一个字符周期为帧结束判断依据

READ() WRITE()是两个假想存在的函数 ,需要根据不同的系统来完成。

比如在单片机中，可能要用到中断模式；在LINUX下可能是一个阻塞的READ WRITE调用,在WINDOWS下可能是串口控件的READ WRITE 方法。。。。。

因为系统各式各样，所以只能抽象出一个假想的函数，由代码的使用者实现。



*/



/*void main ( void)

{

ascii_read_coil_status ( 1,tx_buf,0,8);        

write (com1,tx_buf );

read  (com1,rx_buf);

ascii_data_anlys( coil,rx_buf,0);



ascii_read_input_status ( 1,tx_buf,0,8);        

write ( com1,tx_buf );

read  (com1, rx_buf);

ascii_data_anlys( di,rx_buf,0);       



ascii_read_hldreg ( 1,tx_buf,0,8);        

write ( com1,tx_buf );

read  (com1, rx_buf);

ascii_data_anlys( hld_reg,rx_buf,0);



ascii_read_anloginput( 1,tx_buf,0,8);        

write ( com1,tx_buf );

read  (com1, rx_buf);

ascii_data_anlys( ai,rx_buf,0);



ascii_set_coil (1,tx_buf,0,1); //第一个继电器吸合/

write ( com1,tx_buf );

read  (com1, rx_buf);

ascii_data_anlys( di,rx_buf,0);       



ascii_set_coil (1,tx_buf,0,0); //第一个继电器释放/

write ( com1,tx_buf );

read  (com1, rx_buf);

ascii_data_anlys( di,rx_buf,0);       

       

}*/



马上公布MODUBS TCP源码

阿莫论坛20周年了！感谢大家的支持与爱护！！

一只鸟敢站在脆弱的枝条上歇脚，它依仗的不是枝条不会断，而是自己有翅膀，会飞。
回复

   举报本楼层   

cyberjok

出0入0汤圆
发表于 2006-11-17 12:31:08 | 显示全部楼层
写得不错，超时没有处理啊？掉线优先要下降啊！我自己也写了一个！在MCS51里实现的
回复

   举报本楼层   

mimikankan

出0入0汤圆
 楼主| 发表于 2006-11-17 12:48:37 | 显示全部楼层
只有这样才是通用的啦，，，超时，串口缓冲这些都是些简单的事情呀，
回复

   举报本楼层   

mimikankan

出0入0汤圆
 楼主| 发表于 2006-11-17 12:53:17 | 显示全部楼层
tmp[2] = HI(start_address);

    tmp[3] = LOW(start_address);



HI和LOW是两个自定义宏，取高8位，取低8位
回复

   举报本楼层   

cyberjok

出0入0汤圆
发表于 2006-11-25 21:22:32 | 显示全部楼层
也公布一下SLAVE啊！不过你的接收CRC是在帧完成后进行的啊？
回复

   举报本楼层   

382383706

出0入0汤圆
发表于 2009-12-28 11:21:56 | 显示全部楼层
mark
回复

   举报本楼层   

hexiantu

出0入0汤圆
发表于 2009-12-29 15:25:42 | 显示全部楼层
mark
回复

   举报本楼层   

djl310

出0入0汤圆
发表于 2010-3-17 00:35:27 | 显示全部楼层
记号
回复

   举报本楼层   

FROG0007

出0入0汤圆
发表于 2010-3-17 11:22:24 | 显示全部楼层
MARK,
谢谢，正在学习了解中。
回复

   举报本楼层   

arndei

出0入0汤圆
发表于 2010-4-30 11:09:44 | 显示全部楼层
正在学习Modbus，感谢楼主~~~~~~~~~
回复

   举报本楼层   

wang_bin

出0入0汤圆
发表于 2010-5-2 09:56:39 | 显示全部楼层
......马上公布MODUBS TCP源码
这个要顶！！！！！！！！！！！！！！！！！！！！！！
回复

   举报本楼层   

fhl2397

出0入0汤圆
发表于 2010-5-14 18:03:07 | 显示全部楼层
mark
回复

   举报本楼层   

jgalz

出0入0汤圆
发表于 2010-5-14 18:25:02 | 显示全部楼层
说明时候公布MODBUS TCP呀
回复

   举报本楼层   

boy364100

出0入0汤圆
发表于 2010-5-15 10:27:05 | 显示全部楼层
MARK~~~关注中
回复

   举报本楼层   

cuikai12345

出0入0汤圆
发表于 2010-5-15 12:24:22 | 显示全部楼层
mark
回复

   举报本楼层   

eduhf_123

出0入0汤圆
发表于 2010-5-15 13:22:29 | 显示全部楼层
MARK ModBus
回复

   举报本楼层   

hexiantu

出0入0汤圆
发表于 2010-6-30 15:59:41 | 显示全部楼层
mark
回复

   举报本楼层   

sunmy

出0入0汤圆
发表于 2010-7-10 10:19:24 | 显示全部楼层
Modbus
回复

   举报本楼层   

hecb999

出0入0汤圆
发表于 2010-7-10 11:33:29 | 显示全部楼层
MARK ModBus
回复

   举报本楼层   

yunqian09

出0入0汤圆
发表于 2011-1-13 22:24:02 | 显示全部楼层
mark
回复

   举报本楼层   

wxx116zh

出0入0汤圆
发表于 2011-1-14 12:40:03 | 显示全部楼层
mark
回复

   举报本楼层   

wenming

出0入20汤圆
发表于 2011-1-14 12:43:07 | 显示全部楼层
支持
回复

   举报本楼层   

charlie2008

出0入0汤圆
发表于 2011-1-14 12:44:22 | 显示全部楼层
mark!
回复

   举报本楼层   

wangmusidian

出0入0汤圆
发表于 2011-3-1 18:28:52 | 显示全部楼层
mark
回复

   举报本楼层   

jadeyang

出0入0汤圆
发表于 2011-3-31 16:26:27 | 显示全部楼层
mark
回复

   举报本楼层   

rlogin

出0入0汤圆
发表于 2011-3-31 18:30:21 | 显示全部楼层
mark
回复

   举报本楼层   

caiyue3577

出0入0汤圆
发表于 2011-3-31 20:06:55 | 显示全部楼层
不懂！！！
回复

   举报本楼层   

mimikankan

出0入0汤圆
 楼主| 发表于 2011-4-5 02:47:15 | 显示全部楼层
唉，MODBUS TCP比起MODBUS RTU还要简单呀,他少去了CRC校验

在502端口建立TCP连接后,直接SEND报文就完了,报文很简单，大家可以参考MODBUS POLL的报文来写,

记得及时释放端口
回复

   举报本楼层   

weilan2200

出0入0汤圆
发表于 2011-5-19 19:00:47 | 显示全部楼层
int rtu_data_anlys( int  *dest_p, unsigned char *source_p, int data_start_address, int fr_lenth)
请教一下LZ： int data_start_address 这个参量有什么用？
回复

   举报本楼层   

hexiantu

出0入0汤圆
发表于 2011-5-19 20:48:21 | 显示全部楼层
mark...
回复

   举报本楼层   

MZMMZMMZM

出0入4汤圆
发表于 2011-5-19 20:59:56 | 显示全部楼层
mark
回复

   举报本楼层   

guoermvp

出0入0汤圆
发表于 2011-7-28 18:21:35 | 显示全部楼层
回复【1楼】cyberjok
-----------------------------------------------------------------------

赶紧上MSC51的...
这个说明太少...
严重考验大家的能力...
哈哈
回复

   举报本楼层   

ljt8015

出0入0汤圆
发表于 2011-7-28 18:26:42 | 显示全部楼层
mark!~
回复

   举报本楼层   

caoxh1988

出0入0汤圆
发表于 2012-4-5 11:13:23 | 显示全部楼层
谢谢楼主，学习了
回复

   举报本楼层   

shin555

出0入0汤圆
发表于 2012-4-5 15:21:21 来自手机 | 显示全部楼层
MODBUS,关注中
回复

   举报本楼层   

l5h500

出0入0汤圆
发表于 2012-4-9 18:52:41 | 显示全部楼层
谢谢楼主，学习了了
回复

   举报本楼层   

ssaiwo

出0入0汤圆
发表于 2012-4-19 12:02:55 | 显示全部楼层
学习了。。。。
回复

   举报本楼层   

yaoyyie2003

出0入0汤圆
发表于 2012-4-19 12:31:58 | 显示全部楼层
好东西，随后过来看
回复

   举报本楼层   

jjj206

出0入0汤圆
发表于 2012-4-19 12:45:41 | 显示全部楼层
本帖最后由 jjj206 于 2012-4-19 12:58 编辑

  2. #define READ_COIL     01
  3. #define READ_DI       02
  4. #define READ_HLD_REG  03
  5. #define READ_AI       04
  6. #define SET_COIL      05
  7. #define SET_HLD_REG   06
  8. #define READ_FIFO     24
  9. #define PROTOCOL_EXCEPTION 0x81
  10. #define PROTOCOL_ERR  1
  11. #define FRM_ERR       2
  12. const unsigned char auchCRCHi[] = {
  13. 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81,
  14. 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0,
  15. 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01,
  16. 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41,
  17. 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81,
  18. 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0,
  19. 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01,
  20. 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40,
  21. 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81,
  22. 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0,
  23. 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01,
  24. 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41,
  25. 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81,
  26. 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0,
  27. 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01,
  28. 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81, 0x40, 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41,
  29. 0x00, 0xC1, 0x81, 0x40, 0x01, 0xC0, 0x80, 0x41, 0x01, 0xC0, 0x80, 0x41, 0x00, 0xC1, 0x81,
  30. 0x40
  31. } ;
  32. const unsigned  char auchCRCLo[] = {
  33. 0x00, 0xC0, 0xC1, 0x01, 0xC3, 0x03, 0x02, 0xC2, 0xC6, 0x06, 0x07, 0xC7, 0x05, 0xC5, 0xC4,
  34. 0x04, 0xCC, 0x0C, 0x0D, 0xCD, 0x0F, 0xCF, 0xCE, 0x0E, 0x0A, 0xCA, 0xCB, 0x0B, 0xC9, 0x09,
  35. 0x08, 0xC8, 0xD8, 0x18, 0x19, 0xD9, 0x1B, 0xDB, 0xDA, 0x1A, 0x1E, 0xDE, 0xDF, 0x1F, 0xDD,
  36. 0x1D, 0x1C, 0xDC, 0x14, 0xD4, 0xD5, 0x15, 0xD7, 0x17, 0x16, 0xD6, 0xD2, 0x12, 0x13, 0xD3,
  37. 0x11, 0xD1, 0xD0, 0x10, 0xF0, 0x30, 0x31, 0xF1, 0x33, 0xF3, 0xF2, 0x32, 0x36, 0xF6, 0xF7,
  38. 0x37, 0xF5, 0x35, 0x34, 0xF4, 0x3C, 0xFC, 0xFD, 0x3D, 0xFF, 0x3F, 0x3E, 0xFE, 0xFA, 0x3A,
  39. 0x3B, 0xFB, 0x39, 0xF9, 0xF8, 0x38, 0x28, 0xE8, 0xE9, 0x29, 0xEB, 0x2B, 0x2A, 0xEA, 0xEE,
  40. 0x2E, 0x2F, 0xEF, 0x2D, 0xED, 0xEC, 0x2C, 0xE4, 0x24, 0x25, 0xE5, 0x27, 0xE7, 0xE6, 0x26,
  41. 0x22, 0xE2, 0xE3, 0x23, 0xE1, 0x21, 0x20, 0xE0, 0xA0, 0x60, 0x61, 0xA1, 0x63, 0xA3, 0xA2,
  42. 0x62, 0x66, 0xA6, 0xA7, 0x67, 0xA5, 0x65, 0x64, 0xA4, 0x6C, 0xAC, 0xAD, 0x6D, 0xAF, 0x6F,
  43. 0x6E, 0xAE, 0xAA, 0x6A, 0x6B, 0xAB, 0x69, 0xA9, 0xA8, 0x68, 0x78, 0xB8, 0xB9, 0x79, 0xBB,
  44. 0x7B, 0x7A, 0xBA, 0xBE, 0x7E, 0x7F, 0xBF, 0x7D, 0xBD, 0xBC, 0x7C, 0xB4, 0x74, 0x75, 0xB5,
  45. 0x77, 0xB7, 0xB6, 0x76, 0x72, 0xB2, 0xB3, 0x73, 0xB1, 0x71, 0x70, 0xB0, 0x50, 0x90, 0x91,
  46. 0x51, 0x93, 0x53, 0x52, 0x92, 0x96, 0x56, 0x57, 0x97, 0x55, 0x95, 0x94, 0x54, 0x9C, 0x5C,
  47. 0x5D, 0x9D, 0x5F, 0x9F, 0x9E, 0x5E, 0x5A, 0x9A, 0x9B, 0x5B, 0x99, 0x59, 0x58, 0x98, 0x88,
  48. 0x48, 0x49, 0x89, 0x4B, 0x8B, 0x8A, 0x4A, 0x4E, 0x8E, 0x8F, 0x4F, 0x8D, 0x4D, 0x4C, 0x8C,
  49. 0x44, 0x84, 0x85, 0x45, 0x87, 0x47, 0x46, 0x86, 0x82, 0x42, 0x43, 0x83, 0x41, 0x81, 0x80,
  50. 0x40
  51. };
  52. const unsigned char char_tab[128]=
  53. {
  54.     0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                       
  55.     0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                     
  56.     0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                       
  57.     0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 0, 0, 0, 0, 0, 0,                     
  58.     0, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0, 0, 0, 0, 0, 0, 0, 0, 0,   
  59.     0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,                     
  60.     0, 0x0a, 0x0b, 0x0c, 0x0d, 0x0e, 0x0f, 0, 0, 0, 0, 0, 0, 0, 0, 0,   
  61.     0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0                        
  62. };
  63. const unsigned char tab_char[16]=
  64. {
  65.     '0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'A', 'B', 'C', 'D', 'E', 'F'
  66. };
  67. const unsigned int bit_tab[]=
  68. {
  69.     BIT0, BIT1, BIT2, BIT3, BIT4, BIT5, BIT6, BIT7,
  70.     BIT8, BIT9, BITA, BITB, BITC, BITD, BITE, BITF
  71. };
  72. unsigned short crc(unsigned char *puchMsg , unsigned short usDataLen)
  73. {
  74.     unsigned char uchCRCHi = 0xFF ; /* high byte of CRC initialized */
  75.     unsigned char uchCRCLo = 0xFF ; /* low byte of CRC initialized */
  76.     unsigned uIndex ;  /* will index into CRC lookup table */
  77.     while (usDataLen--) /* pass through message buffer */
  78.     {
  79.      uIndex = uchCRCHi ^ *puchMsg++ ; /* calculate the CRC */
  80.      uchCRCHi = uchCRCLo ^ auchCRCHi[uIndex];
  81.      uchCRCLo = auchCRCLo[uIndex] ;
  82.     }
  83.     return (uchCRCHi << 8 | uchCRCLo) ;
  84. }
  85. unsigned char a2toh(unsigned char *str)
  86. {
  87.     unsigned char tmp;
  88.     tmp = 0;
  89.     tmp = char_tab[*str];
  90.     str++;
  91.     tmp = tmp*16 + char_tab[* str];
  92.     return tmp;
  93. }
  94. int get_bit( unsigned int data, int bit )
  95. {
  96.     if (bit > 16) return 0;
  97.     if (data & bit_tab[bit]) return 1;
  98.     else return 0;
  99. }
  100. void htoa(  char *str, unsigned char num)
  101. {
  102.     unsigned char tmp;
  103.     tmp = num;
  104.     tmp = tmp & 0xf0;
  105.     tmp >>= 4;
  106.     *str = tab_char [ tmp];
  107.     str++;
  108.     *str = tab_char [ num & 0x0f];
  109. }
  110. int  asctortu( unsigned char *dest, unsigned char *source)
  111. {
  112.     unsigned char *tmp;
  113.     unsigned char i;
  114.     i=0;
  115.     tmp = dest;
  116.     if( *source !=':') return 0;
  117.     source ++;
  118.     while ( *source != 0x0d)
  119.     {
  120.        *tmp = a2toh( source);
  121.        tmp ++;
  122.        source ++;
  123.        source ++;
  124.        i++;
  125.     }
  126.     source ++;
  127.     if ( *source != 0x0a) return 0;
  128.     else
  129.     {
  130.        return i;
  131.     }
  132. }
  133. void rtutoascii( unsigned char *dest, unsigned char *source, int lenth)
  134. {
  135.     dest ++;
  136.     for ( ; lenth>0; lenth--)
  137.     {
  138.        htoa( dest, *source);
  139.        dest++;
  140.        dest++;
  141.        source++;
  142.     }   
  143. }
  144. void rtutoasc( unsigned char *dest, unsigned char *source, int lenth)
  145. {
  146.     dest ++;
  147.     for ( ; lenth>0; lenth--)
  148.     {
  149.        htoa( dest, *source);
  150.        dest++;
  151.        dest++;
  152.        source++;
  153.      }   
  154. }
  155. unsigned char lrc(unsigned char *str,int lenth)
  156. {
  157.     unsigned char tmp;
  158.     tmp = 0;
  159.     while (lenth-- )
  160.     {
  161.        tmp += *str++;
  162.     }
  163.     return ((unsigned char)(-((char)tmp)));
  164. }
  165. void construct_ascii_frm ( unsigned char *dst_buf, unsigned char *src_buf, unsigned char lenth)
  166. {
  167.      unsigned char lrc_tmp;
  168.      lrc_tmp = lrc( src_buf, lenth);
  169.      *(src_buf+lenth) = lrc_tmp;
  170.      lenth++;
  171.      *dst_buf = ':';
  172.      rtutoascii( dst_buf,src_buf, lenth);
  173.      *(dst_buf + 2 * lenth+1) = 0x0d;
  174.      *(dst_buf + 2 * lenth+2) = 0x0a;
  175. }
  176. void construct_rtu_frm ( unsigned char *dst_buf,unsigned char *src_buf,unsigned char lenth)
  177. {
  178.     unsigned short  crc_tmp;
  179.     crc_tmp = crc(src_buf, lenth);
  180.     *(src_buf+lenth) = crc_tmp >> 8 ;
  181.     *(src_buf+lenth+1) = crc_tmp & 0xff;
  182.     lenth++;
  183.     lenth++;
  184.     while ( lenth--)
  185.     {
  186.        *dst_buf = *src_buf;
  187.        dst_buf++;
  188.        src_buf++;        
  189.     }
  190. }
  191. /*1 读取继电器状态
  192. 发送：
  193. */
  194. int ascii_read_coil_status ( unsigned char board_adr, unsigned char *com_buf,int start_address,int lenth)
  195. {
  196.     unsigned char tmp[256],tmp_lenth;
  197.     tmp[0] = board_adr;
  198.     tmp[1] = READ_COIL;
  199.     tmp[2] = HI(start_address);
  200.     tmp[3] = LOW(start_address);
  201.     tmp[4] = HI(lenth);
  202.     tmp[5] = LOW(lenth);
  203.     tmp_lenth = 6;
  204.     construct_ascii_frm (com_buf, tmp, tmp_lenth);
  205.     return 18;
  206. }
  207. int rtu_read_coil_status ( unsigned char board_adr,unsigned char *com_buf,int start_address,int lenth)
  208. {
  209.     unsigned char tmp[256], tmp_lenth;
  210.     tmp[0] = board_adr;
  211.     tmp[1] = READ_COIL;
  212.     tmp[2] = HI(start_address);
  213.     tmp[3] = LOW(start_address);
  214.     tmp[4] = HI(lenth);
  215.     tmp[5] = LOW(lenth);
  216.     tmp_lenth = 6;
  217.     construct_rtu_frm ( com_buf, tmp, tmp_lenth);
  218.     return 8;
  219. }
  220. /*
  221. 2 读取开关量输入
  222. 发送：
  223. */
  224. int ascii_read_input_status ( unsigned char board_adr,unsigned char *com_buf,int start_address,int lenth)
  225. {
  226.     unsigned char tmp[256], tmp_lenth;
  227.     tmp[0] = board_adr;
  228.     tmp[1] = READ_DI;
  229.     tmp[2] = HI(start_address);
  230.     tmp[3] = LOW(start_address);
  231.     tmp[4] = HI(lenth);
  232.     tmp[5] = LOW(lenth);
  233.     tmp_lenth = 6;
  234.     construct_ascii_frm ( com_buf, tmp, tmp_lenth);
  235.     return 18;
  236. }
  237. int rtu_read_input_status ( unsigned char board_adr,unsigned char *com_buf,int start_address,int lenth)
  238. {
  239.     unsigned char tmp[256], tmp_lenth;
  240.     tmp[0] = board_adr;
  241.     tmp[1] = READ_DI;
  242.     tmp[2] = HI(start_address);
  243.     tmp[3] = LOW(start_address);
  244.     tmp[4] = HI(lenth);
  245.     tmp[5] = LOW(lenth);
  246.     tmp_lenth = 6;
  247.     construct_rtu_frm ( com_buf,tmp,tmp_lenth);
  248.     return 8;
  249. }
  250. /*
  251. 3 读取保持寄存器
  252. 发送：
  253. */
  254. int ascii_read_hldreg ( unsigned char board_adr,unsigned char *com_buf,int start_address,int lenth)
  255. {
  256.     unsigned char tmp[256], tmp_lenth;
  257.     tmp[0] = board_adr;
  258.     tmp[1] = READ_HLD_REG;
  259.     tmp[2] = HI(start_address);
  260.     tmp[3] = LOW(start_address);
  261.     tmp[4] = HI(lenth);
  262.     tmp[5] = LOW(lenth);
  263.     tmp_lenth = 6;
  264.     construct_ascii_frm ( com_buf, tmp, tmp_lenth);
  265.     return 18;
  266. }
  267. int  rtu_read_hldreg ( unsigned char board_adr,unsigned char *com_buf,int start_address,int lenth)
  268. {
  269.     unsigned char tmp[256], tmp_lenth;
  270.     tmp[0] = board_adr;
  271.     tmp[1] = READ_HLD_REG;
  272.     tmp[2] = HI(start_address);
  273.     tmp[3] = LOW(start_address);
  274.     tmp[4] = HI(lenth);
  275.     tmp[5] = LOW(lenth);
  276.     tmp_lenth = 6;
  277.     construct_rtu_frm ( com_buf,tmp,tmp_lenth);
  278.     return 8;
  279. }
  280. // 4 发送读取模拟量输入
  281. int ascii_read_anloginput( unsigned char board_adr,unsigned char *com_buf,int start_address,int lenth)
  282. {
  283.     unsigned char tmp[256], tmp_lenth;
  284.     tmp[0] = board_adr;
  285.     tmp[1] = READ_AI;
  286.     tmp[2] = HI(start_address);
  287.     tmp[3] = LOW(start_address);
  288.     tmp[4] = HI(lenth);
  289.     tmp[5] = LOW(lenth);
  290.     tmp_lenth = 6;
  291.     construct_ascii_frm ( com_buf, tmp, tmp_lenth);
  292.     return 18;
  293. }
  294. int rtu_read_anloginput( unsigned char board_adr,unsigned char *com_buf,int start_address,int lenth)
  295. {
  296. unsigned char tmp[256],tmp_lenth;
  297.     tmp[0] = board_adr;
  298.     tmp[1] = READ_AI;
  299.     tmp[2] = HI(start_address);
  300.     tmp[3] = LOW(start_address);
  301.     tmp[4] = HI(lenth);
  302.     tmp[5] = LOW(lenth);
  303.     tmp_lenth = 6;
  304.     construct_rtu_frm ( com_buf,tmp,tmp_lenth);
  305.     return 8;
  306. }
  307. /*
  308. 5 设置继电器
  309. 发送：status =0 继电器释放 否则继电器吸合,address 为吸合的继电器编号，0为第一个继电器，依次类推
  310. */
  311. int ascii_set_coil ( unsigned char board_adr,unsigned char *com_buf,int start_address,int status )
  312. {
  313.     unsigned char tmp[256], tmp_lenth;
  314.     tmp[0] = board_adr;
  315.     tmp[1] = SET_COIL ;  
  316.     tmp[2] = HI(start_address);
  317.     tmp[3] = LOW(start_address);
  318.     if ( status )
  319.     {
  320.        tmp[4] = 0xff;
  321.        tmp[5] = 0;
  322.     }
  323.     else
  324.     {
  325.        tmp[4]= 0;
  326.        tmp[5]= 0;
  327.     }
  328.     tmp_lenth = 6;
  329.     construct_ascii_frm ( com_buf, tmp, tmp_lenth);
  330.     return 18;
  331. }
  332. int  rtu_set_coil ( unsigned char board_adr,unsigned char *com_buf,int start_address,int status )
  333. {
  334.     unsigned char tmp[256], tmp_lenth;
  335.     tmp[0] = board_adr;
  336.     tmp[1] = SET_COIL ;
  337.     tmp[2] = HI(start_address);
  338.     tmp[3] = LOW(start_address);
  339.     if ( status )
  340.     {
  341.        tmp[4] = 0xff;
  342.        tmp[5] = 0;
  343.     }
  344.     else
  345.     {
  346.        tmp[4]= 0;
  347.        tmp[5]= 0;
  348.     }
  349.     tmp_lenth = 6;
  350.     construct_rtu_frm ( com_buf, tmp, tmp_lenth);
  351.     return 8 ;
  352. }
  353. /*
  354. 6 设置保持寄存器
  355. */
  356. int ascii_set_hldreg( unsigned char board_adr,unsigned char *com_buf,int start_address,unsigned int value )
  357. {
  358.     unsigned char tmp[256], tmp_lenth;
  359.     tmp[0] = board_adr;
  360.     tmp[1] = SET_HLD_REG;
  361.     tmp[2] = HI(start_address);
  362.     tmp[3] = LOW(start_address);
  363.     tmp[4] = HI(value);
  364.     tmp[5] = LOW(value);   
  365.     tmp_lenth = 6;
  366.     construct_ascii_frm ( com_buf, tmp, tmp_lenth);
  367.     return 18;
  368. }
  369. int rtu_set_hldreg( unsigned char board_adr,unsigned char *com_buf, int start_address, unsigned int value )
  370. {
  371.     unsigned char tmp[256], tmp_lenth;
  372.     tmp[0] = board_adr;
  373.     tmp[1] = SET_HLD_REG;
  374.     tmp[2] = HI(start_address);
  375.     tmp[3] = LOW(start_address);
  376.     tmp[4] = HI(value);
  377.     tmp[5] = LOW(value);   
  378.     tmp_lenth = 6;
  379.     construct_rtu_frm ( com_buf, tmp, tmp_lenth);
  380.     return 8 ;
  381. }
  382. /*
  383. 7接收分析：
  384. dest_p 接收到数据指针
  385. sourc_p 串口接收缓冲区指针
  386. data_start_address 开始地址
  387. */
  388. /* RTU  接收分析 */
  389. int rtu_data_anlys( int  *dest_p, unsigned char *source_p, int data_start_address, int fr_lenth)
  390. {
  391.     unsigned short crc_result, crc_tmp;
  392.     unsigned char tmp1, tmp2, shift;
  393.     crc_tmp = *(source_p + fr_lenth-2); // crc  第一字节
  394.     crc_tmp = crc_tmp * 256 + *( source_p+fr_lenth-1); // CRC 值
  395.     crc_result = crc(source_p, fr_lenth-2); // 计算CRC 值
  396.     if ( crc_tmp != crc_result ) // CRC 校验正确
  397.     {
  398.        hld_reg[0x31]++;
  399.        return -1;
  400.     }
  401.     switch ( *(source_p+1) ) // 功能码
  402.     {
  403.        case READ_COIL:                   /*读取继电器状态 */
  404.        for ( tmp1=0; tmp1<*( source_p+2); tmp1++)
  405.        {
  406.             shift = 1;
  407.             for ( tmp2=0; tmp2<8; tmp2++)
  408.             {
  409.                  *(dest_p+data_start_address+tmp1*8+tmp2) = shift & *( source_p+3);
  410.                  *( source_p+3) >>= 1;
  411.             }
  412.        }
  413.        break;
  414.        case READ_DI: /*读取开关量输入*/
  415.        for ( tmp1=0; tmp1<*( source_p+2); tmp1++)
  416.        {
  417.             shift = 1;
  418.             for (tmp2=0; tmp2<8; tmp2 ++)
  419.             {
  420.                      *(dest_p+data_start_address+tmp1*8+tmp2) = shift & *( source_p+3);
  421.                  *( source_p+3)>>=1;
  422.             }
  423.        }
  424.        break;
  425.        case READ_HLD_REG:  /*读取保持寄存器*/
  426.        for ( tmp1=0; tmp1<*( source_p+2); tmp1+=2)
  427.        {
  428.             *(dest_p + data_start_address+ tmp1/2)= *( source_p+tmp1+3)*256 +  *( source_p+tmp1+4) ;
  429.        }
  430.        break ;
  431.        case 4:      /*读取模拟量输入*/
  432.        for ( tmp1=0; tmp1<*( source_p+2); tmp1+=2)
  433.        {
  434.             *(dest_p + data_start_address+ tmp1/2) = *( source_p+tmp1+3)*256 +  *( source_p+tmp1+4) ;
  435.        }
  436.        break;
  437.        case PROTOCOL_EXCEPTION:
  438.        return -1*PROTOCOL_ERR;   
  439.        //break;
  440.        default:
  441.        return -1*PROTOCOL_ERR;
  442.        // break;
  443.     }
  444.     return 0;
  445. }
  446. int  ascii_data_anlys( int   *dest_p,char *source_p,int data_start_address)
  447. {
  448.     unsigned char tmp[256];
  449.     int lenth;
  450.     int tmp1, tmp2;
  451.     char shift;
  452.     lenth = asctortu(tmp, source_p);
  453.     if ( lenth==0) return -1* FRM_ERR;
  454.     switch (tmp[1] )
  455.     {
  456.        case READ_COIL:                   /*读取继电器状态 */
  457.        for ( tmp1=0; tmp1<tmp[2]; tmp1++)
  458.        {
  459.             shift = 1;
  460.             for ( tmp2=0; tmp2<8; tmp2++)
  461.             {
  462.                         *(dest_p+data_start_address+tmp1*8+tmp2) = shift & tmp [tmp1+3];
  463.                  tmp [tmp1+3] >>= 1;
  464.             }
  465.        }
  466.        break;
  467.        case READ_DI: /*读取开关量输入*/
  468.        for ( tmp1=0; tmp1<tmp[2]; tmp1++)
  469.        {
  470.             shift = 1;
  471.             for (tmp2=0; tmp2<8; tmp2 ++)
  472.             {
  473.                       *(dest_p+data_start_address+tmp1*8+tmp2)= shift & tmp [tmp1+3];
  474.                   tmp [tmp1+3]>>=1;
  475.             }
  476.        }
  477.        break;
  478.        case READ_HLD_REG:  /*读取保持寄存器*/
  479.        for (tmp1=0; tmp1<tmp[2]; tmp1+=2)
  480.        {
  481.             *(dest_p + data_start_address+ tmp1/2) = tmp[tmp1+3]*256 +  tmp[tmp1+4] ;
  482.        }
  483.        break ;
  484.        case 4:      /*读取模拟量输入*/
  485.        for (tmp1=0; tmp1<tmp[2]; tmp1+=2)
  486.        {
  487.             *(dest_p+data_start_address+ tmp1/2) = tmp[tmp1+3]*256 +  tmp[tmp1+4] ;
  488.        }
  489.        break;
  490.        case PROTOCOL_EXCEPTION:
  491.        return -1*PROTOCOL_ERR;   
  492.        //break;
  493.        default:
  494.        break;
  495.     }
  496.     return 0;
  497. }
  498. /*
  499. 主程序按照一定的顺序调用 1～6子程序，然后把生成的缓存内容写入串口。
  500. 接收到数据送给7的子程序分析即可。
  501. ASCII 方式下，用0X0D, 0X0A作为帧结束判断的依据
  502. RTU方式下，以两个字节间的时间间隔大于3.5倍的一个字符周期为帧结束判断依据
  503. READ() WRITE()是两个假想存在的函数 ,需要根据不同的系统来完成。
  504. 比如在单片机中，可能要用到中断模式；在LINUX下可能是一个阻塞的READ WRITE调用,在WINDOWS下可能是串口控件的READ WRITE 方法。。。。。
  505. 因为系统各式各样，所以只能抽象出一个假想的函数，由代码的使用者实现。
  506. */
  507. /*void main ( void)
  508. {
  509. ascii_read_coil_status ( 1,tx_buf,0,8);         
  510. write (com1,tx_buf );
  511. read  (com1,rx_buf);
  512. ascii_data_anlys( coil,rx_buf,0);
  513. ascii_read_input_status ( 1,tx_buf,0,8);         
  514. write ( com1,tx_buf );
  515. read  (com1, rx_buf);
  516. ascii_data_anlys( di,rx_buf,0);        
  517. ascii_read_hldreg ( 1,tx_buf,0,8);         
  518. write ( com1,tx_buf );
  519. read  (com1, rx_buf);
  520. ascii_data_anlys( hld_reg,rx_buf,0);
  521. ascii_read_anloginput( 1,tx_buf,0,8);         
  522. write ( com1,tx_buf );
  523. read  (com1, rx_buf);
  524. ascii_data_anlys( ai,rx_buf,0);
  525. ascii_set_coil (1,tx_buf,0,1); //第一个继电器吸合/
  526. write ( com1,tx_buf );
  527. read  (com1, rx_buf);
  528. ascii_data_anlys( di,rx_buf,0);        
  529. ascii_set_coil (1,tx_buf,0,0); //第一个继电器释放/
  530. write ( com1,tx_buf );
  531. read  (com1, rx_buf);
  532. ascii_data_anlys( di,rx_buf,0);        
  533. }*/
复制代码
花了半個鐘終於幫樓主把空格刪了。
回复

   举报本楼层   

hongyancl

出0入0汤圆
发表于 2012-4-19 12:56:01 | 显示全部楼层
modbus,楼主好人啊
回复

   举报本楼层   

boyiee

出0入84汤圆
发表于 2012-5-9 09:48:11 | 显示全部楼层
谢谢楼主哈哈哈哈哈
回复

   举报本楼层   

starorient

出0入0汤圆
发表于 2012-5-22 10:27:11 | 显示全部楼层
好人啦！代码分析中...
回复

   举报本楼层   

hygs

出0入0汤圆
发表于 2012-5-22 13:08:30 | 显示全部楼层
谢谢分享
回复

   举报本楼层   

xiaowei0588

出0入0汤圆
发表于 2012-5-22 13:28:01 | 显示全部楼层
很好！
回复

   举报本楼层   

mique

出0入0汤圆
发表于 2013-1-18 15:47:31 | 显示全部楼层
分析MODBUS 中。。。
回复

   举报本楼层   

fayuanye

出0入0汤圆
发表于 2013-3-10 23:31:49 | 显示全部楼层
谢谢楼主分享！
回复

   举报本楼层   

wns245249509

出0入0汤圆
发表于 2013-3-11 09:12:07 | 显示全部楼层
谢谢楼主分享代码。。
回复

   举报本楼层   

fish198868

出0入0汤圆
发表于 2013-3-13 12:09:52 | 显示全部楼层
非常详细，不知楼主是否有AVR方面的源程序。
回复

   举报本楼层   

mcuyongchao

出0入0汤圆
发表于 2013-7-5 16:18:29 | 显示全部楼层
记号...
    不错...
回复

   举报本楼层   

xiefy21

出0入0汤圆
发表于 2013-8-14 22:44:03 | 显示全部楼层
mark....
回复

   举报本楼层   

返回列表 发新帖
回帖提示： 反政府言论将被立即封锁ID 。在按“提交”前，请自问一下：我这样表达会给举报吗，会给自己惹麻烦吗？ 另外：尽量不要使用Mark、顶等没有意义的回复。不得大量使用大字体和彩色字。【本论坛不允许直接上传手机拍摄图片，浪费大家下载带宽和论坛服务器空间，请压缩后（图片小于1兆）才上传。压缩方法可以在微信里面发给自己（不要勾选“原图），然后下载，就能得到压缩后的图片】。另外，手机版只能上传图片，要上传附件需要切换到电脑版（不需要使用电脑，手机上切换到电脑版就行，页面底部）。
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

手机版|Archiver|amobbs.com 阿莫电子技术论坛 ( 粤ICP备2022115958号, 版权所有：东莞阿莫电子贸易商行 创办于2004年 (公安交互式论坛备案：44190002001997 ) )

GMT+8, 2024-6-18 02:47

© Since 2004 www.amobbs.com, 原www.ourdev.cn, 原www.ouravr.com

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