Emacs Lisp - bind `(` to `(<cur>)` and `()` to `()`

Question

I've gotten a nice rebind, ( to (<cur>) working, but I would like to be able to still type () to do ()<cur>. Is this possible in Emacs Lisp?

Answer 1

Use the following to get a character,

(interactive "c`)' will insert ), else will go inside and insert")

Then just test if the parameter is equal to 41 (close parens).