Lisp osnap with hatch

WHEN I DIM. HATCH, I USUALLY USE OPTION, TICK IGNORE HATCH OBJECTS.

IF I HAVE A LISP FOR THIS, MAYBE I WORK BETTER!

THANKS ALL !

Something like this:

(defun c:toggleHatchSnap ( / )
 (setvar "OSOPTIONS" (boole 6 (getvar "OSOPTIONS") 1))
 (princ)
)

something like this:

(defun c:togglehatchsnap ( / )
 (setvar "osoptions" (boole 6 (getvar "osoptions") 1))
 (princ)
)

oh good. Thank you very much!

oh good. Thank you very much!