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
90 użytkownik(ów) aktywny(ch) przez ostatnie 15 minut:
gości: 86, userów: 4, ukrytych: 0
Exigo, Dester, ANtY, lew_leo

0 użytkownik(ów) na gmczacie i 0 bot(ów)
Shoutbox
Chell (23:09, 22.01.17):
te gmclanowe przyplywy i odplywy
Saus (20:35, 22.01.17):
Nie, kopelat*
Saus (20:35, 22.01.17):
100 lat!
Nikas (15:16, 21.01.17):
ayyy ;///
exp (13:54, 21.01.17):
to nie byłem ja
Wojo (13:23, 21.01.17):
tylko przy referenie
Wojo (13:22, 21.01.17):
tatu - robot
Nikas (13:01, 21.01.17):
A ja nie wiem już, pamiętam tylko, że pytałeś się przy jakim traczku ją przelecieć. xDDD
exp (11:37, 21.01.17):
o jakiej lasce ja ci pisałem kiedyś?
Nikas (0:15, 21.01.17):
spk a u ciebie exp? stuknąłeś w końcu tą laskę co mi o niej pisałeś kiedyś? xD
Chell (0:02, 21.01.17):
przywolalem po nieobecnosci od wrzesnia, nie ma za co
exp (23:47, 20.01.17):
jak tam żyjecie
Nikas (23:39, 20.01.17):
XDDDD
MaxGaming (22:52, 20.01.17):
YXE bo jak mówiłeś trzeba być miłym dla niepełnosprawnych
Nikas (22:41, 20.01.17):
Jezu w ogóle olać kwestię bana czy ostrzeżenia. xD Przeciez jak ja teraz dostaję warna to nie wiem co o tym mysleć. xD
ΨΧΞ (22:34, 20.01.17):
to dlaczego nie mam?
MaxGaming (22:15, 20.01.17):
No ale jak już YXE sam wszedł w ten temat to gdyby Nikas obraził jego matkę(w dodatku sugerując że jest lekkich obyczajów) miałby bana na pewno...
Wojo (22:13, 20.01.17):
powinieneś dostać na odmułę ale układy, układziki
MaxGaming (22:11, 20.01.17):
Masz na myśli że ja teraz zasugerowałem że złamałeś regulamin? Nie, nie zasugerowałem
ΨΧΞ (22:09, 20.01.17):
iksde xD zastanawiam sie, skoro rzekomo złamałem regulamin, dlaczego nie mam jeszcze bana?
MaxGaming (21:08, 20.01.17):
Pod tytułem "Czy jeżeli 27 latek obraża matki innych userów ci zareagują inaczej niż na gimba?" XDD
ΨΧΞ (17:50, 20.01.17):
durnyś xD
Ranmus (17:43, 20.01.17):
O wy durni, ale się daliście wciągnąć. Przecież to kolejny test socjologiczny. Nie widzicie tego?
ANtY (7:27, 20.01.17):
>długa dyskusja przed snem, że po prześwietleniu historii postów patryka jego DZIEWCZYNA (ONA MA DZIEWCZYNE, NIE ZAPOMNIJCIE!!! była zawiedziona poziomem jego wypowiedzi, po czym nastąpiły długie przeprosiny i obietnica poprawy hmm
Wojzax (2:47, 20.01.17):
YXE co to za pedalski slang i gdzie jest obiecana gra w niszczenie wieżowców?
ΨΧΞ (22:48, 19.01.17):
nudzi mi się, odpisz coś
ΨΧΞ (22:25, 19.01.17):
pamiętasz, co pisałem o mojej obietnicy grzecznego i miłego odzywania się do niepełnosprawnych? nom, to pardon, ale albo załapiesz, albo ta dyskusja nie ma sensu :*
MaxGaming (21:41, 19.01.17):
Patrząc na ilość buziaczków i czułych zwrotów to chyba Twoja dziewczyna jest bardziej męska od Ciebie?
Adriann (20:28, 19.01.17):
Nie mit, nie chodzi tam o samą ilość a nie radzenie sobie organizmu z czymśtam..;d
Ignatus (20:11, 19.01.17):
Nie wiem czy z tym testosteronem i łysieniem to nie jakiś mit.W końcu najwyższy poziom testy jest w okresie dojrzewania-kiedy każdy ma burze loków, a po 30 zaczyna gwałtownie spadać,kiedy właśnie u większości zaczyna się łysienie...
ΨΧΞ (19:56, 19.01.17):
xD oj pysiu głuptaśny, a w mikołaja też wierzysz? nie przejmuj się, każdy ma prawo nie wiedzieć - pozwól, iż przedstawię Cię łysinie androgenowej. dokształcon? nie dziękuj :*
MaxGaming (19:00, 19.01.17):
No zazwyczaj stres o tym mówię, tylko że YXE twierdzi że nie ma uczuć i się niczym nie przejmuje absolutnie xd
Adriann (18:55, 19.01.17):
Eee nie ma co się przejmować, sam mam bardzo mało włosów i wiem że niebawem będę miał kolano na głowie ale to nie oznaka stresu a zbyt dużej ilości testosteronu, możesz nie mieć włosów a dalej być takim seksualnym tyranozaurem jak ja
MaxGaming (18:48, 19.01.17):
A czy łysienie w tym wieku to nie jest głównie oznaka stresu? Czy stres nie oznacza że jednak masz emocję i dosyć bardzo się przejmujesz? xd Zrozum że udając kogoś kim nie jesteś zawsze wcześniej czy później narazisz się na śmieszność. Masz ogromną wiedzę i ogółem swoimi dobrymi stronami powinieneś się legitymować a nie udawać coś w wieku 27 lat...
Wojo (17:10, 19.01.17):
nawet moja składnia
Wojo (17:10, 19.01.17):
nie wiesz wcale, że jego nic nie rusza ?
Wojo (17:10, 19.01.17):
ah ty pysiaczku głupaśny
ΨΧΞ (16:59, 19.01.17):
nie, no jasne iż nie mam. to mój najczulszy punkt, przezeń płaczę po nocach
Ranmus (16:41, 19.01.17):
Patryk spokojnie. Nie musisz tak szczegóło tłumaczyć, że masz dystans do siebie w kwestii łysienia... masz?
ANtY (16:09, 19.01.17):
zawsze kisne xD
ANtY (16:08, 19.01.17):
>ludzie często pytają mnie [..]
ΨΧΞ (15:29, 19.01.17):
przeto to logiczne: chociażby dlatego, że noszę kapelusz i mówię dlaczego, gdy ktoś mnie pyta, nawet tu się to przewijało myślałeś, że noszę go bo chcę być fajny i mędrkuję? xD kaman, łysina jest nieestetyczna D: musiałbym się ogolić cały, a do 30-stki nie zrobie tego.
Ranmus (14:39, 19.01.17):
Patryk, przecież o tym wiem i nie neguję. Zresztą skąd miałbym wiedzieć, że łysiejesz skoro cały czas nosisz czapkę?
Wojo (14:20, 19.01.17):
brrr xD
ΨΧΞ (13:40, 19.01.17):
znikas, dzięki - ląduje w kolekcji memów :*
ΨΧΞ (13:39, 19.01.17):
Pysiaczku głuptaśny, przeto ja mówiłem, "[...] bo łysieję" - nie było tam nigdzie "nie". ale to cudowne, że się starasz pamiętać :*
Ranmus (13:31, 19.01.17):
Zmień "bo mam klasę i chłód" na "bo mam klasę i wcalę nie łysieję Xd". Będzie legitniej.
Nikas (13:23, 19.01.17):
also psichix fajne meme znalazłem podobne tylko z innym kolesiem hehe gmclan.org/uplo...wiek_top_bk.png
Nikas (13:18, 19.01.17):
>mów komuś o tym, żeby nauczył się dobrych pocisków >sam dowal jakiś gimbopocisk po matce xDDDD boże jak to możliwe mając tyle lat
Ankieta
» Czy jesteś szczery odpowiadając w ankietach w Internecie?
Tak
Nie

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.01068 sekund ] [ Liczba zapytań MySQL: 16 ]

thecrims Otserv List Otserv LyricsTown Harry Potter Serwery Gier
dev nodev