Find Chess960 starting position identifier: Difference between revisions
Find Chess960 starting position identifier (view source)
Revision as of 19:20, 24 July 2022
, 1 year ago→{{header|Common Lisp}}
(→{{header|QBasic}}: Take advantage of mixed case, and add explicit output, since the code no longer matches the Commodore solution.) |
|||
Line 289:
(+ (* 96 knights) (* 16 queen) (* 4 dark-bishop) light-bishop)))))
(loop for ary in '("RNBQKBNR" "QNRBBNKR" "RQNBBKRN" "RNQBBKRN") doing
(format t "~a: ~a~%" ary (sp-id ary)))
</lang>
|