标题:
原创的VB串口继电器控制实验
[打印本页]
作者:
byla2215975
时间:
2016-11-21 22:58
标题:
原创的VB串口继电器控制实验
27-原创VB串口继电器控制实验
0.png
(76.6 KB, 下载次数: 78)
下载附件
2016-12-5 03:05 上传
下载:
27-原创VB串口继电器控制实验.zip
(17.32 KB, 下载次数: 66)
2016-11-21 22:58 上传
点击文件名下载附件
下载积分: 黑币 -5
下位机程序:
//按K1 继电器吸合
//按K2 继电器断开
/*********************************************************/
#include <reg52.h>
sbit K1 =P3^2 ; //K1
sbit K2 =P3^3 ; //K2
sbit JDQ=P3^7; //继电器
unsigned char inbuf2[5];//接收缓冲区
unsigned char count3;
void init_serialcomm( void )
{
SCON = 0x50 ; //SCON: serail mode 1, 8-bit UART, enable ucvr
TMOD |= 0x20 ; //TMOD: timer 1, mode 2, 8-bit reload
PCON |= 0x80 ; //SMOD=1;
TH1 = 0xFA ; //Baud:4800 fosc=11.0592MHz
IE |= 0x90 ; //Enable Serial Interrupt
TR1=1;
}
//串口接收中断函数
void serial () interrupt 4 using 3
{
if (RI) //RI==开始接收
{
unsigned char ch;
RI = 0 ; //软件RI=0
ch=SBUF;
if (ch>1)
{
count3= 0 ;
inbuf2[count3]=ch;
}
else
{
count3++;
inbuf2[count3]=ch;
}
}
}
/*********************************************************/
void Delay(unsigned int ii) //1MS
{
unsigned int jj;
for(;ii>0;ii--)
for(jj=0;jj<125;jj++)
{;}
}
void main()
{ init_serialcomm();
JDQ=0;
EA = 1; //允许CPU中断
while(1){
if (inbuf2[0]==0x31){
JDQ=1;//吸合
P0=0x00;//P0口LED亮
}
if (inbuf2[0]==0x32){
JDQ=0;//吸合
P0=0xff;//P0口LED亮
}
if (K1==0)
{
Delay(10);
if(K1==0){
inbuf2[0]=0x00;
JDQ=1;//吸合
P0=0x00;//P0口LED亮
}
}
if (K2==0){
Delay(10);
if(K2==0){
inbuf2[0]=0x00;
JDQ=0; //释放
P0=0xff; //P0口LED灯灭
}
}
}
}
复制代码
作者:
changxt
时间:
2016-11-22 07:53
是做什么的 没有简介吗
作者:
昭通音响-小倪
时间:
2017-5-23 16:45
好,好资料1
作者:
昭通音响-小倪
时间:
2017-5-23 16:45
很好的资料,谢谢分享!
作者:
todaljy
时间:
2017-11-14 10:18
很实用啊
作者:
a843445281
时间:
2019-4-5 17:30
看看到底是啥玩意
作者:
zhangleixbyl
时间:
2021-2-20 16:55
很实用,感谢分享
欢迎光临 (http://www.51hei.com/bbs/)
Powered by Discuz! X3.1