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

kinidrily

基于MODBUS协议的单片机主程序 测试通过
( ^/ J$ m) s+ o$ |+ f8 |, c
! g  ^3 e' _" Q7 D: U
# v: D& p) H/ u; z5 v4 `' q$ a

% Q  D! u/ z2 u& S+ o* M8 E单片机源程序：
#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};         
& B5 p( a0 y' _. f. z$ p1 m//0x01 从站地址，0x03功能码，0x00寄存器地址高位，0x09寄存器地址低位，0x00数据个数高位，0x01数据个数低位，0x54CRC校验码高位，0x08CRC校验码低位
uchar code tab[]={'0','1','2','3','4','5','6','7','8','9'};
7 o9 [/ w/ V. f- s0 E  Huchar code error[]={"error!"};
uchar tem[5],tem1[8];
* L& r# W6 }8 t7 b4 tuchar resvbuf[7];
* @) ]  F  {7 c; kint i,j;
/ @! g7 P) k0 g! `8 V( tuchar resvend,temp2;
uint crctemp,temp,temp1;
void convert10(uint dat)
{
$ b$ i5 L$ A9 c5 m2 a5 `. l! Y  uchar i;
. ~, x- _# [3 \  tem1[0]='U';
2 |7 d1 y( l+ h+ F9 a; W  tem1[1]='=';
  tem1[7]='V';
- e% D+ u! C8 T; _) c: Q5 J  tem[0]=dat/10000;
) S' K, B& a6 ^9 U( q5 _; \5 ?* t  dat=dat%10000;
% S7 Q8 g. A; |( ~/ N  tem[1]=dat/1000;
% ~, V. D, k1 k; `$ s  dat=dat%1000;
  tem[2]=dat/100;
2 ^( N: {+ x4 {' u" K, u: \$ s  dat=dat%100;
  tem[3]=dat/10;
3 p% }, g; }0 f' J3 z. d* o3 @  tem[4]=dat%10;
4 D3 m0 f0 K) r  for (i=0;i<5;i++)
4 z6 l& v/ E; c( [" M) m  {
    tem1[i+2]=tab[tem];
  }
}
' l- ]! g2 f; t: M$ t" w  Yvoid serial_int() interrupt 4         using 1
4 ~, T$ ^/ a; i1 J{
, @2 `0 ^9 O9 g; |: l if(RI)
: n! c& ^1 N, V+ A {
+ T3 U9 V8 L1 S  z& Z+ ]   RI=0;
, c3 q$ Z3 d5 U% `* c; D, Z   //temp2=SBUF;
    resvbuf[j++]=SBUF;  
   if(j==7)
# v2 m" p! ]$ u! ]   {
7 {$ j2 m# L/ g. q$ ^     j=0;
         resvend=1;
   }   
}        
}            
: H! Q$ m5 ^4 |% \1 D7 }* b+ Dvoid initserial        ()
{
9 N* L) q  [. |/ c resvend=0;
% ?# n. I  [2 Z. e6 l# d TMOD=0x20;
1 {+ p7 p6 d" m" B: | PCON=0x00;
, F2 a9 f, Y# b0 a# L4 b& [ SCON=0xd8;
TL1=0xfd;
TH1=0xfd;
; I8 d3 {4 x' f3 i TR1=1;
ES=1;
}
% a: G$ w3 m; i0 T- l% |- j' lvoid displayout()
{
! [# ^1 E: u. I   crctemp=crccheck(resvbuf,5);
   temp=resvbuf[5];
+ `: e, J' ?/ h8 ^   temp=temp << 8 | resvbuf[6];
" O+ y3 e% r  q6 x$ D& L   if(temp==crctemp)
   {
        temp1=0;
            temp1 |=resvbuf[3];
- t" D9 u; }" H, ~                temp1= temp1<<8 | resvbuf[4];
) j: p3 W6 A' d' \                convert10(temp1);
                printf(tem1,8);
( V- ?. f8 W3 U* @  C5 X4 A& R    }
5 V& Q' C; j  f! Q+ h6 g# y: e% \  else
   {
      printf(error,16);
9 ]  B2 S2 i" [% B* S+ [( ^! @   }
. B$ r% R# `# u& u9 L1 B) u( p}         
void delay_10us(uchar n)
{
   do
4 n/ k: a" F7 b' A5 {. I% X   {
     _nop_();
     _nop_();
! l$ t, h& C4 m" h9 y$ ~* u     _nop_();
3 N$ w' o( n: K% X' H. c1 O     _nop_();
# L5 V8 x1 l5 c  D! ~     _nop_();
2 X! l& I/ C% R   }while(--n);
}
void delay_ms(uint n)
% q4 R% J; n& J6 ]! \# k{
  do
  {
5 g. Z) D4 K! i2 m% A+ O5 T* P    delay_10us(131);
   }while(--n);
}
+ {; y0 q( z8 k0 ~: ~# H
+ M) a$ K& g& C* g  o! }  Xvoid main()
{
0 w, B7 M2 x( w! n: B) Y) e initlcd();
initserial();
  u4 L5 Y5 S# S6 O EA=1;
+ {2 x, R  P; m2 _ while(1)
1 D/ A8 X' h) R' u2 A; s* u- s: m5 h {
/ D$ `6 z/ ?+ @  H( V  i=0;

; |! f! ~; R  V  V# J2 q) n( Y% p7 ^5 m…………限于本文篇幅 余下代码请从论坛下载附件…………
: s: h8 @7 `$ D9 M+ c% `3 O

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

; q4 d! f4 H1 Y* |

gaoxings

谢谢楼主分享

yxlk

学习中 谢谢楼主

sunygd

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

zx1980

anguchou

:):)