summaryrefslogtreecommitdiff
path: root/lisp/play/gomoku.el
diff options
context:
space:
mode:
authorPavel Janík <Pavel@Janik.cz>2001-11-10 08:14:13 +0000
committerPavel Janík <Pavel@Janik.cz>2001-11-10 08:14:13 +0000
commit5fc3b30d3cdfbcfeebc50d51f61e9d31b6d17f8b (patch)
treec0d2216d9d5905c6ac522a3c1484d5297f5de2dd /lisp/play/gomoku.el
parentb8457371275348b2e8284ac5a1cd7425c5f0562b (diff)
downloademacs-5fc3b30d3cdfbcfeebc50d51f61e9d31b6d17f8b.tar.gz
Move definitions of constants to the beginning of file, before their use.
Diffstat (limited to 'lisp/play/gomoku.el')
-rw-r--r--lisp/play/gomoku.el36
1 files changed, 20 insertions, 16 deletions
diff --git a/lisp/play/gomoku.el b/lisp/play/gomoku.el
index fef7546760f..7b2a9bd42d9 100644
--- a/lisp/play/gomoku.el
+++ b/lisp/play/gomoku.el
@@ -80,6 +80,26 @@ One useful value to include is `turn-on-font-lock' to highlight the pieces."
:type 'hook
:group 'gomoku)
+;;;
+;;; CONSTANTS FOR BOARD
+;;;
+
+;; You may change these values if you have a small screen or if the squares
+;; look rectangular, but spacings SHOULD be at least 2 (MUST BE at least 1).
+
+(defconst gomoku-square-width 4
+ "*Horizontal spacing between squares on the Gomoku board.")
+
+(defconst gomoku-square-height 2
+ "*Vertical spacing between squares on the Gomoku board.")
+
+(defconst gomoku-x-offset 3
+ "*Number of columns between the Gomoku board and the side of the window.")
+
+(defconst gomoku-y-offset 1
+ "*Number of lines between the Gomoku board and the top of the window.")
+
+
(defvar gomoku-mode-map nil
"Local keymap to use in Gomoku mode.")
@@ -927,22 +947,6 @@ If the game is finished, this command requests for another game."
;;; DISPLAYING THE BOARD.
;;;
-;; You may change these values if you have a small screen or if the squares
-;; look rectangular, but spacings SHOULD be at least 2 (MUST BE at least 1).
-
-(defconst gomoku-square-width 4
- "*Horizontal spacing between squares on the Gomoku board.")
-
-(defconst gomoku-square-height 2
- "*Vertical spacing between squares on the Gomoku board.")
-
-(defconst gomoku-x-offset 3
- "*Number of columns between the Gomoku board and the side of the window.")
-
-(defconst gomoku-y-offset 1
- "*Number of lines between the Gomoku board and the top of the window.")
-
-
(defun gomoku-max-width ()
"Largest possible board width for the current window."
(1+ (/ (- (window-width (selected-window))