标题: 51单片机基于VB的上位机通信（流水灯实验） [打印本页]
作者: 黑电子论坛hdzlt    时间: 2017-12-9 22:50
标题: 51单片机基于VB的上位机通信（流水灯实验）
PC控制单片机，实现基本通信。



vb上位机源码：


单片机源程序如下:
  1. #include<reg51.h>
  2. #define         uchar  unsigned char
  3. uchar num=0;           //字符型变量          初始化将灯全灭
  4. void delayms(int z)
  5. {
  6.         int x,y;
  7.         for(x=z;x>0;x--)
  8.          for(y=110;y>0;y--);
  9. }
  10. void Uart_init()
  11. {
  12.         SCON=0xd0;          //SM1=1  REN=1
  13.         TMOD=0x20;          //D5=1 D4=0 即M1=1 M0=0
  14.         TH1=0xfd;         //TH1=0XFD TL1=0XFD 将波特率设为9600
  15.         TL1=0xfd;
  16.         TR1=1;        //启动定时器1
  17.         ES=1;                //打开串口中断
  18.         EA=1;        //打开总中断
  19. }
  20. void main()
  21. {
  22.         while(1)
  23.    {
  24.         Uart_init();
  25. //        while(1);
  26.         P2=~num;
  27.        
  28.    }
  29. }         
  30. void interrupt_uart() interrupt 4                //串口中断优先等级为4
  31. {
  32.         if(TI)
  33.         {
  34.                  TI=0;
  35.                  REN=1;   //不发送时允许接收       
  36.         }
  37.         if(RI)
  38.         {
  39.                  RI=0;     //先把接收标志位清零
  40. ……………………

  42. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
VB上位机（流水灯实验）.rar (30.83 KB, 下载次数: 39)




作者: dragon19790000    时间: 2017-12-10 08:38
沙发了，学习一下！！！！！！！！！
作者: chaoself    时间: 2018-2-8 16:23
学习一下！



欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1