您现在所在的是:

西门子SIEMENS

回帖:0个,阅读:941 [上一页] [1] [下一页]
963
reginaz
文章数:2
年度积分:50
历史总积分:963
注册时间:2007/4/19
发站内信
发表于:2007/5/24 14:13:00
#0楼
开关门程序
int left1,left2;
left1=GetLeft(“模拟画面.PDL”,”矩形23”);
left2=GetLeft(“模拟画面.PDL”,”矩形24”);
static left1=220;
static left2=240;
static time=6s;
if (GetTagBit(“open_door”));
{
SetTagBit(“close_door_limit”,FALSE);
left1=left1-1;
if (left1=200)
{
SetTagBit(“open_door_limit”,TRUE);
 time=time-1;
 if (time=0)
 {
SetTagBit(“close_door”,TRUE);
  SetTagBit(“open_door_limit”,FALSE);
  left1=left+1;
  if (left1=220);
  SetTagBit(“close_door_limit”,TRUE);
 }
 else if ((time>0)&&(GetTagBit(“close_door_in”)))
 {
SetTagBit(“close_door”,TRUE);
  SetTagBit(“open_door_limit”,FALSE);
  left1=left+1;
  if (left1=220);
  SetTagBit(“close_door_limit”,TRUE);
 }
}
}
return left1;


if (GetTagBit(“open_door”));
{
SetTagBit(“close_door_limit”,FALSE);
Left2=left2+1;
if (left2=260)
{
SetTagBit(“open_door_limit”,TRUE);
 time=time-1;
 if (time=0)
 {
SetTagBit(“close_door”,TRUE);
  SetTagBit(“open_door_limit”,FALSE);
  Left2=left2-1;
  if (left2=240);
  SetTagBit(“close_door_limit”,TRUE);
 }
 else if ((time>0)&&(GetTagBit(“close_door_in”)))
 {
SetTagBit(“close_door”,TRUE);
  SetTagBit(“open_door_limit”,FALSE);
  Left2=left2-1;
  if (left2=240);
  SetTagBit(“close_door_limit”,TRUE);
 }
}
}
return left2;
这是我自己编的,错误很多,请高手来指教


[此贴子已经被作者于2007-5-24 14:14:53编辑过]

关于我们 | 联系我们 | 广告服务 | 本站动态 | 友情链接 | 法律声明 | 非法和不良信息举报

工控网客服热线:0755-86369299
版权所有 工控网 Copyright©2025 Gkong.com, All Rights Reserved

31.2002