将物件送入sorter排序完成后，如何编写程序将这些物件送到其他地方，如下图，3 k- N9 q2 D+ @3 O5 t
drain--------line(line上有3个MU）----------sorter line1" n3 X# j2 N7 v
i4 |# o, F' c6 [
三个物件在sorter中排序结束后，怎样让它们在排序结束后进入line1中？sorter和line1直接连接的话，物件会按照原来的顺序直接进入line1,是实现不了三个物件的排序的。这是写的loop循环语句，但是始终不行，运行后直接死机。。。
$ P# M: q3 G) `! C9 u8 W我怀疑问题出在else那里：@.move,这个对@的去向好像没有交待清楚，但是自己实在是没有找到原因，还望大家帮忙，仿真币是一个没有了，还请大家谅解呀，谢谢了！3 ~; U) ~9 R( D6 g
is M" ?7 p& Y7 o- Z
i:integer;
. y# F. g) A# r+ ado
4 M+ d( E* c: X2 Kfrom i:=0;
. r7 m8 _. @3 c. Y4 xuntil i>2 loop
! ^$ b( Y$ X# R- d2 c; C, e if sorter.numMU=3-i
0 W* v0 E- r% f3 P then @.move(line1);. n, Y# m7 [! Z3 {1 P- U7 g
else
" z' ^( P# ~- }- M. c6 Y- G) J. @ @.move;8 x7 U. P( a: U# M
end;
: j, h7 N$ Y( eend;
! Q: O P! L: Mend; |
发表于 2008-8-28 18:12:38
楼主