请高人及zzz看过来

blitheboy

我在用ug二次开发时
写了下面的一段程序，
UF_MODL_put_list_item( body_list, *result_body );
  
UF_MODL_put_list_item( body_list, *result_body1 );
  
UF_OBJ_ask_type_and_subtype( body_list->eid, [$type,  &subtype )]
  
while( body_list )  
{  
  
rp1[0]=0.0;
rp1[1]=0.0;
rp1[2]=-270；
FTN(uf6511)([$body_list->eid, &object_tag)]
  
/*在这里怎么老是得到的object_tag=0？？？？而我传进去的body_list->eid合法（为一个），为什么不让我拷贝？？，很是郁闷。忘告之，谢了先！！*/
  
FTN(uf5943)(rp1, rp2);
np[0]=object_tag;
ip3=1;
ip4=1;
ip5=0;
ip6=2;
FTN(uf5947)(rp2, np, [$ip3, &ip4 ，&ip5, &ip6, NULL, NULL, ir9)]
UF_OBJ_set_layer(body_list->eid, UF_LAYER_WORK_LAYER);
UF_OBJ_set_layer(object_tag, UF_LAYER_WORK_LAYER);
UF_MODL_unite_bodies(*jqj_solid,  object_tag);
body_list=body_list->next;
  
  }

spline

zzz

salary