Trio范例(5)

IF IN(inspect_i)=ON THEN

VR(i_pointer)=1 'load 1 for rejected product ELSE

VR(i_pointer)=0 'load 0 for good product ENDIF

'--Check FIFO output pointer to fire product reject output. IF VR(o_pointer)=1 THEN OP(reject_o,ON) WA(dwell) OP(reject_o,OFF)

GOSUB display_fifo WA(dwell) WEND

display_fifo:

pa=(i_pointer+4) MOD(5) pb=(i_pointer+3) MOD(5) pc=(i_pointer+2) MOD(5) pd=(i_pointer+1) MOD(5)

PRINT #5,VR(i_pointer)[0];VR(pa)[0];VR(pb)[0];VR(pc)[0];VR(pd)[0] RETURN

'==============================================================================

这是我在手册上看到的一个先入先出的例子,在这个例子中用来检测产品的好坏,不合格的产品被推出传送带,在这个程序中的while 1=1的成是怎样得来的?

i_pointer = (i_pointer+1) MOD(5) 'increment FIFO input pointer

o_pointer = (o_pointer+1) MOD(5) 'increment FIFO output pointer 这两句的做用是什么呢? pa=(i_pointer+4) MOD(5) pb=(i_pointer+3) MOD(5) pc=(i_pointer+2) MOD(5)

pd=(i_pointer+1) MOD(5) 这四句的做用又是什么呢?

答：在这里的WHILE 1=1 .......WEND和REPEAT.......UNTIL FALSE的作用相同, i_pointer = (i_pointer+1) MOD(5) o_pointer = (o_pointer+1) MOD(5)

这两句的作用是把VR区限定在VR(0)到VR(5),在程序值行时有这两句存在可以对VR(0)-VR(5)进行周期性的循环扫描,

百度搜索“77cn”或“免费范文网”即可找到本站免费阅读全部范文。收藏本站方便下次阅读，免费范文网，提供经典小说综合文库Trio范例(5)在线全文阅读。