Szerző Téma: Játékoskezelõ menü  (Megtekintve 2886 alkalommal)

Játékoskezelõ menü
« Dátum: 2013. November 14. - 09:53:58 »
+7 Show voters
Ez a filterscript lehetõvé teszi, hogy RCON adminok egy Dialog menübõl tudják kezelni a játékosokat.
Ezt a menüt persze lehet kiegészíteni saját dolgokkal, és át is lehet írni könnyen saját adminrendszerre.
Ssanf-et és ZCMD-t használ.
AMX letöltés:
http://www.solidfiles.com/d/5f6d873221/

 
PWN letöltés:
http://www.solidfiles.com/d/042349ac1f/

 


// ========================================================================== //
#include
#include
#include
// ========================================================================== //
#if defined FILTERSCRIPT
#endif
#define         Hiba               0xFF0000FF  // Piros
#define         ParancsHelp     0x00FF66FF  // Aqua zöld
#define         SzerverText     0xFF8000FF  // Narancs
// ========================================================================== //
public OnFilterScriptInit()
{
print(\"\\n--------------------------------------\");
print(\"      Játékos menü by AdamHawer         \");
print(\"--------------------------------------\\n\");
return 1;
}
CMD:jmenu(playerid, params[])
{
new jatekosid;
if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid, Hiba, \"* [Hiba]: Ezt a parancsot csak adminisztrátor használhatja.\");
if(sscanf(params, \"i\", jatekosid))
{
    SendClientMessage(playerid, ParancsHelp,\"* Használat: /jmenu [Játékos ID]\");
    return 1;
}
if(!IsPlayerConnected(jatekosid)) return SendClientMessage(playerid, Hiba, \"* [Hiba]: A játékos nincs csatlakozva, vagy nem megfelelõ játékos ID.\");
else
{
ShowPlayerDialog(playerid, (1000 + jatekosid), 2, \"Játékos kezelése:\", \"Élet feltöltés\\nPáncél feltöltés\\nMegölés\\nRespawn\\n10000$ adás\\n100000$ adás\\n1000000$ adás\\nHozzám teleportálás\\nElteleportálás hozzá\", \"Rendben\", \"Kilépés\");
}
return 1;
}
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if(1000 <= dialogid < 1100) // Maximum 100 Játékosig megengedett! Utána bõvíteni kell a 1100-at magasabbra.
{
     if(response)
            switch(listitem)
         {
            case 0:
            {
                  new SzerverUzenet   [128];
     new jatekosid    =    dialogid - 1000;
     new JatekosNev      [MAX_PLAYER_NAME];
     new AdminNev      [MAX_PLAYER_NAME];
                  GetPlayerName(jatekosid,    JatekosNev,    MAX_PLAYER_NAME);
                  GetPlayerName(playerid,   AdminNev,      MAX_PLAYER_NAME);;
                  format(SzerverUzenet, sizeof(SzerverUzenet), \"* Admin: %s feltöltötte %s játékos életét.\", AdminNev, JatekosNev);
                  SendClientMessageToAll(SzerverText, SzerverUzenet);
                  SetPlayerHealth(jatekosid, 100);
           }
           case 1:
    {
                  new SzerverUzenet   [128];
     new jatekosid    =    dialogid - 1000;
     new JatekosNev      [MAX_PLAYER_NAME];
     new AdminNev      [MAX_PLAYER_NAME];
                  GetPlayerName(jatekosid,    JatekosNev,    MAX_PLAYER_NAME);
                  GetPlayerName(playerid,   AdminNev,      MAX_PLAYER_NAME);
                  format(SzerverUzenet, sizeof(SzerverUzenet), \"* Admin: %s feltöltötte %s játékos páncélzatát.\", AdminNev, JatekosNev);
                  SendClientMessageToAll(SzerverText, SzerverUzenet);
                  SetPlayerArmour(jatekosid, 100);
          }
            case 2:
{
                  new SzerverUzenet   [128];
     new jatekosid    =    dialogid - 1000;
     new JatekosNev      [MAX_PLAYER_NAME];
     new AdminNev      [MAX_PLAYER_NAME];
                  GetPlayerName(jatekosid,    JatekosNev,    MAX_PLAYER_NAME);
                  GetPlayerName(playerid,   AdminNev,      MAX_PLAYER_NAME);
                  format(SzerverUzenet, sizeof(SzerverUzenet), \"* Admin: %s megölte %s játékost.\", AdminNev, JatekosNev);
                  SendClientMessageToAll(SzerverText, SzerverUzenet);
                  SetPlayerHealth(jatekosid, 0);
                  SetPlayerArmour(jatekosid, 0);
          }
          case 3:
{
                  new SzerverUzenet   [128];
     new jatekosid    =    dialogid - 1000;
     new JatekosNev      [MAX_PLAYER_NAME];
     new AdminNev      [MAX_PLAYER_NAME];
                  GetPlayerName(jatekosid,    JatekosNev,    MAX_PLAYER_NAME);
                  GetPlayerName(playerid,   AdminNev,      MAX_PLAYER_NAME);
                  format(SzerverUzenet, sizeof(SzerverUzenet), \"* Admin: %s respawnolta %s játékost.\", AdminNev, JatekosNev);
                  SendClientMessageToAll(SzerverText, SzerverUzenet);
          SpawnPlayer(jatekosid);
          }
          case 4:
{
                  new SzerverUzenet   [128];
     new jatekosid    =    dialogid - 1000;
     new JatekosNev      [MAX_PLAYER_NAME];
     new AdminNev      [MAX_PLAYER_NAME];
                  GetPlayerName(jatekosid,    JatekosNev,    MAX_PLAYER_NAME);
                  GetPlayerName(playerid,   AdminNev,      MAX_PLAYER_NAME);
                  format(SzerverUzenet, sizeof(SzerverUzenet), \"* Admin: %s adott %s játékosnak 10.000$-t.\", AdminNev, JatekosNev);
                  SendClientMessageToAll(SzerverText, SzerverUzenet);
     GivePlayerMoney(jatekosid, 10000);
          }
          case 5:
{
                  new SzerverUzenet   [128];
     new jatekosid    =    dialogid - 1000;
     new JatekosNev      [MAX_PLAYER_NAME];
     new AdminNev      [MAX_PLAYER_NAME];
                  GetPlayerName(jatekosid,    JatekosNev,    MAX_PLAYER_NAME);
                  GetPlayerName(playerid,   AdminNev,      MAX_PLAYER_NAME);
                  format(SzerverUzenet, sizeof(SzerverUzenet), \"* Admin: %s adott %s játékosnak 100.000$-t.\", AdminNev, JatekosNev);
                  SendClientMessageToAll(SzerverText, SzerverUzenet);
     GivePlayerMoney(jatekosid, 100000);
          }
          case 6:
{
                  new SzerverUzenet   [128];
     new jatekosid    =    dialogid - 1000;
     new JatekosNev      [MAX_PLAYER_NAME];
     new AdminNev      [MAX_PLAYER_NAME];
                  GetPlayerName(jatekosid,    JatekosNev,    MAX_PLAYER_NAME);
                  GetPlayerName(playerid,   AdminNev,      MAX_PLAYER_NAME);
                  format(SzerverUzenet, sizeof(SzerverUzenet), \"* Admin: %s adott %s játékosnak 1.000.000$-t.\", AdminNev, JatekosNev);
                  SendClientMessageToAll(SzerverText, SzerverUzenet);
          GivePlayerMoney(jatekosid, 1000000);
          }
          case 7:
{
                  new SzerverUzenet   [128];
     new jatekosid    =    dialogid - 1000;
     new JatekosNev      [MAX_PLAYER_NAME];
     new AdminNev      [MAX_PLAYER_NAME];
     new Float:xpozicio;
     new Float:ypozicio;
     new Float:zpozicio;
                  GetPlayerName(jatekosid,    JatekosNev,    MAX_PLAYER_NAME);
                  GetPlayerName(playerid,   AdminNev,      MAX_PLAYER_NAME);
                  format(SzerverUzenet, sizeof(SzerverUzenet), \"* Admin: %s magához teleportálta %s játékost.\", AdminNev, JatekosNev);
                  SendClientMessageToAll(SzerverText, SzerverUzenet);
          GetPlayerPos(playerid,    xpozicio, ypozicio, zpozicio);
     SetPlayerPos(jatekosid,    xpozicio, ypozicio, zpozicio);   
          }
          case 8:
{
                 new SzerverUzenet   [128];
    new jatekosid    =    dialogid - 1000;
    new JatekosNev      [MAX_PLAYER_NAME];
    new AdminNev      [MAX_PLAYER_NAME];
    new Float:xpozicio;
    new Float:ypozicio;
    new Float:zpozicio;
                 GetPlayerName(jatekosid,    JatekosNev,    MAX_PLAYER_NAME);
                 GetPlayerName(playerid,   AdminNev,      MAX_PLAYER_NAME);
                 format(SzerverUzenet, sizeof(SzerverUzenet), \"* Admin: %s elteleportált %s játékoshoz.\", AdminNev, JatekosNev);
                 SendClientMessageToAll(SzerverText, SzerverUzenet);
         GetPlayerPos(jatekosid,    xpozicio, ypozicio, zpozicio);
    SetPlayerPos(playerid,    xpozicio, ypozicio, zpozicio);
           }
    }
}
return 1;
}
« Utoljára szerkesztve: 2013. November 14. - 10:01:41 írta AdamHawer »

Játékoskezelõ menü
« Válasz #1 Dátum: 2013. November 14. - 14:00:51 »
+2 Show voters
Tetszik,ment a +

Játékoskezelõ menü
« Válasz #2 Dátum: 2013. November 14. - 16:10:14 »
0 Show voters
Köszönöm! (Teszteltem egyébként... és megy!)

Nem elérhető gyuri98

  • 153
  • gyuri98
    • Profil megtekintése
Játékoskezelõ menü
« Válasz #3 Dátum: 2013. November 14. - 17:12:17 »
+1 Show voters
jó ötlet de a bant illetve a kiket is bele írhattad volna meg persze, hogy ne csak pénzt lehessen adni hanem, hogy el is lehessen azt venni. ;) Persze ezt gyorsan meg lehet oldani :D
Ment a + jó az ötlet is :D

Nem elérhető Jippy

  • 618
    • Profil megtekintése
Játékoskezelõ menü
« Válasz #4 Dátum: 2013. November 14. - 17:42:20 »
+1 Show voters

jó ötlet de a bant illetve a kiket is bele írhattad volna meg persze, hogy ne csak pénzt lehessen adni hanem, hogy el is lehessen azt venni. ;) Persze ezt gyorsan meg lehet oldani :D
Ment a + jó az ötlet is :D
 
[/quote]
Ha úgy írod be a pénz összeget hogy írsz elé egy minusz jelet. Pl: \"-100000$\" akkor levonja a pénzt :)

Játékoskezelõ menü
« Válasz #5 Dátum: 2013. November 14. - 21:40:21 »
0 Show voters
Kick(playerid);
Ban(playerid);
GivePlayerMoney(playerid, -xy);
+ A szöveg más.

 
Jah és hozzáteszem szükséges egy késleltetés, miszerint a 0.3x -ben ezekek a parancsokat hamarabb veszi figyelembe, mint a textet.
Köszönöm a válaszokat!

Nem elérhető Gh0st

  • 917
    • Profil megtekintése
Játékoskezelõ menü
« Válasz #6 Dátum: 2013. November 14. - 21:56:00 »
+1 Show voters
Szép munka. :)

Nem elérhető gyuri98

  • 153
  • gyuri98
    • Profil megtekintése
Játékoskezelõ menü
« Válasz #7 Dátum: 2013. November 16. - 09:01:35 »
0 Show voters

 

jó ötlet de a bant illetve a kiket is bele írhattad volna meg persze, hogy ne csak pénzt lehessen adni hanem, hogy el is lehessen azt venni. ;) Persze ezt gyorsan meg lehet oldani :D
Ment a + jó az ötlet is :D
 
[/quote]
Ha úgy írod be a pénz összeget hogy írsz elé egy minusz jelet. Pl: \"-100000$\" akkor levonja a pénzt :)
 
[/quote]
Ezt tudom.
 

 
Kick(playerid);
Ban(playerid);
GivePlayerMoney(playerid, -xy);
+ A szöveg más.

 
Jah és hozzáteszem szükséges egy késleltetés, miszerint a 0.3x -ben ezekek a parancsokat hamarabb veszi figyelembe, mint a textet.
Köszönöm a válaszokat!
 
[/quote]
Ezeket is tudom csak javaslatvolt :)

Játékoskezelõ menü
« Válasz #8 Dátum: 2013. November 20. - 08:01:38 »
0 Show voters
De amúgy hozzáteszem még egyszer, hogy ez a menü, bárki által átalakítható a saját adminrendszeréhez könnyen, tehát aki 1 kicsit is ért hozzá, annak nem lesz ez nehéz, mivel nagyon áttekinthetõen lett írva a script.

Nem elérhető ZoleBB

  • 480
  • ZoleBB
    • Profil megtekintése
Játékoskezelõ menü
« Válasz #9 Dátum: 2013. November 20. - 09:01:13 »
0 Show voters
Fasza! Láttam mâr ilynt hiv. Forumpn

Játékoskezelõ menü
« Válasz #10 Dátum: 2013. November 20. - 09:03:38 »
0 Show voters
Ilyet nem, maximum hasonlót. Ha pedig máshol ilyet láttál azt tõlem innen lopta le, ugyanis ezt saját kézzel írtam.

 

SimplePortal 2.3.7 © 2008-2024, SimplePortal