$$字符串定义7 ^; u8 _% u. [ Z/ e: @
string/str(20); |0 j" |, R4 v- o- k
5 C8 V- H _4 l+ P# V( X$$选择打印内容。
& T* u6 H# k0 I1 }% Z) K0 Ol10: I; e6 b- B; G4 p$ d, _
choose/'choose option','打印unigraphics','打印open grip',resp U, W/ C! ?. t1 D2 y* A- y
jump/l10:,trm:,,,l20:,l30:,resp7 Z( p; j. V2 j) \
3 T7 r' }$ s1 K p# I7 B Y/ k( c$$若选择打印unigraphics,则执行l20:语句标号下的程序指令。
5 v' A- @7 g5 }7 X* e/ h' El20:' U: n$ K ^" o
str='unigraphics'
( W% P- R6 R K5 Q0 n, J" z- O: H# Uprint/str
1 r7 F* ?* K/ D' R c# S: |' `, ^ @' ?, s0 l5 Q" g
jump/trm:" Q4 {6 g, U- a0 p1 g# Q* ]% G6 d
$$若选择打印open grip,则执行l30:语句标号下的程序指令。
! r' w$ c1 O! g/ }3 K$ _l30:: U* Q: [4 p7 c% e- S
str='open grip'# V3 Q7 I6 y$ b
NOTE/0,1,str
4 ]4 L! L$ w: n$ V$ z7 J3 O
9 G6 o7 R) I1 D: k8 p$$程序结束
b' s! R& a. |+ Y+ v2 C6 O0 @trm:; I$ U9 S5 W9 N9 W+ Z1 T
halt
* m( u+ c7 q/ l/ ^' j
- \" m1 m( f* Z3 a) s* R( J- n
9 M ?4 ^* t& W7 J9 i6 k" |8 j6 u% Z$ F( y$ |& t; u& a, c5 ~7 l
/ J) o* W* p/ f- M3 U2 h
* }& Y4 H ~/ S( i, q- Z6 z(上语句中,jump/l10:,trm:,,,l20:,l30:,resp什么意思) |