Přátelé, kamarádi

jelikož také nejsem VIP šťastlivcem, prosím podobně jako kolega J.Š. o pomoc se souborem XBODY.LSP.

Děkuji

Může někdo, prosím, XBODY.LSP poskytnout? Nejsem VIP a na xanadu jsem ho ke stažení nenašel.

Děkuji.

J.Š.

Asi před půl rokem jsem potřeboval něco podobného, export souřadnic do textového souboru byl pouze prvním krokem - XBODY.LSP od Xanadu zafungoval spolehlivě

J. Mantlík

Ukázka řešení v lispu:

(setq i 0)
(setq uzly nil)
(setq V (ssget "X"(list(cons 0 "POINT")))
      p (sslength V))
(while (< i p)
       (setq i (1+ i)
              p1(cdr(assoc 10(setq a(entget(ssname v (1- i))))))
              uzly (append uzly  (list(append (list i)(list p1)) ))
        )
)
(setq vystup(open "body.txt" "w"))

(setq i 0)
(while (< i p)
    (write-line (strcat (rtos(car (nth i uzly))2)
        ": " (rtos(car(cadr(nth i uzly)))2)
        ", " (rtos(cadr(cadr(nth i uzly)))2)
        ", " (rtos(caddr(cadr(nth i uzly)))2)) vystup)
    (setq i (1+ i))
)

(close vystup)

Co je excellink, kde ho najdu a jak se používá. Napište, prosím, více. Díky.

J.Š.

Vřele doporučuji využít Excellink. Na potřebná místa dáte např. blok VB, např. malá kružnice s atributem čísla bodu a Excellink Vám vysype souřadnice do Excellu. Nic nepíšete po papírech a nemůžete se tak přepsat, což se dost často stává. A pak je malér.

Radim Čech

Tomáš Saidl napsal(a):   > lze v "holém" Autocadu 2002,( 2004) generovat do textového souboru > seznam absolutních "X,Y"souřadnic daných bodů v JTSK?> Pokud existuje jiné elegantní řešení kromě poznamenání jednotlivých > souřadnic na papír a následné přepsání, uvítám jakýkoliv tip.> Děkuji a přeji hezký den> T. Saidl

Určitě existuje, papíry už dneska zahoďte. Existuje řada jednoduchých LISP utilit (někde na webu myslím máme náš XBODY.LSP, což je kousek z nadstavby PC-GEOdet). Pokud jsou ty body bloky (INSERT), jde exportovat souřadnice extraktem atributů (ATREXT) nebo pomocí Excellinku - tam pak jde souřadnice i zpětně měnit z Excelu.

IMHO něco takového se tady určitě už řešilo. Pokud byste to měl jako atributy bloků, pak extract atributů je funkce holého AutoCADu popsaná v nápovědě. Pokud se jedná opravdu jen o body (POINT), pak je možné napsat lisp, který to někam zapíše. Je-li těch bodů více, bylo by asi přílemné nějak usnadnit jeich výběr (spec. hladina apod.)