comparison lisp/play/gomoku.el @ 40788:98e8ee29a39c

(gomoku): Doc fix.
author Richard M. Stallman <rms@gnu.org>
date Tue, 06 Nov 2001 19:39:19 +0000
parents e1334fb129a2
children c9b14656dfc4
comparison
equal deleted inserted replaced
40787:9f2a09c43f5f 40788:98e8ee29a39c
1 ;;; gomoku.el --- Gomoku game between you and Emacs 1 ;;; gomoku.el --- Gomoku game between you and Emacs
2 2
3 ;; Copyright (C) 1988, 1994, 1996, 2001 Free Software Foundation, Inc. 3 ;; Copyright (C) 1988, 1994, 1996, 2001 Free Software Foundation, Inc.
4 4
5 ;; Author: Philippe Schnoebelen <phs@lsv.ens-cachan.fr> 5 ;; Author: Philippe Schnoebelen <phs@lsv.ens-cachan.fr>
6 ;; Maintainer: FSF
6 ;; Adapted-By: ESR, Daniel Pfeiffer <occitan@esperanto.org> 7 ;; Adapted-By: ESR, Daniel Pfeiffer <occitan@esperanto.org>
7 ;; Keywords: games 8 ;; Keywords: games
8 9
9 ;; This file is part of GNU Emacs. 10 ;; This file is part of GNU Emacs.
10 11
33 ;; vertically or diagonally). 34 ;; vertically or diagonally).
34 ;; 35 ;;
35 ;; I have been told that, in "The TRUE Gomoku", some restrictions are made 36 ;; I have been told that, in "The TRUE Gomoku", some restrictions are made
36 ;; about the squares where one may play, or else there is a known forced win 37 ;; about the squares where one may play, or else there is a known forced win
37 ;; for the first player. This program has no such restriction, but it does not 38 ;; for the first player. This program has no such restriction, but it does not
38 ;; know about the forced win, nor do I. Furthermore, you probably do not know 39 ;; know about the forced win, nor do I.
39 ;; it yourself :-). 40 ;; See http://renju.nu/r1rulhis.htm for more information.
40 41
41 42
42 ;; There are two main places where you may want to customize the program: key 43 ;; There are two main places where you may want to customize the program: key
43 ;; bindings and board display. These features are commented in the code. Go 44 ;; bindings and board display. These features are commented in the code. Go
44 ;; and see. 45 ;; and see.
707 ;;; 708 ;;;
708 709
709 ;;;###autoload 710 ;;;###autoload
710 (defun gomoku (&optional n m) 711 (defun gomoku (&optional n m)
711 "Start a Gomoku game between you and Emacs. 712 "Start a Gomoku game between you and Emacs.
713
712 If a game is in progress, this command allow you to resume it. 714 If a game is in progress, this command allow you to resume it.
713 If optional arguments N and M are given, an N by M board is used. 715 If optional arguments N and M are given, an N by M board is used.
714 If prefix arg is given for N, M is prompted for. 716 If prefix arg is given for N, M is prompted for.
715 717
716 You and Emacs play in turn by marking a free square. You mark it with X 718 You and Emacs play in turn by marking a free square. You mark it with X
717 and Emacs marks it with O. The winner is the first to get five contiguous 719 and Emacs marks it with O. The winner is the first to get five contiguous
718 marks horizontally, vertically or in diagonal. 720 marks horizontally, vertically or in diagonal.
719 721
720 You play by moving the cursor over the square you choose and hitting 722 You play by moving the cursor over the square you choose and hitting
721 \\<gomoku-mode-map>\\[gomoku-human-plays]. 723 \\<gomoku-mode-map>\\[gomoku-human-plays].
724
725 This program actually plays a simplified or archaic version of the
726 Gomoku game, and ought to be upgraded to use the full modern rules.
727
722 Use \\[describe-mode] for more info." 728 Use \\[describe-mode] for more info."
723 (interactive (if current-prefix-arg 729 (interactive (if current-prefix-arg
724 (list (prefix-numeric-value current-prefix-arg) 730 (list (prefix-numeric-value current-prefix-arg)
725 (eval (read-minibuffer "Height: "))))) 731 (eval (read-minibuffer "Height: ")))))
726 (gomoku-switch-to-window) 732 (gomoku-switch-to-window)