CAD tip # 13306:

Například prozatím chybějící řízení proměnné SNAPANG (resp. všech systémových proměnných) sloužící k natočení kurzoru při kreslení můžete snadno nahradit doplněním jednoduché LISP aplikace.

Následující LISP kód uložte do souboru Snapang.lsp a tento soubor nahrajte ve vašem webovém AutoCADu pomocí "Správa LISP...". Nastavte jeho spouštění při startu, aby se nový příkaz "SNAPANG" příště nadefinoval při každém spuštění web AutoCADu. Následně jej můžete kdykoliv spustit zadáním příkaz SNAPANG na příkazovém řádku.

(defun C:SNAPANG ()
 (initget 1)
 (setvar "SNAPANG" (getangle "New snap angle: "))
)

Stejně jako v desktop verzi AutoCADu můžete úhel "odpíchnout" ukázáním dvou bodů ve výkresu nebo zadat numericky (v aktuálních úhlových jednotkách výkresu).

Nebo varianta, pokud preferujete více výzev pro zadání úhlu:

(defun C:SNAPANG ( / p1 p2)
 (setq p1 (getpoint "Start point for snap angle : "))
 (if p1 (setq p2 (getpoint p1 "End point: ")))
 (setvar "SNAPANG" (if p1 (angle p1 p2) 0.0))
)