1. kamerák
  2. Car Audio & Electronics
  3. Home Audio
  4. Personal Audio
  5. TV-k
  6. Okos otthon
  >> Elektronikai Technológia Online >  >> Okos otthon >> Okos élet

Könnyen elkészíthető Qbasic játékok

A BASIC, amely a Beginner's All-Purpose Symbolic Instruction Code rövidítése, még mindig a legismertebb programozási nyelv az abszolút kezdők számára, a QBasic pedig egy egyszerű tolmács, amelyen keresztül programokat írhat és futtathat. Még mindig jelentős QBasic-hobbi közösség él, és a QBasic játékok készítésének megtanulása megtanítja a programozás alapjait, és nagyon szórakoztató.

A QBasic első lépései

Ha nincs QBasic a rendszerén, letöltheti az eredeti verziót a Pete QB webhelyéről (lásd a forrásokat), vagy egy újabb, QB64 nevű verziót, amelyet úgy terveztek, hogy kompatibilis legyen az eredetivel. Miután megnyitja, egy kék képernyő jelenik meg. Írja be a következőt:

CLS PRINT "Helló, világ!" INPUT "Mi a neved?"; name$ PRINT "Helló, "; név$; "!" VÉGE

Ezután nyomja meg a Shift + F5 billentyűt a program futtatásához. Íme, mi történik:

A „CLS” a „clear screen” rövidítése, és biztosítja, hogy a program üres képernyővel induljon; ellenkező esetben az előző program maradványait fogja látni.

A "NYOMTATÁS" egyszerűen egy szöveget nyomtat a képernyőre. Ha csak egy számot nyomtat, akkor nincs szüksége az idézőjelekre.

Az „INPUT” a felhasználó bevitelének kérésének módja. A sor vége, a "name$" egy változó:ez az a hely, ahol a felhasználó válasza tárolódik. Nevezheted, ahogy akarod; a szöveget tartalmazó változóknak „$”-ra, a csak számokat tartalmazó változóknak „%”-ra kell végződniük.

A második "NYOMTATÁS" sor szöveget nyomtat a felhasználó által beírt szöveggel együtt.

„END”, előre láthatóan, befejezi a programot.

QBasic kitalálós játékok

Írja be a következő kódot a QBasic-be:

CLS esély% =1 RANDOMIZE IDŐZÍTŐ szám% =INT(RND * 10) + 1 NYOMTATÁS "Egy 1-től 10-ig terjedő számra gondolok. Három esélye van a helyes megoldásra."

DO WHILE esély% <4 NYOMTATÁS NYOMTATÁS "Véletlen vagy #"; esély%; "." NYOMTATÁSI BEMENET "Találd ki a számot"; tipp% HA tipp% =szám% MAJD GOTO youwin EGYÉB tipp% szám% MAJD NYOMTATJA "Túl magas." ELSE PRINT "Hiba történt. Próbálja újra." VÉGE HA esély% =esély% + 1 LOOP

NYOMTATÁS NYOMTATÁS "Kifogyott az esélyekből! Elnézést!" VÉGE

youwin:PRINT PRINT "Kitaláltad a számot! A szám volt"; szám%; "!" VÉGE

Ebben a játékban a program létrehoz egy véletlenszerű számot 1-től 10-ig, és három lehetőséget kínál a helyes megfejtésére, így az első két tipp után nyomokat ad. Sok programozási koncepciót tartalmaz.

A képernyő törlése után a "chances% =1" létrehoz egy számváltozót, és 1-re állítja. Ez nyomon követi az összes esélyt, hogy a játékos kitalálja a számot.

A következő két sor létrehozza a véletlen számot. A „RANDOMIZE IDŐZÍTŐ” egyszerűen a QBasic által használt módszer a számok véletlenszerűvé tételére. A következő sor, a "szám% =INT(RND * 10) + 1", egy véletlen számot hoz létre 1 és 10 között, és eltárolja a szám% változóban. Bonyolultnak tűnik, de alapvetően csak annyit mond:„Tegye az első tíz pozitív egész közé”. A végén lévő "+ 1" biztosítja, hogy a szám 1 és 10 között legyen, és ne 0 és 9 között.

The "DO WHILE..." line creates a loop. Whenever you see a line that starts with "DO," scroll down a bit until you find a line that says "LOOP." Everything in between that line will continue to loop over and over again until a certain condition is met--in this case, until chances% is no longer less than four (or "<4" in programming-speak).

The program then asks for a guess with the INPUT command, stores it in guess%, and proceeds to process it with the "IF...THEN...ELSE" method. As you can see, it works logically:"IF a statement is true, THEN do this; ELSEIF another statement is true, then do this; ELSE anything else is true, then do this."

The only extra aspect is the GOTO command. In this case, if the number is correct, the program goes to the section of the document labeled "youwin".

Right before the end of the loop, there's the "chances% =chances% + 1" line. That's to assure the loop only runs three times.

If the loop runs three times and the player has never been sent to the "youwin" section, the player loses, so right after the loop is a line informing the player of the loss. Below it is the "youwin" section, declared just by writing the name of the section with a colon.

More Game Ideas

With PRINT, INPUT, IF...THEN...ELSE, and GOTO, you have everything you need to create an easy-to-make text adventure. Here's some sample code:

house:INPUT "You're standing in a house. What would you like to do"; choice$ IF choice$ ="go upstairs" THEN GOTO upstairs ELSE GOTO house

Try to make it as complex as you can based on what you know. And for more inspiration, the web offers plenty of free QBasic game downloads. Play them and examine the code behind them to learn new techniques and get ideas.


  1. Hogyan készítsünk lenyomozhatatlan hívás
  2. Hogyan készítsünk egy konferencia hívás a Qwest
  3. Hogyan készítsünk egy Straight hívás egy Extension Number
  4. Hogyan készítsünk egy Color Print
  5. Hogyan fejleszthető Film készítsünk a Nyomtatás