Реферат: Сетевая игра на Delphi Морской бой

Главная программа Main

bShipsYouKilled

Переменная для подсчёта убитых

игроком кораблей

Byte bShipsHeKilled

Переменная для подсчёта убитых у

игрока кораблей

Byte vx Позиция по X, в какую точку стреляли Byte vy Позиция по Y, в какую точку стреляли Byte blVystrel Переменная выстрела Boolean blGameStatus Статус игры Boolean iLocalPort Сервера порт Integer sServerAddr: Адрес компьютера String iServerPort Соединение клиента с сервером Integer Procedure TForm1.LoadGame i Переменная счётчик Integer j Переменная счётчик Integer h Переменная для смещения поля сверху Integer w Переменная для смещения поля слева Integer Procedure TForm1.SetColorOnShape1 i Переменная счётчик Integer j Переменная счётчик Integer f Переменная для проверки кораблей, при расстановке, чтобы они не стояли по диагонали Boolean Procedure TForm1.SetColorOnShape2 i Переменная счётчик Integer j Переменная счётчик Integer Procedure TForm1.EndGame on_off_sock Переменная для перевода сокета в блокирующее состояние Longint i Переменная счётчик Integer j Переменная счётчик Integer Procedure TForm1.RecvSock Buffer Переменная для записи данных Str iStruckSize Размер структуры адреса Integer i Переменная счётчик Integer j Переменная счётчик Integer Procedure TForm1.SendSock Buffer Переменная для записи данных Str

Продолжение таблицы 2

Имя	Назначение	Тип
Procedure TForm1.N6Click
ws	Данные для версии библиотеки	TWSADATA
on_off_sock	Переменная для перевода сокета в неблокирующее состояние	Longint
Procedure TForm1.N7Click
ws	Данные для версии библиотеки	TWSADATA
on_off_sock	Переменная для перевода сокета в неблокирующее состояние	Longint
Procedure TForm1.FormDestroy
Не имеет переменных
Procedure TForm1.N8Click
Не имеет переменных
Procedure TForm1.FormCreate
Не имеет переменных
Procedure TForm1.N2Click
Не имеет переменных
Procedure TForm1.N4Click
Не имеет переменных
Procedure TForm1.N5Click
Не имеет переменных

Текст главного модуля Main приведен в приложении А.

2.2 Руководство пользователя

Главное меню игры содержит два пункта: «Файл» и «Настройки». Пункт меню «Файл» содержит два подпункта: «Новая игра» для начала новой игры и «Выход» для выхода из программы, пункт «Настройки» включает в себя четыре подпункта: «Настройки клиента» для настройки клиентского соединения, «Настройки сервера» для настройки сервера, «Создать игру» для создания игры, «Подключиться к игре» для подключения к игре второго игрока.

После того как пользователь запустит приложение «Project1.exe», появиться окно программа, представленное на рисунке 2.

Рисунок 2 – Вид окно при запуске

После запуска клиенту необходимо настроить клиента и сервера.

Для настройки клиента необходимо нажать подпункт «Настройки клиента» меню «Настройки», появиться окно представленное на рисунке 3.

Рисунок 3 – Вид окна настроек клиента

Необходимо ввести номер адреса для соединения и номер порта. После ввода нажмите «ОК».

Для настройки сервера необходимо нажать подпункт «Настройки сервера» меню «Настройки», появиться окно представленное на рисунке 4.

Рисунок 4 – Вид окна настроек сервера

Необходимо ввести номер порта для соединения. После ввода нажмите «ОК».

После того как настроили клиента и сервера нажимаем «Новая игра» меню «Файл». В игровом окне появиться поле игрока, синим цветом, и поле соперника, белым цветом. Корабли на поле игрока расставляются с помощью курсора мыши, они будут изображены чёрным цветом.

После расстановки кораблей игрок может нажимать подпункт «Создать игру», а соперник «Подключиться к игре». Начинается игра.

Внизу в строке состояния игроки могут видеть счёт игры и в строке состояния появляются подсказки, о том кто должен стрелять, а кто ждать. Это можно посмотреть на рисунках 5 и 6.