Find Chess960 starting position identifier: Difference between revisions
Content added Content deleted
(→{{header|QBasic}}: Algorithm fix.) |
(→{{header|Factor}}: Algorithm fix.) |
||
Line 282: | Line 282: | ||
: n ( str -- n ) "QB" without knightify table index ; |
: n ( str -- n ) "QB" without knightify table index ; |
||
: q ( str -- q ) " |
: q ( str -- q ) "B" without CHAR: Q swap index ; |
||
: d ( str -- d ) CHAR: B swap <evens> index ; |
: d ( str -- d ) CHAR: B swap <evens> index ; |