A Tic Tac Toe játék programozása a Visual Basic programban

Programozás számítógépes játékok lehet a technikailag legnehezebb (és talán a legjobban fizető) munka, amelyet a programozó lehet. A legmagasabb szintű játékokhoz mind a programozóktól, mind a számítógépektől szükség van a legjobbakra.

Visual Basic A 6-os programot most már alaposan megkerülik a játékprogramozás platformjaként. (Soha nem volt ilyen. Még a "jó napokban" a komoly játékprogramozók soha nem használnának olyan magas szintű nyelvet, mint a VB 6, mert egyszerűen nem tudtad megkapni a vágást élmény, amelyet a legtöbb játék megkövetel.) De az egyszerű "Tic Tac Toe" játék nagyszerű bevezetést nyújt a programozáshoz, ami egy kicsit fejlettebb. mint "Helló Világ!"

Ez nagyszerű bevezetés a programozás sok alapvető fogalmához, mivel egyesíti a következő technikákat:

• A... haszna tömbök. Az X és O jelölőket külön tömbökben tartják, és a teljes tömböket átviszik a funkciók között, hogy nyomon követhessék a játék előrehaladását.
• VB 6 szintű grafika használata: A VB 6 nem kínál nagyszerű grafikai képességeket, de a játék jó bevezetést nyújt a rendelkezésre álló lehetőségekhez. A sorozat fennmaradó része annak feltárása, hogyan helyettesíti a GDI +, a Microsoft grafika következő generációja a VB 6 szintű grafikát.
  instagram viewer
• Matematikai számítások használata a programvezérléshez: A program okos modulo (Mod) és egész számot használ osztási számítások a kétjátékos jelölő tömbök segítségével annak meghatározására, mikor van egy három elemből álló "győzelem" történtek.

Ebben a cikkben a programozási osztály talán csak egy kicsit meghaladja a kezdő szintet, de a "közbenső" programozók számára jónak kell lennie. De kezdjük az elemi szinttel, hogy szemléltessük néhány fogalmat, és kezdjük el vele Visual Basic játék programozási karrier. Még az ennél fejlettebb hallgatók is azt tapasztalhatják, hogy kissé nehéz feladat a tárgyak megfelelő formájába állítása.

Ha még soha nem játszottál Tic Tac Toe, itt vannak a szabályok. Két játékos váltakozva helyezi el az Xs és az Os 3 x 3 játékteret.

A játék megkezdése előtt mindkét játékosnak megállapodnia kell arról, hogy ki megy először, és ki jelöli a mozgását. Az első mozdulat után a játékosok felváltva helyezik jelöléseiket bármely üres cellába. A játék célja az, hogy az első játékos legyen három jelöléssel vízszintes, átlós vagy függőleges vonalban. Ha nincsenek üres cellák, és egyik játékos sem rendelkezik nyerő kombinációval, akkor a játék döntetlen.

A tényleges kódolás megkezdése előtt mindig érdemes megváltoztatni a használt összetevők nevét. Amint elkezded kódolás, a nevet a Visual Basic automatikusan használja, tehát azt akarja, hogy a helyes név legyen. Az űrlap nevét fogjuk használni frmTicTacToe és a feliratot "A Tic Tac Toe-ről" is megváltoztatjuk.

A létrehozott űrlap segítségével a vonal eszköztár vezérlőjével rajzoljon 3 x 3 rácsot. Kattintson a vonal eszközre, majd húzzon egy vonalat a kívánt helyre. Ilyen módon négy sort kell létrehoznia, és beállítania kell azok hosszát és helyzetét, hogy azok megfelelőnek látszanak. A Visual Basic a Format menü alatt rendelkezik néhány kényelmes eszközzel, amelyek segítenek. Ez nagyszerű esély arra, hogy velük gyakoroljanak.

A játékrácson kívül szükségünk lesz néhány objektumra az X és O szimbólumok számára is, amelyeket a rácsra kell helyezni. Mivel kilenc szóköz található a rácsban, létrehozunk egy objektummátrixot kilenc szóközzel, amelyeket Visual Basicben elemeknek nevezünk.

A Visual Basic fejlesztői környezetben szinte mindent megtehet számos módon, és a vezérlő tömbök létrehozása sem kivétel. Valószínűleg a legegyszerűbb módszer az első címke létrehozása (kattintson és rajzoláshoz hasonlóan a vonalhoz), nevezze el, állítsa be az összes attribútumot (például a Betűtípus és a ForeColor), majd másolatot készítsen róla. A VB 6 megkérdezi, hogy kíván-e vezérlő tömböt létrehozni. Az első címkéhez használja az lblPlayGround nevet.

A rács többi nyolc elemének létrehozásához válassza ki az első címkeobjektumot, állítsa az Index tulajdonságot nullára, és nyomja meg a CTRL + C (másolás) gombot. Most megnyomhatja a CTRL + V (beillesztés) gombot egy másik címkeobjektum létrehozásához. Ha ilyen objektumokat másol, akkor minden másolat az összes tulajdonságot örökli, kivéve az elsőt, az Indexet. Az index mindegyik példányonként egynel növekszik. Ez egy vezérlő tömb, mert mindegyiknek azonos neve, de eltérő index értékei vannak.

Ha így hozza létre a tömböt, akkor az összes példány egymásra lesz helyezve az űrlap bal felső sarkában. Húzza az egyes címkéket a játszórács egyik helyére. Ellenőrizze, hogy az index értékek egymást követve vannak-e a rácsban. A program logikája attól függ. A 0 indexértékű címkeobjektumnak a bal felső sarokban kell lennie, a jobb alsó címkének pedig 8. indexének kell lennie. Ha a címkék lefedik a játékrácsot, válassza ki az egyes címkéket, kattintson a jobb gombbal, és válassza a Küldés vissza lehetőséget.

Mivel nyolc lehetséges módszer nyerheti a játékot, nyolc különböző vonalra van szükségünk a győzelem megmutatásához a játékrácson. Ugyanezt a technikát fogja használni egy másik vezérlő tömb létrehozásához. Először húzza ki a vonalat, nevezze el linWin-nek, és állítsa az Index tulajdonságot nullára. Ezután használjon copy-paste technikát további hét sor előállításához. Az alábbi ábra bemutatja, hogyan kell helyesen beállítani az indexszámokat.

A címke és a sor objektumok mellett szükség van néhány parancsgombra a játék lejátszásához, és további címkékre a pontszám megtartásához. Ezek létrehozásának lépései itt nem részletezettek, de ezek az objektumok, amelyekre szüksége van.

Két gomb tárgyak:

• cmdNewGame
• cmdResetScore

A fraPlayFirst keret objektuma, amely két opciógombot tartalmaz:

• optXPlayer
• optOPlayer

A FraScoreBoard keretcímke hat objektumot tartalmaz. Csak az lblXScore és az lblOScore változnak a programkódban.

• lblX
• lblXScore
• lblO
• lblOScore
• lblMinus
• lblColon

Végül szükség van az lblStartMsg címkeobjektumra, hogy 'elrejtse' a cmdNewGame gombot, amikor nem kellene rákattintani. Ez nem látható az alábbi ábrán, mert ugyanolyan helyet foglal el az űrlapon, mint a parancs gomb. Lehet, hogy ideiglenesen el kell mozgatnia a parancsgombot, hogy felhívja ezt a címkét az űrlapra.

Eddig VB kódolást nem végeztek, de végre készen állunk erre.

Most végre meg kell kezdenie a program kódolását. Ha még nem tette meg, akkor érdemes letölteni a forráskódot, amely követi a program működésének magyarázatát.

Az egyik első tervezési döntés az, hogy miként lehet nyomon követni a játék jelenlegi „állapotát”. Más szavakkal: mik a jelenlegi Xs és Os a rácson, és ki mozog tovább. Az 'állam' fogalma sok programozás szempontjából kritikus, és különösen fontos az ASP és az ASP.NET programozásához az interneten.

Számos módon lehet ezt megtenni, tehát kritikus lépés az elemzésben. Ha ezt a problémát egyedül oldja meg, akkor esetleg érdemes rajzolnia egy folyamatábrát, és a kódolás megkezdése elõtt kipróbálhatja a „papírkaparóval” különféle lehetõségeket.

Megoldásunk két "kétdimenziós tömböt" használ, mert ez segít az "állapot" nyomon követésében azáltal, hogy egyszerűen megváltoztatja a tömbindexeket a program hurkokban. A bal felső sarok állapota a tömb elemben lesz az indexeléssel (1, 1), a jobb felső sarokban (1, 3), a jobb alsó sarokban (3,3) és így tovább. A következő két tömb:

iXPos (x, y)

és

iOPos (x, y)

Sokféle módon lehet ezt megtenni, és a sorozat végleges VB.NET megoldása megmutatja, hogyan kell ezt csinálni egyetlen egydimenziós tömb segítségével.

A következő oldalon találhatók azok a programozások, amelyek segítségével ezeket a tömböket játékos nyerési döntésekké alakíthatják, és az űrlap látható kijelzői is megjelennek.

Szüksége van néhány globális változóra is, az alábbiak szerint. Vegye figyelembe, hogy ezek szerepelnek az űrlap Általános és Nyilatkozatok kódjában. Ez teszi őket "modul szint" változók, amelyekre az űrlap kódjában bárhol hivatkozhatnak. Erről bővebben a Változók körének megértése című részben olvashat a Visual Basic súgóban.

Két olyan terület van, ahol a változók inicializálva vannak programunkban. Először néhány változót inicializálunk, amíg az frmTicTacToe űrlap betöltődik.

Privát alform_terhelés ()

Másodszor, minden új játék előtt az összes olyan változót, amelyet vissza kell állítani a kezdő értékekre, hozzá kell rendelni egy inicializálási alprogramban.

Sub InitPlayGround ()

Vegye figyelembe, hogy az űrlapterhelés inicializálása a játszótér inicializálását is hívja.

A programozók egyik kritikus képessége a hibakeresési lehetőségek felhasználása annak megértéséhez, hogy mit csinál a kód. A program segítségével kipróbálhatja:

• A kód átvitele az F8 billentyűvel
• Órák beállítása a kulcsfontosságú változókra, például az sPlaySign vagy az iMove
  Töréspont beállítása és a változók értékének lekérdezése. Például az inicializálás belső hurkában:

lblPlayGround ((i - 1) * 3 + j - 1) .Caption = ""

Vegye figyelembe, hogy ez a program világosan megmutatja, hogy miért jó a programozási gyakorlat, ha az adatok tömbökben vannak tárolva, amikor csak lehetséges. Ha nem volt tömbök ebben a programban, akkor valami hasonlót kell írnia:

0 sor.Visible = Hamis
1. sor.Visible = Hamis
Line2.Visible = Hamis
3. sor: Vizuális = Hamis
4. sor: Vizuális = Hamis
5. vonalVisible = Hamis
6. sor.Visible = Hamis
Line7.Visible = Hamis

ehelyett:

I = 0-tól 7-ig
linWin (i) .Visible = Hamis
Következő i

Ha a rendszer bármely részét 'szívnek' lehet tekinteni, akkor az lblPlayGround_Click szubrutin. Ezt az alprogramot minden alkalommal meghívják, amikor egy játékos rákattint a játékra. (A kattintásoknak a kilenc lblPlayGround elem egyikében kell lennie.) Vegye figyelembe, hogy ennek az alprogramnak van egy argumentuma: (Index As Integer). A legtöbb „esemény alprogram”, mint például a cmdNewGame_Click (), nem. Az index azt jelzi, hogy melyik címke-objektumra kattintottak. Például az index tartalmazza a rács bal felső sarkának nulla értékét, és a jobb alsó sarok nyolc értékét.

Miután egy játékos rákattint egy négyzetre a játék rácsában, egy másik játék elindításához szükséges parancsgomb, a cmdNewGame, "bekapcsolódik" azáltal, hogy láthatóvá válik. Ennek a parancsgombnak az állapota kettős feladatot jelent, mivel azt később a programban logikai döntési változóként is használják. Az ingatlanérték döntési változóként történő használata általában nem javasolt, mert ha szükségessé válik a program megváltoztatása (mondjuk például, hogy a cmdNewGame parancsgomb folyamatosan látható), akkor a program váratlanul kudarcot vall, mert nem emlékszik arra, hogy a program részeként is használják logika. Ezért mindig jó ötlet keresni a programkódon, és ellenőrizni, hogy a program karbantartása során bármit megváltoztat, akár a tulajdonságértékeket is. Ez a program megsérti a szabályt részben ennek a pontnak a megfogalmazására, részben azért, mert ez egy viszonylag egyszerű kóddarab, ahol könnyebb meglátni, hogy mit csinálnak, és később elkerülni a problémákat.

A játékterület egy játékos általi kiválasztását úgy kell feldolgozni, hogy a GamePlay szubrutinot az Indexként hívja fel.

Először ellenőrizze, hogy nem volt-e üres négyzet kattintva.

Ha lblPlayGround (xo_Move) .Caption = "" Akkor

Ha biztosak vagyunk benne, hogy ez egy törvényes lépés, a mozgószámlálót (iMove) növelik. A következő két sor nagyon érdekes, mivel lefordítják a koordinátákat az egydimenziós dimenzióból Ha az lblPlayGround komponens tömbje olyan kétdimenziós indexekbe, amelyeket akár iXPos, akár iOPos esetén használhat. A Mod és az egész osztás (a 'visszajelzés') olyan matematikai műveletek, amelyeket nem használ minden nap, de itt egy nagyszerű példa látható, hogyan lehetnek nagyon hasznosak.

Ha lblPlayGround (xo_Move) .Caption = "" Akkor
iMove = iMove + 1
x = Int (xo_Move / 3) + 1
y = (xo_Move Mod 3) + 1

A xo_Move 0 értéke lefordul (1, 1), 1 - (1, 2) értékre... 3 - (2, 1)... 8 - (3, 3).

Az sPlaySign-ban szereplő érték, amely modul hatókörrel rendelkezik, nyomon követi, hogy melyik játékos haladt. Miután a mozgó tömbök frissítésre kerültek, a játékrács címkekomponensei a megfelelő jelzéssel frissíthetők.

Ha sPlaySign = "O", akkor
iOPos (x, y) = 1
iWin = CheckWin (iOPos ())
Más
iXPos (x, y) = 1
iWin = CheckWin (iXPos ())
Vége If
lblPlayGround (xo_Move) .Caption = sPlaySign

Például, amikor az X-lejátszó rákattint a rács bal felső sarkára, a változók a következő értékekkel rendelkeznek:

A felhasználói képernyő csak az X-et jeleníti meg a bal felső mezőben, míg az iXPos-nak 1 van a bal felső mezőben, és 0 az összes többiben. Az iOPos-nak minden dobozában 0 van.

Az értékek megváltoznak, amikor az O játékos rákattint a rács középső négyzetére. Most az iOPos az 1-et jeleníti meg a középső mezőben, míg a felhasználói képernyő az X-et jeleníti meg a bal felső sarokban és egy O-t a középső mezőben. Az iXPos csak az 1-et jeleníti meg a bal felső sarokban, a 0 az összes többi mezőben.

Most, hogy tudja, hová kattintott egy játékos, és melyik játékos kattintott (a sPlaySign), csak annyit kell tennie, hogy megtudja, valakinek nyert-e egy játékot, és kitalálja, hogyan lehet ezt megmutatni a kijelző.

Minden egyes lépés után a CheckWin funkció ellenőrzi a nyertes kombinációt. A CheckWin úgy működik, hogy lefedi az egyes sorokat, az oszlopokat és az átlókat. A Visual Basic Debug szolgáltatásának segítségével a CheckWin-en keresztül végrehajtott lépések nyomon követése nagyon oktató lehet. A győzelem megkeresése először kérdés, ellenőrizze, hogy találtak-e három 1-t az iScore változó egyes ellenőrzéseinél, majd ezután egy egyedi "aláírás" érték visszaadása a Checkwinban, amelyet tömbindexként használnak a linWin egyik elemének Látható tulajdonságának megváltoztatására komponens tömb. Ha nincs nyertes, akkor a CheckWin -1 értéket fog tartalmazni. Ha van nyertes, akkor a képernyő frissül, az eredménytáblát megváltoztatják, egy gratulációs üzenetet jelenít meg, és a játékot újraindítják.

Vizsgáljuk meg részletesen az egyik ellenőrzést, hogy megtudjuk, hogyan működik. A többi hasonló.

'Ellenőrizze a sorokat 3-ban
I = 1-től 3-ig
iScore = 0
CheckWin = CheckWin + 1
J = 1-től 3-ig
iScore = iScore + iPos (i, j)
Következő j
Ha iScore = 3, akkor
Kilépés a funkcióból
Vége If
Következő i

Az első dolog, amit észre kell venni, hogy az első i indexszámláló visszaszámolja a sorokat, míg a második j az oszlopokon át. A külső hurok ezután egyszerűen mozog az egyik sorról a másikra. A belső hurok számolja az 1-et az aktuális sorban. Ha három, akkor van nyertese.

Vegye figyelembe, hogy nyomon követheti a CheckWin változóban tesztelt négyzetek teljes számát is, amely az az érték, amelyet ez a funkció megszüntetésekor ad vissza. Minden nyerő kombináció egyedi értéke lesz a CheckWin-ben 0-tól 7-ig, amelyet a linWin () komponens tömb egyik elemének kiválasztására használnak. Ezért a CheckWin funkcióban szereplő kód sorrendje is fontos! Ha áthelyezte a hurok kód (mint a fenti), ha valaki nyer, akkor a hibás vonal húzódik a játékrácsra. Próbáld ki, és nézd meg!

Az egyetlen olyan kód, amelyet még nem tárgyaltak, az új játék szubrutinja és a szubrutin, amely visszaállítja a pontszámot. A rendszer többi logikája megkönnyíti ezek létrehozását. Új játék indításához csak az InitPlayGround alprogramot kell felhívnia. A játékosok kényelme érdekében, mivel a gombra kattinthattak a játék közepén, kérjen megerősítést, mielőtt továbbmenne. Az eredménytábla újraindítása előtt megerősítést is kér.