Vytisknout stránku | Zavřít okno

CADKON - klavesove zkratky

Vytištěno z: CAD Fórum
Kategorie: Ostatní CAD/CAM/PDM a GIS
Název fóra: Ostatní stavařské CAD/BIM aplikace
Popis fóra: Non-Autodesk CAD aplikace pro stavebnictví a architekturu - 2D, 3D, BIM
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=7854
Datum vytištění: 16.kvě.2026 v 14:34


Téma: CADKON - klavesove zkratky
Odeslal: honzic
Předmět: CADKON - klavesove zkratky
Datum odeslání: 07.led.2009 v 12:12
Dobry den,
 
     da se prikazum CADKONu (napr. rychly prodluz, rychly orez, zmena delky vynasecich car apod.) priradit klavesova zkratka. Mam ale namysli zkratku ve smyslu treba RP, RO.... Jako jsou zkratky definovane v Autocadu v souboru acad.pgp. Nechci zkratky typu CTRL+1,2,3.....
 
Diky Honzic



Odpovědi:
Odeslal: Vladimír Michl
Datum odeslání: 07.led.2009 v 13:32
Do souboru ACAD.PGP si můžete přidat jakékoliv další zkratky - odkazy na uživatelsky definované příkazy.
 
Pokud je požadovaný příkaz jen menu-makro (sekvence příkazů), je třeba "zkratku" řešit přes definici samostatného příkazu - nejlépe pomocí LISp funkce (defun). Např.:
 
(defun C:RP5 ()(command "_POLYGON" 5 "S"))
 


-------------
Vladimír Michl (moderátor)
ARKANCE CZ - https://arkance.world - arkance.world
(podpora viz helpdesk.arkance-systems.cz)


Odeslal: honzic
Datum odeslání: 07.led.2009 v 15:52

Mohl bych pozadat jak by vypadal takovy zapis do souboru acad.pgp napriklad pro prikaz "Zmena delky vynasecich car"? Makro (sekvence prikazu) vypada takto: ^C^C_dim_edit nebo take (^C^C^P_setenv;CMDN;42;;IDCMD;3010;;DIMSCALE;$M=$(getvar,DIMSCALE);_SELECT;_AU;\_setenv;IDCMD;2007;^P ).

Nejsem moc moudry z toho jak to napsat. Confused


Odeslal: Vladimír Michl
Datum odeslání: 07.led.2009 v 16:57
Pro _DIM_EDIT je to jednoduché:
 
DE, *DIM_EDIT
 
Přepis Diesel makra do LISPu jde jen v plné verzi AutoCADu, ne v LT.


-------------
Vladimír Michl (moderátor)
ARKANCE CZ - https://arkance.world - arkance.world
(podpora viz helpdesk.arkance-systems.cz)


Odeslal: honzic
Datum odeslání: 07.led.2009 v 17:42

Mam plny Autocad 2009. Bohuzel tento zapis DE, *DIM_EDIT mi v ACADu 2009 nefunguje pritom ve starsi verzi ACAD2008 mi fungoval vpohode. Tak nevim. Dead



Odeslal: Vladimír Michl
Datum odeslání: 08.led.2009 v 13:48
Pokud je DIM_EDIT nějaký fungující příkaz doplněný některou nadstavbou, mělo by to fungovat.
 
Výše uvedené Diesel makro by v LISPu vypadalo nějak takto:
 

(defun C:DE2 ()
 (setenv "CMDN" "42")(setenv "IDCMD" "3010")
 (command "_SELECT" "_AU" pause)
 (setenv "IDCMD" "2007")
 (princ)
)


-------------
Vladimír Michl (moderátor)
ARKANCE CZ - https://arkance.world - arkance.world
(podpora viz helpdesk.arkance-systems.cz)


Odeslal: honzic
Datum odeslání: 09.led.2009 v 09:46
A tento zapis
 
(defun C:DE2 ()

 (setenv "CMDN" "42")(setenv "IDCMD" "3010")

 (command "_SELECT" "_AU" pause)

 (setenv "IDCMD" "2007")

 (princ)

)
 
mam vlozit do souboru acad.pgp k memu aliasu?


Odeslal: Vladimír Michl
Datum odeslání: 09.led.2009 v 10:07
Ne, to je LISP kód do souboru .LSP - ten pak načtete (nejlépe automaticky při spuštění) pomocí [CMD]APLČTI[/CMD] (_APPLOAD). Do PGP už v tomto případě nic dávat nemusíte - defun "naučí" nový příkaz sám.

-------------
Vladimír Michl (moderátor)
ARKANCE CZ - https://arkance.world - arkance.world
(podpora viz helpdesk.arkance-systems.cz)


Odeslal: honzic
Datum odeslání: 09.led.2009 v 10:40

Super. Diky moc. Uz mi to funguje. Wink




Vytisknout stránku | Zavřít okno