あと (windmove-default-keybindings) しておくと Shift-カーソル上下左右で window 間の移動ができるよ。
(setq windmove-wrap-around t) でループ。