Odpovídání na AutoLISP pomocí výrazů jazyka DIESEL v makrech

Řetězcové výrazy jazyka DIESEL lze použít k poskytování odpovědí na příkazy definované pomocí jazyka AutoLISP nebo prostředím ObjectARX.

Výrazy jazyka DIESEL vracejí řetězcové hodnoty (textové řetězce), které je možné použít jako odpověď na standardní příkazy, procedury AutoLISP a ObjectARX ^® a další makra.

Poznámka: Jazyk AutoLISP není dostupný v aplikaci AutoCAD LT pro systém Mac OS a prostředí ObjectARX není dostupné v aplikaci AutoCAD LT.

Hodnota vrácená výrazem jazyka DIESEL je textový řetězec, je možné ji použít jako odpověď na volání funkce AutoLISP getXXX nebo funkce prostředí ObjectARX acetGetXXX. Tato funkce umožňuje, aby položky nabídky vyhodnotily aktuální podmínky výkresu a vrátily hodnotu do procedury jazyka AutoLISP nebo prostředí ObjectARX.

Pokud načtete a spustíte následující ukázkovou proceduru jazyka AutoLISP, program vyzve k zadání názvu a velikosti značky a jejího umístění ve výkresu.

(defun C:SYMIN()
  (setq sym 
    (getstring 
      "\nEnter symbol name: ")      ; Prompts for a symbol name
  )

  (setq 
    siz (getreal 
          "\nSelect symbol size: ") ; Prompts for a symbol size

    p1 (getpoint 
          "\nInsertion point: ")    ; Prompts for insertion point
  )

  (command "._insert"               ; Issues the INSERT command
           sym                      ; using the desired symbol
           p1 siz siz 0)            ; insertion point, and size

 (princ)                            ; Exits quietly 
)

Poznámka: Pravidelně používaná procedura jazyka AutoLISP by měla obsahovat kontrolu chyb, která ověřuje platnost zadaných hodnot.

Během provádění předchozího příkladu je možné kliknout na prvky uživatelského rozhraní, které spustí výraz jazyka DIESEL jako reakci na jednu z výzev. Pokud například chcete použít faktor měřítka, jehož hodnota jsou 3/8 aktuální hodnoty proměnné DIMSCALE, můžete použít výraz $M=$(*,$(getvar,dimscale),0.375).

Toto není možné provést pomocí podobného kódu jazyka AutoLISP – hodnotu vrácenou výrazem jazyka AutoLISP obvykle není možné použít jako odpověď na volání funkce getXXX (například funkce getreal v předchozí ukázce).