sim talk 程序

hln6610320

is
( B4 k' z# e/ j obj : object;   -- first carbody in store
& ]& R! E# O* M- n5 \ found : boolean;  -- found a chassis
counter : integer;  -- position in store
do
-- make sure there is a carbody in the store
8 w  _4 s5 W% z# @/ i7 {4 c if not StoreCarbody.empty() then
  found := false;
1 |3 g* Z6 X9 L: @0 q: ]  counter := 1;

  -- iterate through the store
) f8 s8 r" N2 N! x' V7 G- w6 y  while not found and counter <= StoreCarbody.xDim loop
   obj := StoreCarbody.pe(counter,1).cont;
9 q8 X! n, B( Q( A. M   if(obj /= void) then
    found := true;
   end; -- if
+ l  ?  o/ M4 i& D9 N4 j. P   counter := counter + 1;
  end; -- while
6 d" u- J1 t$ g4 K  H' n+ h
  if found then
  -- put the carbody on a skid
' z' s& L1 v: A2 |6 Z$ i" o   obj.move(@);
5 E' k1 N' N5 a4 E. m) A  end; -- if
' _8 P6 Z! s, i) u end; -- if not StoreCarbody.empty
end;
里面的found急整个循环不太懂，求高手讲解下？急~~~~