Advertisement
Ewolutions

ServerSettings

May 21st, 2012
283
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 4.78 KB | None | 0 0
  1. // This is a comment
  2. // uncomment the line below if you want to write a filterscript
  3. //#define FILTERSCRIPT
  4.  
  5. #include <a_samp>
  6. new ServerVar[6][64];
  7. new Connects;
  8. public OnFilterScriptInit()
  9. {
  10.     ServerVar[0] = SSS("hostname");
  11.     ServerVar[1] = SSS("mapname");
  12.     ServerVar[2] = SSS("gamemodetext");
  13.     ServerVar[3] = SSS("weburl");
  14.     ServerVar[4] = SSS("version");
  15.     ServerVar[5] = SSS("password");
  16.    
  17.     for(new I = -1;I < GetMaxPlayers();I++)
  18.     {
  19.         if(IsPlayerConnected(I))
  20.         {
  21.             Connects ++;
  22.         }
  23.     }
  24.     return 1;
  25. }
  26. stock SSS(var[])
  27. {
  28.     new cosi[64];
  29.     GetServerVarAsString(var,cosi,64);
  30.     return cosi;
  31. }
  32. public OnFilterScriptExit()
  33. {
  34.     return 1;
  35. }
  36.  
  37. public OnPlayerConnect(playerid)
  38. {
  39.     Connects++;
  40.     return 1;
  41. }
  42.  
  43. public OnPlayerDisconnect(playerid, reason)
  44. {
  45.     Connects--;
  46.     return 1;
  47. }
  48.  
  49. public OnPlayerCommandText(playerid, cmdtext[])
  50. {
  51.     if (strcmp("/server", cmdtext, true, 10) == 0)
  52.     {
  53.         Prikaz(playerid);
  54.         return 1;
  55.     }
  56.     return 0;
  57. }
  58.  
  59.  
  60. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  61. {
  62.     if(dialogid == 5256)
  63.     {
  64.         if(response)
  65.         {
  66.             switch(listitem)
  67.             {
  68.                 case 0:ShowPlayerDialog(playerid,5257,DIALOG_STYLE_INPUT,"Změna Hostname Serveru","{FFFFFF}Chystáš se změnit hostname.\nZadej nový hostname do rámečku níže","Změnit","Odejít");//hostname
  69.                 case 1:ShowPlayerDialog(playerid,5258,DIALOG_STYLE_INPUT,"Změna Mapname Serveru","{FFFFFF}Chystáš se změnit mapname.\nZadej nový mapname do rámečku níže","Změnit","Odejít");//mapa
  70.                 case 2:ShowPlayerDialog(playerid,5259,DIALOG_STYLE_INPUT,"Změna Gamemodetext Serveru","{FFFFFF}Chystáš se změnit gamemodetext.\nZadej nový gamemodetext do rámečku níže","Změnit","Odejít");//mod
  71.                 case 3:ShowPlayerDialog(playerid,5260,DIALOG_STYLE_INPUT,"Změna website Serveru","{FFFFFF}Chystáš se změnit website.\nZadej nový website do rámečku níže","Změnit","Odejít");//web
  72.                 case 6:ShowPlayerDialog(playerid,5261,DIALOG_STYLE_INPUT,"Heslo serveru","{FFFFFF}Chystáš se změnit heslo serveru.\nPro zrušení hesla napiš do rámečku 0 (nulu).","Změnit","Odejít");//heslo
  73.                 case 7:SendRconCommand("exec server"),SendRconCommand("mapname San Andreas"),SetGameModeText("Unknown");
  74.             }
  75.         }
  76.     }
  77.  
  78.     if(dialogid == 5257)
  79.     {
  80.         if(response)
  81.         {
  82.             new string[128],var[64];
  83.             format(var,64,"hostname %s",inputtext);
  84.             format(string,128,"[-!!-] {FFFFFF}Nastavil jsi hostname na {FF0000}%s{FFFFFF}.",inputtext);
  85.             SendRconCommand(var);
  86.             SendClientMessage(playerid,0x0000FFFF,string);
  87.         }
  88.     }
  89.     if(dialogid == 5258)
  90.     {
  91.         if(response)
  92.         {
  93.             new string[128],var[64];
  94.             format(var,64,"mapname %s",inputtext);
  95.             format(string,128,"[-!!-] {FFFFFF}Nastavil jsi mapname na {FF0000}%s{FFFFFF}.",inputtext);
  96.             SendRconCommand(var);
  97.             SendClientMessage(playerid,0x0000FFFF,string);
  98.         }
  99.     }
  100.     if(dialogid == 5259)
  101.     {
  102.         if(response)
  103.         {
  104.             new string[128],var[64];
  105.             format(var,64,"gamemodetext %s",inputtext);
  106.             format(string,128,"[-!!-] {FFFFFF}Nastavil jsi gamemod na {FF0000}%s{FFFFFF}.",inputtext);
  107.             SendRconCommand(var);
  108.             SendClientMessage(playerid,0x0000FFFF,string);
  109.         }
  110.     }
  111.     if(dialogid == 5260)
  112.     {
  113.         if(response)
  114.         {
  115.             new string[128],var[64];
  116.             format(var,64,"weburl %s",inputtext);
  117.             format(string,128,"[-!!-] {FFFFFF}Nastavil jsi website na {FF0000}%s{FFFFFF}.",inputtext);
  118.             SendRconCommand(var);
  119.             SendClientMessage(playerid,0x0000FFFF,string);
  120.         }
  121.     }
  122.     if(dialogid == 5261)
  123.     {
  124.         if(response)
  125.         {
  126.             new string[128],var[64];
  127.             format(var,64,"password %s",inputtext);
  128.             format(string,128,"[-!!-] {FFFFFF}Nastavil jsi heslo na {FF0000}%s{FFFFFF}.",inputtext);
  129.             SendRconCommand(var);
  130.             SendClientMessage(playerid,0x0000FFFF,string);
  131.         }
  132.     }
  133.     return 1;
  134. }
  135. forward Prikaz(playerid);
  136. public Prikaz(playerid)
  137. {
  138.     if(!IsPlayerAdmin(playerid))return SendClientMessage(playerid,0xFF0000FF,"[-!!-]{FFFFFF} Nemáš přístup do administrace serveru");
  139.     ServerVar[0] = SSS("hostname");
  140.     ServerVar[1] = SSS("mapname");
  141.     ServerVar[2] = SSS("gamemodetext");
  142.     ServerVar[3] = SSS("weburl");
  143.     ServerVar[4] = SSS("version");
  144.     ServerVar[5] = SSS("password");
  145.     new string[400];
  146.     format(string,400,"Hostname {FF0000}:{00FF00} %s{FFFFFF}\nMapa {FF0000}:{00FF00} %s{FFFFFF}\nMód {FF0000}:{00FF00} %s{FFFFFF}\nWebsite {FF0000}:{00FF00} %s{FFFFFF}\nVerze serveru {FF0000}:{00FF00} %s{FFFFFF}\nHráčů {FF0000}:{00FF00} %d/%d{FFFFFF}\nHeslo {FF0000}: {00FF00}%s{FFFFFF}\nUvést do defaulutu",ServerVar[0],ServerVar[1],ServerVar[2],ServerVar[3],ServerVar[4],Connects,GetMaxPlayers(),ServerVar[5]);
  147.     ShowPlayerDialog(playerid,5256,DIALOG_STYLE_LIST,"Server Settings",string,"Nastavit","Odejít");
  148.     return 1;
  149. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement