Хэл Фултон - Программирование на языке Ruby

end

if ARGV[1]

opponent_id = ARGV[1]

else

print "Ваш противник? "

opponent_id = STDIN.gets.chomp

end

opponent = opponent_id.split(":")[0] # Удалить имя хоста.

# Обратиться к серверу

socket = TCPSocket.new(ChessServer, ChessServerPort)

response = nil

socket.puts "login # {myself} #{opponent_id}"

socket.flush

response = socket.gets.chomp

name, ipname, color = response.split ":"

color = color.to_i

if color == BLACK # Цвет фигур другого игрока,

puts "\nУстанавливается соединение..."

server = TCPServer.new(PeerPort)

session = server.accept

str = nil

begin

timeout(30) do

str = session.gets.chomp

if str != "ready"

raise "Ошибка протокола: получено сообщение о готовности #{str}."

end

end

rescue TimeoutError

raise "He получено сообщение о готовности от противника."

end

puts "Ваш противник #{opponent}... у вас белые.\n"

who = WHITE

move = nil

board = nil # В этом примере не используется.

num = 0

draw_board(board) # Нарисовать начальное положение для белых.

loop do

num += 1

move = my_move(who, move, num, board, session)

draw_board(board)

case move

when "resign"

puts "\nВы сдались. #{opponent} выиграл."

break

when /Checkmate/

puts "\nВы поставили мат #{opponent}!"

draw_board(board)

break

end

move = other_move(who, move, num, board, session)

draw_board(board)

case move

when "resign"

puts "\n#{opponent} сдался... вы выиграли!"

break

when /Checkmate/

puts "\n#{opponent} поставил вам мат."

break

end

end

else # Мы играем черными,

puts "\nУстанавливается соединение..."

socket = TCPSocket.new(ipname, PeerPort)

socket.puts "ready"

puts "Ваш противник #{opponent}... у вас черные.\n"

who = BLACK

move = nil

board = nil # В этом примере не используется.

num = 0

draw_board(board) # Нарисовать начальное положение.

loop do

num += 1

move = other_move(who, move, num, board, socket)

draw_board(board) # Нарисовать доску после хода белых,

case move

when "resign"

puts "\n#{opponent} сдался... вы выиграли!"

break

when /Checkmate/

puts "\n#{opponent} поставил вам мат."

break

end

move = my_move(who, move, num, board, socket)

draw_board(board)

case move

when "resign"

puts "\nВы сдались. #{opponent} выиграл."

break

when /Checkmate/

puts "\n#{opponent} поставил вам мат."

break

end

end

socket.close

end

Я определил этот протокол так, что черные посылают белым сообщение «ready», чтобы партнер знал о готовности начать игру. Затем белые делают первый ход. Ход посылается черным, чтобы клиент мог нарисовать такую же позицию на доске, как у другого игрока.

Повторю, приложение ничего не знает о шахматах. Вместо проверки допустимости хода вставлена заглушка; проверка выполняется локально, то есть на той стороне, где делается ход. Никакой реальной проверки нет — заглушка всегда говорит, что ход допустим. Кроме того, мы хотим, чтобы имитация игры завершалась после нескольких ходов, поэтому мы написали программу так, что черные всегда выигрывают на четвертом ходу. Победа обозначается строкой « Checkmate!» в конце хода. Эта строка печатается на экране соперника и служит признаком выхода из цикла.

Помимо «традиционной» шахматной нотации (например, «P-K4») существует еще «алгебраическая», которую многие предпочитают. Но написанный код вообще не имеет представления о том, какой нотацией мы пользуемся.

Поскольку это было несложно сделать, мы позволяем игроку в любой момент сдаться. Рисование доски тоже заглушено. Желающие могут реализовать грубый рисунок, выполненный ASCII-символами.

Метод my_moveвсегда относится к локальному концу, метод other_move— к удаленному.

В листинге 18.3 приведен протокол сеанса. Действия клиентов нарисованы друг против друга.

% ruby chess.rb Hal % ruby chess.rb

Capablanca:deepthought.org Hal:deepdoodoo.org

Устанавливается соединение... Устанавливается соединение...

Ваш противник Capablanca... у вас белые. Ваш противник Hal... у вас черные.

+------------------------------+ +------------------------------+

| Заглушка! Шахматная доска... | | Заглушка! Шахматная доска... |

+------------------------------+ +------------------------------+

Ваш ход: N-QB3 Противник: N-QB3

+------------------------------+ +------------------------------+