a subrotina abaixo serve para facilitar a criação de rotinas que usam DCLs, e será útil nas rotinas que estão por vir. Pode parecer meio estranhas no inicio, mas com um exemplo que postarei as coisas irão clarear… mas pelo título do post, dá pra imaginar o que é, não dá? ;vars: lista de strings […]
Aproveitando o post anterior, vou colocar um programa que extrai diversos dados de um alinhamento, tal como raio, angulo central, estcas… veja que é necessário carregar a TLB do civil 3d, senão as funções começando com “cvl*” não irão funcionar ver rotina… ;|retorna uma lista (xPI yPI R Teta Dc Cx Cy Sent Lc1 Sc1
Bom, faz tempo que não posto nada, então vou postar um código que stou achando bastante útil: ;importa as funções do civil 3d para o visual lisp(vlax-import-type-library :tlb-filename “C:\\Program Files\\AutoCAD Civil 3D 2008\\Civil\\AeccXLand.tlb” :methods-prefix “cvlm-“ :properties-prefix “cvlp-“ :constants-prefix “cvlc-“) Veja, ele importa os métodos, propriedades e constantes do Civil 3d para o visual lisp Qual
