Fastbar
Powrót do strony głównej
Trzymaj pliki na gmclan.org!
Game Maker w pytaniach i odpowiedziach!
Polska dokumentacja
Tabela wyników ligi 24
Pobierz GM
Kategorie bazy artykułów
Artykuły -> Game Maker -> Kursy GML
Treść artykułu
Inwentarz do gry RPG
autor: Pental (28.12.08)
Inwentarz do gry RPG

Z myślą o początkujących użytkownikach (tych w mniejszym stopniu oraz większym) postanowiłem napisać artykuł, w którym krok po kroku każdy może dowiedzieć się, jak wykonać solidny inwentarz do swojej gry przygodowej bądź RPG. Wymagalna jest minimalna wiedza na temat Game Makera oraz GML.

Pierwszy krok: stworzenie inwentarza

Do naszego inwentarza przedmioty będzie trzeba przenosić. Nie użyjemy żadnych funkcji (skryptów), ponieważ do tworzenia jednego plecaka takowej potrzeby nie ma. Nie znaczy to jednak, że na samym początku nie ustalimy jego parametrów. Stwórz obiekt "Inwentarz". Do wydarzenia Create możesz śmiało wsadzić mu kod:
gml:
iHor = 10; // x inwentarza
iVer = 10; // y inwentarza
iWidth = 5; // dlugosc
iHeight = 5; // szerokosc

iSprite = sKratka; // grafika przedstawiajaca slot w plecaku
iOff = -1; // odleglosc od kratek
iMax = 5; // maksymalna ilosc itemow w slocie

Zmienna iHor i iVer odpowiadają za współrzędne plecaka, zaś iWidth i iHeight za jego rozmiar. Zmienna iSprite to grafika kratki, a iOff oznacza odstęp od kratek. Zaraz, zaraz - dlaczego ma więc wartość ujemną? Podałem akurat takową, by złączyć ze sobą kratki. No i w końcu, ostatnia już z tego kodu zmienna - iMax, odpowiada za maksymalną ilość przedmiotów w jednym slocie (kratce).

Parametry już mamy, czas przejść do meritum sprawy - stworzenie plecaka. Użyjemy do tego tablic dwuwymiarowych, posiadających dwa indeksy. Dlaczego tablic? Ponieważ załóżmy, że nasz inwentarz będzie wyglądał tak:
slot1[x: 10, y: 10] slot2[x: 50, y: 10] slot3[x: 90, y: 10]...
slot6[x: 10, y: 50] ...
Zakładamy, że sloty to tablice, a ich indeksy to współrzędne, od których odjęliśmy współrzędne inwentarza, dodaliśmy odległość kratek (dodając w naszym wypadku -1 - odejmujemy 1) i podzieliliśmy przez ich rozmiar. Wtedy sprawa wygląda tak (i oraz j to indeksy):
slot1[i: 0, j: 0] slot2[i: 1, j: 0] slot3[i: 2, j: 0]...
slot6[i: 0, j: 1] ...
Natomiast wyświetlając sloty liczymy odwrotnie. Jaki to ma sens? W ten sposób będziemy mogli się odnosić do konkretnych slotów, by dodawać do nich przedmiot, usuwać lub przenosić. Do tablic dwuwymiarowych użyjemy, oczywiście, dwóch pętli krokowych for. Do kodu w evencie Create dodajmy więc:
gml:
var _i, _j, _x, _y, _t;

for( _i = 0; _i < iWidth; _i += 1; )
for( _j = 0; _j < iHeight; _j += 1; )
{
invObject[ _i, _j ] = -1;
invNumber[ _i, _j ] = -1;

_x = iHor + _i * ( sprite_get_width( iSprite ) + iOff );
_y = iVer + _j * ( sprite_get_height( iSprite ) + iOff );

_t = instance_create( _x, _y, Kratka );
_t.sprite_index = iSprite;
_t.i = _i;
_t.j = _j;
}

Na początku dajemy dla Game Makera do zrozumienia, że tworzymy tymczasowe zmienne na potrzeby kodu w tym evencie, które na końcu mają zostać usunięte. Jak już wspominałem, użyjemy tablic dwuwymiarowych. Pętla for nam tworzy tablice invObject oraz invNumber. Ta pierwsza określa obiekt (nie, nie instancję obiektu / klasy), zaś druga ilość przedmiotów o określonej klasie w slocie. Używamy tymczasowych zmiennych _x i _y, by określić pozycję slota, który aktualnie tworzymy, zaś zmiennej _t, by ustalić id tworzonego slota i nadawania mu zmiennej i oraz j. Posłużą nam one później, by z punktu widzenia slota, można było określać samego siebie i na odwrót. Jest to najwygodniejszy sposób. Dodatkowo można już zadeklarować w Create zmienne:
gml:
inEq = false;
inEqI = 0;
inEqJ = 0;

_x = 0;
_y = 0;
obj = -1;

O tym, do czego one służą - później.

Krok drugi: wyświetlanie

W poprzednim kodzie znajdowało się wyrażenie tworzące instancje klasy "Kratka". Najpierw jednak powinniśmy ją stworzyć, tak więc do dzieła. Przedtem jednak, przydałaby się czcionka, którą wyświetlane by były liczby danych obiektów w slocie. Stwórz więc nowy font. Czcionkę ustaw na Verdanę, zaznacz "digits" (cyfry), po czym ustaw rozmiar na 8 i pogrubienie (bold). Teraz już możemy do obiektu kratka dać kod:
gml:
draw_set_font( _font );
draw_set_color( c_white );
draw_sprite( sprite_index, 0, x, y );
if ( Inwentarz.invObject[ i, j ] != -1 )
{
draw_sprite( object_get_sprite( Inwentarz.invObject[ i, j ] ), 0, x, y );
if ( Inwentarz.invNumber[ i, j ] > 1 )
draw_text( x + 23, y + 20, string( Inwentarz.invNumber[ i, j ] ) );
}

Dużo tłumaczyć nie ma potrzeby. Kod ustawia biały kolor, czcionkę wcześniej przez nas stworzoną (nazwałem ją "_font"), rysuje grafikę slota oraz, jeśli takowy jest w tym slocie, wyświetla sprite obiektu znajdującego się w kratce. Co za tym idzie, jeśli jest potrzeba, wyświetla ilość instancji tu się znajdujących.

Warto zauważyć, że obiekty będziemy przenosić myszką - przenoszone obiekty warto wyświetlać pod kursorem. Pierw jednak trzeba pod uwagę wziąć fakt, że najwygodniej jest, aby w inwentarzu instancje ginęły, zamiast tego, wiadoma będzie nam ich klasa. Ma to znaczenia zarówno podczas przesuwania przedmiotów jak i ich wyświetlania pod kursorem. W drugim przypadku jest to ważne dlatego, że jeśli jest instancja, to wystarczy odnieść się do jej grafiki za pomocą kropki i zmiennej sprite_index, gdy jednak jest to obiekt (np. podczas wyrzucania rzeczy z plecaka), trzeba odnieść się do sprita za pomocą funkcji object_get_sprite(). Czas na ostatnią uwagę - jeśli sprite będzie wyświetlany w pozycji (mouse_x, mouse_y), to zmieni swą pozycję o tyle, o ile była różnica pomiędzy pozycją myszki a nim podczas podnoszenia go. Aby uniknąć tego problemu wystarczy obliczyć różnicę. Dla mnie wygodniej jest obliczyć różnicę na minusie, a później ją dodać do współrzędnym myszki. Jak wiadomo, dodawanie liczby ujemnej daje odejmowanie liczby dodatniej. Dajmy więc inwentarzowi kod w evencie Draw:
gml:
if ( obj != -1 )
{
var _sprite;

if ( inEq )
_sprite = object_get_sprite( obj );
else
_sprite = obj.sprite_index;
draw_sprite( _sprite, 0, mouse_x + _x, mouse_y + _y );
}

Nie ma raczej wiele do tłumaczenia - sprawdzamy, czy zmienna obj, która ma wartość instancji bądź obiektu (zależy czy podnosimy z inwentarza, czy nie) nie ma wartości -1, oznaczającej, że nic nie podnosimy. Tworzymy tymczasową zmienną _sprite, która będzie miała id sprita jakiego wyświetlimy. Przedtem jednak, sprawdzamy za pomocą zmiennej inEq, czy przedmiot był w inwentarzu, czy nie i na podstawie tego rysujemy gotowego już sprita.

Krok trzeci: przygotowanie inwentarza do użytku

Dobra wiadomość jest taka, że całą teorię napisałem już w poprzednim punkcie, teraz zobaczymy, jak to wygląda w praktyce. Zostało już tylko przesuwanie przedmiotów na różne możliwe sposoby, choć kodu będzie znacznie więcej, to, jak już wspomniałem, teorię znamy ;) . Zacznijmy od stworzenia obiektu "Rodzic" (ang. parent). Wszystkie przedmioty, które będziemy przenosić, będą dziedziczyły po nim jedną cechę - możliwość przenoszenia. Kod w evencie Left Pressed wygląda następująco:
gml:
// nie ma obrazka - do widzenia :)

if ( my_sprite == -1 )
exit;

// instancja ktora chcemy wsadzic do inwentarza

Inwentarz._x = x - mouse_x;
Inwentarz._y = y - mouse_y;
Inwentarz.obj = id;
Inwentarz.inEq = false;

Każde dziecko obiektu Rodzic będzie musiało mieć zadeklarowaną zmienną my_sprite, której wartość to grafika instancji w inwentarzu. Jeśli wynosi -1, to nie ma sensu takiego przedmiotu podnosić. Później obliczamy różnicę, ustalamy, że my jesteśmy obiektem noszonym i dajemy wartość 0 (false) zmiennej inEq, ponieważ przedmiot jest podnoszony nie z inwentarza.

Podobny kod możemy dać dla obiektu Kratka w tym evencie:
gml:
Inwentarz._x = x - mouse_x;
Inwentarz._y = y - mouse_y;
Inwentarz.obj = Inwentarz.invObject[ i, j ];
Inwentarz.inEq = true;
Inwentarz.inEqI = i;
Inwentarz.inEqJ = j;

Zasada taka sama jak w poprzednim przypadku. Teraz najtrudniejsza część - to, co się stanie jak upuścimy przedmiot. Zakładając, że był w inwentarzu, możliwe są akcje: wyrzucamy z inwentarza, przenosimy do innego slotu, w ostateczności nic nie robimy i nie odejmujemy ilości instancji w slocie. Wiedząc to, taki kod w evencie Globar Left Released Inwentarza nie powinien cię dziwić:
gml:
if ( obj == -1 )
exit;

if ( inEq )
{
var _n, _can;

_can = false;
_n = instance_nearest( mouse_x + _x, mouse_y + _y, Kratka );
if ( point_distance( mouse_x + _x, mouse_y + _y, _n.x, _n.y ) <= 37 )
{
if ( invObject[ _n.i, _n.j ] == -1 )
{
invObject[ _n.i, _n.j ] = obj;
invNumber[ _n.i, _n.j ] = 1;
_can = true;
}
else if ( invObject[ _n.i, _n.j ] == obj )
{
if ( iMax > invNumber[ _n.i, _n.j ] )
{
invNumber[ _n.i, _n.j ] += 1;
_can = true;
}
}
}
else
{
instance_create( mouse_x + _x, mouse_y + _y, obj );
_can = true;
}

if ( _can )
{
invNumber[ inEqI, inEqJ ] -= 1;
if ( !invNumber[ inEqI, inEqJ ] )
{
invNumber[ inEqI, inEqJ ] = -1;
invObject[ inEqI, inEqJ ] = -1;
}
}
}

Wszystkie możliwe akcje opisałem, tak więc tłumaczenie jest bez sensu. Pierwsza linijka sprawia, że jeśli zmienna obj jest równa -1, to kończy się event (dalsze akcje nie są wykonywane). Ale co, jeśli przedmiot nie był w inwentarzu? Wtedy możliwe jest, że albo się go uda dodać, albo nie. Zapomnieliśmy także nadać na końcu zmiennej obj wartość -1. Dalszy kod to:
gml:
else
{
var _n;

_n = instance_nearest( mouse_x + _x, mouse_y + _y, Kratka );
if ( point_distance( mouse_x + _x, mouse_y + _y, _n.x, _n.y ) <= 37 )
{
if ( invObject[ _n.i, _n.j ] == -1 )
{
invObject[ _n.i, _n.j ] = obj.object_index;
invNumber[ _n.i, _n.j ] = 1;
with( obj )
instance_destroy();
}
else if ( invObject[ _n.i, _n.j ] == obj.object_index )
{
if ( iMax > invNumber[ _n.i, _n.j ] )
{
invNumber[ _n.i, _n.j ] += 1;
with( obj )
instance_destroy();
}
}
}
}

Dodam tylko, aby do powyższego kodu nie było wątpliwości, funkcja instance_nearest() szuka najbliższej instancji określonej klasy od podanej pozycji. W naszym wypadku jest to kratka i pozycja kursora. Należy sprawdzić także, czy ta odległość nie jest za duża. Dałem 37, zamiast 40, ze względu na estetyczność. Później już raczej tłumaczyć nie trzeba, odpowiednie akcje, dla odpowiedniego przypadku :) . Teraz kiedy chcemy dodać jakiś przedmiot, który można przenosić, wystarczy nadać mu w okienku parent obiekt "Rodzic" i ustalić wartość zmiennej my_sprite.

Gratulacje!

Właśnie udało ci się stworzyć swój własny inwentarz! Oczywiście, możesz go modyfikować, jak ci się tylko podoba, np. dla nauki.

Przykład znajduje się tu: Przykład Inventory
głosów: 13 | ocena: 8.85 oceń zasób | dodał: PsichiX
Komentarze
stron: 21

2


av

Dawidds (11:12, 25.04.2010)

No to 1. opcja

av

Mentoss (12:06, 25.04.2010)

1. próbowałem wcześniej i nie działało... ale teraz, jak zacząłem myśleć, a nie bezmyślnie gapić sie w kod, to mi się udało...

w międzyczasie fajny efek mi wyszedł... kratki sie zaczęły na skos układać

av

karolo320 (15:53, 4.02.2011)

Dawidds, ja tam nie widze draw(5,5)

DANDATI (18:20, 14.05.2011)

Mam taki błąd mam wszystko tak jak w tym poradniku nazwy pozmieniałem na swoje i wyskakuje mi taki błąd...
ERROR in
action number 1
of Draw Event
for object Kratka:

Error in code at line 4:
if ( Inwentarz.invObject[ i, j ] != -1 )
^
at position 28: Unknown variable i


Chcę jeszcze dodać, że ten inwetarz to tak jakby inny room tak??...no właśnie i jak ja sobie gram podnoszę jabłko i chce wlaczyc ekwipunek zeby je zjesc i jak klikam I (przycisk ustawilem sobie przy postaci) to wyskakuje mi taki blad właśnie prosze o pomoc.

av

gnysek (14:09, 15.05.2011)

Zmienna i jest niezdefiniowana.

av

karolo320 (18:31, 17.05.2011)

moze i=0 w create pomoże

av

Mentoss (18:55, 17.05.2011)

razem z całą pętlą...

var i, j;
for(i=0;i<= i tak dalej.

stron: 21

2



Dodaj komentarz:
Treść:
Menu
Panel użytkownika
Jesteś niezalogowany!

Nie masz konta? Zarejestruj się
Użytkownicy on-line
74 użytkownik(ów) aktywny(ch) przez ostatnie 15 minut:
gości: 69, userów: 5, ukrytych: 0
Threef, I am Lord, ojapofdjerrol, Uzjel, Nikas

0 użytkownik(ów) na gmczacie i 0 bot(ów)
Shoutbox
Chell (19:52, 21.07.17):
siedze w chacie z jelitowka, elo
Nikas (19:47, 21.07.17):
alkololo
ANtY (18:41, 21.07.17):
PRZYZNAWAĆ SIĘ, NIC NIE UKRYWAĆ
ANtY (18:41, 21.07.17):
NO ELO CO TAM
Wojo (5:23, 20.07.17):
O dzięki, doceniam starania
Danieo (0:13, 20.07.17):
Wszystkiego najlepszego!
Gibki Kaktus (21:02, 19.07.17):
Btw zalogowałem się specjalnie, żeby Ci życzenia złożyć xD
Gibki Kaktus (21:01, 19.07.17):
Najlepszego To Ty tylko o rok starszy ode mnie, ale 2 z przodu, czas umierać :/
Wojo (20:54, 19.07.17):
Nikt w historii gmclanu nie miał tak chyba hucznie obchodzonych urodzin Dzięki wszystkim, którzy przybyli
exp (20:41, 19.07.17):
stoo laat stoo laat niech żyyjee żyyjee naam
Wojo (19:00, 19.07.17):
Hoho dzięki że pamiętacie
Nikas (17:57, 19.07.17):
sto lat sto lat
I am vader (16:30, 19.07.17):
najlepsz
Wojo (8:07, 19.07.17):
Dzięki za pamięć
PatrykPlayingPOLSKA (8:03, 19.07.17):
Najlepszego Woju
Wojo (6:26, 19.07.17):
Się człowiek starzeje
Wojo (6:26, 19.07.17):
O nie to już 20 wiosen.
Wojo (5:42, 19.07.17):
No jak mi żaden balecik w tym czasie nie wypadnie to jestem za
Chell (0:54, 19.07.17):
jak tak wspominamy to moze by jakiegos tinychata rozkrecic na dniach
Nikas (23:40, 18.07.17):
Ciekawe kto ma drugie miejsce w najdłuższym warnlogu na gmc. Szkoda, że już mało warnów leci, głupio tak być na pierwszym miejscu i nie czuć oddechu konkurencji na plecach.
PatrykPlayingPOLSKA (17:32, 18.07.17):
Nie ma głupich postów,są tylko warny
Chell (15:55, 18.07.17):
nie ma głupich pytań, są tylko biedne
nowy_user (15:54, 18.07.17):
a rzeczywiscie, myślałem, że to jest niedozwolone i wyskoczy mi błąd. Sory za głupie pytanie.
Uzjel (15:00, 18.07.17):
Enter?
nowy_user (14:39, 18.07.17):
czy jest mozliwosc w GMS aby przejsc do drugiej linijki danej funkcji ? Czasami uzywam funkcji w ktorej zawartosc jest bardzo długa i lepiej by mi się pracowało, gdyby taka funkcja była rozczłonkowana na 2 linijki, czy da się jednak to zrobić?
Wojo (12:23, 18.07.17):
Ja chyba niedługo się całkowicie od tego oderwe
Wojo (12:22, 18.07.17):
Danieo bo fb jest uproszczony do tego stopnia że nie trzeba myśleć a szata graficzna to tylko jeden obrazek w tle grupy.
Ignatus (11:47, 18.07.17):
Właśnie dotarł.Oryginał,w pełni sprawy.Jakby ktoś szukał to polecam allegro.pl/micr...6816940638.html
Danieo (11:38, 18.07.17):
Sporo for zostało skutecznie wypartych przez grupki na FB. W sumie sam się temu dziwię, bo grupki FB nie pozwalają na tyle rzeczy co fora.
Wojo (11:22, 18.07.17):
Czy boty zaliczają się do elity?
PatrykPlayingPOLSKA (10:47, 18.07.17):
Teraz tylko elita używa forów.
Nikas (10:37, 18.07.17):
Kiedyś to były czasy. Teraz już nie ma czasów.
Wojo (9:02, 18.07.17):
Ja śmiej się śmiej. Ale taka jest prawda.
Chell (6:17, 18.07.17):
racja, banda kretynów, nie to co my w ich wieku
Wojo (6:07, 18.07.17):
Obecne dzieciaki są za głupie żeby znać fora internetowe. Maksymalny horyzont ich mozliwosci to YouTube lub Facebook
Sutikku (23:03, 17.07.17):
a za chwile w ogóle zniknie gimnazjum i będą ósmoklasiści na gmclanie
Sutikku (23:02, 17.07.17):
ej w sumie teraz nawet ja nie jestem z gimbazy <sad>
Danielus (20:41, 17.07.17):
Ja pracuję jako progrmiasta python/c++ i ostatni rok magisterki mi jeszcze został
Chell (20:15, 17.07.17):
sory
PatrykPlayingPOLSKA (19:57, 17.07.17):
@Chell Jak ja w drugiej ti
Wojo (19:38, 17.07.17):
ale ja trochę pracuję w branży informatycznej, kilka osób tez ma troche pojme to zgaduje ze tez cos z tym sa zwiaznai
Wojo (19:37, 17.07.17):
nowy_user nawet nie żartuj, że tutaj są programiści xD GML nawet nie śmierdzi programowaniem
Chell (19:24, 17.07.17):
Nikas (18:48, 17.07.17):
Ktoś tu nawet ostatnio pisał, że poruchał, także tego.
Chell (18:18, 17.07.17):
nawet PatrykPlayingPOLSKA wlasnie wychodzi
I am vader (18:01, 17.07.17):
Poza wojo
I am vader (18:01, 17.07.17):
na gmclanie nie zostal nikt z gimbazy
gnysek (15:39, 17.07.17):
gimbaza nie pracuj jeszcze
nowy_user (15:14, 17.07.17):
Swoją drogą , czy wszyscy gmclanowicze pracują jako programiści(lub w branży internetowej; growej) czy są jakieś wyjątki?
Nikas (13:18, 17.07.17):
Łza w oku to się zaczyna kręcić jak "ci młodsi" z gmclanu piszą, że pracują. xdd czas leci mmm
Ankieta
» Jakiej wersji GameMakera głównie Używasz?
GameMaker: Studio 2
GameMaker: Studio
GameMaker 8.1 i starsze
Żadnej

GMCLAN to serwis o programie Game Maker i nie tylko.
Copyright © 2002-2017. GMCLAN.ORG
Wszelkie prawa zastrzeżone. Kopiowanie materiałów bez zgody redakcji zabronione!

[ Czas generowania strony: 0.02079 sekund ] [ Liczba zapytań MySQL: 16 ]

thecrims Otserv List Otserv LyricsTown Harry Potter Serwery Gier
dev nodev