El ajedrez:: Juego es una clase para registrar y validar los movimientos de un juego de ajedrez.

SINOPSIS

use el Ajedrez:: Juego;

$game = Ajedrez:: Juego-> nuevo ();
$clone = $game-> clon ();
$move = $game-> make_move ("e2", "e4");
$move_c = $clone-> make_move ("e2", "e4");
$true = ($move-> get_piece () ne $move_c-> get_piece ());
$move = $game-> delete_move ();
...
¡mientras (¡! definido ($result = $game-> resultado ())) {
# consiga un movimiento
$move = $game-> make_move ($sq1, $sq2);
¡si (¡! definido ($move)) {
$game-de letra> get_message ();
}
}
si ($result == 1) {
¡imprima "triunfos Blancos! n";
}
elsif ($result == 0) {
¡imprima "el Empate! n"
}
más {
¡imprima "triunfos Negros! n";
}

El módulo de Ajedrez proporciona un marco a escribir programas de ajedrez con Perl. Esta clase forma la parte de aquel marco, proporcionando la validación de movimiento a todos los movimientos registrados usando el Ajedrez:: clase Animosa. El Juego contiene un Ajedrez:: Junta, 32 Ajedrez:: Piezas y un Ajedrez:: Juego:: MoveList que contiene una serie del Ajedrez:: Juego:: MoveListEntrys que registran el estado exacto del juego cuando esto progresa. Los movimientos pueden ser devueltos uno por uno para tener la manipulación movelist simple en cuenta.