Як створювати ігри на паскалі
сьогодні нескладні гри, де немає ні графічних, ні звукових ефектів, переживають друге народження. Граючи в них, користувач зосереджується на сюжеті, а не на художніх прийомах. Для створення таких ігор добре підходить мову Паскаль.
1
Скачайте компілятор мови Паскаль з наступної сторінки - https://edn.embarcadero.com/article/20803. Ознайомтеся з умовами використання даного програмного пакета, після чого встановіть його.
2
Спробуйте створити гру, в якій від гравця потрібно вгадати число в інтервалі від 0 до 100. Спочатку введіть назву програми: program ugadayka-
3
Підключіть модуль CRT: uses crt-
4
Позначте змінні наступним чином: var
zagadka, mnenie, popytki: integer;
knopochka: char
zagadka, mnenie, popytki: integer;
knopochka: char
5
Почніть програму з очищення екрану і змінних, а також присвоєння загаданого числа псевдослучайного значення: begin
clrscr;
randomize;
popytki: = 0;
mnenie: = 0;
zagadka: = int (rnd * 100) -
clrscr;
randomize;
popytki: = 0;
mnenie: = 0;
zagadka: = int (rnd * 100) -
6
Примусьте комп`ютер питати у користувача, яким, на його думку, є загадане число, до тих пір, поки він його не вгадає: while not mnenie = zagadka do
begin
popytki: = popytki + 1;
writeln ( `Спроба номер`, popytki, `.`);
write ( `Як ти думаєш, яке число загадане?`);
readln (mnenie);
if zagadkagt; mnenie then writeln ( `Ні, загадане число більше!`)
else writeln ( `Ні, загадане число менше!`)
end-
begin
popytki: = popytki + 1;
writeln ( `Спроба номер`, popytki, `.`);
write ( `Як ти думаєш, яке число загадане?`);
readln (mnenie);
if zagadkagt; mnenie then writeln ( `Ні, загадане число більше!`)
else writeln ( `Ні, загадане число менше!`)
end-
7
Після того як число буде вгадано, автоматичне повторення зазначених вище подій припиниться. Розпочнеться виконання наступних рядків програми. У них змусьте машину вивести інформацію про те, що користувач вгадав число: writeln ( `Вітаю! Ти вгадав число з спроби номер`, popytki, `. Воно дійсно одно`, zagadka, `.`);
knopochka: = readkey
knopochka: = readkey
8
Введіть оператор для завершення роботи програми: end.
9
Збережіть програму під будь-яким бажаним ім`ям, використовуючи пункти меню file -gt; Save as. Надалі після кожного редагування зберігайте її натисканням клавіші F2.
10
Для запуску програми на виконання натисніть одночасно клавіші Control і F9.
11
Після завершення роботи програми для того, щоб побачити, що вона вивела на екран безпосередньо перед цим, натисніть одночасно клавіші Alt і F5. Для повернення до редактора натисніть це ж поєднання клавіш ще раз.
Статті за темою "Як створювати ігри на паскалі"
Оцініть, будь ласка статтю