代表祖国和人民感谢！

简单，没啥可写的，你是学生要交作业吧
簡單也沒看你寫出啥來!自己言行注意啦~!本版主考慮封你ID!

引用 feitianyitu1 在 2004-4-30 0:34:00 发言【内容省略】

可真是強中還有強中手，大俠可知道這段程序的題目？？...什麽什麽等看後再說，俗話說：條條道路通羅馬，，，大家有什麽高招就使出來吧。

ok

///////用Pro-face的人機可寫成這樣///////////
if ([b:X0000]==1)
{
[w:D0000]=1
}
else
{
[w:D0000]=0
}
endif
if ([b:X0001]==1)
{
[w:D0001]=1
}
else
{
[w:D0001]=0
}
endif
if ([b:X0002]==1)
{
[w:D0002]=1
}
else
{
[w:D0002]=0
}
endif
if ([b:X0003]==1)
{
[w:D0003]=1
}
else
{
[w:D0003]=0
}
endif
if ([b:X0004]==1)
{
[w:D0004]=1
}
else
{
[w:D0004]=0
}
endif
if ([b:X0005]==1)
{
[w:D0005]=1
}
else
{
[w:D0005]=0
}
endif
if ([b:X0006]==1)
{
[w:D0006]=1
}
else
{
[w:D0006]=0
}
endif
if ([b:X0007]==1)
{
[w:D0007]=1
}
else
{
[w:D0007]=0
}
endif
[w:D0008]=[w:D0000]+[w:D0001]+[w:D0002]+[w:D0003]+[w:D0004]+[w:D0005]+[w:D0006]+[w:D0007]
if ([w:D0008]==0)
{
clear([b:Y0000])
clear([b:Y0001])
clear([b:Y0002])
clear([b:Y0003])
clear([b:Y0004])
clear([b:Y0005])
clear([b:Y0006])
clear([b:Y0007])
}
endif
if ([w:D0008]==1)
{
set([b:Y0000])
clear([b:Y0001])
clear([b:Y0002])
clear([b:Y0003])
clear([b:Y0004])
clear([b:Y0005])
clear([b:Y0006])
clear([b:Y0007])
}
endif
if ([w:D0008]==2)
{
set([b:Y0001])
clear([b:Y0000])
clear([b:Y0002])
clear([b:Y0003])
clear([b:Y0004])
clear([b:Y0005])
clear([b:Y0006])
clear([b:Y0007])
}
endif
if ([w:D0008]==3)
{
set([b:Y0002])
clear([b:Y0001])
clear([b:Y0000])
clear([b:Y0003])
clear([b:Y0004])
clear([b:Y0005])
clear([b:Y0006])
clear([b:Y0007])
}
endif
if ([w:D0008]==4)
{
set([b:Y0003])
clear([b:Y0001])
clear([b:Y0002])
clear([b:Y0000])
clear([b:Y0004])
clear([b:Y0005])
clear([b:Y0006])
clear([b:Y0007])
}
endif
if ([w:D0008]==5)
{
set([b:Y0004])
clear([b:Y0001])
clear([b:Y0002])
clear([b:Y0003])
clear([b:Y0000])
clear([b:Y0005])
clear([b:Y0006])
clear([b:Y0007])
}
endif
if ([w:D0008]==6)
{
set([b:Y0005])
clear([b:Y0001])
clear([b:Y0002])
clear([b:Y0003])
clear([b:Y0004])
clear([b:Y0000])
clear([b:Y0006])
clear([b:Y0007])
}
endif
if ([w:D0008]==7)
{
set([b:Y0006])
clear([b:Y0001])
clear([b:Y0002])
clear([b:Y0003])
clear([b:Y0004])
clear([b:Y0005])
clear([b:Y0000])
clear([b:Y0007])
}
endif
if ([w:D0008]==8)
{
set([b:Y0007])
clear([b:Y0001])
clear([b:Y0002])
clear([b:Y0003])
clear([b:Y0004])
clear([b:Y0005])
clear([b:Y0006])
clear([b:Y0000])
}
endif

日后多发点这样的贴子呀！

5.1快樂！！
　　各版主的參與，使論談昇華，學海無涯，學無止境...
以後能等到各位高手的指點，小弟倍感榮幸。

8楼的兄弟，你的程序我用S7-200仿真软件运行不了呀？
请指教。

引用 lyping 在 2004-10-27 16:20:00 发言【内容省略】

我从来就没用成功过仿真软件.
不过该程序我在PLC上调试通过,应该是比较简洁的解决方法.

一年前 刚学PLC的时候 没看明白,加到了收藏夹里面.
现在拿出来看看 发现这个程序还是蛮有意思的