Delka oblouku do uhlove koty
Vytištěno z: CAD Fórum
Kategorie: Autodesk - stavebnictví, strojírenství, CAD/GIS
Název fóra: AutoCAD
Popis fóra: Otázky kolem aplikací AutoCAD a AutoCAD LT, AutoCAD 360, prohlížečů, DWG a DWF, Design Review, Navisworks, nadstavby, 123D, A360 a cloud Autodesk 360
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=631
Datum vytištění: 14.čvc.2025 v 14:27
Téma: Delka oblouku do uhlove koty
Odeslal: KoTy
Předmět: Delka oblouku do uhlove koty
Datum odeslání: 29.bře.2005 v 09:23
|
Dobry den mam problem snazil jsem se udelat makro na zakotovani delky oblouku v kote "skoro" se me to povedlo ^C^C_undo;_begin;_pedit;\y;;area;o;@;setenv;delka;$M=$(getva r,perimeter);_undo;_end;_u;_dimangular;@;_text;$M=$(getenv,d elka); Ale opravdu jen skoro :(( problem je v undo ktere tam je kuli prevedeni polilajny spatky na oblouk jenze to undo my smaze i promenou, ale zahadne jen v tom makro kdyz to pakro aplikuju znova na ten samej oblouk tak to funguje proste to napise delku do koty (samozrejme je po treba tu promenou sformatovat na pocet desetinych mist). PORADTE NEKDO KDO PROSIM |
Odpovědi:
Odeslal: KoTy
Datum odeslání: 29.bře.2005 v 09:43
|
Tak je to divny pouzil jsem misto undo explode na predelani polyline spatky na oblouk a tu promenou to prirazovalo zase divne tak sem to upravil a uz to FUNGUJE !!!!! :)))) ^C^C_pedit;\y;;area;o;@;_explode;@;_dimangular;@;_text;$M=$( getvar,perimeter); |
Odeslal: Vladimír Michl
Datum odeslání: 30.bře.2005 v 10:40
|
...anebo jednoduše příkaz _DIMARC (verze 2006 nebo LISP) ------------- Vladimír Michl (moderátor) ARKANCE CZ - https://arkance.world - arkance.world (podpora viz helpdesk.arkance-systems.cz) |
Odeslal: Pepa
Datum odeslání: 30.bře.2005 v 10:54
Myslím, že tohle je taky jednoduché a funkční, navíc funguje i v LT Pakliže tedy ten oblouk není součástí křivky
|
Odeslal: KoTy
Datum odeslání: 31.bře.2005 v 10:27
|
no prave slo mi o to aby to fungovalo v LT a kdo ma na to aby kupoval porad novou verzi ze? a ted trosku problemek :(( $M=$(/,$(if,$(>=,$(-,$(*,$(getvar,perimeter),1000),$(fix, $(*$(getvar,perimeter),1000))),0.5),$(+$(*,$(fix,$(getvar,pe rimeter)),1000),1),$(*,$(fix,$(getvar,perimeter)),1000)),100 0) asi mam nekde chybu v zavorkach proste to vrati prazdnej retezec, jestli nekdo vi ad poradi DIK. Zatim to delam jen FIXem proste oriznu fsechno za desetinou carkou(teckou) todle by melo bejt zaokrouhleni na 2 desetiny mista |
Odeslal: Pepa
Datum odeslání: 31.bře.2005 v 10:53
|
a což takhle toto: ^C^C_-LAYER;NA;koty;;_-COLOR;bylayer;_pedit;\;_area;o;@;_e xplode;@;_dimangular;@;_text;$M=$(RTOS,$(GETVAR,perimeter),2 ,2); dovolil jsem si původní funkční verzi vylepšit o zaokrouhlování už včera  Zaokrouhlování dělá RTOS, poslední číslo je počet desetinných míst. |
Odeslal: KoTy
Datum odeslání: 31.bře.2005 v 11:34
|
Je ta fse me unikla hold vic hlav vic vi a ja slozite vymeslel algoritmus na zaokrouhlovani diik takle je to fakt jednodusi |
Odeslal: Seiner
Datum odeslání: 31.bře.2005 v 11:44
| Co to má dělat? NA mi hlásí v LT 2002 neplatné klíčové slovo. (IMHO je naStav nebo Set) |
Odeslal: Seiner
Datum odeslání: 31.bře.2005 v 11:49
| a ani dál mi to nefunguje. Vyberu oblouk a skončí to na _area jako na neplatném klíčovém slově PEDITu. |
Odeslal: KoTy
Datum odeslání: 31.bře.2005 v 11:57
|
^C^C_pedit;\y;;area;o;@;_explode;@;_dimangular;@;_text;$M=$( RTOS,$(GETVAR,perimeter),2 ,2); skus to takle urcite ti to bude fungovat |
Odeslal: KoTy
Datum odeslání: 31.bře.2005 v 11:59
| Pepovi tam chyby Y jako yes pro potvrzeni prevodu ARC do polilajny |
Odeslal: Pepa
Datum odeslání: 31.bře.2005 v 12:09
|
nechybí, mám nastavenou proměnnou PEDITACCEPT na 1. Když chci editovat
nebo z úseček udělat křivku, tak vím, že ji chci a nechci odpovídat na
dotazy, zda ji má CAD vytvořit. jinak se omlouvám, zkopíroval jsem to přímo z tlačítka, neuvědomil jsem si, že tu máme nějaký systém hladin pro p. Seinera: jinak s tím NA to funguje v LT 2004 a tuším, že fungovalo i v LT 2000, resp. 2000i (ruku do ohně za to nedám:-). Už se to myslím někde probíralo, že se nová verze od předchozí liší i v těchto výzvách, skoro při každém upgradu musím sáhnout do mns a nějaké výzvy předělat :-((( |
Odeslal: KoTy
Datum odeslání: 31.bře.2005 v 12:15
| TAk se omlouvam. Ale ja to delal na default nastaveni ..... |
Odeslal: Pepa
Datum odeslání: 31.bře.2005 v 12:45
|
to Y jsem musel umáznout, když se mi to hádalo a pak ho tam zapomněl
vrátit. Ale to jsou drobné detaily, které jsme odladili, čili jak praví
klasik A JE TO...
|
Odeslal: Seiner
Datum odeslání: 31.bře.2005 v 12:48
|
pro LT 2002 a default nastavení mi to chodí ve tvaru: ^C^C_-LAYER;S;koty;;_-COLOR;bylayer;_pedit;\;;_area;o;@;_exp lode;@;_dimangular;@;_text;$M=$(RTOS,$(GETVAR,perimeter),2 ,2); |
Odeslal: KoTy
Datum odeslání: 31.bře.2005 v 13:26
|
Tak sme to konecne dodelaly. :)) Ale me by stejne zajimalo proc me to nefungovalo s tim undo nebo-li proc me to neprirazovalo do promene hdnotu nebo spis proc me ji to vracelo az NA PODRUHE. Zajimalo by me to uz z principu esi sem idiot ja nebo je nekde jina systemova chyba? |
Odeslal: Vladimír Michl
Datum odeslání: 31.bře.2005 v 13:42
|
především ne "NA", ale "_SET" (aby to chodilo i v anglické nebo německé verzi) je dobrým zvykem zadávat celý název volby (ušetříte si ty předělávky), v dalších verzích AutoCAD může voleb daného příkazu přibýt nebo dojde k jiné kolizi a zkratka (písmeno) volby se tak může změnit ------------- Vladimír Michl (moderátor) ARKANCE CZ - https://arkance.world - arkance.world (podpora viz helpdesk.arkance-systems.cz) |
Pepa napsal(a):Odeslal: Pepa
Datum odeslání: 31.bře.2005 v 14:20
|
to máte pravdu, teď už to vím taky. Alespoň jsem se procvičil v úpravách a použití funkce NAJDI-NAHRAĎ
|
Odeslal: Pepa
Datum odeslání: 31.bře.2005 v 15:24
| to KoTy - koukněte do soukromých zpráv |