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
72 użytkownik(ów) aktywny(ch) przez ostatnie 15 minut:
gości: 68, userów: 4, ukrytych: 0
owyn, Jasonamawn, Grela, ediepl

0 użytkownik(ów) na gmczacie i 0 bot(ów)
Shoutbox
asdfMaciej (15:28, 30.04.17):
wow, to forum jeszcze żyje
PatrykPlayingPOLSKA (12:29, 30.04.17):
Tylko jedna osoba może zrobić tą captche,tylko że ta osoba bardzo rzadko wchodzi.
Wojo (11:54, 30.04.17):
każdy ma to w dupie jak widać
MaxGaming (10:56, 30.04.17):
A nikt nie pomyślał że sęk w tym że ich w ogóle nie powinno być? Xd może niech ktoś captcha ogarnie albo jakieś inne zabezpieczenie
Wojo (10:40, 30.04.17):
no bo to mega chujowo wygląda kiedy wchodzisz na jeszcze jakoś żyjące forum a wygląda jak opuszczone a boty są w stanie sobie siedzieć nawwet kilka godzin
Chell (9:42, 30.04.17):
no i do teraz nie wiem w którym miejscu te kilka botów które się uchowają może komukolwiek przeszkadzać
Chell (9:40, 30.04.17):
generalnie co ty masz w głowie xD
Ignatus (8:41, 30.04.17):
Flashek jak tam Twój projekt ukradziony w 2004r?
I am vader (23:54, 29.04.17):
Flashek, widzisz kilka botow dziennie i narzekasz ze nikt ich nie banuje, a tak naprawde jest ich tutaj kilkanascie dziennie.
Wojo (23:36, 29.04.17):
Serio ja tu wbijam dość często chociażby z nudów na te kilka sekund i jak podczas dwóch albo trzech godzin na forum robi się taki syf to znak że moderatorów potrzeba
Flashek (23:33, 29.04.17):
Pracuję po 12 godzin na zmianie i nie ma najmniejszego problemu żeby zerknąć dwa razy na 12 h. Administracja tutaj to jakas masakra. Potrzebni są modzi do banowania
Ignatus (22:51, 29.04.17):
moda mu!
Ignatus (22:51, 29.04.17):
300 albo jeden Wojo
I am vader (21:57, 29.04.17):
Trzeba by z 300 zeby zawsze ktos byl online, ludzie maja swoje zycia.
Wojo (21:13, 29.04.17):
nie byłbym zły gdyby był tylko jeden moderator
I am vader (19:54, 29.04.17):
Nie nasza wina ze bot zrobil 15 tematow w 2 godziny.
Jaklub (19:05, 29.04.17):
demo roku
Wojo (18:56, 29.04.17):
hura możemy oglądać walke Wladimira Klitschko dzięki botom, których moderatorzy nawet nie kasują.
Dester (15:37, 29.04.17):
Ktoś ma pomysł jak napisać takie przewidywanie kolizji jak laser w Steamworld Heist i na tego podstawie sprawdzać trafienie?
Flashek (12:25, 29.04.17):
Tytaj adminów brakuje no ale pies ogrodnika samemu nie zje drugiemu nie odd
en_6280 (12:04, 29.04.17):
nie ma jak uczyć się vulkana gdy karta graficzna nie obsługuje
PatrykPlayingPOLSKA (11:51, 29.04.17):
keek te reklamy
Wojo (11:37, 29.04.17):
No a moderatorzy wstają o czternastej po ciężkim dniu nic nierobienia
Dester (11:25, 29.04.17):
BOTY WYSYŁAJĄ MI PRYWATNE WIADOMOŚCI HELP
Fervi  (23:59, 28.04.17):
Trzeba było brać jak było za free
Flashek (22:25, 28.04.17):
Witam, ma ktoś może niepotrzebne chivlary medieval warfare na steamie ?
Grela (18:18, 28.04.17):
niewazne wlasnie stoje na stoisku frozen district XD
Grela (18:17, 28.04.17):
czy jakis gmclan ma stoisko na indykach na pyrkonie?
Danieo (15:44, 28.04.17):
A tego to nie wiem, nigdy nie używałem
Danielus (15:06, 28.04.17):
Boo nie jest już oficjalnie wspierany chyba
Danieo (11:58, 28.04.17):
W unity kod piszesz w c#, JavaScript albo Boo
Danieo (11:57, 28.04.17):
Nie ma ani własnego ani nie programuje się w C++
nowy_user (10:53, 28.04.17):
Rozuumiem , a tak btw, czy Unity ma swoj własny język czy programuje się tam w c++?
Wojo (10:34, 28.04.17):
Unreal engine się fajnie prezentuje ale faktycznie jak trochę poczytałem to sprawia trochę problemów jeśli chcielibyśmy coś wrzucić na rynek
Wojo (10:32, 28.04.17):
No i brak większego supportu 3D w gmie też bardzo boli ale i tak się trochę sytuacja w nim poprawila
Wojo (10:30, 28.04.17):
I z tego co czytałem to gm pomimo supportu dla html5 ma nadal z nim mnóstwo problemów co równa się tylko z konwersja teoretyczną nie mająca pokrycia w rzeczywistości
Wojo (10:29, 28.04.17):
Masz tutaj trochę racji ale i tak unity jest znacznie popularniejsze od gma.
nowy_user (10:05, 28.04.17):
Czy ja wiem Wojo, Spójrzmy jak wielu ludzi tworzy dziś komercyjne gry w GM, otwierają się przecieżfirmy, które tworzą gry tylko w GMie. 10 lat temu to było nie do pomyślenia, jak ktoś zarobił 10$ na grze zrobionej w GM to już był happy.
Danielus (9:56, 28.04.17):
Najprościej założyć discorda. Staje się to coraz bardziej popularne jeśli idzie o chat
Wojo (9:36, 28.04.17):
Właśnie strona jest git ale game maker stracił mocno na znaczeniu w ciągu ostatnich lat.
Chell (9:00, 28.04.17):
uważam że tutaj każdy ma dość wartościowej wiedzy oraz jedną sprawą portalu jest brak nowej strony również brak naliczania postów w valhalli
Wojo (8:56, 28.04.17):
Gmclan rozwija się samodzielnie
nowy_user (8:40, 28.04.17):
Szkoda że GM czat nie działa. Przydałoby się takie miejsce gdzie moglibyśmy wymienić się wartościową wiedzą oraz porozmawiać o sprawach portalu i w końcu zdecydować w którym kierunku GMclan będzie się rozwijał.
Wojo (8:21, 28.04.17):
Tinychat zawsze zdycha
Chell (7:13, 28.04.17):
hmm, a może by tak tinychat??
Chell (7:13, 28.04.17):
ale zamkneli*
Chell (7:12, 28.04.17):
Simian - kiedyś był gmczat się zamknęli bo doszli do tych samych wniosków co ty ;p
Decretus (2:02, 28.04.17):
Witam serdecznie, zachęcam do wzięcia udziału w konkursie!
Adriann (1:17, 28.04.17):
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.02414 sekund ] [ Liczba zapytań MySQL: 16 ]

thecrims Otserv List Otserv LyricsTown Harry Potter Serwery Gier
dev nodev