カーソル移動

(defun change-prev-lines (n) (interactive "n")
  (unless (boundp 'configured-prev-lines-n)
    (defvar configured-prev-lines-n n))
  (setq configured-prev-lines-n n)
  (global-set-key
   "\C-p" (lambda () (interactive) 
	    (previous-line configured-prev-lines-n))))
(global-set-key "\C-x\C-p" 'change-prev-lines)
(change-prev-lines 2)

.emacsに書いて

C-n 1行下に
C-p 2行上に
C-v 1画面分下に

という感じに設定してみることにした。
M-vとかC-] C-vとか押しにくいし。(一回の移動に2ストロークは使う気なくす)
時々、一行ずつ移動できた方が便利だと思ったので、C-x C-pで移動する量を変更できるようにした。