Function: pong-move-left
pong-move-left is an interactive and byte-compiled function defined in
pong.el.gz.
Signature
(pong-move-left)
Documentation
Move bat 1 up.
This is called left for historical reasons, since in some pong implementations you move with left/right paddle.
Key Bindings
Source Code
;; Defined in /usr/src/emacs/lisp/play/pong.el.gz
(defun pong-move-left ()
"Move bat 1 up.
This is called left for historical reasons, since in some pong
implementations you move with left/right paddle."
(interactive nil pong-mode)
(if (> pong-bat-player1 1)
(and
(setq pong-bat-player1 (1- pong-bat-player1))
(pong-update-bat 2 pong-bat-player1))))