Credo, faz mó cara que não escrevo nada!!!Mas tabém, haja tempo, hehehehe. E aí, já desenhou o Corridor, certo? Já criou uma superficie acabada dele, né? Já sofreu para colocar a boundary nela, para que a triangulação se limite no corridor né? Bom, antes de mais nada, esse tutorial só vai servir para o 2010, […]
Opa!!, então, já que eu postei uma lisp para corridors, que tal uma para as pipenetworks agora? Bom, a idéia é a seguinte: Você desenhou uma pipenetwork, mó grande, aí adicionou labels com o comando AeccAddNetworkPlanLabels e teve de editar alguns tubos, ou estruturas… Em fim…, mas as labels de alguns se perderam… é só
Faz tempo que não posto uma lisp, então pra desenferrujar um pouco, que tal fazer um update em vários corridors ao mesmo tempo? (DEFUN C:UPDCORRIDOR (/ SS ENT VLA) (vl-load-com) (setq ss (ssget ‘((0 . “AECC_CORRIDOR”)))) (REPEAT (SSLENGTH SS) (SETQ ENT (SSNAME SS 0) VLA (VLAX-ENAME->VLA-OBJECT ENT)) (VLAX-INVOKE-METHOD VLA ‘Rebuild) (SSDEL ENT SS))) Se você, como eu, cria todas as interseções separadas do corridor principal, para nao demorar os rebuilds quano se está projetando, esta lispezinha vai ser muito útil no final, porque ficar
