Lines Matching defs:right
54 (define-key solitaire-mode-map "\C-f" 'solitaire-right)
63 (define-key solitaire-mode-map [right] 'solitaire-right)
68 (define-key solitaire-mode-map [S-right] 'solitaire-move-right)
73 (define-key solitaire-mode-map [kp-6] 'solitaire-right)
79 (define-key solitaire-mode-map [S-kp-6] 'solitaire-move-right)
124 "Lower right corner of the board.")
137 '(solitaire-left solitaire-right solitaire-up solitaire-down))
182 horizontally or vertically, up, down, left or right, which look like
265 (defun solitaire-right ()
323 (defun solitaire-move-right () (interactive) (solitaire-move '[right]))
434 (let ((allmoves [up up S-down up left left S-right up up left S-down
435 up up right right S-left down down down S-up up
437 S-right left left up up S-down right right right
438 S-left left S-right right right right S-left
439 right down down S-up down down left left S-right
441 right right S-left down right right down S-up
442 left left left S-right right S-left down down
443 left S-right S-up S-left S-left S-down S-right
444 up S-right left left])
445 ;; down down S-up left S-right
446 ;; right S-left
450 (if (memq op '(S-left S-right S-up S-down))
453 (if (memq op '(S-left S-right S-up S-down))