diff options
| author | John Wiegley <johnw@newartisans.com> | 2002-03-01 08:08:28 +0000 |
|---|---|---|
| committer | John Wiegley <johnw@newartisans.com> | 2002-03-01 08:08:28 +0000 |
| commit | 059e5edba1175504698637f734eb5bf975b299fa (patch) | |
| tree | 95e6f08169d73d1ce763ae90945204783c0132eb /chess-standard.el | |
| parent | f115e4627966ae900aef55cb10f9e6207dbe7adf (diff) | |
Playing against crafty now works.
Diffstat (limited to 'chess-standard.el')
| -rw-r--r-- | chess-standard.el | 11 |
1 files changed, 8 insertions, 3 deletions
diff --git a/chess-standard.el b/chess-standard.el index 4e11b1f..bc45d3f 100644 --- a/chess-standard.el +++ b/chess-standard.el @@ -23,6 +23,11 @@ ;; $Revision$ +(require 'chess-session) +(require 'chess-pos) +(require 'chess-ply) +(require 'chess-game) + (defgroup chess-standard nil "The rules of standard chess." :group 'chess) @@ -138,12 +143,12 @@ indices which indicate where a piece may have moved from." (1 0))) ((= (upcase piece) ?B) '((-1 -1) (-1 1) - + (1 -1) (1 1))) ((= (upcase piece) ?Q) '((-1 -1) (-1 0) (-1 1) - (0 -1) (0 1) - (1 -1) (1 0) (1 1))))) + (0 -1) (0 1) + (1 -1) (1 0) (1 1))))) ;; up the current file (setq pos (apply 'chess-add-index target dir)) (while pos |