Function: pong-update-score

pong-update-score is a byte-compiled function defined in pong.el.gz.

Signature

(pong-update-score)

Documentation

Update score and print it on bottom of the game grid.

Source Code

;; Defined in /usr/src/emacs/lisp/play/pong.el.gz
(defun pong-update-score ()
  "Update score and print it on bottom of the game grid."
  (let* ((string (format "Score:  %d / %d"
                         pong-score-player1 pong-score-player2))
	 (len (length string)))
    (dotimes (x len)
      (if (string-equal (buffer-name (current-buffer)) pong-buffer-name)
          (gamegrid-set-cell x pong-height (aref string x))))))