mY:=0;

End; 

procedure TMainform.FormPaint(Sender: TObject);

// Перерисовка графического  содержимого полей  при обновлении формы

Begin

For x:=1 to 10 do

  For y:=1 to 10 do

   Begin

    Draw(x,y,False,Manpole,Man);

    Draw(x,y,False,Comppole,Comp);

   End;

End; 

End. 
 
 

    2.4 Описание программы

 

    Разработанная программа представляет из себя набор  функций и процедур, вызываемых событиями, возникающих под действием игрока. Т.е. эта программа управляется событиями.

    Для функционирования данной программы  на компьютере должна быть установлена ОС Windows 9x. Программа написана в интегральной среде разработки программ Delphi 5.

    2.5 Тестирование программы

 

    Тестирование  программы проходило на компьютере, с установленной на него ОС Windows 98Se. Было проведено 5 запусков игры, с конечными результатами 3:2 в пользу игрока. Все правила игры  у условия в данной программе выполняются. Действия игрока и компьютера находятся в рамках правил.

    Вывод: В данном курсовом проекте была разработана  программа, полностью удовлетворяющая условиям поставленной задачи.

 

3. Внедрение

 

    Для нормальной работы программы необходим  компьютер не ниже         P 100, 8 Mb RAM, 1 Мб свободного места на диске с установленной на нём Windows 9x.

    Перед запуском программы, необходимо извлечь  в выбранную папку, из архива файл SeaWar.exe. После извлечения программы, её необходимо найти через стандартный Проводник, и запустить. Для начала игры необходимо выбрать из главного меню “Игра” пункт “Начать новую”. Игроку необходимо расставить корабли на своём поле. Расстановка осуществляется следующим образом: нажать левую клавишу мыши на клетке, где будет находится одна из крайних клеток корабля, а затем, не отпуская левой клавиши мыши переместить курсор на количество клеток корабля и отпустить клавишу мыши. Размер корабля выводится подсказкой над полем. Если корабль можно разместить в данных клетках, то это будет сделано, в противном случае он не будет размещён. После размещения всех кораблей игроком, компьютер производит расстановку кораблей на своём поле, и игра начинается автоматически.

    Право первого хода предоставляется игроку. Необходимо щёлкнуть левой клавишей мыши на поле компьютера. Если игрок попал, то ему предоставляется право повторного хода, а сама клетка помечается красным квадратом (рис. 6), если промахнулся, то право хода передаётся компьютеру, и клетка помечается крестиком (рис. 5). Компьютер делает свой ход и если удачно, то повторяет его. Если корабль полностью подбит, то его смежные клетки помечаются крестиками (рис. 7). После промаха право хода передаётся игроку. Игра продолжается до уничтожения всех кораблей игрока или компьютера. После уничтожения всех кораблей игрока или компьютера, программа может выдать два возможных сообщения, при выигрыше игрока - “Вы выиграли. Продолжить?” и при выигрыше компьютера - “Вы проиграли. Продолжить?”. При нажатии кнопки “Ok” игра будет продолжена, в противном случае программа будет закрыта.

    Завершить работу программы можно в любое время, выбрав из главного меню “Игра” пункт “Выход” или щёлкнуть по кнопке “Закрыть” главного окна. 

Рис. 5 Промах игрока и промах компьютера 

Рис. 6 Попадание  игрока 

 

Рис. 7 Полное уничтожение корабля компьютера

 

Заключение

 

     Приложение  представляет собой очень простой  вариант компьютерной программы-игры «Морской бой». Подход к решению поставленной задачи является оптимальным в смысле длины программного кода.

    Программа имеет интуитивно понятный интерфейс. В окне программы имеется только необходимый минимум кнопок для  необходимой работы. При этом даже не имеющий навыка работы с компьютером  пользователь может с легкостью работать с данным программным обеспечением.

     Для создания данной программы была использована среда объектно-ориентированного программирования Delphi, которая в полной мере обладает всеми этими возможностями и на данный момент является одной из самых мощных систем, позволяющих на самом современном уровне создавать как отдельные прикладные программы Windows, так и разветвленные комплексы, предназначенные для работы в корпоративных сетях и в Интернет.

     Для Delphi 7 и программ, созданных в этой среде, необходимы следующие  технические характеристики компьютера: Intel Pentium 166 MHz или выше (рекомендуется Р2 400 MHz); объем оперативной памяти не менее 64 Mb (рекомендуется 128 Mb); жесткий диск объемом не менее 500 Mb.

       .

Глоссарий

Список  использованных источников

Приложения