如何跳出 JUMP 循环语句

wangguofei

   Entity/box(1000)L10:
7 r+ O  |2 ~$ q       Ident/"请选择实体着色",box,cnt,n,resp
      Jump/L10:,end:,,,resp
      L101:
      &color(box(n))=186
5 j8 e. |9 n6 T      n=n-1
      if/n==0,jump/L10:
     jump/L101:
end:
halt
1 l$ s1 s6 M0 m5 @. @  i       以上程序我想完成的功能是：1 给所选择的单个或多个实体赋予红色  
' g$ j4 |  u5 p8 C/ M, I                                                     2 变红色之后，结束语句，实际上是所选择的实体变为红色之后，还会出现类选择，也就是一直在循环语句，而没结       束。
2 s5 o; [' R$ K$ h. T( U
     请高手指教，怎样修改才能变色之后，而不出现类选择。

9 _" S  s) n  b; G
& K5 q, p3 y; T  ~$ _2 u0 j

努力活着

看看这个，你会喜欢的
, [2 @2 q' z5 X4 N: s7 h' F5 T0 }
entity/box(10000)
! x, _; c" ^+ e3 ^2 r) wmask/71 $$71选面，70选体
0 T& Z* y( \) c' H
L10:
3 H; @' T" p- G- C% b- ]      ident/'请选择对象',box,cnt,num,resp
      jump/L10:,end:,,,resp

. B% J6 B( y, C* iL20:
      do/L201:,n,1,num
      &color(box(n))=1
  L201:
6 \6 m& {7 Y9 H/ e) B      jump/end:
end:
halt

wangguofei

还没调试，不过，还是非常感谢