Použití makra v ZWCADU

[vukfox Profil]

Dobrý den,
dle návodů z cad.helpu jsem schopen užít makra pro určitá tlačítka a k nim přiřadit i případnou klávesou zkratku. Rád bych však užil aliasů je toto nějak možné?

[JanP]

Dobrý deň,

Ak máte na mysli priradiť nejakému makru zadefinovanému v tlačítku klávesovú skratku, resp. alias tak to bohužiaľ nepôjde.

Riešením namiesto "makra" vytvoriť príkaz LISPu. Ten príkaz potom môžete priradiť tlačítku, ale môžete mu aj definovať alias... podobne ako každému inému príkazu ZWCADu/AutoCADu.

Neviem či máte skúsenosti s LISP programovaním (stačia minimálne znalosti) ...ale bez preštudovania si problematiky LISP sa ďalej nepohneme.

Iba ak by sa Vám jednalo o jeden-dva makrá - v tom prípade ich "dajte sem" a prehodím Vám ich do syntaxe LISPu

[vukfox Profil]

Děkuji za odpověď. V LISPu jsem krátký čas něco dělal na škole. Bohužel jsem již téměř vše zapomněl.
Pro možnou pomoc by mi stačilo jedno převedení tohoto makra do LISPu, logické úpravy bych si pak zajistil sám.

^C^Cclayer;Hladina_XX;_dimlinear;\\\clayer;0;

Děkuji

[JanP]

Dobrý deň,

Dá sa to buď použitím autolispu, alebo aj čistým lispom
Preferujem čistý lisp - je univerzálny a funguje prakticky všade

Tu je príklad syntaxe nového príkazu s názvom kota1
...na rozdiel od Vašej požiadavky nenastavuje po skončení príkazu hladinu 0, ale na konci nastaví takú hladinu aká bola aktuálna pred spustením príkazu

Kód: Vybrat vše

(defun c:kota1 (/ ah)
      (setq ah (getvar 'clayer))
         (setvar "clayer" "Hladina_XX")
         (command "__dimlinear" "\\" "\\" "\\")
   (while (> (getvar "CMDACTIVE") 0)
   (command pause)
   )
       (setvar 'clayer ah)
      (princ)
)

Komentár:
(setq ah (getvar 'clayer)) - uloží aktuálnu hladinu do premennej ah (Aktualna Hladina)
(setvar "clayer" "Hladina_XX") - nastaví aktuálnu hladinu na hladinu "Hladina_XX"
(command "__dimlinear" "\\" "\\" "\\") - spustí príkaz _DIMLINEAR
...ďalšie riadky znamenajú čakanie na ukončenie príkazu
(setvar 'clayer ah) - nastaví aktuálnu hladinu na takú aká bola nastavená pred spustením príkazu

[vukfox Profil]

Děkuji,
pro začátek mi to velice pomohlo.
Ještě bych se rád zeptal kde-jak jednoduše prohloubit znalosti LISPu, ideálně v češtině?

[JanP]

Tých rôznych návodov aj v češtine sa dá na webe nájsť dosť...

Osobne sa mi najviac pozdáva síce starší ale stále aktuálny návod Vývojové prostředky AutoCADu - Visual Lisp

Okrem toho doporučujem hoc aj v EN jazyku nájsť nejaký kompletný zoznam LISP funkcií s príkladmi...
Jeden taký výber v SK jazyku mám síce aj ja - tu je: LISP funkcie - výber (PDF), snáď na začiatok postačí...

[JanP]

A ešte jeden od autodesku: http://docs.autodesk.com/ACDMAC/2013/EN ... _guide.pdf (EN) ...aj s príkladmi