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
Przejrzyste sterowanie klawiszami oraz rekonfiguracja.
autor: Ranma_man (5.01.05)
Witam wszystkich game makerowiczów. Dzisiaj na warsztat weźmiemy problem sterowania obiektami w grze za pomocą klawiatury. "Bułka z masłem" ktoś by powiedział, ale czy aby na pewno tak jest? Jeśli zechcemy zrobić opcję rekonfiguracji sterowania, to będziemy musieli operować na funkcjach a nie eventach do tego przeznaczonych (można oczywiście pójść inną drogą, a mianowicie "w locie" zmodyfikować eventy obiektu, ale to już temat na inny artykuł a i rozwiązanie jest niezbyt przejrzyste). Poza tym nazwy funkcji obsługi klawiszy takie krótkie nie są, co potem utrudnia czytelność kodu, a ciągłe ich wklepywanie jest czasochłonne, tak więc nie jest dobrze. :)

Zabieramy się do roboty, czyli jak ułatwić sobie życie. :)

Przykład poruszania się obiektu w 8 kierunkach ( powiedzmy o 7 pikseli ). Prawdopodobnie większość z was napisała by taki kod:
gml:
if ( keyboard_check( vk_up ) ) if ( place_free( x , y - 7 ) ) y = y - 7;
if ( keyboard_check( vk_down ) ) if ( place_free( x , y + 7) ) y = y + 7;
if ( keyboard_check( vk_left ) ) if ( place_free( x - 7 , y ) ) x = x - 7;
if ( keyboard_check( vk_right ) ) if ( place_free( x + 7 , y ) ) x = x + 7;

Wygląda nawet ładnie ... ale nie dla mnie. ;)
Po pierwsze jesli naciskamy kursor w górę, to automatycznie nie musimy sprawdzać kursora w dół, analogicznie jest z osią poziomą. Po drugie keyboard_check to zbyt długi wyraz. Po trzecie nie ma tu miejsca na rekonfigurację klawiszy.

Powyższy przykład zapiszmy inaczej:
gml:
if ( global.kl_up ) przesun(0,-7);
else if ( global.kl_down ) przesun(0,7);
if ( global.kl_left ) przesun(-7,0);
else if ( global.kl_right ) przesun(7,0);

I jak? Nie lepiej? :) Oczywiście funkcję "przesun" musicie sobie napisać sami. :P

Jak widać obraliśmy sobie 4 nowe zmienne globalne o dość łatwych nazwach do zapamietania. Jest to znacznie krótsza forma niż wcześniej, a i nie podajemy bezpośrednio klawiszy o które nam konkretnie chodzi, dzięki temu zostawiamy sobię "furtkę" do stworzenia opcji przedefiniowania sterowania. Owe globalne będą przyjomwały dwie wartości: true w przypadku wciśnięcia danego klawisza lub false.

Mamy już globalne, ale co z nimi zrobić? Sytuacja jest prosta, każda gra zazwyczaj posiada jeden globalny obiekt sterujący. Zróbmy sobie takowy o nazwie engine. Będzie on tworzony już w pierwszym roomie gry. Teraz czas na jego konfigurację, zaznaczamy mu opcję Persistent co oznacza, że obiekt będzie stworzony tylko raz w czasie gry i będzie przechodził pomiędzy room'ami. Dalej dodajemy mu event'a o nazwie Game Start. Tutaj będzie inicjalizacja sterowania, czyli odczyt klawiszy, o które nam chodzi. Je zaś zdefiniujemy w pliku config.ini. Jego źródło:
gml:
[STEROWANIE]
Gora=38
Dol=40
Lewo=37
Prawo=39

Prawda że proste? Te numery to kody liczbowe klawiszy (w tym wypadku kursorów), polecam przejrzeć tablicę ASCII (a jak ktoś nie ma ochoty, to niech w event step byle jakiego obiektu wklepie: "room_caption = string(keyboard_key)" i sam przetestuje). Kodami liczbowymi posługujemy się tak samo jak dyrektywami vk_space, vk_up itd. podając je jako argumenty w funkcji keyboard_check i innych.

Teraz zabierzemy się za wczytanie tych danych. W obiekcie engine event'a Game Start wpisujemy:
gml:
ini_open('config.ini');
global.key[0] = ini_read_real('STEROWANIE','Gora',38);
global.key[1] = ini_read_real('STEROWANIE','Dol',40);
global.key[2] = ini_read_real('STEROWANIE','Lewo',37);
global.key[3] = ini_read_real('STEROWANIE','Prawo',39);
ini_close();

Jak widać INI jest bardzo łatwe w obsłudze. Opis funkcji ini_read_real:
argument0 - Sekcja danych w pliku ini.
argument1 - Nazwa zmiennej do pobrania z danej sekcji.
argument2 - Wartość domyślna zmiennej gdy wczytywanie zakończy się niepowodzeniem.

Mamy już wczytane kody klawiszy do tablicy global.key. Teraz pora napisać skrypt odpowiednio ustawiający wcześniej zdefiniowane zmienne globalne. Event Step obiektu Engine:
gml:
if ( keyboard_check ( global.key[0] ) ) global.kl_up = true; else global.kl_up = false;
if ( keyboard_check ( global.key[1] ) ) global.kl_down = true; else global.kl_down = false;
if ( keyboard_check ( global.key[2] ) ) global.kl_left = true; else global.kl_left = false;
if ( keyboard_check ( global.key[3] ) ) global.kl_right = true; else global.kl_right = false;

I gotowe. Tego skryptu już nie musimy potem ruszać. Teraz czas na redefiniowanie klawiszy. Podam mniej więcej jak to zrobić. Tworzymy obiekt o nazwie menu. Tworzymy:

Create:
gml:
pozycja = 0; // Aktualna pozycja kursora w menu
pauza = false; // Pauza do oczekiwania na wcisniecie klawisza.
draw_set_color(c_white); // Kolor czcionki

menus[0] = "Chodzenie w gore: ";
menus[1] = "Chodzenie w dol: ";
menus[2] = "Chodzenie w lewo: ";
menus[3] = "Chodzenie w prawo: ";
menus[4] = "Wyjscie z menu";

Step:
gml:
if ( pauza ) // Jezeli jest pauza
{
     if ( keyboard_check ( vk_anykey ) ) // Jezeli jakis klawisz zostal nacisniety
     {
          pauza = false; // Wylaczamy pauze
          global.key[pozycja] = keyboard_key; // Zapisujemy numer klawisza do danej pozycji
          io_clear(); // Resetujemy aktualny stan klawiszy
     }
}
else // Jezeli pauzy nie ma, to pozwalamy kursorowi zmieniac pozycje w menu
{
     if ( keyboard_check ( vk_up ) )
     {
          if ( pozycja > 0 )
          {
               pozycja -= 1;
               io_clear(); // Resetujemy stan klawiszy
          }
     }
     else if ( keyboard_check ( vk_down ) )
     {
          if ( pozycja < 4 )
          {
               pozycja += 1;
               io_clear();
          }
     }
}

if ( keyboard_check ( vk_enter ) ) // Jezeli naciskamy enter - wybieramy jakas pozycje z menu
{
     if ( pozycja == 4 ) // Pozycja czwarta bedzie oznaczac wyjscie z menu
     {
          room_goto_next(); // Wychodzimy z menu

          ini_open('config.ini'); // Zapis sterowania do pliku
          ini_write_string('STEROWANIE','Gora',string(global.key[0]));
          ini_write_string('STEROWANIE','Dol',string(global.key[1]));
          ini_write_string('STEROWANIE','Lewo',string(global.key[2]));
          ini_write_string('STEROWANIE','Prawo',string(global.key[3]));
          ini_close();
     }
     else // Jezeli to pozycja gdzie jest redefinicja jednego z 4 klawiszy
     {
          if ( !pauza ) // Jezeli pauzy nie ma
          {
               pauza = true; // Wlaczamy pauze
               global.key[pozycja] = 999; // Ustawiamy specjalny kod... Objaśnienie na końcu arta
               io_clear(); // Resetujemy stan klawiatury
          }
     }
}

Draw:
gml:
for ( i = 0 ; i < 4 ; i += 1 )
{
     if ( i == pozycja )
     {
          draw_set_color(c_red);

          if ( i == 4 )
               draw_text(x, y+i*30, menus[i] );
          else
               draw_text(x, y+i*30, menus[i] + klawisz_string( global.key[i] ) );

          draw_set_color(c_white);
     }
     else
     {
          if ( i == 4 )
               draw_text(x, y+i*30, menus[i] );
          else
               draw_text(x, y+i*30, menus[i] + klawisz_string( global.key[i] ) );
     }
}

Niestety nie będę tutaj objaśniał powyższych skryptów, ponieważ tworzenie menu nie jest tematem tego artykułu. Ważne jest tylko to, że po to ustaliliśmy globalną tablicę do trzymania kodów klawiszy, aby potem można było je łatwo wyświetlić jako listę. Funkcja io_clear() resetuje stan wszystkich klawiszy, czyli jak był wciśnięty, to już nie jest.

Ważne jest by przy wyjściu z takiego menu zapisać dane do pliku ini. Służy nam do tego funkcja write_ini_string:

argument0 - Sekcja danych pliku ini
argument1 - Nazwa zmiennej, która będzie zapisana w podanej sekcji
argument2 - Wartość zmiennej jako tekst.

Teraz czas na opis funkcji klawisz_string, którą musimy dodatkowo utworzyć. Otóż jeśli znamy numer ASCII znaku, to najłatwiejszym sposobem jego wyświetlenia jest użycie funkcji chr(wartosc), gdzie za argument podajemy numer kodowy z tablicy ASCII. Jest jednak jedno "ale", tym sposobem wyświetlimy jedynie część znaków klawiszy, głównie liczby i alfabet. Co zatem z takimi klawiszami jak "Insert", "Escape" itd.? Wyświetli nam się na pewno nie to czego oczekiwaliśmy. Po to właśnie będzie nam potrzebna funkcja klawisz_string. Będzie ona zwracała nazwę klawisza w postaci tekstu o dowolnej długości a nie tylko jednego znaku. Taką funkcję łatwo napisać, wystarczy użyć strukturę typu switch i zależnie od numeru znaku klawisza zwracać inny tekst. Teraz trzeba wypisać wszystkie znaki. Na całe szczęście ciało funkcji napisałem już wcześniej (z rok temu):
gml:
var k;

switch (argument0)
{
case 33: k='PAGE UP'; break;
case 34: k='PAGE DOWN'; break;
case 35: k='END'; break;
case 36: k='HOME'; break;
case 37: k='LEFT ARROW'; break;
case 38: k='UP ARROW'; break;
case 39: k='RIGHT ARROW'; break;
case 40: k='DOWN ARROW'; break;
case 45: k='INSERT'; break;
case 46: k='DELETE'; break;
case 96: k='NUMPAD 0'; break;
case 97: k='NUMPAD 1'; break;
case 98: k='NUMPAD 2'; break;
case 99: k='NUMPAD 3'; break;
case 100: k='NUMPAD 4'; break;
case 101: k='NUMPAD 5'; break;
case 102: k='NUMPAD 6'; break;
case 103: k='NUMPAD 7'; break;
case 104: k='NUMPAD 8'; break;
case 105: k='NUMPAD 9'; break;
case 106: k='NUMPAD *'; break;
case 107: k='NUMPAD +'; break;
case 109: k='NUMPAD -'; break;
case 110: k='NUMPAD DEL'; break;
case 111: k='NUMPAD /'; break;
case 13: k='ENTER'; break;
case 8: k='BACKSPACE'; break;
case 16: k='SHIFT'; break;
case 17: k='CONTROL'; break;
case 18: k='ALT'; break;
case 32: k='SPACE'; break;
case 20: k='CAPS LOCK'; break;
case 192: k='TILDE'; break;
case 92: k='MENU'; break;
case 93: k='WINDOWS'; break;
case 144: k='NUMLOCK'; break;
case 187: k='+'; break;
case 188: k=','; break;
case 189: k='='; break;
case 190: k='.'; break;
case 191: k='/'; break;
case 220: k=''; break;
case 186: k=';'; break;
case 222: k="'"; break;
case 219: k='
['; break;
case 221: k='
]'; break;
case 999: k='
Nacisnij jakis klawisz'; break;
default: k=chr(argument0); break;
}

return k;

Dyrektywa default oznacza standardowo zwracany tekst, gdy żaden case nie pasuje. Są to właśnie znaki, które można wyświetlić za pomocą funkcji chr (alfabet,cyfry...). Kolejnym plusem tego rozwiązania jest to, że jeśli do wyświetlenia menu używamy nietypowej czcionki, która nie posiada wszystkich znaków, to... w funkcji klawisz_string możemy zamienić ten znak na jakiś opis tekstowy. ;)

Zauważcie jeszcze "case 999". Taka wartość jest oczywiście nieprawidłowa, a służy nam tylko do tymczasowego wyświetlenia prośby o wciśnięcie jakiegoś klawisza. ;)

To wszystko na dzisiaj. Do artykułu zamieszczam jeszcze przykład w formacie .gm6:

Sterowanie_art.zip

głosów: 4 | ocena: 6.00 oceń zasób | dodał: Ranmus
Komentarze
stron: 1

1


av

Firemark (17:56, 7.01.2005)

moze bede wcibski,ale czy idzie dac....na joystick?

av

Ranmus (20:50, 7.01.2005)

Idzie, a jakze. Jak napisalem w arcie, funkcja do zwracania odpowiedniego tekstu byla zrobiona rok temu, a wtedy to robilem sterowanie dla kuzyna, joystick tez byl. Ale teraz od strony kodu to troche skopane. Jak bede mial czas i checi, to dopisze.

~Kaytek (16:48, 16.01.2005)

Wścibski? Czemu "wścibski"?

~firemark-bez_log (21:12, 24.01.2005)

A no bo tak ;D

~PrzemO (9:36, 30.04.2005)

Jestes wścipski {zart} Ja z tego nic nie kapuje k****

av

bigshark (10:48, 30.04.2005)

ejhhh to nie chodzi o to ze onjest wscibski dlatego ze sie zapytal o dzojstik, on jest poprostu wscibski w swojej wscibskosci. I dlatego tez jest wscibski, juz kapujesz?

av

Tymon (13:53, 3.05.2005)

Nic nie kapuje, pozatym na takie rozmówki to zapraszam na GMchat lub na GG

~Pablo (14:09, 12.02.2006)

eh... link do przykladu nie dziala :/

av

Tymon (14:21, 12.02.2006)

Ranma albo BWO musi zmienić Ja nie mam pełnego dostępu.

gmclan.org/index.php?plik=64

av

pablo1517 (13:42, 30.09.2006)

no to dopisz jak dać na pada! xD

av

pablo1517 (19:02, 22.10.2007)

Ranma miał tu coś dopisać

av

blackmaul (13:59, 23.10.2007)

Upomnij się za rok, Ranmus jest zajęty.

av

XivroX (18:26, 4.11.2008)

heh, minął rok...

av

Anubarak (17:32, 18.02.2009)

i następny rok...

av

Anubarak (17:36, 18.02.2009)

oprócz kilku miesięcy

av

Mosiek (16:00, 13.08.2009)

YY a jak to tego kodu
if ( global.kl_up ) przesun(0,-7);
else if ( global.kl_down ) przesun(0,7);
if ( global.kl_left ) przesun(-7,0);
else if ( global.kl_right ) przesun(7,0);
dopisać że jak idzie to zmienia sprite a jak się zatrzymam to się włącza sprite stojącego typka Nie wiem w ogóle jak się za to zabrać ;/

av

kt1117 (8:41, 7.11.2010)

Dodaj do skryptu przesun.

stron: 1

1



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

Nie masz konta? Zarejestruj się
Użytkownicy on-line
79 użytkownik(ów) aktywny(ch) przez ostatnie 15 minut:
gości: 74, userów: 5, ukrytych: 0
♔ Wojo ♔ , ediepl, ANtY, Sutikku, Danieo

0 użytkownik(ów) na gmczacie i 0 bot(ów)
Shoutbox
ANtY (13:42, 24.01.17):
nie
Wojo (13:32, 24.01.17):
dodam tyle, że wiem o zarobkach w indiach i one wcale nie powalają
Wojo (13:32, 24.01.17):
czy z bycia indie game developerem można się utrzymać ?
ANtY (13:30, 24.01.17):
szaławiła
Ranmus (13:20, 24.01.17):
Gnysek działał w konspirze, dał sobie admina na drugę grupę, a potem zrezygnował. Ancymon jeden.
Nikas (12:59, 24.01.17):
ha ha ha!!!!!!!
gnysek (9:50, 24.01.17):
No to już nic nie mogę wam zrobić
gnysek (9:50, 24.01.17):
O, Ranma mi uprawnienia admina wyjebał z forum
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 [..]
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.02459 sekund ] [ Liczba zapytań MySQL: 16 ]

thecrims Otserv List Otserv LyricsTown Harry Potter Serwery Gier
dev nodev