Generátor náhodných rýmů v GML Ranslogen

Ostatní jazyky GameMaker GML Generátor náhodných rýmů v GML Ranslogen

Jednoduchý generátor náhodných rýmů RANSLOGEN je kompletně napsaný v GML a do jeho kódu můžete klidně nahlédnout stažením souboru níže. Pokud ovšem nemáte Game Maker, nevadí, v archivu je zabalený i zkompilovaný .exe soubor.

Základ RANSLOGENu vypadá takto:

1.inicializace

a[0]="pozná";
a[1]="nezná";
a[2]="nemá";
a[3]="hledá";

b[0]="chybu";
b[1]="rybu";
b[2]="slávu";
b[3]="hlavu";
b[4]="krávu";
b[5]="mámu";
b[6]="kávu";

d[0]="mýdlo";
d[1]="sídlo";
d[2]="jídlo";
d[3]="šídlo";

e[0]="chválí";
e[1]="pálí";
e[2]="krájí";
e[3]="hájí";

2. Hlavní skript script0 (umístěný v eventech Create a Alarm 0)

if floor(random(2))=1{
aa=a[floor(random(4))];
az=a[floor(random(4))];
}
else {
aa=e[floor(random(4))];
az=e[floor(random(4))];
}
if floor(random(2))=1{
bb=b[floor(random(7))];
bz=b[floor(random(7))];
}
else{
bb=d[floor(random(4))];
bz=d[floor(random(4))];
}
if (aa==az||bb==bz) then script0();
alarm[0]=100;

3. Vypsání rýmu (event Draw)

draw_text(30,100,"Kdo "+string(aa)+" "+string(bb)+", ten "+string(az)+" "+string(bz)+".");

Pokud by byly nějaké nejasnosti ohledně kódu, klidně pište do komentářů!


Galerie

Program byl vytvořen v roce 2013.

 

Stáhnout

Staženo 244x (1.21 MB)
Aplikace je včetně zdrojových kódů v jazyce GameMaker

 

  Aktivity (1)

Program pro vás napsal Martin Bednář (xbedm01)
Avatar
Autor se momentálně věnuje nejvíce jazykům PHP,JavaScript,HTML a CSS. Také tvoří hry v Game Makeru.

Jak se ti líbí článek?
Celkem (6 hlasů) :
2.166672.16667 2.166672.166672.16667


 


Miniatura
Všechny články v sekci
GameMaker - GML
Miniatura
Následující článek
BlowWind Benchmark

 

 

Komentáře
Zobrazit starší komentáře (19)

Avatar
Davemal
Člen
Avatar
Davemal:

Nevím přesto choose to asi nezládnu protože totálně nevím jak to udělat, asi to budu muset udělat přes if.

 
Odpovědět 2.7.2013 13:43
Avatar
TomBen
Redaktor
Avatar
Odpovídá na Davemal
TomBen:

choose je jednodušší než celé ty ify. Prostě ti dává jednu z položek,
náhodně kterou. Musel bys napsat, čemu na tom nerozumíš.

Odpovědět 2.7.2013 22:58
Za posledních 200 miliónů let se nic zvláštního nestalo, akorát dinosauři vymřeli a opice se naučily programovat.
Avatar
Davemal
Člen
Avatar
Odpovídá na TomBen
Davemal:

No prostě nevím jak mám napsat ten kod přes choose.

 
Odpovědět 3.7.2013 8:48
Avatar
TomBen
Redaktor
Avatar
Odpovídá na Davemal
TomBen:

Já asi tuším....nemáš náhodou problém číst základní strukturu gml?
Co je funkce, co parametr a co proměnná? Případně přiřazení vs porovnání?
Pokud ano, tak to nepiš ani těma if..else, protože na tom porodíš ježky.
Zkus nejprve nějaké snazší cvičení a počti si něco o funkcích obecně.
Taky můžeš procházet postupně moje tutoriály označené jako seriál TBA.
Přibývají pomalu, ale provedou tě od začátků ke složitým věcem postupně.

Odpovědět 3.7.2013 10:56
Za posledních 200 miliónů let se nic zvláštního nestalo, akorát dinosauři vymřeli a opice se naučily programovat.
Avatar
Davemal
Člen
Avatar
Odpovídá na TomBen
Davemal:

Tak dobrá pročtu ty tvé tutoriály, ale dofám že budou vycházet častěji.

 
Odpovědět 3.7.2013 11:51
Avatar
TomBen
Redaktor
Avatar
Odpovídá na Davemal
TomBen:

Častěji ani netřeba, pokud je bereš vážně a zkoušíš si věci co tam jsou. Počítám tam s tím, že si věci vyzkoušíš i sám a vzorové programy si zkusíš upravit a předělat po svém. Nemá smysl, abys uměl udělat moje programy. Přijetí informace do vlastního způsobu chápání je nejdůležitější.

Odpovědět 3.7.2013 12:05
Za posledních 200 miliónů let se nic zvláštního nestalo, akorát dinosauři vymřeli a opice se naučily programovat.
Avatar
Davemal
Člen
Avatar
Odpovídá na TomBen
Davemal:

Já si myslím že všechno chce nějaký čas, třeba něčemu nerozumíš zamyslíš se pořádně nad tím a pak tomu třeba rozumíš, ale není to takhle vždy občas se hold musíš zeptat různých lídí aby ti pomohly.

 
Odpovědět  +1 3.7.2013 12:11
Avatar
Davemal
Člen
Avatar
Odpovídá na TomBen
Davemal:

Už jsem to proštudoval a mohu se zeptat, kdy se v tvých tutoriálech začne objevovat GML.

 
Odpovědět 3.7.2013 13:18
Avatar
TomBen
Redaktor
Avatar
Odpovídá na Davemal
TomBen:

:-) Ikony a gml jsou ve skutečnosti totéž.

Ale abych odpověděl: nejbližší článek ještě bude v ikonách a další už
bude mít gml. ( pokud nezjistím, že jsem zapomněl něco důležitého vysvětlit )

Teď už mizím a budu až večer..

Odpovědět 3.7.2013 13:24
Za posledních 200 miliónů let se nic zvláštního nestalo, akorát dinosauři vymřeli a opice se naučily programovat.
Avatar
Davemal
Člen
Avatar
 
Odpovědět 3.7.2013 13:26
Děláme co je v našich silách, aby byly zdejší diskuze co nejkvalitnější. Proto do nich také mohou přispívat pouze registrovaní členové. Pro zapojení do diskuze se přihlas. Pokud ještě nemáš účet, zaregistruj se, je to zdarma.

Zobrazeno 10 zpráv z 29. Zobrazit vše