找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 2947|回复: 6
打印 上一主题 下一主题
收起左侧

原创的VB串口继电器控制实验

[复制链接]
跳转到指定楼层
楼主
27-原创VB串口继电器控制实验

下载:
27-原创VB串口继电器控制实验.zip (17.32 KB, 下载次数: 65)

下位机程序:

  1. //按K1 继电器吸合
  2. //按K2 继电器断开
  3. /*********************************************************/

  4. #include <reg52.h>
  5. sbit  K1 =P3^2 ;                    //K1
  6. sbit  K2 =P3^3 ;                    //K2
  7. sbit JDQ=P3^7;                                           //继电器
  8. unsigned char inbuf2[5];//接收缓冲区
  9. unsigned char count3;
  10. void init_serialcomm( void )
  11. {
  12. SCON = 0x50 ; //SCON: serail mode 1, 8-bit UART, enable ucvr
  13. TMOD |= 0x20 ; //TMOD: timer 1, mode 2, 8-bit reload
  14. PCON |= 0x80 ; //SMOD=1;
  15. TH1 = 0xFA ; //Baud:4800 fosc=11.0592MHz
  16. IE |= 0x90 ; //Enable Serial Interrupt
  17. TR1=1;
  18. }
  19. //串口接收中断函数
  20. void serial () interrupt 4 using 3
  21. {
  22. if (RI) //RI==开始接收
  23. {
  24. unsigned char ch;
  25. RI = 0 ; //软件RI=0
  26. ch=SBUF;
  27. if (ch>1)
  28. {
  29. count3= 0 ;
  30. inbuf2[count3]=ch;
  31. }
  32. else
  33. {
  34. count3++;
  35. inbuf2[count3]=ch;
  36. }
  37. }
  38. }       


  39. /*********************************************************/
  40. void Delay(unsigned int ii)        //1MS
  41. {
  42. unsigned int jj;
  43. for(;ii>0;ii--)
  44. for(jj=0;jj<125;jj++)
  45. {;}
  46. }
  47. void main()
  48. {  init_serialcomm();
  49. JDQ=0;
  50.    EA = 1;                                        //允许CPU中断


  51.    while(1){
  52.   
  53.             if (inbuf2[0]==0x31){
  54.          JDQ=1;//吸合
  55. P0=0x00;//P0口LED亮

  56.          }

  57.          if (inbuf2[0]==0x32){
  58.          JDQ=0;//吸合
  59. P0=0xff;//P0口LED亮
  60.          }

  61.    if (K1==0)
  62. {
  63. Delay(10);
  64. if(K1==0){
  65. inbuf2[0]=0x00;
  66. JDQ=1;//吸合
  67. P0=0x00;//P0口LED亮
  68. }
  69. }

  70. if (K2==0){
  71. Delay(10);
  72. if(K2==0){
  73. inbuf2[0]=0x00;
  74.          JDQ=0;        //释放
  75.          P0=0xff; //P0口LED灯灭
  76. }
  77. }
  78.    }
  79. }
复制代码


评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励!

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏3 分享淘帖 顶 踩
回复

使用道具 举报

沙发
ID:58106 发表于 2016-11-22 07:53 | 只看该作者
是做什么的 没有简介吗
回复

使用道具 举报

板凳
ID:56331 发表于 2017-5-23 16:45 | 只看该作者
好,好资料1
回复

使用道具 举报

地板
ID:56331 发表于 2017-5-23 16:45 | 只看该作者
很好的资料,谢谢分享!
回复

使用道具 举报

5#
ID:241242 发表于 2017-11-14 10:18 | 只看该作者
很实用啊
回复

使用道具 举报

6#
ID:351969 发表于 2019-4-5 17:30 | 只看该作者
看看到底是啥玩意
回复

使用道具 举报

7#
ID:848824 发表于 2021-2-20 16:55 | 只看该作者
很实用,感谢分享
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

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