程序贴上去，找人帮我改，谢谢

冷泉

拜求解决方案

entity/ln1,ln2,ln3,ln4,ln5,ln6 : C6 }7 a& T) P4 O0 [% r9 centity/ps(6) entity/cur(6) entity/obj1,obj2,obj3 ! b2 F, R: A  R1 m1 Kentity/pt1,pt2,pt3,pt4,pt5 entity/pl 7 h2 s9 N0 D) u1 [, v) @" n4 U3 qentity/grp l100: . e2 d6 E2 B' k     pt1=point/-2,0,1 ) R+ p( n5 H$ r4 v" ~. V4 C     pt2=point/-2,0,-1      pt3=point/1.7,0,0 $ e2 z/ ~! w+ s8 }3 o  N3 S     pt4=point/-4,0,0 0 r8 Y" }1 R$ o. x5 Z. s     ln1=line/pt1,pt3      ln2=line/pt2,pt3 / v+ p+ b. E% F     ln3=line/pt1,pt2 " J1 }  r/ i! g% o7 x3 x4 Ul101: + {" m4 m& g5 O; V  o     cur(1)=line/parlel,ln1,zlarge,2      cur(2)=line/parlel,ln2,zsmall,2 5 [& H# Y/ {3 K0 }1 l     cur(3)=line/pt4,parlel,ln3   F6 s7 M- r# m1 X0 S( P0 X* i+ Z# \     cur(4)=fillet/cur(3),cur(1),center,pt1,radius,2 % z; ^) j: }; {     cur(5)=fillet/cur(2),cur(3),center,pt2,radius,2      cur(6)=fillet/cur(1),cur(2),center,pt3,radius,2      grp=group/cur(1..6) l102: - m1 L% S+ x1 u: e+ n8 [7 V     ps(1)=point/2,-5,0 ! J. C" p( u6 `  K; U0 m     ps(2)=point/2.3,-4,0 " v& Q/ D) H3 x: K/ Y7 W, u& Q     ps(3)=point/2.7,-3,0 & k  Q. _' g& T- F     ps(4)=point/3.0,-2,0 ! m, s  l% o# ?9 z7 G     ps(5)=point/3.4,-1,0      ps(6)=point/3.7,0,0 ! s9 i) r( G1 {$ S7 t     obj1=bcurve/ps(1..6),degree,3 - |, @9 a' F' P( ^2 \; {- r# ml103: # I! G! n7 {, h5 z8 `; x8 q     ln4=line/-4,0,0,-4,-5,0 2 c0 j( x- i2 _, Wl104: , c2 ?4 i0 R1 a7 v; l. |* a1 M     pt5=point/0,1,0 8 A) E, i+ M5 U& e+ r' W# ]     ln5=line/pt5,atangl,45      pl=plane/perpto,ln5,thru,ps(6) l105:      obj2=solext/cur(1..6),height,4,axis,0,1,0      obj3=solcut/obj2,with,pl,cnt,c1,c2 6 u( U1 G' O) _" n8 i$ g8 jtrm: 9 C0 P$ u0 u) x2 g. }/ R" ]halt ' ^, B) U9 @* ~$ D我写的程序，我想通过曲线OBJ1和直线LN4导引曲面GRP,并将OBJ3其中的一部分删去 怎么做啊 * t+ J; i, e! j8 t6 q# i

rick

entity/ln(6),ps(6),cur(6),obj(3),pt(5),pl,grp,TE(10)
  r% _# F$ |2 `$ W2 s
( t2 y( B# v/ l3 L
     pt(1)=point/-2,0,1
     pt(2)=point/-2,0,-1
     pt(3)=point/1.7,0,0
/ w' O; d" V6 w5 c, Z     pt(4)=point/-4,0,0
) H) ^: \1 ~1 R     ln(1)=line/pt(1),pt(3)
     ln(2)=line/pt(2),pt(3)
     ln(3)=line/pt(1),pt(2)


6 H2 Z9 u" `  O. |* |" F6 Y     cur(1)=line/parlel,ln(1),zlarge,2
+ G" i4 ]/ A& r5 ]' [5 V- o     cur(2)=line/parlel,ln(2),zsmall,2
     cur(3)=line/pt(4),parlel,ln(3)
     cur(4)=fillet/cur(3),cur(1),center,pt(1),radius,2
     cur(5)=fillet/cur(2),cur(3),center,pt(2),radius,2
     cur(6)=fillet/cur(1),cur(2),center,pt(3),radius,2
     grp=group/cur(1..6)

+ A( T+ }/ Q1 x+ o     ps(1)=point/2,-5,0
. h- r) Z6 j( e7 Q. M& ?% O     ps(2)=point/2.3,-4,0
4 D9 Y) k+ @! q! J2 s" Q" ]4 M     ps(3)=point/2.7,-3,0
1 D- V  Y; B2 Z% Q1 h' B     ps(4)=point/3.0,-2,0
- e3 c6 V) \- O7 Z: B     ps(5)=point/3.4,-1,0
     ps(6)=point/3.7,0,0
# c  R) k, `0 O) h, Z# L     obj(1)=bcurve/ps(1..6),degree,3
- \9 k+ i7 \7 a" R8 p+ P
# w0 o& |8 ?- A2 w7 l% x
     ln(4)=line/-4,0,0,-4,-5,0

     pt(5)=point/0,1,0
) E  ?) z6 ~) R     ln(5)=line/pt(5),atangl,45
) I' t6 D8 Y5 J2 O. g     pl=plane/perpto,ln(5),thru,ps(6)

9 q9 d3 i1 O8 O4 R
0 Q% H! Q) O$ D( u# V6 a0 N( S/ d! q     obj(2)=solext/cur(1..6),height,4,axis,0,1,0

     obj(3)=solcut/obj(2),with,pl,cnt,NUM,c2


7 E! [- \, C# K! j% S    MASK/70
9 W. P3 z, f2 nl100:
( k, s/ Z& H% B; i    DO/DOL90:,I,1,NUM
9 t/ J8 X0 T1 `4 b' [- `        TE(I) = NEXTE/IFEND,L200:
    DOL90:
L200:
        DELETE/TE(I)
  e& P8 L  O) W& `2 P/ ?, t' v
% C' f+ S/ ]2 O: Q9 F2 N/ X  ?( V: Btrm:
halt

冷泉

在我的程序中间不是有一个GRP吗??我想通过obj1和ln4导引，通过扫略形成实体，我试过N多次都不成功，不知道试为什么？？
6 ^* ^4 s  o2 d0 p& b0 w. e还有我想了解一下你，你是做什么工作的，你对UG好像很了解，以后向你多多学习