diff options
Diffstat (limited to 'chess-crafty.el')
| -rw-r--r-- | chess-crafty.el | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/chess-crafty.el b/chess-crafty.el index a3e6c4a..25a0b43 100644 --- a/chess-crafty.el +++ b/chess-crafty.el @@ -142,7 +142,13 @@ ((eq (car args) 'ponder) (if (cadr args) (chess-engine-send nil "hard\n") - (chess-engine-send nil "easy\n"))))) + (chess-engine-send nil "easy\n"))) + ((eq (car args) 'search-depth) + (assert (and (integerp (cadr args)) (>= (cadr args) 0))) + (chess-engine-send nil (format "sd %d\n") (cadr args))) + ((eq (car args) 'search-time) + (assert (and (integerp (cadr args)) (> (cadr args) 0))) + (chess-engine-send nil (format "st %d\n") (cadr args))))) (t (if (and (eq event 'undo) |