(defun my-window-setup (pane-number)
  "Creates favourite window layout.

  Prompts user for choice of either two or three panes."
  (interactive "nNumber of panes: ")
  (cond ((eq pane-number 3)
         ((delete-other-windows)
          (split-window-horizontally)
          (split-window-horizontally)
          (windmove-right)
          (windmove-right)
          (balance-windows)
          (split-window-vertically)
          (windmove-left)
          (windmove-left)))
        ((eq pane-number 2)
         ((delete-other-windows)
          (split-window-horizontally)
          (windmove-right)
          (balance-windows)
          (split-window-vertically)
          (windmove-left)))))

(defun my-2-window-setup ()
  (interactive)
  (delete-other-windows)
  (split-window-horizontally)
  (windmove-right)
  (balance-windows)
  (split-window-vertically)
  (windmove-left))