UG二次开发，小牛试刀一下源码。

ruok438 · 发表于 2012-7-25 20:09:36

entity/shit,kao
number/fuck(12)
data/a,10,b,20,c,30
e1:
ident/'please select a object',shit,resp
jump/e1:,end:,,,resp
e2:
param/'please input the value','x=',a,'y=',b,'z=',c,resp
jump/e1:,end:,,,resp
e3:
choose/'please select','Move','Copy',resp
jump/e2:,end:,,,e4:,e5:,resp
e4:
fuck(1..12)=matrix/transl,a,b,c
kao=transf/fuck,shit,move
&color(kao)=96
jump/end:
e5:
fuck(1..12)=matrix/transl,a,b,c
kao=transf/fuck,shit
&color(kao)=145
jump/end:
end:
halt