Szerző Téma: Étlap rendszer.  (Megtekintve 2346 alkalommal)

Nem elérhető Knife

Étlap rendszer.
« Dátum: 2013. április 21. - 23:14:43 »
+11 Show voters
Üdv.

Gondoltam elkezdnek érdeklõdni scriptelés iránt, és megcsináltam a életem legelsõ filterszkriptjét.


Ez nem lenne más mint étlap filterszkript, ennek csak annyi a lényege hogy tudsz venni dialogban, innivalókat/ennivalókat stb..


Készítette: Knife

Készítési idõ: 30perc

Teszteltem?: Igen

Milyen parancs feldolgozót használ?: zmcd

Képek:

Holnap feltöltök majd pár képet.

Kód:
 
    #include <a_samp>
    #include <zcmd>
     
    //DEFINICÓK
    #define Etlap   1
    #define Italok  2
    #define Etelek  3
     
    #if defined FILTERSCRIPT
     
    public OnFilterScriptInit()
    {
            return 1;
    }
     
    public OnFilterScriptExit()
    {
            return 1;
    }
     
    #else
     
    main()
    {
            print(\"\\n**** Etlap filterscript v1 by Knife ****\\n\");
    }
     
    #endif
     
    CMD:etlap(playerid, params[])
    {
            ShowPlayerDialog(playerid, Etlap, DIALOG_STYLE_LIST, \"Étlap\", \"Ételek\\nItalok\", \"Kiválaszt\", \"Kilépés\");
        return 1;
    }
     
    public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
    {
            if(dialogid == Etlap)
            {
                if(listitem == 0)
                {
                    ShowPlayerDialog(playerid, Etelek, DIALOG_STYLE_LIST, \"Étlap\", \"Hamburger(200$)\\nPizza(100$)\\nChips(50$)\", \"Kiválaszt\", \"Kilépés\");
                    }
                if(listitem == 1)
                {
                    ShowPlayerDialog(playerid, Italok, DIALOG_STYLE_LIST, \"Italok\", \"Sprite(20$)\\nCola(30$)\\nBomba(200$)\\nCappy(35$)\\nMonster(200$)\\nHell(200$)\\nAdrenalin(200$)\\nKobra(200$)\", \"Kiválaszt\", \"Kilépés\");
                    }
            }
     
            if(dialogid == Etelek)
            {
                if(listitem == 0)
                {
                    if(GetPlayerMoney(playerid) < 200) { return SendClientMessage(playerid,0xFF6600FF,\"Nincsen elég pénzed.\"); }
                GivePlayerMoney(playerid,-200);
                new Float:hp;
                GetPlayerHealth(playerid,hp);
                hp += 50;
                SetPlayerHealth(playerid,hp);
                SendClientMessage(playerid,0x33AA33AA,\"Ettél egy finom hamburgert, jó étvágyat kívánunk!\");
                    }
                if(listitem == 1)
                {
                    if(GetPlayerMoney(playerid) < 100) { return SendClientMessage(playerid,0xFF6600FF,\"Nincsen elég pénzed.\"); }
                GivePlayerMoney(playerid,-100);
                new Float:hp;
                GetPlayerHealth(playerid,hp);
                hp += 25;
                SetPlayerHealth(playerid,hp);
                SendClientMessage(playerid,0x33AA33AA,\"Ettél egy finom pizzát, jó étvágyat kívánunk!\");
                    }
                    if(listitem == 2)
                {
                    if(GetPlayerMoney(playerid) < 50) { return SendClientMessage(playerid,0xFF6600FF,\"Nincsen elég pénzed.\"); }
                GivePlayerMoney(playerid,-50);
                new Float:hp;
                GetPlayerHealth(playerid,hp);
                hp += 10;
                SetPlayerHealth(playerid,hp);
                SendClientMessage(playerid,0x33AA33AA,\"Ettél egy csomag chipset, jó étvágyat kívánunk!\");
                    }
            }
     
            if(dialogid == Italok)
            {
                if(listitem == 0)
                {
                    if(GetPlayerMoney(playerid) < 20) { return SendClientMessage(playerid,0xFF6600FF,\"Nincsen elég pénzed.\"); }
                GivePlayerMoney(playerid,-20);
                new Float:hp;
                GetPlayerHealth(playerid,hp);
                hp += 5;
                SetPlayerHealth(playerid,hp);
                SendClientMessage(playerid,0x33AA33AA,\"Ittál egy finom sprite-t, jó ívást kívánunk!\");
                    }
                if(listitem == 1)
                {
                    if(GetPlayerMoney(playerid) < 30) { return SendClientMessage(playerid,0xFF6600FF,\"Nincsen elég pénzed.\"); }
                GivePlayerMoney(playerid,-30);
                new Float:hp;
                GetPlayerHealth(playerid,hp);
                hp += 5;
                SetPlayerHealth(playerid,hp);
                SendClientMessage(playerid,0x33AA33AA,\"Ittál egy finom cola-t, jó ívást kívánunk!\");
                    }
                    if(listitem == 2)
                {
                    if(GetPlayerMoney(playerid) < 200) { return SendClientMessage(playerid,0xFF6600FF,\"Nincsen elég pénzed.\"); }
                GivePlayerMoney(playerid,-200);
                new Float:hp;
                GetPlayerHealth(playerid,hp);
                hp += 100;
                SetPlayerHealth(playerid,hp);
                SendClientMessage(playerid,0x33AA33AA,\"Ittál egy finom bomba-t, jó ívást kívánunk!\");
                    }
                    if(listitem == 3)
                {
                    if(GetPlayerMoney(playerid) < 35) { return SendClientMessage(playerid,0xFF6600FF,\"Nincsen elég pénzed.\"); }
                GivePlayerMoney(playerid,-35);
                new Float:hp;
                GetPlayerHealth(playerid,hp);
                hp += 7;
                SetPlayerHealth(playerid,hp);
                SendClientMessage(playerid,0x33AA33AA,\"Ittál egy finom cappy-t, jó ívást kívánunk!\");
                    }
                    if(listitem == 4)
                {
                    if(GetPlayerMoney(playerid) < 200) { return SendClientMessage(playerid,0xFF6600FF,\"Nincsen elég pénzed.\"); }
                GivePlayerMoney(playerid,-200);
                new Float:hp;
                GetPlayerHealth(playerid,hp);
                hp += 100;
                SetPlayerHealth(playerid,hp);
                SendClientMessage(playerid,0x33AA33AA,\"Ittál egy finom monster-t, jó ívást kívánunk!\");
                    }
                    if(listitem == 5)
                {
                    if(GetPlayerMoney(playerid) < 200) { return SendClientMessage(playerid,0xFF6600FF,\"Nincsen elég pénzed.\"); }
                GivePlayerMoney(playerid,-200);
                new Float:hp;
                GetPlayerHealth(playerid,hp);
                hp += 100;
                SetPlayerHealth(playerid,hp);
                SendClientMessage(playerid,0x33AA33AA,\"Ittál egy finom hell-t, jó ívást kívánunk!\");
                    }
                    if(listitem == 6)
                {
                    if(GetPlayerMoney(playerid) < 200) { return SendClientMessage(playerid,0xFF6600FF,\"Nincsen elég pénzed.\"); }
                GivePlayerMoney(playerid,-200);
                new Float:hp;
                GetPlayerHealth(playerid,hp);
                hp += 100;
                SetPlayerHealth(playerid,hp);
                SendClientMessage(playerid,0x33AA33AA,\"Ittál egy finom adrenalin-t, jó ívást kívánunk!\");
                    }
                    if(listitem == 7)
                {
                    if(GetPlayerMoney(playerid) < 200) { return SendClientMessage(playerid,0xFF6600FF,\"Nincsen elég pénzed.\"); }
                GivePlayerMoney(playerid,-200);
                new Float:hp;
                GetPlayerHealth(playerid,hp);
                hp += 100;
                SetPlayerHealth(playerid,hp);
                SendClientMessage(playerid,0x33AA33AA,\"Ittál egy finom kobra-t, jó ívást kívánunk!\");
                    }
            }
            return 1;
    }

 
Üdvözlettel: Knife

Étlap rendszer.
« Válasz #1 Dátum: 2013. április 21. - 23:26:25 »
+1 Show voters
elsõ probálkozásra szép :) ment a +

Nem elérhető doboka98

  • 1002
    • Profil megtekintése
Étlap rendszer.
« Válasz #2 Dátum: 2013. április 22. - 12:52:18 »
+1 Show voters
Grat, jó lett elsõre, nem egy nehéz szkript, de munkával jár :D. Nekem tetszik, rendezett, és korrekt, sok sikert a továbbiakban!

Nem elérhető EnterR

  • Globális moderátor
  • 4223
  • dawg
    • Profil megtekintése
Étlap rendszer.
« Válasz #3 Dátum: 2013. április 22. - 14:18:25 »
+1 Show voters
Szép lett, adok egy +-t, csak így tovább :)

Nem elérhető Knife

Étlap rendszer.
« Válasz #4 Dátum: 2013. április 22. - 14:28:30 »
0 Show voters
Köszönöm szépen mindenkinek a +! ajándékba ti is kaptok tõlem 1 pluszt :D

OFF: Várható a új verzió étlap rendszerbõl!


Lehetséges hogy holnap publikálásra kerül a v2 es verzió!


Mik fognak benne lenni?

Animációk bekerülése.

Több féle ennivaló.


Több féle innivaló.




« Utoljára szerkesztve: 2013. április 22. - 15:12:45 írta Knife »

Nem elérhető Dead

  • 2045
    • Profil megtekintése
Étlap rendszer.
« Válasz #5 Dátum: 2013. április 22. - 14:38:18 »
+2 Show voters
A cola drágább, mint az energiaitalok :D
Amúgy szép script :D
Sört hiányoltam.

Étlap rendszer.
« Válasz #6 Dátum: 2013. április 22. - 14:41:12 »
0 Show voters
Jó lett csak így tovább :D

Nem elérhető Knife

Étlap rendszer.
« Válasz #7 Dátum: 2013. április 22. - 14:43:55 »
0 Show voters
Idézetet írta: Dead date=1366634298\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"36434\" data-ipsquote-contentclass=\"forums_Topic
A cola drágább, mint az energiaitalok :D
Amúgy szép script :D
Sört hiányoltam.
 
Hát valóságban is drágább a kóla mint a energiaital.

Majd rakok bele sört is csak a kedvedért  <3 <3

 

Jó lett csak így tovább :D
 
[/quote]
Köszönöm szépen igyekeztem :D

Nem elérhető Norby

  • 1575
    • Profil megtekintése
Étlap rendszer.
« Válasz #8 Dátum: 2013. április 22. - 18:54:25 »
0 Show voters
\"jó ívást kívánunk\"
Erre én inkább azt mondanám, hogy: \"egészségedre\" vagy akármit, de elég hülyén hangzik a fentebb említett..

Étlap rendszer.
« Válasz #9 Dátum: 2013. április 22. - 20:45:53 »
+1 Show voters
Rendezett igènyes munka :) várom az animokat és sört is rakj bele :P ment a plusz :D

Nem elérhető Flash

  • 5726
  • (っ◕‿◕)っ
    • Profil megtekintése
Étlap rendszer.
« Válasz #10 Dátum: 2013. április 22. - 21:14:32 »
+1 Show voters
Ment a +! :D


De csak mert enegriaitalokat is raktál be *.*
 
;)

Nem elérhető Knife

Étlap rendszer.
« Válasz #11 Dátum: 2013. április 22. - 21:31:41 »
0 Show voters
Idézetet írta: ninjo98 date=1366656353\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"36434\" data-ipsquote-contentclass=\"forums_Topic
Rendezett igènyes munka :) várom az animokat és sört is rakj bele :P ment a plusz :D
 
Fogok bele tenni animációkat és sört. <3 <3

Jelenleg már 5-6sör van bent :D


Ha mondtok sör neveket, mert nem értek hozzájuk akkor azt is berakom :D

 

Ment a +! :D


De csak mert enegriaitalokat is raktál be *.*
 
;)
 
[/quote]
Sörnek még jobban fogsz örülni :)

Amúgy köszi mind a kettõtöknek a +-t.


OFF: Felfogom tölteni a dialogos fegyverlekérõmet életem 2. scriptjét :D
« Utoljára szerkesztve: 2013. április 22. - 21:39:55 írta Knife »

Nem elérhető Flash

  • 5726
  • (っ◕‿◕)っ
    • Profil megtekintése
Étlap rendszer.
« Válasz #12 Dátum: 2013. április 23. - 16:52:23 »
0 Show voters
Nem izlik a sör.. :/
Szal engem energiaitallal lehet levenni a lábamról. :3

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal