1. Šis tinklalapis naudoja slapukus. Tęsdami būvimą šiame tinklalapyje, jūs patvirtinate, jog sutinkate priimti slapukus. Sužinoti daugiau.

[SCRIPTAS] Eventų fondas

Diskusija 'Skriptai' skyriuje nuo felipe, Rugpjūtis 9, 2012.

  1. felipe

    felipe Aktyvus narys

    Užsiregistravęs:
    Rugsėjis 29, 2011
    Pranešimai:
    479
    Taškai už trofėjus:
    133
    Lytis:
    Vyras
    Vietovė:
    Marijampolė
    Pradžios puslapis:
    Įvertinimai:
    +9 / 0 / -0
    Skype:
    Sveiki,taigi platinu savo kurta scripta eventų fondo,jis nėra stulbinamas,paprastas,gal kam nors ir pravers.

    - Funkcijos - * Betkas galės pažiūrėti eventų fondo balansą,tai pat padėti į jį pinigų,bet galės juos paiimti tik ADMINISTRACIJA ir juos atstatyti į pradinį įnašą t.y 100'000 LT. Pinigai visada po restarto atsistatys į 100'000LT. Saugojima jei norėsit susikursit ir patys :)


    Bendras vaizdas

    [img width=700 height=393]http://www.part.lt/img/9c6b14e5fabe984d3436485374fcf49a340.png[/img]

    Pats scriptas

    Viršui gm'o prie kitų new'ų
    Kodas (text):
    new eventff = 100000;
    Susikuriam Pickup'ą(pickups.txt) kur norėsite

    Kodas (text):
    ,eventf
    (Jei GRP)

    Kodas (text):
    pickups[0][eventf]=CreatePickupA(1239 ,2, X,Y,Z);
    Po calbacku
    Kodas (text):
    OnPlayerPickUpPickup
    Kodas (text):
    if( pickupid == pickups [ 0 ][ eventf ] )
        {
        ShowPlayerDialog(playerid, 2020, DIALOG_STYLE_LIST, "{E0E01B}EVENTŲ FONDAS","{FFFFFF}[~] Eventų fondo balansas\n[>] Padėti į eventų fondą pinigų\n[<] Išimti iš eventų fondo pinigų\n[:] Atstatyti eventų fondo pinigus","Rinktis", "Išeiti");
        return 1;
        }
    Po calbacku
    Kodas (text):
    OnDialogResponse
    Kodas (text):
    //EVENTŲ FONDAS
    if(dialogid == 2020)
    {
    if(response)
    {
    if(listitem == 0)
    {
    new msg[60];
    format(msg,sizeof(msg),"{FFFFFF}EVENTŲ FONDO BALANSE YRA {E0E01B}%i LT",eventff);
    ShowPlayerDialog(playerid,2019, DIALOG_STYLE_MSGBOX,"{E0E01B}EVENTŲ FONDAS, balansas",msg, "Gerai","Atgal");
    }
    else if(listitem == 1)
    {
    ShowPlayerDialog(playerid,2021,DIALOG_STYLE_INPUT,"{E0E01B}EVENTŲ FONDAS, pinigų įdėjimas","{FFFFFF}Įrašykite suma kiek norėsite įdėti į eventų fondą pinigų\n {FF0000}Ačiū už jūsų geruma!","Toliau","Atgal");
    }
       else if(listitem == 2)
    {
    if(!playerDB[playerid][admin])
    {
    SendClientMessage(playerid,COLOR,"{FF0000}[KLAIDA]: Pinigus gali išimti tik ADMINISTRACIJA!" );
    return 1;
    }
    ShowPlayerDialog(playerid,2022,DIALOG_STYLE_INPUT,"{E0E01B}EVENTŲ FONDAS, pinigų išėmimas","{FFFFFF}Įrašykite suma kiek norėsite išimti pinigų iš eventų fondo","Toliau","Atgal");
       }
       else if(listitem == 3)
    {
    if(!playerDB[playerid][admin])
    {
    SendClientMessage(playerid,COLOR,"{FF0000}[KLAIDA]: Pinigus gali atstatyti tik ADMINISTRACIJA!" );
    return 1;
    }
    ShowPlayerDialog(playerid,2023,DIALOG_STYLE_MSGBOX,"{E0E01B}EVENTŲ FONDAS, pinigų atstatymas","{FFFFFF}Ar tikrai norite atstatyti eventų fondo pinigus?\n    {FF0000}Atstatydami pinigus, visi pinigai dings ir liks tik pradinė suma","Taip","Išeiti");
                }
       }
    return 1;
    }
    //EVENT FONDO BALANSO
    if(dialogid == 2019)
        {
            if(!response)
            {
                ShowPlayerDialog(playerid, 2020, DIALOG_STYLE_LIST, "{E0E01B}EVENTŲ FONDAS","{FFFFFF}[~] Eventų fondo balansas\n[>] Padėti į eventų fondą pinigų\n[<] Išimti iš eventų fondo pinigų\n[:] Atstatyti eventų fondo pinigus","Rinktis", "Išeiti");
     return 1;
       }
    }
    //EVENT FONDO PINIGŲ ĮDĖJIMAS
        if(dialogid == 2021)
        {
            if(!response)
            {
                ShowPlayerDialog(playerid, 2020, DIALOG_STYLE_LIST, "{E0E01B}EVENTŲ FONDAS","{FFFFFF}[~] Eventų fondo balansas\n[>] Padėti į eventų fondą pinigų\n[<] Išimti iš eventų fondo pinigų\n[:] Atstatyti eventų fondo pinigus","Rinktis", "Išeiti");
           }
           if(response)
            {
                new kieks = StringToInt(inputtext);

                if(GetPlayerMoneyA(playerid) < kieks)
                {
                    SendClientMessage(playerid,COLOR,"{FF0000}[KLAIDA]: Jūs tiek pinigų neturite!" );
                    return 1;
                }
                if(!IsNumeric(inputtext))
                {
                    ShowPlayerDialog(playerid,2021, DIALOG_STYLE_INPUT,"{E0E01B}EVENTŲ FONDAS, pinigų įdėjimas","{FFFFFF}Atsiprašome, bet įvesti simboliai gali būti tik {FF0000}skaičiai","Padėti","Atgal");
                    return 1;
                }
                GivePlayerMoneyA(playerid,-kieks);
                eventff+=kieks;
                ApplyAnimation(playerid, "GANGS", "DEALER_DEAL", 4.000000, 0, 0, 0, 0, -1);
                new msg[70];
    format(msg,sizeof(msg),"{FFFFFF}Sėkmingai įdėjote į eventų fondą {E0E01B}%i LT",kieks);
    ShowPlayerDialog(playerid,6301, DIALOG_STYLE_MSGBOX,"{E0E01B}EVENTŲ FONDAS",msg, "Gerai","");
                return 1;
            }
        }
    //EVENT FONDO PINIGŲ IŠĖMIMAS
        if(dialogid == 2022)
        {
            if(!response)
            {
                ShowPlayerDialog(playerid, 2020, DIALOG_STYLE_LIST, "{E0E01B}EVENTŲ FONDAS","{FFFFFF}[~] Eventų fondo balansas\n[>] Padėti į eventų fondą pinigų\n[<] Išimti iš eventų fondo pinigų\n[:] Atstatyti eventų fondo pinigus","Rinktis", "Išeiti");
           }
           if(response)
            {
                new kieks = StringToInt(inputtext);

                if(eventff < kieks)
                {
                    SendClientMessage(playerid,COLOR,"{FF0000}[KLAIDA]: Tiek pinigų eventų fonde neturime!" );
                    return 1;
                }
                if(!IsNumeric(inputtext))
                {
                    ShowPlayerDialog(playerid,2022, DIALOG_STYLE_INPUT,"{E0E01B}EVENTŲ FONDAS, pinigų išėmimas","{FFFFFF}Atsiprašome, bet įvesti simboliai gali būti tik {FF0000}skaičiai","Išimti","Atgal");
                    return 1;
                }
                GivePlayerMoneyA(playerid,kieks);
                eventff-=kieks;
                new msg[200];
                 new name[ MAX_PLAYER_NAME ];
            GetPlayerName( playerid, name, MAX_PLAYER_NAME );
    format(msg,sizeof(msg), "{FF0000}[!] {E0E01B}ADMINISTRATORIUS {FF0000}%s {E0E01B}išėmė iš eventų fondo {FF0000}%i LT",name,kieks);
                SendClientMessageToAll( COLOR, msg );
                ApplyAnimation(playerid, "GANGS", "DEALER_DEAL", 4.000000, 0, 0, 0, 0, -1);
    format(msg,sizeof(msg),"{FFFFFF}Sėkmingai išėmėte iš eventų fondo {E0E01B}%i LT",kieks);
    ShowPlayerDialog(playerid,6301, DIALOG_STYLE_MSGBOX,"{E0E01B}EVENTŲ FONDAS",msg, "Gerai","");
                return 1;
            }
        }

    //EVENT FONDO PINIGŲ ATSTATYMAS
    if(dialogid == 2023)
    {
    if(response)
    {
    SendClientMessage(playerid,COLOR,"{2BFF00}[!]: Pinigai sėkmingai atstatyti!" );
    eventff = 100000;
    return 1;
        }
      }
     
  2. Yiin

    Yiin Gerai žinomas narys

    Užsiregistravęs:
    Rugpjūtis 6, 2012
    Pranešimai:
    1,094
    Taškai už trofėjus:
    463
    Įvertinimai:
    +325 / 0 / -1
    Skype:
    Ats: [SCRIPTAS] Eventų fondas

    Tai kaip supratau jei neepasidarys kasnors kaip jam reikia, administracija turės unlimited money?
     
  3. felipe

    felipe Aktyvus narys

    Užsiregistravęs:
    Rugsėjis 29, 2011
    Pranešimai:
    479
    Taškai už trofėjus:
    133
    Lytis:
    Vyras
    Vietovė:
    Marijampolė
    Pradžios puslapis:
    Įvertinimai:
    +9 / 0 / -0
    Skype:
    Ats: [SCRIPTAS] Eventų fondas

    Vis nuėmus pinigus jie nusėma ir iš fondo,čia nėra taip,kad jie nesibaigs + dar nuėmus pinigus visam serveriui parodys žinute kas ir kiek nuėmė.
     
  4. sneroq

    sneroq Aktyvus narys

    Užsiregistravęs:
    Gruodis 13, 2011
    Pranešimai:
    214
    Taškai už trofėjus:
    178
    Lytis:
    Vyras
    Įvertinimai:
    +27 / 0 / -0
    Skype:
    Ats: [SCRIPTAS] Eventų fondas

    Nebloga sistema. :)
     
  5. _Edvis

    _Edvis Aktyvus narys

    Užsiregistravęs:
    Birželis 15, 2012
    Pranešimai:
    502
    Taškai už trofėjus:
    153
    Lytis:
    Vyras
    Įvertinimai:
    +2 / 0 / -0
    Ats: [SCRIPTAS] Eventų fondas

    Graži sistemėlė
     
  6. Meperis

    Meperis Naujas narys

    Užsiregistravęs:
    Rugpjūtis 29, 2012
    Pranešimai:
    7
    Taškai už trofėjus:
    1
    Įvertinimai:
    +0 / 0 / -0
    Ats: [SCRIPTAS] Eventų fondas

    data/pickups.txt(421) : error 017: undefined symbol "eventff"

    toki erora meta kame problema gal zinot ?
     
  7. felipe

    felipe Aktyvus narys

    Užsiregistravęs:
    Rugsėjis 29, 2011
    Pranešimai:
    479
    Taškai už trofėjus:
    133
    Lytis:
    Vyras
    Vietovė:
    Marijampolė
    Pradžios puslapis:
    Įvertinimai:
    +9 / 0 / -0
    Skype:
    Ats: [SCRIPTAS] Eventų fondas

    Viršui gm'o prie kitų new'ų

    Kodas (text):
        new eventff = 100000;
     
  8. Meperis

    Meperis Naujas narys

    Užsiregistravęs:
    Rugpjūtis 29, 2012
    Pranešimai:
    7
    Taškai už trofėjus:
    1
    Įvertinimai:
    +0 / 0 / -0
    Ats: [SCRIPTAS] Eventų fondas

    vistiek taspats eroras ikeliau i new ir i pickups ir i gm ten kur yra viskas bet vistiek eroras
     
  9. felipe

    felipe Aktyvus narys

    Užsiregistravęs:
    Rugsėjis 29, 2011
    Pranešimai:
    479
    Taškai už trofėjus:
    133
    Lytis:
    Vyras
    Vietovė:
    Marijampolė
    Pradžios puslapis:
    Įvertinimai:
    +9 / 0 / -0
    Skype:
    Ats: [SCRIPTAS] Eventų fondas

    į pickups.txt nereikė dėt
    Kodas (text):
      new eventff = 100000;
    prote tu
     
  10. Domanis

    Domanis Aktyvus narys

    Užsiregistravęs:
    Kovas 18, 2011
    Pranešimai:
    395
    Taškai už trofėjus:
    133
    Lytis:
    Vyras
    Vietovė:
    Utena
    Įvertinimai:
    +2 / 0 / -0
    Ats: [SCRIPTAS] Eventų fondas

    Parduodi žmogui GameMode prižadėdamas kad nieko nebedarysi su juo o pasirodo pradėjai dalinti scriptus, vai vai nepatikimas, nepasitikėkite juo.
     
  11. felipe

    felipe Aktyvus narys

    Užsiregistravęs:
    Rugsėjis 29, 2011
    Pranešimai:
    479
    Taškai už trofėjus:
    133
    Lytis:
    Vyras
    Vietovė:
    Marijampolė
    Pradžios puslapis:
    Įvertinimai:
    +9 / 0 / -0
    Skype:
    Ats: [SCRIPTAS] Eventų fondas

    šita jau senai įdėtas,pažiūrėk kada tau pardaviau... čia kūriau jį paplatinimui tam mode ir palikau aš jį ten..
     
  12. The_Hulk

    The_Hulk Naujas narys

    Užsiregistravęs:
    Birželis 8, 2015
    Pranešimai:
    19
    Taškai už trofėjus:
    11
    Lytis:
    Vyras
    Įvertinimai:
    +0 / 0 / -0
    Gražiai bet pasidarysiu tik savininkui :D ir dosiu adminam kaip darys ev :D
     

Dalintis šiuo puslapiu

Kraunama...