diff --git a/lisp/2048.el b/lisp/2048.el index 1937bf3..5ba9280 100644 --- a/lisp/2048.el +++ b/lisp/2048.el @@ -381,10 +381,22 @@ individually." (define-derived-mode 2048-mode fundamental-mode "2048" "Major mode for playing 2048 in Emacs." (random t) ;; Start up the RNG + ;; Arrow keys (local-set-key (kbd "") '2048-shift-left) (local-set-key (kbd "") '2048-shift-right) (local-set-key (kbd "") '2048-shift-down) (local-set-key (kbd "") '2048-shift-up) + ;; Vim keys + (local-set-key (kbd "h") '2048-shift-left) + (local-set-key (kbd "l") '2048-shift-right) + (local-set-key (kbd "j") '2048-shift-down) + (local-set-key (kbd "k") '2048-shift-up) + ;; Swipe controls for termux + (local-set-key (kbd "") '2048-shift-left) + (local-set-key (kbd "") '2048-shift-right) + (local-set-key (kbd "") '2048-shift-down) + (local-set-key (kbd "") '2048-shift-up) + (2048-startup) (setq font-lock-defaults '(2048-highlights)) )