Zobrazit plnou verzi příspěvku: výpis bodů

apollyn
29.12.2006, 11:53
potrboval bych poradit mam 3D objekt a potrebuju aby mi do txt souboru vypsal souradnice x y z vsech bodu ze kterych se sklada. pls poradte nedo thx

Vladimír Michl
02.01.2007, 08:56
Jaký 3D objekt? Objemový? Plošný? Z jakých 3D bodů se třeba "skládá" koule?

Balda
02.01.2007, 09:13

Pracná, ale spolehlivá a nenáročná metoda:
1. vytvořte Blok, který bude obsahovat pouze bod
2. Blok rozkopírujte do všech pozic na tělese jejichž souřadnice chcete znát
3. pomocí funkce Extrahovat atributy získate soubor (txt, xls) s potřebnými informacemi

Balda

Balda2007-01-02 09:16:45

PepaR
02.01.2007, 09:46
Něco podobného jako popsal p. Balda umí frewarová nadstavba freemust.

apollyn
02.01.2007, 14:50
tak aplikace sem si stahl nainstaloval a rozchodil ale nejak porad nevim co s tim je tam toho moc mohl byste to nejak priblizit dekuji

PepaR
02.01.2007, 15:03
V panelu nastroju inquiry, je tlacitko Locate point (určit/definovat bod) a hned vedle jsou tlačitka pro uložení a otevředí do TXT souboru.

apollyn
02.01.2007, 15:17
ano to jsem nasel ale vypisuje mi to jen 2 souradnice boud a jen tech bodu ktere oznacim ja potrebuji aby to vzalo vsechny body a abych na ne nemusel klepat pac jich tam mam opravdu moc

PepaR
02.01.2007, 15:30
Aha, tak v tom případě by mohl pomoci následující LISP:
[QUOTE];;; CDF - comma delimited string  (defun CDF-POINT (pt)    (strcat (car pt) ", " (cadr pt) ", " (caddr pt)))  ;;; SDF - space delimited, may easier be read back in to AutoCAD  (defun SDF-POINT (pt)    (strcat (car pt) " " (cadr pt) " " (caddr pt)))  ;;; convert this SDF format back to a point with  (defun STR->POINT (s)    (eval (read (strcat "(" s ")"))))  ;;; Write a XYZ file of all selected objects (SDF see below)  (defun C:XYZ (/ ss fname f)    (if (and (setq ss (ssget))          (setq fname (getfiled "Write XYZ to file"                  (strcat (getvar "DWGNAME") ".XYZ") "XYZ" 7))          (setq f (open fname "w")))      (foreach ele (sslist ss)          ; -> [20.4]        (foreach pt (getpts ele)        ; -> [23.1]          (write-line (cdf-point pt) f))))    (if f (close f)))  ;;; => <fname>.xyz  ;;; 0.45, 12.3, -34.0  For a ASC file (SDF-format) simply change all XYZ to ASC  and cdf-point to sdf-point above.  For the other way 'round, creating PLINES from a ascii x,y file  best convert the file to a script like:  PLINE  300.2,10  350.4,10.4[/QUOTE]

PepaR
02.01.2007, 15:33
Anebo existuej ještě jeden nástroj pro export bodů z AutoCADu (neodzkoušeno): Points Export for AutoCADPepaR2007-01-03 13:51:22

apollyn
02.01.2007, 17:57
tak lisp vypada velice zajimave akorat absolutne netusim co to je sem takovy primitivni uzivatel autocadu takze bych potreboval vystvetleni dekuji

PepaR
02.01.2007, 18:23
uploads/20070102_182306_XYZ.lsp
 
Upozorňuji, že jsme LISP nezkoušel, našel jsme jej na jednom z anglických webu, pravděpodobně bude potřebovat odladit, ale to já nyní již nestihnu.... nezlobte se.PepaR2007-01-02 18:24:31

Sedláček
03.01.2007, 08:10
Nestačil by příkaz _LIST, vybrat objekty a  následně zkopírovat  údaje z textového okna přes schránku do textového souboru a zde upravit do potřebného tvaru?
 
P.Sedláček

apollyn
03.01.2007, 13:58
tento prikaz uz jsem zkousel ale vysledkem je jen horno a dolni mez a ja potzrebuji souradncie vsech bodu ktere sou na objektu ..

apollyn
03.01.2007, 13:58
tento prikaz uz jsem zkousel ale vysledkem je jen horno a dolni mez a ja potzrebuji souradncie vsech bodu ktere sou v objektu ..

Vladimír Michl
03.01.2007, 14:04
Možná by pomohlo, kdybyste vysvětlil co myslíte těmi "všemi body v objektu". Které jsou všechny body koule, válce nebo kužele?

apollyn
03.01.2007, 19:43
body mam namysli kdyz date ctr + a tak sou to vsechny ty ktere sou ty modre krychlicky ..