Boa Tarde pessoal!!!
Estou com uma dúvida que tira meu sonho... segue uma linha de código..
-Primeiro eu peço para a rotina, verificar se há no arquivo um bloco chamado "tab-roletes"
-se ele existir eu gostaria de ler o valor dos atributos deles.... ai esta o problema
(if (/= (SSGET "x" (list(cons 2 "TAB-ROLETES"))) nil)
(progn
(setq tabRol (ssGEt "x" (list (cons 2 "TAB-ROLETES"))))
não conciguo achar a variaverl seguinte "ent_CG" pq?
esta dando um erro que não sei resolver
o erro é assim "error: bad argument type: lentityp"
;Rolete de Carga
(setq ent_CG (entnext tabRol))
(setq CG (cdr (assoc 1 (entget ent_CG))))
;Rolete de impacto
(setq ent_IMP (entnext ent_CG))
(setq IMP (cdr (assoc 1 (entget ent_IMP))))
;Rolete Auto Alinhante de Carga
(setq ent_AAC (entnext ent_IMP))
(setq AAC (cdr (assoc 1 (entget ent_AAC))))
;Rolete de transição
(setq ent_TR (entnext ent_AAC))
(setq TR (cdr (assoc 1 (entget ent_TR))))
;Rolete de retorno
(setq ent_RET (entnext ent_TR))
(setq RET (cdr (assoc 1 (entget ent_RET))))
;Rolete Auto Alinhante de retorno
(setq ent_AAR (entnext ent_RET))
(setq AAR (cdr (assoc 1 (entget ent_AAR))))
);progn
);if
alguem por favor sabe oq fazer???
Obrigado Pessoal