将物件送入sorter排序完成后,如何编写程序将这些物件送到其他地方,如下图,
& U5 U+ j& t1 P% n. Fdrain--------line(line上有3个MU)----------sorter line1. N1 i2 m/ ^5 _0 t& W
0 I6 E3 A, s- j% N4 V4 A9 T三个物件在sorter中排序结束后,怎样让它们在排序结束后进入line1中?sorter和line1直接连接的话,物件会按照原来的顺序直接进入line1,是实现不了三个物件的排序的。这是写的loop循环语句,但是始终不行,运行后直接死机。。。* ~) f: S( _0 e" S+ C, t. H: |
我怀疑问题出在else那里:@.move,这个对@的去向好像没有交待清楚,但是自己实在是没有找到原因,还望大家帮忙,仿真币是一个没有了,还请大家谅解呀,谢谢了!
2 A3 J! K* D6 L9 R7 Tis- e1 F( {! h+ ~% D- [& g( p- a
i:integer;
# Q6 l% s/ i3 c8 t# w/ f3 Hdo; r: V, q& ^: g7 Q2 v! X" g/ I6 P: C
from i:=0;
7 m3 Q6 A3 U! R/ [4 M* ?until i>2 loop# O& N i$ Q! G+ I/ D) D
if sorter.numMU=3-i
9 I8 d! X; t1 | P4 u then @.move(line1);
; ?$ T4 x0 E9 A4 z else
' U+ @6 W) u \6 W" r3 I4 U9 M1 f @.move;" p% R, q" _' v- Q
end;
3 Z, x8 u1 D! B+ V6 C9 |end;
5 `0 v, r7 ^$ Wend; |