Frequent tipster Leonid Nemirovsky shares a small LISP routine that adds a tilde to a leader arrowhead in AutoCAD.
"This LISP macro is extremely simple, but it works, and I use it often. The macro utilizes the QLeader command (using all current settings for LE) and inserts a tiny block that looks like a tilde ( ~ ) at the tip of the leader, and rotates it properly."
(defun c:wgl() (setq scl (getvar "dimscale")) (setq p1 (getpoint" Select Starting Point: ")) (setq p2 (getpoint p1 "Select second Point: ")) (setq p3 (getpoint p2 " Last Point: ")) (command"insert" "wgl" p1 scl scl p2) (command"qleader" p1 p2 p3) (princ) )
Notes from Cadalyst Tip Reviewer Brian Benton: This is a very simple routine. You will have to load the block (WGL.dwg) before running the LISP file (wgl.lsp). Once both the block and routine are loaded, type WGL on the Command line. This will run the QLeader command as usual, but will also insert a block at the tip of the leader's arrowhead. |