有谁用EM-PLANT做过红绿灯仿真啊？急求控制程序编码。。。。

Dodo

让小车红灯停，绿灯行出现以下情况不能解决：
1）is
/ c" G& k2 i  w* D, R" I7 T  u, I: Pdo
if light="green"
$ C! D% l  w. [7 z$ x3 r then @.stopped:=false;
  else
   @.stopped:=true;
8 J1 |: K6 Z, P' j  end;
end;

用if else then,只会停止，不能运动，停了以后Method 不会再被调；
  {7 C+ t2 U5 C+ S7 y) C' q2）is
6 O* X, V( ?) x. p# [do
9 r; J; z1 z% f* T0 i  F; t$ z if light="green"
6 h! G0 ^$ |0 O( y% \: A then @.stopped:=false;
. K. a# u( S# C! w6 t0 C1 C3 F4 V$ \  else
8 g( P0 T: g; }   @.stopped:=true;
# G4 b) B$ Q3 ^8 W4 b( g  end;
6 j6 G; F. p7 @( @$ ?@.move;--加了这个以后则不管红绿灯都是一直运动的，
end;
3）用ispect-when-when-else,出现同样的情况
' |7 Z4 l# \, {4 j  X" F求高手解决。

jgc

{:3_47:}
% k8 g, `: _% f& A% E/ P逻辑混乱。随便弄一个吧
' y7 S8 l: g' h2 Y9 r9 `is
2 `( A  p/ ^  o/ ydo
, R) ~/ Q5 U# v9 w: Z4 f7 Qif light="green" then
( g5 H4 K3 ]% x8 z( t9 J@.continue;
) ?9 t* H# e$ S$ X- n0 Eelse
) `6 C2 d3 ]4 d; n2 a@.stop;
end;
% U  B) L/ g; qend;