Szerző Téma: Ital Rendszer  (Megtekintve 1806 alkalommal)

Ital Rendszer
« Dátum: 2013. április 24. - 23:02:20 »
+2 Show voters

Ital Rendszer




Üdvözletem!

Ma mivel nagyon unatkoztam nem volt kedvem játszani ezért gyorsan összedobtam egy kis FS-t!


Készítette:

Kevin Johnson ~ Zsoli


Készítési idõ:

15perc


Teszt:

Mûködõképes!


Sorok száma:

82


Parancsfeldolgozó:

Zcmd


Leírás:

Amikor beírod a
/italok parancsot akkor kidob egy dialogot amibõl különbözõ italokat vásárolhatsz.Amikor megvásároltál egy italt, levonja tõled az adot összeget, feltölti az életed maxra és add a kezedbe egy üveget/poharat.Az élvezeteségért kiszinezttem a szövegeket.Használd egészségel!

Letöltés:

http://pastebin.com/1se7nvGy

Spoiler for PasteBin:

/*Ital Rendszer
Készítette:Kevin Johnson ~ Zsoli
Copyright @ Equinox Gaming 2009-2013*/
#include <   a_samp   >
#include <   zcmd   >
#define DIALOG_0 1
#define COLOR_LIGHTBLUE           0x00BFFFAA
#define COLOR_ULTRARED            0xFF0606FF
CMD:italok(playerid, params[])
    {
            ShowPlayerDialog(playerid, DIALOG_0, DIALOG_STYLE_LIST, \"{FF0606}Válaszd ki mit szeretnél inni!\", \"{00BFFF}Sör     {FF0606}50$\\n{00BFFF}Pálinka     {FF0606}100$\\n{00BFFF}Bor     {FF0606}250$\\n{00BFFF}Jägermeister     {FF0606}350$\\n{00BFFF}Whiskey     {FF0606}350$\\n{00BFFF}Víz     {FF0606}10$\\n{00BFFF}Cola     {FF0606}50$\\n{00BFFF}Citromos üdítõ     {FF0606}75$\", \"Választ\", \"Kilépés\");
        return 1;
    }
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
if(dialogid == DIALOG_0)
{
        if(response)
        {
                if(listitem == 0)
                {
                        SendClientMessage(playerid, 0x00BFFFAA, \"Vettél egy sört 50$ értékben!\");
                        GivePlayerMoney(playerid, -50);
                        SetPlayerSpecialAction(playerid, SPECIAL_ACTION_DRINK_BEER);
                        SetPlayerHealth(playerid, 100);
                }
                if(listitem == 1)
                {
                        SendClientMessage(playerid, 0x00BFFFAA, \"Vettél egy pálinkát 100$ értékben!\");
                        GivePlayerMoney(playerid, -100);
                        SetPlayerSpecialAction(playerid, SPECIAL_ACTION_DRINK_BEER);
                        SetPlayerHealth(playerid, 100);
                }
                if(listitem == 2)
                {
                        SendClientMessage(playerid, 0x00BFFFAA, \"Vettél egy bort 250$ értékben!\");
                        GivePlayerMoney(playerid, -250);
                        SetPlayerSpecialAction(playerid, SPECIAL_ACTION_DRINK_WINE);
                        SetPlayerHealth(playerid, 100);
                }
                if(listitem == 3)
                {
                        SendClientMessage(playerid, 0x00BFFFAA, \"Vettél egy jägermeistert 350$ értékben!\");
                        GivePlayerMoney(playerid, -350);
                        SetPlayerSpecialAction(playerid, SPECIAL_ACTION_DRINK_WINE);
                        SetPlayerHealth(playerid, 100);
                }
                if(listitem == 4)
                {
                        SendClientMessage(playerid, 0x00BFFFAA, \"Vettél egy whiskeyt 350$ értékben!\");
                        GivePlayerMoney(playerid, -350);
                        SetPlayerSpecialAction(playerid, SPECIAL_ACTION_DRINK_WINE);
                        SetPlayerHealth(playerid, 100);
                }
                if(listitem == 5)
                {
                        SendClientMessage(playerid, 0x00BFFFAA, \"Vettél egy üveg vizet 10$ értékben!\");
                        GivePlayerMoney(playerid, -10);
                        SetPlayerSpecialAction(playerid, SPECIAL_ACTION_DRINK_SPRUNK);
                        SetPlayerHealth(playerid, 100);
                }
                if(listitem == 6)
                {
                        SendClientMessage(playerid, 0x00BFFFAA, \"Vettél egy colat 50$ értékben!\");
                        GivePlayerMoney(playerid, -50);
                        SetPlayerSpecialAction(playerid, SPECIAL_ACTION_DRINK_SPRUNK);
                        SetPlayerHealth(playerid, 100);
                }
                if(listitem == 7)
                {
                        SendClientMessage(playerid, 0x00BFFFAA, \"Vettél egy citromos üdítõt 75$ értékben!\");
                        GivePlayerMoney(playerid, -75);
                        SetPlayerSpecialAction(playerid, SPECIAL_ACTION_DRINK_SPRUNK);
                        SetPlayerHealth(playerid, 100);
                }
        }
        }else{
        SendClientMessage(playerid, 0xFF0606FF, \"Kiléptél a dialogból!\");
}

 


Ital Rendszer
« Válasz #1 Dátum: 2013. április 24. - 23:36:27 »
0 Show voters
és ebbe mi tartott 15 percig?..

Nem elérhető Knife

Ital Rendszer
« Válasz #2 Dátum: 2013. április 25. - 06:32:41 »
0 Show voters
Szép lett  <3

Ital Rendszer
« Válasz #3 Dátum: 2013. április 25. - 06:44:26 »
0 Show voters
Nagyon Szép !
www.twitch.tv/almightymartin

Az év STAFF tagja - 2015
Az év RP szervere - 2015 - [rc-rp.hu]

Red County Role Play [rc-rp.hu] - Tulajdonos
Project San Andreas [psa.hu] - Főadminisztrátor
See MTA LV [see-game.com] - Admin 4

Nem elérhető SnooP

  • 1798
  • SnooP
    • Profil megtekintése
Ital Rendszer
« Válasz #4 Dátum: 2013. április 25. - 11:30:10 »
0 Show voters
Nem rosz, esetleg lementhetnéd hányszor írta be a parancsot és, ha mondjuk az meghaladta a 4-et akkor a SetPlayerDrunk levelnél 20-ra állítod, majd 5-nél 30-ra és így tovább. ;)

Ital Rendszer
« Válasz #5 Dátum: 2013. április 25. - 11:33:52 »
0 Show voters
Idézetet írta: SnooP date=1366882210\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"36535\" data-ipsquote-contentclass=\"forums_Topic
Nem rosz, esetleg lementhetnéd hányszor írta be a parancsot és, ha mondjuk az meghaladta a 4-et akkor a SetPlayerDrunk levelnél 20-ra állítod, majd 5-nél 30-ra és így tovább. ;)
 
Ez nekem is eszembe jutott, szerintem megcsinálom. :D


Köszi mindenkinek!  <3 <3



és ebbe mi tartott 15 percig?..
 
[/quote]
Teszteléssel együtt.

Ital Rendszer
« Válasz #6 Dátum: 2013. április 25. - 14:32:01 »
0 Show voters
Idézetet írta: norbi39 date=1366839387\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"36535\" data-ipsquote-contentclass=\"forums_Topic
és ebbe mi tartott 15 percig?..
 
Minek hazudja azt -mint egyesek- hogy \"Készítési idõ: 1-2 perc\" ?
Gondolom a színezéssel, formázással, teszteléssel mehet el ennyi idõ (dialog alapból pepecselõs munka)
« Utoljára szerkesztve: 2013. április 25. - 14:33:39 írta takehun »

Ital Rendszer
« Válasz #7 Dátum: 2013. április 25. - 15:31:20 »
0 Show voters
Hát nem volt nagy munka, csak gyorsan így este lefekvés elõtt összedobtam egy kis dolgot.

Ma/holnap is publikálok egy kisebb FSem, még nem kezdtem el.

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal