Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- /*
- Rinkinys nr.1 by pTony [Tony_Parker]
- VIP sistema
- Komandos, kurias gali naudoti VIP nariai:
- • /vipk //VIP narių panelė
- Tai viena komanda, kurią parašius atsidaro panelė, per kurią galima atlikti štai šias funkcijas:
- • Oro pakeitimas, asmeniškai tam VIP nariui
- • Gauti ginklų su neribotu kulkų skaičiumi
- • Gauti VIP nario mašiną
- • Užsidėti VIP nario uniformą
- • Event vietos
- • Skaičiavimas
- */
- main(){}
- #include <a_samp>
- #define VIP_DIALOG 1
- #define VIP_EVENT 1
- #define VIP_TRANSPORTAS 1
- #define VIP_DIALOG2 1
- enum zaidejai
- {
- vip,
- }
- new zInfo[MAX_PLAYERS][zaidejai];
- public OnPlayerCommandText(playerid, cmdtext[])
- {
- if(strcmp(cmdtext, "/v", true)==0)
- {
- zInfo[playerid][vip]=1;
- SendClientMessage(playerid,-1,"VIP statusas aktyvuotas.");
- return 1;
- }
- if(strcmp(cmdtext, "/vipk", true)==0)
- {
- if(!zInfo[playerid][vip]){ return SendClientMessage(playerid,-1,"{FF0000}Šią komandą gali vartoti tik VIP nariai!");}
- ShowPlayerDialog(playerid,VIP_DIALOG,DIALOG_STYLE_LIST,"{8D8D8D}VIP panelė","{079200}VIP nario {FFFFFF}panelė\n{FF0000}------------------------------\n{0DFF00}• {FFFFFF}Užsidėti VIP nario uniformą\n{0DFF00}• {FFFFFF}Gauti VIP nario ginklų su neribotu kulkų skaičiumi\n{0DFF00}• {FFFFFF}Oro pakeitimas asmeniškai VIP nariui\n{0DFF00}• {FFFFFF}Gauti VIP nario transportą\n{FF0000}---------2 puslapis----------","Pasirinkti","Atšaukti");
- return 1;
- }
- return SendClientMessage(playerid,-1,"{FFFFFF}[{FF0000}>{FFFFFF}]{FF0000} Įrašyta komanda mūsų serverį neveikia!");
- }
- public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
- {
- if(dialogid == VIP_DIALOG)
- {
- if(response)
- {
- if(listitem == 2){SendClientMessage(playerid,-1,"Užsidėjote {079200}VIP nario{FFFFFF} uniformą."); SetPlayerSkin(playerid,296);return 1;}
- if(listitem == 3){SendClientMessage(playerid,-1,"Gavote {079200}VIP nario{FFFFFF} ginklus.");GivePlayerWeapon(playerid, 348, 999999999);GivePlayerWeapon(playerid, 353, 999999999);GivePlayerWeapon(playerid, 356, 999999999);return 1;}
- if(listitem == 4){SendClientMessage(playerid,-1,"Oras pakeistas jums asmeniškai.");SetPlayerWeather(playerid, 1);return 1;}
- if(listitem == 5){ShowPlayerDialog(playerid,VIP_TRANSPORTAS,DIALOG_STYLE_LIST,"{8D8D8D}VIP transportas","{FFFFFF}VIP transportas\n{FF0000}-------------------------------\n{0DFF00}• {FFFFFF}Infernus\n{0DFF00}• {FFFFFF}Elegy\n{0DFF00}• {FFFFFF}NRG 500","Pasirinkti","Atšaukti");return 1;}
- if(listitem == 6){ShowPlayerDialog(playerid,VIP_DIALOG2,DIALOG_STYLE_LIST,"{8D8D8D}#2 VIP panelė","{079200}VIP nario {FFFFFF}panelė\n{FF0000}-----------------------------------------\n{0DFF00}• {FFFFFF}Event vietos\n{0DFF00}• {FFFFFF}Įjungti skaičiavimą","Pasirinkti","Atšaukti");return 1;}
- }
- }
- if(dialogid == VIP_TRANSPORTAS)
- {
- if(response)
- {
- if(listitem == 2)
- {
- SendClientMessage(playerid,-1,"Gavote {079200}VIP nario{FFFFFF} transportą - {FF9A00}Infernus!");
- new Float:x, Float:y, Float:z, Float:A, car;
- new world = GetPlayerVirtualWorld(playerid);
- new interior = GetPlayerInterior(playerid);
- GetPlayerPos(playerid, x, y, z);
- GetPlayerFacingAngle(playerid, A);
- car = CreateVehicle(411, x, y, z+1, A, 508, 508, -1);
- LinkVehicleToInterior(car, interior);
- SetVehicleVirtualWorld(car, world);
- SetVehicleZAngle(car, A);
- PutPlayerInVehicle(playerid, car, 0);
- return 1;
- }
- if(listitem == 3)
- {
- SendClientMessage(playerid,-1,"Gavote {079200}VIP nario{FFFFFF} transportą - {FF9A00}Elegy!");
- new Float:x, Float:y, Float:z, Float:A, car;
- new world = GetPlayerVirtualWorld(playerid);
- new interior = GetPlayerInterior(playerid);
- GetPlayerPos(playerid, x, y, z);
- GetPlayerFacingAngle(playerid, A);
- car = CreateVehicle(562, x, y, z+1, A, 508, 508, -1);
- LinkVehicleToInterior(car, interior);
- SetVehicleVirtualWorld(car, world);
- SetVehicleZAngle(car, A);
- PutPlayerInVehicle(playerid, car, 0);
- return 1;
- }
- if(listitem == 4)
- {
- SendClientMessage(playerid,-1,"Gavote {079200}VIP nario{FFFFFF} transportą - {FF9A00}NRG - 500!");
- new Float:x, Float:y, Float:z, Float:A, car;
- new world = GetPlayerVirtualWorld(playerid);
- new interior = GetPlayerInterior(playerid);
- GetPlayerPos(playerid, x, y, z);
- GetPlayerFacingAngle(playerid, A);
- car = CreateVehicle(522, x, y, z+1, A, 508, 508, -1);
- LinkVehicleToInterior(car, interior);
- SetVehicleVirtualWorld(car, world);
- SetVehicleZAngle(car, A);
- PutPlayerInVehicle(playerid, car, 0);
- return 1;
- }
- }
- }
- if(dialogid == VIP_DIALOG2)
- {
- if(response)
- {
- if(listitem == 3){ShowPlayerDialog(playerid,VIP_EVENT,DIALOG_STYLE_LIST,"{8D8D8D}Event vietos","{FFFFFF}Event vietos\n{FF0000}-------------\n{0DFF00}• {FFFFFF}DRAG Event\n{0DFF00}• {FFFFFF}Drift Event\n{0DFF00}• {FFFFFF}Death Match (DM) Event\n{0DFF00}• {FFFFFF}Box (Bokso) Event","Pasirinkti","Atšaukti");return 1;}
- if(listitem == 4){SendClientMessage(playerid,-1,"Skaičiavimas {2ED301}įjungtas.");SetTimer("vienas", 1000, 0);SetTimer("du", 2000, 0);SetTimer("trys", 3000, 0);SetTimer("start", 4000, 0);return 1;}
- }
- }
- if(dialogid == VIP_EVENT)
- {
- if(response)
- {
- if(listitem == 2){SendClientMessage(playerid,-1,"Atsikėlėte iki {FF9A00}Drag Event {FFFFFF}vietos!");SetPlayerPos(playerid,-2078.3401,1363.6324,7.1007);return 1;}
- if(listitem == 3){SendClientMessage(playerid,-1,"Atsikėlėte iki {FF9A00}Drift Event {FFFFFF}vietos!");SetPlayerPos(playerid,-2078.3401,1363.6324,7.1007);return 1;}
- if(listitem == 4){SendClientMessage(playerid,-1,"Atsikėlėte iki {FF9A00}Death Match (DM) Event {FFFFFF}vietos!");SetPlayerPos(playerid,-2078.3401,1363.6324,7.1007);return 1;}
- if(listitem == 5){SendClientMessage(playerid,-1,"Atsikėlėte iki {FF9A00}Box (Bokso) Event {FFFFFF}vietos!");SetPlayerPos(playerid,-2078.3401,1363.6324,7.1007);return 1;}
- }
- }
- return 0;
- }
- forward vienas();
- public vienas()
- {
- GameTextForAll("~g~3",2000,3);
- for(new i; i != MAX_PLAYERS; ++i)
- PlayerPlaySound(i, 1056, 0.0, 0.0, 10.0);
- return 1;
- }
- forward du();
- public du()
- {
- GameTextForAll("~y~2",2000,3);
- for(new i; i != MAX_PLAYERS; ++i)
- PlayerPlaySound(i, 1056, 0.0, 0.0, 10.0);
- return 1;
- }
- forward trys();
- public trys()
- {
- GameTextForAll("~r~1",2000,3);
- for(new i; i != MAX_PLAYERS; ++i)
- PlayerPlaySound(i, 1056, 0.0, 0.0, 10.0);
- return 1;
- }
- forward start();
- public start()
- {
- GameTextForAll("~r~Startas!",3000,3);
- for(new i; i != MAX_PLAYERS; ++i)
- PlayerPlaySound(i, 1057, 0.0, 0.0, 10.0);
- return 1;
- }
Advertisement
Add Comment
Please, Sign In to add comment