基于MODBUS协议的单片机主程序 测试通过

kinidrily

基于MODBUS协议的单片机主程序 测试通过


/ }* i* o# o1 c4 P( Y$ _
/ C& M6 k3 ^# ^& e, k/ z) d) n( K; O
单片机源程序：
; z9 p. I7 t6 e, `0 H3 ?#include"reg51.h"
#include"lcd.h"
#include"address.h"
#include"intrins.h"
#include"crc.h"
#define uint unsigned int
#define uchar unsigned char
uchar code sendbuf[]={0x01,0x03,0x00,0x0b,0x00,0x01,0xf5,0xc8};         
6 _( r! V: p! F  {+ h+ m//0x01 从站地址，0x03功能码，0x00寄存器地址高位，0x09寄存器地址低位，0x00数据个数高位，0x01数据个数低位，0x54CRC校验码高位，0x08CRC校验码低位
# g( q' B, O2 Q* q: ^6 i2 U9 @5 Cuchar code tab[]={'0','1','2','3','4','5','6','7','8','9'};
uchar code error[]={"error!"};
) A. {) n% [3 tuchar tem[5],tem1[8];
uchar resvbuf[7];
int i,j;
uchar resvend,temp2;
uint crctemp,temp,temp1;
void convert10(uint dat)
! x8 t. P( g) s' s  M4 Q{
  @# c+ R; k* ~; }8 M8 b. o: s* x  uchar i;
  tem1[0]='U';
  tem1[1]='=';
8 {/ X/ E. g* X7 u) f% B  tem1[7]='V';
  tem[0]=dat/10000;
  dat=dat%10000;
  tem[1]=dat/1000;
  dat=dat%1000;
  tem[2]=dat/100;
+ I" y' `6 |/ v: }  dat=dat%100;
* j3 W& o/ K( g9 T: p7 H  tem[3]=dat/10;
  tem[4]=dat%10;
  for (i=0;i<5;i++)
  {
4 N* \4 _9 s6 T0 _2 e    tem1[i+2]=tab[tem];
+ i1 s) W1 X0 n+ Z0 P  }
}
void serial_int() interrupt 4         using 1
- b  I4 ?$ @. K5 \$ c9 k{
if(RI)
3 T) \% c* m- D$ M {
5 f9 E* N+ U- S- p1 v) W" J   RI=0;
   //temp2=SBUF;
    resvbuf[j++]=SBUF;  
- }3 x: B9 S* N( A) d- n( k& u   if(j==7)
: p6 [, |8 O, E- g' y   {
     j=0;
         resvend=1;
   }   
}        
' D! y, H5 [' y}            
void initserial        ()
{
% h, I2 Q/ f& Z resvend=0;
* {1 Q( E2 e9 }: k TMOD=0x20;
% n; M9 k! x) O6 E% q' k6 X- Y8 { PCON=0x00;
SCON=0xd8;
TL1=0xfd;
TH1=0xfd;
# e# W6 g/ ?* M! o1 k' m) ?; F TR1=1;
ES=1;
* |' H( p+ }( b}
void displayout()
{
2 {* K9 S! k, X2 g   crctemp=crccheck(resvbuf,5);
7 [5 d6 h6 H. }9 v5 Q   temp=resvbuf[5];
& X) ~* M6 D" @( w" M   temp=temp << 8 | resvbuf[6];
   if(temp==crctemp)
( T, `; a1 ^$ F6 d9 x8 H   {
: d  ^( o" y9 O        temp1=0;
            temp1 |=resvbuf[3];
                temp1= temp1<<8 | resvbuf[4];
                convert10(temp1);
                printf(tem1,8);
/ @9 t2 I, Z& r$ }& e8 S# f    }
  else
6 r1 q( \. j% B2 V8 v   {
      printf(error,16);
# z; ?' f4 P' y4 [: m0 A   }
* ~9 m/ N% R, r( R- M0 G. J}         
* k# U4 M4 K5 x1 W' Mvoid delay_10us(uchar n)
{
   do
   {
     _nop_();
/ r7 f$ Z2 w' _( S7 D- s0 W     _nop_();
     _nop_();
$ W  {. L. T2 ~     _nop_();
. m6 r+ u5 H5 r* \9 ~     _nop_();
   }while(--n);
}
: Q7 m9 a+ y* S: l% D% i1 Ivoid delay_ms(uint n)
{
# S3 J) b7 z' Z2 Z2 f  do
, u" Y6 l$ y  ]9 I4 O# h/ `. b6 [: B  {
    delay_10us(131);
; f/ W2 f/ ?% X# P: w: N   }while(--n);
}

8 N! D7 y9 W- n" D, p+ [# ^; x# jvoid main()
{
& w4 j+ c/ l& o" ]' T initlcd();
' v5 l% B5 F% ~. l( d3 Y8 w initserial();
EA=1;
while(1)
{
4 O  c. r+ l* ~3 k  i=0;
9 }- T2 y9 ?6 h2 |1 k, w; E1 [' `6 J
+ G  c! u; m$ @/ d" H5 G…………限于本文篇幅 余下代码请从论坛下载附件…………

游客，如果您要查看本帖隐藏内容请回复

) x, p. j2 K& y5 W# z
; x0 L. X: A6 X, [5 C

gaoxings

谢谢楼主分享

yxlk

学习中 谢谢楼主

sunygd

这个不错，看看楼主的代码

zx1980

anguchou

:):)