Macro for SetPt

I would like to make a macro command that will make the z-coordinate value as zero or a specific value.
I can use SetPt but I require to input the values again. I want the macro command that will take the input value automatically.

Hello -

! _-SetPt _Pause _ZSet=_Yes _XSet=No _YSet=_No 22

-Pascal