Diskuzní fórum, poradna
?CAD diskuze, rady, výměna zkušeností

|
Odpovědět ![]() |
Stránka 123> archiv |
Autor | |
Vaclav Hryz ![]() Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
Diskutér ![]() Přihlášen: 05.říj.2004 Lokalita: Czech Republic Používám: Mechanical2023,Inventor2023,VaultProfessional2023 Stav: Offline Bodů: 29 |
![]() Zasláno: 31.říj.2006 v 07:47 |
Dobrý den přeji.
Aha, to jsem zapomněl. Chybí rutinka, kterou mám strčenou jinde. Tady je zdroják:
(defun NAHRAD (KLIC NOVY DATA)
(setq DATA (subst (cons KLIC NOVY) (assoc KLIC DATA) DATA)) (entmod DATA) (entupd (cdr (assoc -1 DATA))) ) Třeba bude chybět ještě něco :-)
Přeji hezký den.
V. Hryz
|
|
Vaclav Hryz
VUKV a.s. Bucharova 1314/8 CZ - 158 00 PRAHA 5 mailto:hryz@vukv.cz |
|
![]() |
|
Ferdinand ![]() TOP uživatel ![]() Přihlášen: 01.říj.2004 Lokalita: ČR (JM) Používám: AutoCAD2004 (EN) na Windows XP Stav: Offline Bodů: 1906 |
![]() |
Připomínky k návodu B.doc :
A. - Otevřu výkres, Command: (load "B") ; error: LOAD failed: "B" (správně: Command: _appload B.lsp successfully loaded. ) - potvrdím Na celý výkres Pokud to chci aplikovat pouze na tento 1 výkres, tak je to OK. B. Pro hromadné zpracování: - Vygenerování scriptu (block_edit 2 256 0 2 "BYLAYER" "BYBLOCK" 1 "" "0"), řetězec vzít do Clipboardu, lisp přerušit, zavřít výkres - jít do Notepadu, tam to vložit, uložit to jako XXX.scr - jít do ScriptPro, tam to vše zadat, spustit Výsledek: neprovedlo se nic (dle zpětné kontroly vlastností entit jednoho bloku příkazem Refedit v jednom z načtených výkresů) - vše zůstalo původní ![]() Dotaz: Co jsem dělal špatně? C. Co znamenají věty (u Hladina) „Vzdy“ hladina entit bude nastavena na zadaný typ čára “=” jestliže se hladina entity shoduje s typem čáry v políčku 1, bude změněna na hladina z políčka 2 “<>” jestliže se hladina entity shoduje s typem čáry v políčku 1, bude změněn na hladina z políčka 2 Upravil Ferdinand - 20.říj.2006 v 15:30 |
|
-FerTh-
|
|
![]() |
|
Ferdinand ![]() TOP uživatel ![]() Přihlášen: 01.říj.2004 Lokalita: ČR (JM) Používám: AutoCAD2004 (EN) na Windows XP Stav: Offline Bodů: 1906 |
![]() |
Pane Hryz, nějak mi to nechce fungovat
![]() Command: _appload Successfully loaded 2 files. fin.lsp successfully loaded. prevedhl.lsp successfully loaded. Command: Command: Command: Command: Command: Command: fin Verze 2.0 ze dne 20.6.2002 Mám ignorovat nebo pøevádìt podkladové hladiny? (Ignorovat/Pøevádìt): i Pokraèuju pøevodem blokových entit... Cyklus pøevodu blokù... Cyklus pøevodu blokù... Cyklus pøevodu blokù... Pokraèuju pøevodem entit... FWJL-PS90ST.dwg !!! CHYBA AUTOCADU !!! no function definition: NAHRAD Upravil Ferdinand - 19.říj.2006 v 12:29 |
|
-FerTh-
|
|
![]() |
|
Vaclav Hryz ![]() Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
Diskutér ![]() Přihlášen: 05.říj.2004 Lokalita: Czech Republic Používám: Mechanical2023,Inventor2023,VaultProfessional2023 Stav: Offline Bodů: 29 |
![]() |
Dobrý den,
tradičně přijměte moji omluvu za pozdní reakci :-)
Za předdefinovaný blok jsme považovali takový, který ve výkrese zůstal jako blok, jeho obsah nesměl být měněn a byl považován za "knihovní": takže rámečky formátů, razítko, řádky rozpisky, bločky různých informací ap. Většinou jsme se snažili, aby začínaly znakem podtržítko.
Uživatelské bloky je zbytek: to co si uživatelé nadefinovali sami.
Dělili jsme to proto, že některé "knihovní/předdefinované" bloky byly převzány od zákazníka a jejich úprava podle našeho standardu by je znehodnotila. Tím byly seznamem neprověřovaných bloků odfiltrovány. A také ty naše, které byly v pořádku. Proces procházení výkresu se pak zrychlil. Uvědomte si, že prográmek vznikl v době, kdy nejsilnější PC jsme měly PII-333 a 8MB grafiku...
Hezký den přeji
V. Hryz
|
|
Vaclav Hryz
VUKV a.s. Bucharova 1314/8 CZ - 158 00 PRAHA 5 mailto:hryz@vukv.cz |
|
![]() |
|
Ferdinand ![]() TOP uživatel ![]() Přihlášen: 01.říj.2004 Lokalita: ČR (JM) Používám: AutoCAD2004 (EN) na Windows XP Stav: Offline Bodů: 1906 |
![]() |
V. Hryz napsal:
...rozlišoval uživatelské bloky a předdefinované bloky... Jaký je rozdíl mezi "uživatelským" a "předdefinovaným" blokem? |
|
-FerTh-
|
|
![]() |
|
Vaclav Hryz ![]() Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
Diskutér ![]() Přihlášen: 05.říj.2004 Lokalita: Czech Republic Používám: Mechanical2023,Inventor2023,VaultProfessional2023 Stav: Offline Bodů: 29 |
![]() |
Dobrý den, možná jsem trochu out, čtu se konferenci když mám čas... Kdysi jsme řešili "učesání" dokumentace před odevzdáním. Vytvořil jsem tehdy dva prográmky, které jsem se rozhodl poskytnout (tohle téma je tu věčné). Předem se omlouvám za složitost, na tomhle jsem se programování v lispu učil. Dnes bych to již dotáhl do lepší podoby, ale to bych musel ve svém soukormém čase. Popis funkčnosti: budu neúplný a zmatený, je to už dlouho, příkaz už dnes nepoužíváme. Příkaz FIN načítal z externího souboru FIN.DAT "pravidla" převodu. Mám pocit, že rozlišoval uživatelské bloky a předdefinované bloky (rámečky ap.), v uživatelských "lezl dovnitř" a opravil entity i v nich. Rozlišoval typy entit, které měly předepsanou hladinu. Hlídala se barva a typ čáry ByLayer. Pravidel je v těle nadefinováno dost, nepamatuji si všechny. Co nebyl schopen zařadit, zapsal popis entity a příčiny do souboru, který měl stejný název jako DWG. Nakonec vyjela tabulka nalezených nevyřešených entit: hladina, barva, typ čáry. Ta po doplnění správné hladiny sloužila příkazu PREVEDHL. Moc si toho nepamatuju. Poskytuji to hlavně odvážnému panu P. Štylovi, jestli by svoji rutinku nechtěl ještě zdokonalit. Abych řekl pravdu, nelíbí se mi totiž to generování do skriptu. Já jsem to řešil spuštěním skriptu s příkazem na adresáři výkresů a šel domů. Ráno jsem případné chyby ve výkresech zadal lidem k opravě, kde díky zápisu byli schopni lokalizovat problémové entity a rozhodnout ručně, co s nimi. Tady jsou soubory http://www.iproject.cz/get.asp?/LISP/prevod%5Fhladin/Ko%F8en /fin.zip Třeba jsem Vám trochu kápl do noty... Přeji Vám hezký den. V. Hryz |
|
Vaclav Hryz
VUKV a.s. Bucharova 1314/8 CZ - 158 00 PRAHA 5 mailto:hryz@vukv.cz |
|
![]() |
|
pavelstyl ![]() Zasloužilý člen ![]() Přihlášen: 06.říj.2004 Lokalita: Czech Republic Používám: AutoCAD Mech 2025, SolidEdgeE 2025 Stav: Offline Bodů: 229 |
![]() |
Tady (www.mujweb.cz/www/pavelstyl) je další verze. Umí měnit i hladiny. Neměl jsem moc času to testovat, ale snad to pojede. Pavel Štyl |
|
![]() |
|
Petr Bláha ![]() TOP uživatel ![]() Přihlášen: 27.čer.2005 Lokalita: ČR (SČ) Používám: AutoCAD R14=>2021 CZ, Revit B/A 7.0=>2021 CZ Stav: Offline Bodů: 571 |
![]() |
Pokud byste našel i čas pro zakomponování změny hladiny objektů bloků (mě by stačilo i jen do "0"), tak byste byl skvělý. Bylo by to pak všechno hezky pohromadě v jednom příkazu. Předem děkuji za všechny potencionální uživatele. |
|
![]() |
|
pavelstyl ![]() Zasloužilý člen ![]() Přihlášen: 06.říj.2004 Lokalita: Czech Republic Používám: AutoCAD Mech 2025, SolidEdgeE 2025 Stav: Offline Bodů: 229 |
![]() |
Nemám nic proti umístění scriptu na web xanadu. Nicméně takto si nepředstavuji dodělaný produkt. Až se zase najde trošku času, tak na tom ještě zapracuji. Pavel Štyl |
|
![]() |
|
Vladimír Michl ![]() Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
Moderátor ![]() ![]() ARKANCE Přihlášen: 09.zář.2004 Lokalita: ČR (JČ) Používám: Implementujeme řešení Autodesk Stav: Offline Bodů: 21944 |
![]() |
Provedu. |
|
![]() |
|
Ferdinand ![]() TOP uživatel ![]() Přihlášen: 01.říj.2004 Lokalita: ČR (JM) Používám: AutoCAD2004 (EN) na Windows XP Stav: Offline Bodů: 1906 |
![]() |
Hurá, funguje to
![]() Dìkuji moc Pavlovi Stylovi! To Michl: Pane Michl, prosím Vás, umístit aplikaci B do Downloadu. Dìkuji. Upravil Ferdinand - 28.čvc.2006 v 10:58 |
|
-FerTh-
|
|
![]() |
|
Peter Jirat ![]() Profil člena
Odeslat soukromou zprávu
Najít příspěvky člena
Navštívit stránky člena
Přidat do seznamu známých
CAD/BIM manager ![]() ![]() Přihlášen: 04.říj.2004 Lokalita: ČR (Pha) Používám: ACAD ->2021, Revit ->2022 Stav: Offline Bodů: 3946 |
![]() |
Moc dobré, zrovna se výborně hodilo. Nešlo by tam dodělat ještě "malé" zatržítko - Použít/Nepoužít i na Xrefy? V tomto stavu pak převede při volbě celého výkresu i xrefy na zvolený typ barvy / čáry. Xrefy lze sice před použitím BB unloadovat, ale kdyby to šlo tím zatržítkem....
Ale i tak dík
|
|
![]() |
|
Chop ![]() Diskutér ![]() Přihlášen: 13.srp.2005 Lokalita: Czech Republic Stav: Offline Bodů: 64 |
![]() |
Ano, je to totéž. Vnitřně má Cad hodnoty nastaveny na 0 nebo 256, ale pro nás je zobrazuje v dialozích jako "Byblock" nebo "Bylayer" pro lepší přehlednost. (Stačí si zkusit takto nastavit barvu objektu a sledovat okno Properties…) |
|
Civil 2007
|
|
![]() |
|
Ferdinand ![]() TOP uživatel ![]() Přihlášen: 01.říj.2004 Lokalita: ČR (JM) Používám: AutoCAD2004 (EN) na Windows XP Stav: Offline Bodů: 1906 |
![]() |
Takže první kolonka je pro zadání původní hodnoty a ta druhá je pro zadání hodnoty požadované (změněné). Tak by bylo fajn to napsat k nim do dialog. okénka, poněvadž pozítří už to pamatovat nebudu
![]() Je totéž, když napíšu "Bylayer" a "256" ? Znamená to to stejné, když napíšu "Byblock" a "0" ? |
|
-FerTh-
|
|
![]() |
|
pavelstyl ![]() Zasloužilý člen ![]() Přihlášen: 06.říj.2004 Lokalita: Czech Republic Používám: AutoCAD Mech 2025, SolidEdgeE 2025 Stav: Offline Bodů: 229 |
![]() |
Barva: = 256 0 Vysvětlení (barva): Klepnout na tlačítko "Na celý výkres". |
|
![]() |
|
Ferdinand ![]() TOP uživatel ![]() Přihlášen: 01.říj.2004 Lokalita: ČR (JM) Používám: AutoCAD2004 (EN) na Windows XP Stav: Offline Bodů: 1906 |
![]() |
Aha, na to jsem zapomněl
![]() Co mám v dialogu nastavit, aby to splnilo: 1. Všechny Color ve všech blocích ve výkresu které jsou=Bylayer budou=Byblock, ostatní (tj. ty, které jsou "natvrdo") nechat být. 2. Všechny Linetype ve všech blocích ve výkresu které jsou=Bylayer budou=Byblock, ostatní (tj. ty, které jsou "natvrdo") nechat být. |
|
-FerTh-
|
|
![]() |
|
Petr Bláha ![]() TOP uživatel ![]() Přihlášen: 27.čer.2005 Lokalita: ČR (SČ) Používám: AutoCAD R14=>2021 CZ, Revit B/A 7.0=>2021 CZ Stav: Offline Bodů: 571 |
![]() |
Mě to co tam již je funguje správně. Ubíráte se správnou cestou. (AutoCAD 2007 EN)
Upravil Petr Bláha - 21.čer.2006 v 16:32 |
|
![]() |
|
pavelstyl ![]() Zasloužilý člen ![]() Přihlášen: 06.říj.2004 Lokalita: Czech Republic Používám: AutoCAD Mech 2025, SolidEdgeE 2025 Stav: Offline Bodů: 229 |
![]() |
A skutečně najde AutoCAD ten dcl soubor ? Zkuste si v OPTIONS (support path)nastavit cestu na ten adresář, kde je ten dcl. Pavel Štyl |
|
![]() |
Pro technickou podporu CAD
kontaktujte Helpdesk
Odpovědět ![]() |
Stránka 123> archiv |
Přejít na fórum | Oprávnění fóra ![]() Nemůžete vytvářet nová témata v tomto fóru Nemůžete odpovídat na témata v tomto fóru Nemůžete vymazávat vaše příspěvky v tomto fóru Nemůžete upravovat vaše příspěvky v tomto fóru Nemůžete vytvářet ankety v tomto fóru Nemůžete hlasovat v anketách v tomto fóru |
Stránka byla vygenerována za 0,645 sekund.