Kaip Sukurti žaidimus Paskalyje

Turinys:

Kaip Sukurti žaidimus Paskalyje
Kaip Sukurti žaidimus Paskalyje

Video: Kaip Sukurti žaidimus Paskalyje

Video: Kaip Sukurti žaidimus Paskalyje
Video: ŽAIDŽIU SU PROFU?! O.o // Build Battle 2024, Balandis
Anonim

Šiandien paprasti žaidimai, kur nėra grafinių ar garso efektų, išgyvena atgimimą. Vaidindamas juos, vartotojas sutelkia dėmesį į siužetą, o ne į meninę techniką. „Pascal“kalba puikiai tinka kurti tokius žaidimus.

Kaip sukurti žaidimus Pascale
Kaip sukurti žaidimus Pascale

Nurodymai

1 žingsnis

Atsisiųskite „Pascal“kompiliatorių iš šio puslapio - https://edn.embarcadero.com/article/20803. Perskaitykite šio programinės įrangos paketo naudojimo sąlygas ir įdiekite ją

2 žingsnis

Pabandykite sukurti žaidimą, kuriame žaidėjas privalo atspėti skaičių nuo 0 iki 100. Pirmiausia įveskite programos pavadinimą: programa ugadayka;

3 žingsnis

Prijunkite CRT įrenginį: naudoja crt;

4 žingsnis

Nurodykite savo kintamuosius taip: var

zagadka, mnenie, popytki: sveikasis skaičius;

knopochka: char

5 žingsnis

Paleiskite programą išvalydami ekraną ir kintamuosius ir priskirdami paslėptam skaičiui pseudoatsitiktinę vertę: pradėti

clrscr;

atsitiktinai parinkti;

popytki: = 0;

mnenie: = 0;

zagadka: = int (rnd * 100);

6 žingsnis

Priverskite kompiuterį paklausti vartotojo, kas, jo nuomone, yra paslėptas skaičius, kol jis atspės: nors ne mnenie = zagadka do

pradėti

popytki: = popytki + 1;

writeln ('Bandymo numeris', popytki, '.');

rašyti („Ką tu galvoji, koks skaičius sugalvotas?“);

readln (mnenie);

jei zagadka> mnenie tada writeln ('Ne, paslėptas skaičius yra didesnis!')

else writeln ('Ne, paslėptas skaičius yra mažesnis!')

galas;

7 žingsnis

Atspėjus skaičių automatinis minėtų įvykių kartojimas bus sustabdytas. Kitos programos eilutės bus pradėtos vykdyti. Jose mašinoje pateikite informaciją, kurią vartotojas atspėjo: writeln ('Sveikiname! Jūs atspėjote skaičių bandydami skaičių', popytki, '. Tai tikrai lygu', zagadka, '.');

knopochka: = raktas

8 žingsnis

Įveskite teiginį, kad baigtumėte programą: pabaiga.

9 žingsnis

Išsaugokite programą norimu pavadinimu naudodami meniu elementų failą -> Išsaugoti kaip. Ateityje, po kiekvieno redagavimo, išsaugokite jį paspausdami klavišą F2.

10 žingsnis

Norėdami paleisti programą vykdyti, vienu metu paspauskite klavišus Control ir F9.

11 žingsnis

Išėjus programai, norėdami pamatyti, ką ji rodė ekrane prieš pat, vienu metu paspauskite klavišus alt="Vaizdas" ir F5. Dar kartą paspauskite tą patį klavišų derinį, kad grįžtumėte į redaktorių.

Rekomenduojamas: