Dobrý deň.

Chcel by som uložiť súradnice bodov do výkresu.
Chcem si vytvoriť hromadné tlačenie tabuliek a potreboval by som zapísať súrdnice dvoch bodov tabuľky do výkresu (*.dwg), aby aj po opätovnom otvorení dalo znovu hromadne tlačiť (pomocou jedného príkazu).
Nechcel som to riešiť cez nejaký *.txt súbor, kde by to zapisovalo, lebo keby som otvoril iný *.dwg súbor, tak by sa to nedalo použiť.

Len by som chcel vedieť, či má (obsahuje) nejaký príkaz lisp, ktorý to dokáže. A ak áno bol by som vďačný aj za príklad.

Vopred ďakujem.

Moc nerozumím dotazu, ale pokud chcete LISPem načíst textový soubor a s načtenou souřadnicí něco udělat (vytvořit bod, vypsat text...), tak to samozřejmě jde.
 
Principielně:
[CODE]
(setq f1 (open "mujsoubor.txt" "r"))
(while (setq line1 (read-line f1))
...
)
[/CODE]

Misto souradnic nekde ve vykresu (mozna by to slo zapsanim do atributu v bloku, nebo neco s vlastnostmi vykresu), coz je dost neprakticke, tak si proste nastavte rozvrzenia tisknete to. Vice rozvrzeni tisknete s funkci "publikuj", vice vykresu pomoci sady listu... Na tisk ma AutoCad dost pomucek, tak proc nevyuzit to co uz existuje?

Aha.. no tak to aby som sa viac poučil :(

Používam firemné tabuľky (ktoré sú atypické) a chcel som si vytvoriť lisp, ktorým by som si tieto tabuľky vytváral už aj s hlavičkou, kde by som zadal iba mierku (ale to je nepodstatné). Pracujem v acad 2000. Kreslím tak, že hádžem tabuľky v rôznych miestach na výkrese (v liste „model“). A čo sa týka tlačenia, tak musím každú tabuľku vybrať pri tlačení (pomocou okna) a to je moc zdĺhavé (hlavne, keď ich mám cez 30). Tak som si chcel vytvoriť blok (tabuľku), ktorý by mal dva body (na výber oknom pri tlačení) a vytlačilo by všetky tabuľky naraz (pomocou len jedného príkazu). Konečne sa dostávam k podstate! Keď vytvorím tieto tabuľky vo výkrese a ja ho zavriem, tak by sa poukladali súradnice bodov do txt súboru. Ale otvorím si nový (druhý výkres) a tu tiež vytvorím tabuľky. Automaticky sa mi hodnoty prepíšu. Takže keď sa vrátim k pôvodnému výkresu a dám všetko vytlačiť tak mi vytlačí veci zo súradnicami druhého výkresu... Preto som chcel body zapisovať do *.dwg súboru výkresu.

Ale ak je niečo iné a jednoduchšie, tak sa rád nechám poučiť :)
Vopred ďakujem za postrehy.

Tak ve A2000 si asi sadu listu a publikovani neuzijete. No, tabulky taky nebudou tabulky, ale texty a cary...
Pokud si to dobre pamatuji, tak AutoCad 2000 jiz mel moznost udelat vice rozvrzeni a jsou tak jako dnes jako "karticky" dole v okne. Pokud tabulky vytvarite lispem, proc si nevytvorite tim lispem i rozvrzeni a vyrezy? U rozvrzeni pak nemusite neustale vybirat okno.

Jinak jeste odbocim. To tisknete jen tabulky, nebo jsou tabulky v nejakem vykrese? Nebyl by lepsi jiny program (excel, OO calc,...)?

Pro uložení nějakých hodnot do výkresu můžete použít "uživatelské" proměnné ve výkresu:
users1 - users5  - pro textové řetězce (to by asi byl Váš případ - seznam bodů si převést na text a ten uložit do těchto proměnných) - nevím zda není limitována délka řetězce
 
userr1 - userr5 - pro reálná čísla
 
useri1 - useri5 - pro celá čísla 
 
Takže:
(setenv users1 ...

Malinko pomotané :-)
 
(SETENV ...  ukládá do registrů - takže ne do výkresu. A jak jméno proměnné, tak hodnota jsou stringy - takže do uvozovek.
 
K nastavení uživatelských proměnných ve výkresu ji stačí napsat na příkazový řádek. V lispu pak to je  (SETVAR "USERR1" 10.5)
 Seiner2009-08-19 08:34:49

A ještě: nic se na text nepřevádí USERR1-5 je pro reálná čísla, USERI1-5 je pro celá čísla a USERS1-5 je pro stringy.

[QUOTE=Seiner]A ještě: nic se na text nepřevádí USERR1-5 je pro reálná čísla, USERI1-5 je pro celá čísla a USERS1-5 je pro stringy.[/QUOTE]
 
Díky za upozornění - samozřejmě
(SETVAR ...
 
To převedení na text jsem myslel tak, že těch proměnných USERR, do kterých by šly zapisovat souřadnice bodů je málo. Takže pokud by nedostačovali bylo by možno celý seznam bodů zapsat jako string do USERS

možná by šlo jednotlivé tabulky po vložení do výkresu uložit do pohledů
a pak tisknout všechny pohledy ve výkresu. dělal jsem něco odobného pro vykreslování formátů na výkresu
př.
(setq test T vysl nil)(while  (setq dstyl (cdr(assoc 2 (tblnext "VIEW" test)))) (setq vysl (wcmatch dstyl "UNI*")) ; UNI byly naše pohledy (setq test nil)(print dstyl)(IF (/= DSTYL NIL) (COMMAND "_PLOT" "p" DSTYL "0" )))
 

[QUOTE=alfred] Tak ve A2000 si asi sadu listu a publikovani neuzijete. No, tabulky taky nebudou tabulky, ale texty a cary...
Pokud si to dobre pamatuji, tak AutoCad 2000 jiz mel moznost udelat vice rozvrzeni a jsou tak jako dnes jako "karticky" dole v okne. Pokud tabulky vytvarite lispem, proc si nevytvorite tim lispem i rozvrzeni a vyrezy? U rozvrzeni pak nemusite neustale vybirat okno.

Jinak jeste odbocim. To tisknete jen tabulky, nebo jsou tabulky v nejakem vykrese? Nebyl by lepsi jiny program (excel, OO calc,...)?
[/QUOTE]

Pozerám že sa to tu riadne rozbehlo :) Ďakujem všetkým za pomoc.

Ale ešte k tomu môjmu problému. Tie tabuľky mám nakreslené v cade a v nich mám samozrejme zostavy (rezy pohľady, pôdorysy a podobne...). My robíme len v 2D. Všetko si vynášame do rezov s pôdorysu. V *.dwg výkrese mám veľa vecí čo vôbec netlačím, ale keď kreslím, tak ich potrebujem (pod rezmi mám pôdorys, ktorý vôbec netlačím – no a rez je samozrejme v tabuľke).
michaelflyer2009-08-19 12:46:00

[QUOTE=michaelflyer].... - no a rez je samozrejme v tabuľke).
[/QUOTE]

Prominte moji neznalost, ale "čo si predstavíte po slovom 'tabuľka'"?
Myslite jako tabulka vyztuze, nebo spis jako ramecek okolo vykresu?
Pokud je to ten ramecek, tak beru zpet moji poznamku na pouziti jineho software vhodnejsiho na tabulky...

Ale zase, pokud se jedna pouze o ramecky okolo vykresu, tak si myslim, ze jsou idealni rozvrzeni - v modelu mam vice vykresu ruzne rozmistenych a pro kazdy tisteny vykres mam jedno rozvrzeni...

[QUOTE=alfred]

Prominte moji neznalost, ale "čo si predstavíte po slovom 'tabuľka'"?
Myslite jako tabulka vyztuze, nebo spis jako ramecek okolo vykresu?
Pokud je to ten ramecek, tak beru zpet moji poznamku na pouziti jineho software vhodnejsiho na tabulky...

Ale zase, pokud se jedna pouze o ramecky okolo vykresu, tak si myslim, ze jsou idealni rozvrzeni - v modelu mam vice vykresu ruzne rozmistenych a pro kazdy tisteny vykres mam jedno rozvrzeni...
[/QUOTE]

To ja sa vám ospravedlňujem za svoju nepresnosť vyjadrovania! Áno myslel som rámček...
Inak nechcem byť skeptik a veľmi rád by som sa naučil vašim spôsobom kresliť, lebo to znie zaujímavo (budem rád keď mi to vysvetlíte), ale nerieši to problém tlačenia... Teda aspoň myslím. Ak som to správne pochopil, tak si dám zakaždým nový list (záložku) a v ňom budem mať ten môj rámček s tabuľkou. Ale zase musím klikať na každý list (záložku) aby som to vytlačil. Je to jednoduchšie ako doteraz ale zase treba klikať. A keď tých záložiek je 30... :(

Označte prvú a poslednú )* záložku a vytlačte všetko zaraz ...---editU poslednej záložky použite klávesu "Shift"pre výber všetkých ... no možno už toto viete sám ...vbehun2009-08-20 20:34:58

Doporucuji si procist v napovede zaklady o rozvrzenich a vyrezech. Jen to projedu heslovite:
-kresli se klasicky - vse v modelu 1:1
-do rozveni kreslim nekdy jen pripadne ramecky apod.
-vlastnosti rozvrzeni nastavuji na tisk 1:1, meritko tisku se nastavuje ve vlastnostech vyrezu
-pro predstavu - rozvrzeni je jakoby papir ve kterem je okno (vyrez) s nastavenym zvetsenim, otocenim, nove i viditelnostmi hladin, ..., do modelu
-nastaveni pohledu (otoceneho) je zmenou souradneho systemu "uvnitr rozvrzeni" a prikazem _plan
-dulezite je: zamceni/odemceni vyrezu (ve vlasnostech) - jde o jde o to,, jestli zoomojete, nebo menite meritko
-dulezite prikazy a promenne - PSLTSCALE, UCSFOLLOW, _PLAN, USS
-vyrezy jdou orezat
-pokud nechcete tisknout ramecek vyrezu, mejte ho v hladine defpoints , nebo jine netisknute
-pokud si nastavite tisk pro rozvrzeni, lze je hromadne tisknout, pri tisku pouzivejte volbu "rozvrzeni" ne vyber oknem, mejte zvoleno aby se zmeny ukladaly do rozvrzeni! Jinak pri kazdem tisku budete nastavovat znovu! V novejsich verzich je jeste prikaz PUBLIKUJ.
-rozvrzeni a vyrezy nejsou slozite, ale skytaji mnoho moznosti a tak je to dosti rozsahle tema. Hledejte v napovede, v historii zde na foru.


-nevim jak v AutoCadu 2000, ale v novych verzich jde nastavit v kazdem vyrezu pro hladinu viditelnost a vlastnosti entit (cara, barva, ...)

[QUOTE=alfred]-nevim jak v AutoCadu 2000, ale v novych verzich jde nastavit v kazdem vyrezu pro hladinu viditelnost a vlastnosti entit (cara, barva, ...) [/QUOTE]
Prikaz VPLAYER jiz od ac12

Ne, individuální vlastnosti hladin dle výřezů jsou až od verze 2008

Hmm, tak to jsem vubec netusil... Pravda je, ze v 12 jsem vubec vyrezy nepouzival (a ani nikdo koho jsem znal). Pouziti pro me prislo az v dobe, kdy se karticky rozvrzeni objevili v okne programu. V kazdem pripade to ale mimoradne usnadnuje praci...

ano, VPLAYER resil pouze viditelnost ...
...s vyrezy jsem pracoval vzdy a dodnes si nejsem jist, jestli karticky rozvrzeni opravdu predstavuji prinos - oproti starému paperspace, jak byl do verze 2000, je mensi prehled o tom, co je na kterem vykrese, kopirovani mezi vykresy neni tak intuitivni a obsahuje kliky navíc...no a hromadny tisk, sprava sheetů atd. byly tehdy snadno resitelné pár makry...kdyz prepinam mezi kartickami, tak se porad neco regeneruje, porad na neco cekam...

Všetkým ďakujem za rady a pomoc :)

[QUOTE=Vladimír Michl]Ne, individuální vlastnosti hladin dle výřezů jsou až od verze 2008[/QUOTE]Ale již verze 2000 uměla určitou hladinu zmrazit v jednom určitém rozvržení nebo ve všech.Nikde v diskuzi jsem nezaznamenal zmínku o BATCHPLOT. Ten myslím ve 2000 byl.

Ano, ale to je jen zmrazení, ne vlastnosti - viz diskuse o VPLAYER na předchozí stránce. Batchplot byl nahrazen publikováním - viz:
http://www.cadforum.cz/cadforum/qaID.asp?tip=4247

[QUOTE=Vladimír Michl]Batchplot byl nahrazen publikováním - viz:
http://www.cadforum.cz/cadforum/qaID.asp?tip=4247[/QUOTE]Tazatel ale používá ACAD 2000.