$$字符串定义. c) p4 U( e: ]" g
string/str(20)/ S% _) O! e' _! y# G- B" S
$ e3 Q' z1 |& P2 c* |' w/ M
$$选择打印内容。
; T8 i/ O9 ]7 Zl10:" K$ {& q4 Q/ e
choose/'choose option','打印unigraphics','打印open grip',resp6 L& L" a. J4 e/ Q+ Z1 _
jump/l10:,trm:,,,l20:,l30:,resp
6 e5 F! p/ w0 V# }8 h- u
i! k0 Y0 U" T& i* L# @+ Z$$若选择打印unigraphics,则执行l20:语句标号下的程序指令。
* _& H+ `8 ~$ Hl20:4 \* L) ?- s9 I) R: K9 J# D
str='unigraphics'' m: u; e1 N% c. n, V
print/str5 g, f( j( [) u o. e6 p8 Q
' g$ g6 h8 N; {9 k* Ujump/trm:6 Y! B G5 D) d8 I
$$若选择打印open grip,则执行l30:语句标号下的程序指令。
; ~9 W! d! W' ^( kl30:8 y; F& \ H5 m2 A8 }3 J% p2 b6 o
str='open grip', A% A. p3 ], K* }6 i
NOTE/0,1,str# R) S- o: W( x2 z# [- m9 G
& L2 ?4 n. q8 u$$程序结束+ l; D* i5 d. o, F; O
trm:- l5 o1 V2 q! D9 H8 V
halt
5 |' L% R; N- N; T- S2 I7 C% }3 N; P* B8 O6 ]/ ~6 v5 L8 j
/ Q7 O! d; }# C" P( v5 J2 o0 n; J8 v% r" P
' X& d0 I8 \( X8 q) C# m5 f$ B9 o2 |$ v9 m1 g1 M( G7 a% V/ l1 S6 G& x
(上语句中,jump/l10:,trm:,,,l20:,l30:,resp什么意思) |