GTA Közösség - A magyar GTA fórum

San Andreas Multiplayer (SA-MP) => SA-MP: Szerverfejlesztés => A témát indította: RolePlay - 2012. október 28. - 23:42:05

Cím: RADMIN ( Role\'s admin system )
Írta: RolePlay - 2012. október 28. - 23:42:05
Sziasztok.
Kis javításon ment át, van már benne mentés is hála Fl0nak :)
http://pastebin.com/cNbUWbwq
http://www.solidfiles.com/d/9a8b5ace93/ -->PAWN<--



/////////////////////////////////////////////////////////////////////
////                                                            ////
////        RolePlay Admin rendszere Verzió 1.0 !!!             ////
////                                                    ////
////                                                           ////
////////////////////////////////////////////////////////////////////
 
#include    <a_samp>
#include    <zcmd>
#include    <sscanf2>
#include    < dini >
// Colors
#define      COLOR_RED      0xf50303AA
#define      COLOR_LBLUE     0x1e6db8AA
#define     COLOR_HIBASID   0x7e8c23AA
#define     COLOR_ASAY      0x1d9c24AA
#define    COLOR_KICK      0x39489eAA
#define    COLOR_BAN       0xbf2424AA
#define    ADMIN_SPEC_TYPE_NONE    0
#define    ADMIN_SPEC_TYPE_PLAYER    1
#pragma tabsize 0
new Text3D:ASZOLI[MAX_PLAYERS];
new giveplayerid;
new str[140 + 1];
new gSpectateID[MAX_PLAYERS];
new gSpectateType[MAX_PLAYERS];
new bool:aszoli[MAX_PLAYERS];
new bool:spec[MAX_PLAYERS];
new bool:mute[MAX_PLAYERS];
new
Float:s_posX,
Float:s_posY,
Float:s_posZ;
/*new AdminRank[][] = {
{\"Nincs\"}, // 0
{\"Adminsegéd\"}, // 1
{\"Moderátor\"}, // 2
{\"Haladó-Moderátor\"}, // 3
{\"Admin\"}, // 4
[\"Haladó-Admin\"}, // 5
{\"Fõadmin\"} // 6
};
*/
 
public OnRconLoginAttempt(ip[], password[], success)
{
new roleplayername[16];
new plip[20];
printf(\"Valaki helytelen RCON jelszót írt be! IP-je: %s Amit beírt: %s\",ip, password);
for(new i; i < MAX_PLAYERS; i++)
{
    if(!success)
    {
        GetPlayerName(i, roleplayername, sizeof(roleplayername));
        GetPlayerIp(i, plip, sizeof(plip));
        if(!strcmp(ip, plip, true))
            {
                SendClientMessage(i, -1, \"Bannolva lettél, mert elrontottad a jelszót!!\");
                Ban(i);
   }
}
else
{
    SetPVarInt(i, \"Admins\", 6);
          SendClientMessage(i, -1, \"Admin lettél!\");
}
}
return 1;
}
public OnPlayerConnect( playerid )
{
LoadPlayerAdmin( playerid );
    if(!IsValidName(playerid))
{
SendClientMessage(playerid,COLOR_KICK,\"A neved nem megfelelõ!\");
Kick(playerid);
}
return 1;
}
public OnPlayerDisconnect( playerid )
{
        SavePlayerAdmin( playerid );
        return 1;
}
 
CMD:aload(playerid, params[])
{
        if(GetPVarInt(playerid, \"Admins\") > 1) return SendClientMessage(playerid, COLOR_RED, \"Te nem vagy admin!\");
        if(aszoli[playerid] == true) return SendClientMessage(playerid, COLOR_RED , \"Te már admin szolgálatban vagy!\");
        SendClientMessage(playerid, COLOR_LBLUE , \"Sikeresen admin szolgálatba léptél! Kilépéshez: /aunload\");
        aszoli[playerid] = true;
        ASZOLI[playerid] = Create3DTextLabel(\"Admin Szolgálatban\", 0x2E69FDFF, 0.0, 0.0, 2.0, 40, 0, 0);
        Attach3DTextLabelToPlayer(ASZOLI[playerid], playerid, 0.0, 0.0, 0.4);
        SetPlayerColor(playerid, COLOR_RED);
        SetPVarInt(playerid, \"AloadSkin\", GetPlayerSkin(playerid));
        SetPlayerSkin(playerid, 217);
        SetPlayerHealth(playerid, 200);
        SetPlayerArmour(playerid, 200);
        new name[24];
        GetPlayerName(playerid, name, 24);
        format(str, 140, \"*%s Admin szolgálatba lépett\", AdminName(playerid));
        SendClientMessageToAll(COLOR_LBLUE, str);
        return 1;
}
CMD:aunload(playerid, params[])
{
    if(GetPVarInt(playerid, \"Admins\") > 1) return SendClientMessage(playerid, COLOR_RED, \"Te nem vagy admin!\");
        if(aszoli[playerid] == false) return SendClientMessage(playerid, COLOR_RED , \"Te nem vagy admin szolgálatban!\");
        aszoli[playerid] = false;
        Delete3DTextLabel(ASZOLI[playerid]);
        SetPlayerColor(playerid, -1);
        SetPlayerSkin(playerid, GetPVarInt(playerid, \"AloadSkin\"));
        SetPlayerHealth(playerid, 100);
        SetPlayerArmour(playerid, 100);
        format(str, 140, \"*%s Admin Elhagyta az admin szolgálatot!\", AdminName(playerid));
        SendClientMessageToAll(COLOR_LBLUE, str);
        return 1;
}
CMD:createadmin(playerid, params[])
{
    giveplayerid = (-1);
        new szint,
                aname[24];
    if(GetPVarInt(playerid, \"Admins\") < 6 || IsPlayerAdmin(playerid) == 0 ) return SendClientMessage(playerid, COLOR_RED, \"Nincs jogosúltságod a parancs használatához!\");
    if(sscanf(params, \"uis[100]\", giveplayerid, szint, aname)) return SendClientMessage(playerid, -1, \"Használat: /createadmin [JátékosID], Szint, Admin név\");
    SendClientMessage(playerid, -1, \" 1 és 6 között legyen a szám!\");
    if(aszoli[playerid] == false) return SendClientMessage(playerid, COLOR_RED , \"Admin szolgálatban kell lenned!\");
    if(!IsPlayerConnected(giveplayerid) ) return SendClientMessage( playerid, COLOR_HIBASID, \"Hibás ID!.\");
    if(GetPVarInt(giveplayerid, \"Admins\") > 0 ) return SendClientMessage(playerid, COLOR_RED, \"Õ már az admin csapat tagja!\");
    SetPVarInt(giveplayerid, \"Leaderes\", szint);
    SetPVarString(giveplayerid, \"AdminName\", aname);
        format(str, 140, \"Admin %s Kinevezte Az admin csapat tagjává %s-t\", AdminName(playerid),AdminName(giveplayerid));
        SendClientMessageToAll(COLOR_RED, str);
        return 1;
}
 
CMD:deleteadmin(playerid, params[])
{
    giveplayerid = (-1);
        new ok[128];
    if(GetPVarInt(playerid, \"Admins\") != 6) return SendClientMessage(playerid, COLOR_RED, \"Nincs jogosúltságod a parancs használatához!\");
    if(sscanf(params, \"us[100]\", giveplayerid, ok)) return SendClientMessage(playerid, -1, \"Használat: /deleteadmin [JátékosID], ok\");
    if(aszoli[playerid] == false) return SendClientMessage(playerid, COLOR_RED , \"Admin szolgálatban kell lenned!\");
    if(aszoli[playerid] == true)
    if(!IsPlayerConnected(giveplayerid) ) return SendClientMessage( playerid, COLOR_HIBASID, \"Hibás ID!.\");
    if(GetPVarInt(giveplayerid, \"Admins\") == 0 ) return SendClientMessage(playerid, COLOR_RED, \"Õ nem az admin csapat tagja!\");
    SetPVarInt(giveplayerid, \"Admins\", 0);
        format(str, 140, \"Admin %s Kitette az admin csapatból %s-t Oka: %s \", AdminName(playerid),AdminName(giveplayerid),ok);
        SendClientMessageToAll(COLOR_RED, str);
        return 1;
}
CMD:setadminrank(playerid, params[])
{
        giveplayerid = (-1);
    new newrank;
    if(GetPVarInt(playerid, \"Admins\") != 6) return SendClientMessage(playerid, COLOR_RED, \"Nincs jogosúltságod a parancs használatához!\");
    if(sscanf(params, \"us[100]\", giveplayerid, newrank)) return SendClientMessage(playerid, -1, \"Használat: /setadminrank [JátékosID], Rang\");
    if(aszoli[playerid] == false) return SendClientMessage(playerid, COLOR_RED , \"Admin szolgálatban kell lenned!\");
    SetPVarInt(giveplayerid, \"Admins\", newrank);
    format(str, 140, \"Admin %s Frissítette az admin rangod\", AdminName(playerid));
        SendClientMessage(giveplayerid, COLOR_RED, str);
    return 1;
}
 
CMD:say(playerid, params[])
{
        new szoveg[128];
    if(GetPVarInt(playerid, \"Admins\") != 6) return SendClientMessage(playerid, COLOR_RED, \"Nincs jogosúltságod a parancs használatához!\");
    if(sscanf(params, \"s[100]\", szoveg)) return SendClientMessage(playerid, -1, \"Használat: /say [szöveg]\");
    if(aszoli[playerid] == false) return SendClientMessage(playerid, COLOR_RED , \"Admin szolgálatban kell lenned!\");
        SendClientMessageToAll(COLOR_RED, \"**Figyelem! Admin üzenet!**\");
        format(str, 140, \"%s\",szoveg);
        SendClientMessageToAll(COLOR_ASAY, str);
        return 1;
}
CMD:asay(playerid, params[])
{
        new szoveg[128];
    if(GetPVarInt(playerid, \"Admins\") != 6) return SendClientMessage(playerid, COLOR_RED, \"Nincs jogosúltságod a parancs használatához!\");
    if(sscanf(params, \"s[100]\", szoveg)) return SendClientMessage(playerid, -1, \"Használat: /asay [szöveg]\");
    if(aszoli[playerid] == false) return SendClientMessage(playerid, COLOR_RED , \"Admin szolgálatban kell lenned!\");
    if(aszoli[playerid] == true)
        format(str, 140, \"Admin %s üzenete: %s\",AdminName(playerid), szoveg);
        SendClientMessageToAll(COLOR_ASAY, str);
        return 1;
}
CMD:kick(playerid, params[])
{
    new ok[128];
    if(GetPVarInt(playerid, \"Admins\") > 2) return SendClientMessage(playerid, COLOR_RED, \"Nincs jogosultságod a parancs használatához!\");
        if(sscanf(params, \"us[64]\", giveplayerid, ok)) return SendClientMessage(playerid, -1, \"Használat: /kick [játékosID] [Ok]\");
        if(aszoli[playerid] == false) return SendClientMessage(playerid, COLOR_RED , \"Admin szolgálatban kell lenned!\");
        if(!IsPlayerConnected(giveplayerid)) return SendClientMessage(playerid, COLOR_RED, \"A játékos nem elérhetõ!\");
        if(GetPVarInt(giveplayerid, \"Admins\") > GetPVarInt(playerid, \"Admins\")) return SendClientMessage(playerid ,COLOR_RED, \"Nálad nagyobb admint nem rúghatsz ki!\");
        format(str, 140, \"***[ KICK ] %s ki lett rúgva %s által. Indok: %s[ KICK ]*** >>>\", PlayerName(giveplayerid), AdminName(playerid), ok);
        SendClientMessageToAll(COLOR_KICK, str);
        Kick(giveplayerid);
        return 1;
}
CMD:ban(playerid, params[])
{
    new ok[128];
    if(GetPVarInt(playerid, \"Admins\") > 4) return SendClientMessage(playerid, COLOR_RED, \"Nincs jogosultságod a parancs használatához!\");
        if(sscanf(params, \"us[64]\", giveplayerid, ok)) return SendClientMessage(playerid, -1, \"Használat: /ban [játékosID] [Ok]\");
        if(aszoli[playerid] == false) return SendClientMessage(playerid, COLOR_RED , \"Admin szolgálatban kell lenned!\");
        if(!IsPlayerConnected(giveplayerid)) return SendClientMessage(playerid, COLOR_RED, \"A játékos nem elérhetõ!\");
        if(GetPVarInt(giveplayerid, \"Admins\") > GetPVarInt(playerid, \"Admin\")) return SendClientMessage(playerid ,COLOR_RED, \"Nálad nagyobb admint nem rúghatsz ki!\");
        format(str, 140, \"***[ BAN ] %s ki lett tíltva a szerverrõl %s által. Indok: %s[ BAN ]*** >>>\", PlayerName(giveplayerid), AdminName(playerid), ok);
        SendClientMessageToAll(COLOR_BAN, str);
        Ban(giveplayerid);
        return 1;
}
CMD:get(playerid, params[])
{
        if(GetPVarInt(playerid, \"Admins\") > 3) return SendClientMessage(playerid, COLOR_RED, \"Nincs jogosultságod a parancs használatához!\");
        if(sscanf(params, \"u\", giveplayerid)) return SendClientMessage(playerid, -1, \"Használat: /get [játékos]\");
        if(aszoli[playerid] == false) return SendClientMessage(playerid, COLOR_RED , \"Admin szolgálatban kell lenned!\");
    if(!IsPlayerConnected(giveplayerid)) return SendClientMessage(playerid, COLOR_RED, \"A játékos nem elérhetõ!\");
        new Float:a, Float:b, Float:c, interx;
        GetPlayerPos(playerid, a,b,c);
        SetPlayerPos(giveplayerid, a+2, b, c);
        interx = GetPlayerInterior(playerid);
        SetPlayerInterior(giveplayerid, interx);
        format(str, 140, \"%s lerakott maga mellé.\", AdminName(playerid));
        SendClientMessage(giveplayerid, COLOR_RED, str);
        return 1;
}
 
CMD:goto(playerid, params[])
{
        if(GetPVarInt(playerid, \"Admins\") > 3) return SendClientMessage(playerid, COLOR_RED, \"Nincs jogosultságod a parancs használatához!\");
        if(sscanf(params, \"u\", giveplayerid)) return SendClientMessage(playerid, -1, \"Használat: /goto [játékos]\");
        if(aszoli[playerid] == false) return SendClientMessage(playerid, COLOR_RED , \"Admin szolgálatban kell lenned!\");
    if(!IsPlayerConnected(giveplayerid)) return SendClientMessage(playerid, COLOR_RED, \"A játékos nem elérhetõ!\");
        new Float:a, Float:b, Float:c, interx;
        GetPlayerPos(giveplayerid, a,b,c);
        SetPlayerPos(playerid, a+2, b, c);
        interx = GetPlayerInterior(giveplayerid);
        SetPlayerInterior(playerid, interx);
        format(str, 140, \"%s Melléd teleportált!\", AdminName(playerid));
        SendClientMessage(giveplayerid, COLOR_RED, str);
        return 1;
}
CMD:apay(playerid, params[])
{
        new osszeg;
    if(GetPVarInt(playerid, \"Admins\") > 5) return SendClientMessage(playerid, COLOR_RED, \"Nincs jogosultságod a parancs használatához!\");
        if(sscanf(params, \"u\", giveplayerid, osszeg)) return SendClientMessage(playerid, -1, \"Használat: /apay [JátékosID] [Összeg]\");
        if(aszoli[playerid] == false) return SendClientMessage(playerid, COLOR_RED , \"Admin szolgálatban kell lenned!\");
    if(!IsPlayerConnected(giveplayerid)) return SendClientMessage(playerid, COLOR_RED, \"A játékos nem elérhetõ!\");
    if(playerid == giveplayerid) return SendClientMessage(playerid, COLOR_RED, \"Nana! Ne élj vissza az adminnal!\");
    GivePlayerMoney(giveplayerid, osszeg);
    format(str, 140, \"%s admin pénzt adott neked!\", AdminName(playerid));
        SendClientMessage(giveplayerid, COLOR_LBLUE, str);
        format(str, 140, \"Pénzt (%s $-t) adtál %s nak!\", osszeg, AdminName(playerid));
        SendClientMessage(giveplayerid, COLOR_LBLUE, str);
        return 1;
}
 
CMD:tvon(playerid, params[])
{
    if(GetPVarInt(playerid, \"Admins\") > 0) return SendClientMessage(playerid, COLOR_RED, \"Nincs jogosultságod a parancs használatához!\");
        if(sscanf(params, \"u\", giveplayerid)) return SendClientMessage(playerid, -1, \"Használat: /tvon [JátékosID] \");
        if(aszoli[playerid] == false) return SendClientMessage(playerid, COLOR_RED , \"Admin szolgálatban kell lenned!\");
        if(spec[playerid] == true) return SendClientMessage(playerid, COLOR_RED, \"Már TV-zel valakit!\");
        if(spec[playerid] == false)
        if(!IsPlayerConnected(giveplayerid)) return SendClientMessage(playerid, COLOR_RED, \"A játékos nem elérhetõ!\");
        if(playerid == giveplayerid) return SendClientMessage(playerid, COLOR_RED, \"Magadat nem TV-zheted!\");
        spec[playerid] = true;
        {
        GetPlayerPos(playerid, s_posX, s_posY, s_posZ);
        SetPVarFloat(playerid, \"SpecX\", s_posX);
        SetPVarFloat(playerid, \"SpecY\", s_posY);
        SetPVarFloat(playerid, \"SpecZ\", s_posZ);
        SetPVarInt(playerid, \"Specel\", 1);
        }
        TogglePlayerSpectating(playerid, true);
        if(IsPlayerInAnyVehicle(giveplayerid)) {
        if(GetPlayerInterior(giveplayerid) > 0) SetPlayerInterior(playerid, GetPlayerInterior(giveplayerid));
        if(GetPlayerVirtualWorld(giveplayerid) > 0) SetPlayerVirtualWorld(playerid, GetPlayerVirtualWorld(giveplayerid));
        PlayerSpectateVehicle(playerid, GetPlayerVehicleID(giveplayerid));
        }
        else
        {
        if(GetPlayerInterior(giveplayerid) > 0) SetPlayerInterior(playerid, GetPlayerInterior(giveplayerid));
        if(GetPlayerVirtualWorld(giveplayerid) > 0) SetPlayerVirtualWorld(playerid, GetPlayerVirtualWorld(giveplayerid));
        PlayerSpectatePlayer(playerid, giveplayerid);
        }
        PlayerSpectatePlayer(playerid, giveplayerid);
        SetPlayerInterior(playerid, GetPlayerInterior(giveplayerid));
        gSpectateID[playerid] = giveplayerid;
        gSpectateType[playerid] = ADMIN_SPEC_TYPE_PLAYER;
        return 1;
}
 
CMD:tvoff(playerid, params[])
{
    if(GetPVarInt(playerid, \"Admins\") > 0) return SendClientMessage(playerid, COLOR_RED, \"Nincs jogosultságod a parancs használatához!\");
    if(spec[playerid] == false) return SendClientMessage(playerid, COLOR_RED, \"Nem TV-zel senkit sem.\");
        else
        {
        if(spec[playerid] == true)
        TogglePlayerSpectating(playerid, 0);
        gSpectateID[playerid] = INVALID_PLAYER_ID;
        gSpectateType[playerid] = ADMIN_SPEC_TYPE_NONE;
        SetPlayerPos(playerid, GetPVarFloat(playerid, \"SpecX\"), GetPVarFloat(playerid, \"SpecY\"), GetPVarFloat(playerid, \"SpecZ\"));
        spec[playerid] = false;
        return 1;
        }
}
CMD:heal(playerid, params[])
{
    if(GetPVarInt(playerid, \"Admins\") > 2) return SendClientMessage(playerid, COLOR_RED, \"Nincs jogosultságod a parancs használatához!\");
    if(sscanf(params, \"u\", giveplayerid)) return SendClientMessage(playerid, -1, \"Használat: /heal [JátékosID] \");
        if(aszoli[playerid] == false) return SendClientMessage(playerid, COLOR_RED , \"Admin szolgálatban kell lenned!\");
        if(!IsPlayerConnected(giveplayerid)) return SendClientMessage(playerid, COLOR_RED, \"A játékos nem elérhetõ!\");
        SetPlayerHealth(giveplayerid, 100);
        format(str, 140, \"%s Feltöltötte az életed\", AdminName(playerid));
        SendClientMessage(giveplayerid, COLOR_LBLUE, str);
        format(str, 140, \"Feltöltötted az életét%s nak\", PlayerName(giveplayerid));
        SendClientMessage(playerid, COLOR_LBLUE, str);
    return 1;
}
 
CMD:apm(playerid, params[])
{
        new pm[128];
    if(GetPVarInt(playerid, \"Admins\") > 0) return SendClientMessage(playerid, COLOR_RED, \"Nincs jogosultságod a parancs használatához!\");
    if(sscanf(params, \"u\", giveplayerid, pm)) return SendClientMessage(playerid, -1, \"Használat: /apm [JátékosID] [Üzeneted] \");
    if(!IsPlayerConnected(giveplayerid)) return SendClientMessage(playerid, COLOR_RED, \"A játékos nem elérhetõ!\");
        SendClientMessage(giveplayerid, COLOR_LBLUE, \"Admin üzenetet kaptál!\");
        format(str, 140, \"%s : %s\", AdminName(playerid), pm);
        SendClientMessage(giveplayerid, COLOR_LBLUE, str);
        format(str, 140, \"Üzeneted %s nak: %s\", PlayerName(giveplayerid), pm);
        SendClientMessage(playerid, COLOR_LBLUE, str);
        return 1;
}
CMD:amute(playerid, params[])
{
        new ok[128];
    if(GetPVarInt(playerid, \"Admins\") > 2) return SendClientMessage(playerid, COLOR_RED, \"Nincs jogosultságod a parancs használatához!\");
    if(sscanf(params, \"u\", giveplayerid, ok)) return SendClientMessage(playerid, -1, \"Használat: /amute [JátékosID] [Ok] \");
    if(playerid == giveplayerid) return SendClientMessage(playerid, COLOR_RED, \"Magadat miért akarod némítani?\");
    if(!IsPlayerConnected(giveplayerid)) return SendClientMessage(playerid, COLOR_RED, \"A játékos nem elérhetõ!\");
    if(mute[giveplayerid] == true) return SendClientMessage(playerid, COLOR_LBLUE, \"A játékos már némítva van.\");
    spec[playerid] = true;
    format(str, 140, \"%s Elnémított. Oka:\", AdminName(playerid), ok);
        SendClientMessage(giveplayerid, COLOR_LBLUE, str);
        format(str, 140, \"Elnémítottad %s -t Oka: %s\", PlayerName(giveplayerid), ok);
        SendClientMessage(playerid, COLOR_LBLUE, str);
        return 1;
}
CMD:aunmute(playerid, params[])
{
    if(GetPVarInt(playerid, \"Admins\") > 2) return SendClientMessage(playerid, COLOR_RED, \"Nincs jogosultságod a parancs használatához!\");
    if(sscanf(params, \"u\", giveplayerid)) return SendClientMessage(playerid, -1, \"Használat: /aunmute [JátékosID]\");
    if(!IsPlayerConnected(giveplayerid)) return SendClientMessage(playerid, COLOR_RED, \"A játékos nem elérhetõ!\");
    if(mute[giveplayerid] == false) return SendClientMessage(playerid, COLOR_LBLUE, \"Ez a játékos nincs némítva!\");
    spec[playerid] = false;
    format(str, 140, \"%s Levette a némításod!\", AdminName(playerid));
        SendClientMessage(giveplayerid, COLOR_LBLUE, str);
        format(str, 140, \"Levetted a némítását %s -nak\", PlayerName(giveplayerid));
        SendClientMessage(playerid, COLOR_LBLUE, str);
        return 1;
}
CMD:ajail(playerid, params[])
{
        new ido,
                ok[128];
    if(GetPVarInt(playerid, \"Admins\") > 3) return SendClientMessage(playerid, COLOR_RED, \"Nincs jogosultságod a parancs használatához!\");
    if(sscanf(params, \"uii\", giveplayerid, ido, ok)) return SendClientMessage(playerid, -1, \"Használat: /ajail [JátékosID][idõ(mp)] [Ok]\");
        if(aszoli[playerid] == false) return SendClientMessage(playerid, COLOR_RED , \"Admin szolgálatban kell lenned!\");
        if(!IsPlayerConnected(giveplayerid)) return SendClientMessage(playerid, COLOR_RED, \"A játékos nem elérhetõ!\");
        SetPlayerPos(giveplayerid, 0, -0, 0);
        SetPVarInt(giveplayerid, \"Ajail\", ido);
        format(str, 140, \" %s már a kellemes AdminBörtön büntetését tölti %d másodpercre, %s által, Oka: >>> \", PlayerName(giveplayerid), ido, PlayerName(playerid), ok);
        SendClientMessageToAll(-1, str);
        return 1;
}
CMD:freeez(playerid, params[])
{
    if(GetPVarInt(playerid, \"Admins\") > 2 ) return SendClientMessage(playerid, COLOR_RED, \"Nem használhatod a parancsot!\");
    if(sscanf(params, \"u\", giveplayerid)) return SendClientMessage(playerid, -1, \"Használat: /freez [játékos]\");
    if(aszoli[playerid] == false) return SendClientMessage(playerid, COLOR_RED , \"Admin szolgálatban kell lenned!\");
    else
    if(aszoli[playerid] == true)
    if(!IsPlayerConnected(giveplayerid)) return SendClientMessage(playerid, COLOR_RED, \"A játékos nem elérhetõ!\");
    TogglePlayerControllable(giveplayerid, 0);
    format(str, 140, \"%s lefagyasztott.\", AdminName(playerid));
        SendClientMessage(giveplayerid, COLOR_RED, str);
    format(str, 140, \"%s-t lefagyasztottad.\", PlayerName(giveplayerid));
        SendClientMessage(playerid, COLOR_RED, str);
        return 1;
}
 
CMD:unfreeze(playerid, params[])
{
    if(GetPVarInt(playerid, \"Admin\") > 2 ) return SendClientMessage(playerid, COLOR_RED, \"Nem használhatod a parancsot!\");
    if(sscanf(params, \"u\", giveplayerid)) return SendClientMessage(playerid, -1, \"Használat: /unfreeze [játékos]\");
    if(aszoli[playerid] == false) return SendClientMessage(playerid, COLOR_RED , \"Admin szolgálatban kell lenned!\");
    else
    if(aszoli[playerid] == true)
    if(!IsPlayerConnected(giveplayerid)) return SendClientMessage(playerid, COLOR_RED, \"A játékos nem elérhetõ!\");
    TogglePlayerControllable(giveplayerid, 1);
    format(str, 140, \"%s Felolvasztott!.\", AdminName(playerid));
        SendClientMessage(giveplayerid, -1, str);
    format(str, 140, \"%s-t Felolvasztottad.\", PlayerName(giveplayerid));
        SendClientMessage(playerid, -1, str);
        return 1;
}
 
stock PlayerName(playerid) {
   new pname[MAX_PLAYER_NAME];
   GetPlayerName(playerid, pname, MAX_PLAYER_NAME);
   return pname;
}
stock AdminName(playerid) {
        new aname[MAX_PLAYER_NAME];
        GetPVarString(playerid, \"AdminName\", aname, 20);
        return aname;
}
stock IsValidName(playerid) {
    if(IsPlayerConnected(playerid)) {
        new player[24];
        GetPlayerName(playerid,player,24);
        for(new n = 0; n < strlen(player); n++) {
            if (player[n] == \'_\' && player[n+1] >= \'A\' && player[n+1] <= \'Z\') return 1;
            if (player[n] == \']\' || player[n] == \'[\') return 0;
        }
    }
    return 0;
}
// Fl0rian: dini
stock playerFile( playerid )
{
        new pFile[ 30 + 1 ];
        format( pFile, (30), \"%s.ini\", PlayerName(playerid) );
        return pFile;
}
stock SavePlayerAdmin( playerid )
{
        if( !dini_Exists(playerFile(playerid)) ) dini_Create( playerFile(playerid) );
        dini_IntSet( playerFile(playerid), \"aLevel\", GetPVarInt(playerid, \"Admins\") );
        return 1;
}
stock LoadPlayerAdmin( playerid )
{
        SetPVarInt( playerid, \"Admins\", dini_Int(playerFile(playerid), \"aLevel\") );
        return 1;
}
/// -------->R O L E P L A Y , A D M I N \' S Y S T E M \' V.1.0<-------- ///
Cím: RADMIN ( Role\'s admin system )
Írta: Dante Sanders - 2012. október 29. - 05:49:56
Most neked azt mondom hogy szép +!  :D  ;)
Cím: RADMIN ( Role\'s admin system )
Írta: CANNONN - 2012. október 29. - 10:29:48
Király lett! Csak a parancsok nevei kicsit furcsák. :D
Ja és találtam egy elírást.
A / apay parancsnál ezt írja ki.
 
Használat: /goto[/quote]
Cím: RADMIN ( Role\'s admin system )
Írta: bendor - 2012. október 29. - 10:41:51 
stock PlayerName(playerid) {
   new pname[MAX_PLAYER_NAME];
   GetPlayerName(playerid, pname, MAX_PLAYER_NAME);
   return pname;
}
stock AdminName(playerid) {
        new aname[MAX_PLAYER_NAME];
        GetPlayerName(playerid, aname, MAX_PLAYER_NAME);
        return aname;
}

 
Ugyan azt csinálják,miért nem elég az egyik?
Egyébként nem lett rossz.
Cím: RADMIN ( Role\'s admin system )
Írta: RolePlay - 2012. október 29. - 11:03:49
Köszi :)
Elírások lehetnek mert este csináltam meg Copy and Paste.... :)
Az 1ik AdminName a másik PlayerName
Bár nem rég keltem fel, de mindjárt átnyálazom a dolgokat benne :D
Cím: RADMIN ( Role\'s admin system )
Írta: bendor - 2012. október 29. - 11:36:31
Idézetet írta: RolePlay date=1351505029\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"29163\" data-ipsquote-contentclass=\"forums_Topic
Az 1ik AdminName a másik PlayerName
 
Azt értem,de a PlayerName-el ugyanúgy le tudod kérdezni az Admin nevét,mert ugyan az fut le mindkettõbe :D
Cím: RADMIN ( Role\'s admin system )
Írta: RolePlay - 2012. október 29. - 11:38:07
Na akk azt is javítani kell :D Köszi az észrevételt :D
Cím: RADMIN ( Role\'s admin system )
Írta: TengeriMalac - 2012. október 29. - 11:51:23
Idézetet írta: Bendor date=1351506991\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"29163\" data-ipsquote-contentclass=\"forums_Topic


Az 1ik AdminName a másik PlayerName
 
Azt értem,de a PlayerName-el ugyanúgy le tudod kérdezni az Admin nevét,mert ugyan az fut le mindkettõbe :D
 
[/quote]
valahogy így.. szoval felesleges a kettõ
PlayerName(eggyik), PlayerName(másik)

majdnem leugattalak, hogy \'hé ez nem ment semmit\', de kis olvasgatás után rájöttem, hogy tovább fogod írni. hajrá. :D
Cím: RADMIN ( Role\'s admin system )
Írta: N@rbirock - 2012. október 29. - 17:35:59
Így gondoltad?
 

stock AdminName(playerid) {
if(GetPVarInt(playerid, \"Admins\") < 1)
{
        new aname[MAX_PLAYER_NAME];
        GetPlayerName(playerid, aname, MAX_PLAYER_NAME);
}
        return aname;
}
Cím: RADMIN ( Role\'s admin system )
Írta: bendor - 2012. október 29. - 17:53:26
Idézetet írta: N@rbirock date=1351528559\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"29163\" data-ipsquote-contentclass=\"forums_Topic
Így gondoltad?
 

stock AdminName(playerid) {
if(GetPVarInt(playerid, \"Admins\") < 1)
{
        new aname[MAX_PLAYER_NAME];
        GetPlayerName(playerid, aname, MAX_PLAYER_NAME);
}
        return aname;
}

 

Ez is hülyeség,mert csak akkor ad értéket ha az \"Admin\" Player Variable kisebb,mint 1.
Szerintem valahogy így gondolta:
 
stock AdminNames()
{
new names;
for(new i = 0; i < MAX_PLAYERS; i++)
{
if(GetPVarInt(i,\"Admin\") >= 1)
    {
        if(!IsPlayerConnected(i) || IsPlayerNPC(i)) continue;
            GetPlayerName(i,names,sizeof(names);
}}
return 1;
}
Cím: RADMIN ( Role\'s admin system )
Írta: zeteni - 2012. október 29. - 18:00:21
Gratulálok! Kezdõként ez nagyon szép munka!
Cím: RADMIN ( Role\'s admin system )
Írta: Cappsy - 2012. október 29. - 18:26:39
:D
Én már névellenõrzõt ajánlanám hogy beletedd....Sõt még a tiltott név sem lenne rossz
Cím: RADMIN ( Role\'s admin system )
Írta: Sheet - 2012. október 30. - 01:09:22
/me fogja a fejét
Letagadlak role.
Sírok
 
if(aszoli[playerid] == false) return SendClientMessage(playerid, COLOR_RED , \"Admin szolgálatban kell lenned!\");
    else
    {
    if(aszoli[playerid] == true)
Cím: RADMIN ( Role\'s admin system )
Írta: bendor - 2012. október 30. - 09:08:08
Belenéztem egy picit jobban,elég sok logikai hiba van benne.
Minden parancsban
[pawn]if(GetPVarInt(playerid, \"Admins\") < 1)[/pawn]
Eféleképpen kérdezed le a játékos szintjét. Ez lekéri a játékos \"Admin\" változóba mentett szintjét,és ha kevesebb,mint 1 akkor engedélyezi.
Helyes használat:
[pawn]if(GetPVarInt(playerid, \"Admins\") >= 1)[/pawn]
Cím: RADMIN ( Role\'s admin system )
Írta: RolePlay - 2012. október 30. - 11:10:15
Öhm, az a 2 hiba Star hibája! :D õ mondta, hogy úgy csináljam XD Estére ezek javítva lesznek :D
Cím: RADMIN ( Role\'s admin system )
Írta: Zancu - 2012. október 30. - 18:31:09
Grat nagyon jó kis rendszer.Egy hiba.Vagy lehet nem hiba de beléptem rcon-ba és nem tudtam magamnak admin-t adni.Ezt létszi mond el hogy adjak magamnak admin-t
Cím: RADMIN ( Role\'s admin system )
Írta: Kovacs_Bela - 2012. október 31. - 00:54:52
Idézetet írta: Zancu date=1351618269\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"29163\" data-ipsquote-contentclass=\"forums_Topic
Grat nagyon jó kis rendszer.Egy hiba.Vagy lehet nem hiba de beléptem rcon-ba és nem tudtam magamnak admin-t adni.Ezt létszi mond el hogy adjak magamnak admin-t
 
XDXDXDDD
jó csak sz*r nem használható.
a módban nem találtam: admin mentést, és olyan parancsot amivel rconnal ki lehet nevezni magadat adminná xDD
Cím: RADMIN ( Role\'s admin system )
Írta: bendor - 2012. október 31. - 08:15:08
Idézetet írta: danix99 date=1351641292\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"29163\" data-ipsquote-contentclass=\"forums_Topic
a módban nem találtam: admin mentést, és olyan parancsot amivel rconnal ki lehet nevezni magadat adminná xDD
 

kezdõ vagyok
 
[/quote]
Cím: RADMIN ( Role\'s admin system )
Írta: zeteni - 2012. október 31. - 16:39:24
Idézetet írta: danix99 date=1351641292\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"29163\" data-ipsquote-contentclass=\"forums_Topic


Grat nagyon jó kis rendszer.Egy hiba.Vagy lehet nem hiba de beléptem rcon-ba és nem tudtam magamnak admin-t adni.Ezt létszi mond el hogy adjak magamnak admin-t
 
XDXDXDDD
jó csak sz*r nem használható.
a módban nem találtam: admin mentést, és olyan parancsot amivel rconnal ki lehet nevezni magadat adminná xDD
 
[/quote]
Szerintem szebben is kifejezhetted volna magadat. Kezdõ korodban biztos nem adminrendszerrel kezdtél.
Cím: RADMIN ( Role\'s admin system )
Írta: RolePlay - 2012. november 13. - 21:48:26
Egyenlõre nem volt idõm vele szarakodni, amint lesz, minden igényt ki fog elégíteni :D
Cím: RADMIN ( Role\'s admin system )
Írta: Kovacs_Bela - 2012. november 18. - 13:37:24
Idézetet írta: zeteni date=1351697964\" data-ipsquote-contentapp=\"forums\" data-ipsquote-contenttype=\"forums\" data-ipsquote-contentid=\"29163\" data-ipsquote-contentclass=\"forums_Topic


 

Grat nagyon jó kis rendszer.Egy hiba.Vagy lehet nem hiba de beléptem rcon-ba és nem tudtam magamnak admin-t adni.Ezt létszi mond el hogy adjak magamnak admin-t
 
XDXDXDDD
jó csak sz*r nem használható.
a módban nem találtam: admin mentést, és olyan parancsot amivel rconnal ki lehet nevezni magadat adminná xDD
 
[/quote]
Szerintem szebben is kifejezhetted volna magadat. Kezdõ korodban biztos nem adminrendszerrel kezdtél.
 
[/quote]
amúgy meg nem sértésbõl mondtam
poénnak szántam,illetve hiba jelentésnek.
csak van pár ember akinek humora egyenlõ a -1 +1-el éshát nem veszik ezeket



\"Sorry-Glitters-29.gif\"
Cím: RADMIN ( Role\'s admin system )
Írta: zeteni - 2012. november 18. - 16:16:17
Ja tényleg ,vicces volt!


Nem
 
Na offot fejezzük be.
Cím: RADMIN ( Role\'s admin system )
Írta: Jippy - 2012. november 19. - 11:24:58
Ha ma hazaérek lefogom tesztelni, itt a suliba nem nagyon tudtam átnézni keményen csak görgõvel gyorsan, de ránézésre jó.
Megy a +  :thumbsup:
Cím: RADMIN ( Role\'s admin system )
Írta: RolePlay - 2012. november 19. - 19:05:58
Felkerült a frissített PWN fájl.
Köszönet Fl0nak és Teninek.
Cím: RADMIN ( Role\'s admin system )
Írta: TengeriMalac - 2012. november 19. - 19:22:26
printf(\"elkúrta ez a redvás buzi a kurva RCON jelszót! E vót az IP-je! : %s És ezt a faszságot írta be! : %s\",ip, password);[/quote]
nagyot csalódtam.
Cím: RADMIN ( Role\'s admin system )
Írta: RolePlay - 2012. november 19. - 19:27:11
Tenii... :D Na a kövi frissítésbe az is javítva lesz XD
Cím: RADMIN ( Role\'s admin system )
Írta: zeteni - 2012. november 19. - 19:44:11
Hello!
Bocsi, csak kicsit túlszórakozott voltam születésnapom alkalmából, de külön felhívtam Role figyelmét, hogy törölje ki belõle, mert csak poénkodtam! Na de mindegy kijavítottam, bocsi, remélem nem lettem nagyon kicsi a szemetekben :D