An elisp question

[Rodolfo Medina]

I have a set of `setq' conditions that I wish to group into a function and put
inside another function:

(defun my-test ()
  (interactive)
  (if (equal (y-or-n-p "Yes or no? ") t)
      (setq ps-print-footer t
            ps-print-footer-frame nil
            ps-top-margin 18
            ps-bottom-margin 5
            ps-left-margin 9
            ps-right-margin 7
            ps-print-header nil
            ps-show-n-of-n nil
            ps-print-footer-frame nil
            ps-footer-lines 1
            ps-left-footer (quote ( ))
            ps-footer-offset 0
            )
    (message "hallo")))


How can I group all those `setq' conditions into a function and put that
function name in place of them in `my-test' definition?

Thanks for any help
Rodolfo