|
$$ 注释8 k, l$ {* @& @ A
2 x2 E* p; y3 e5 h4 Z2 i" z" {( \$ _ENTITY/obj1 W+ `8 `4 C: Y/ Q3 Y' G! l
STRING/BUF(100)
- q/ Z- {1 G) q' r2 B: x) T. z; q* z
( w/ k$ q1 F; u) L. ?L10:
$ u7 L. b) w& {5 ^9 u1 GMASK/70. p, I) H* c( J7 H3 k
ident/'梅雷提示:请选择实体...',obj,resp
- C1 q1 q& c( wJUMP/L10:,END:,,,resp8 B2 u. M7 _3 I/ m0 P# A3 t
% O n9 A: }, }: m- m5 p% RL20:# T; ` R* \2 s+ y( B
TEXT/'梅雷提示:请输实体名称...',BUF,resp
! Q0 X( U1 I' g/ f; _: Y" S5 _print/BUF
: _% Y) D/ d3 f- b3 L; g/ g G4 Y, g# ?4 c
7 n: h- I% k- {, ^&NAME(obj)=BUF $$ 为实体设置名称1 j+ h/ P: f3 t# H
) C& ~* u" F8 S- E: Q
END:9 _9 x7 C2 b) N3 A. {8 q, x# H
HALT $$ 结束语 |
|