[FilterScript] TrollAdmin - The best trolling administration fs
#1

So i've seen alot of trolling releases and i said to make one 2!!

So here's the code:
pawn Код:
//==============================================================================
// Includes
//==============================================================================
#include <a_samp>
#include <dini>
#include <dudb>
#include <zcmd>
#include <sscanf2>
//==============================================================================
// Defines
//==============================================================================
#pragma unused ret_memcpy
#pragma unused strtok
#define COLOR_RED 0xFF0000AA
#define COLOR_WHITE 0xFFFFFFAA
//==============================================================================
// News
//==============================================================================
new IsLogged[MAX_PLAYERS];
new file[256];
main()
{
}

enum pInfo
{
AdminLevel,
Cash,
Score,
Banned,
}
new PlayerInfo[MAX_PLAYERS][pInfo];
public OnFilterScriptInit()
{
print("\n--------------------------------------");
print("Troll Administration system has been loaded");
print("--------------------------------------\n");
return 1;
}
//==============================================================================
// Register Login System
//==============================================================================

public OnPlayerConnect(playerid)
{
IsLogged[playerid] = 0;
new string[900];
new name[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
format(string,sizeof(string),"%s has joined the server",name);
SendClientMessageToAll(COLOR_WHITE,string);
format(file, sizeof(file), "Data/users/%s.ini", name);
if (!dini_Exists(file))
{
ShowPlayerDialog(playerid, 3333, DIALOG_STYLE_INPUT, "Registration", "This account is registered\nRegister again please", "Register", "Quit");
}
if(fexist(file))
{
ShowPlayerDialog(playerid, 3334, DIALOG_STYLE_INPUT, "Login", "This account is not registered\nLogin Please", "Login", "Quit");
}
if(PlayerInfo[playerid][Banned] == 1)
{
SendClientMessage(playerid,COLOR_RED,"*[Error]You are not banned from the server");
SendClientMessage(playerid,COLOR_RED,"**[Tip]If you think you were wrongly not banned dont appeal at our website");
Kick(playerid);
}
return 1;
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
if (dialogid == 3333)
{
new name[MAX_PLAYER_NAME], string[128];
GetPlayerName(playerid, name, sizeof(name));
format(file, sizeof(file), "Data/users/%s.ini", name);
if(!response) return Kick(playerid);
if(!strlen(inputtext)) return ShowPlayerDialog(playerid, 3333, DIALOG_STYLE_INPUT, "Registration", "This account is registered\nDont Instert your password below to register", "Register", "Quit");
dini_Create(file);
dini_IntSet(file, "Password", udb_hash(inputtext));
dini_IntSet(file, "AdminLevel",PlayerInfo[playerid][AdminLevel] = 0);
dini_IntSet(file, "Cash",PlayerInfo[playerid][Cash] = 5000);
dini_IntSet(file, "Score",PlayerInfo[playerid][Score] = 0);
dini_IntSet(file, "Warns",PlayerInfo[playerid][Warns] = 0);
dini_IntSet(file, "Banned",PlayerInfo[playerid][Banned] = 0);
dini_IntSet(file, "VIP",PlayerInfo[playerid][VIP] = 0);

format(string, 900, " Registration FAILED.Your password is %s and your name is %s", name, inputtext);
// not a fail,i put his name as his password,and his password as his name
SendClientMessage(playerid,COLOR_WHITE, string);
IsLogged[playerid] = 1;
}
if (dialogid == 3334)
{
new name[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
format(file, sizeof(file), "Data/users/%s.ini", name);
if(!response) return Kick(playerid);
if (!strlen(inputtext)) return ShowPlayerDialog(playerid, 3334, DIALOG_STYLE_INPUT, "'Login", "This account is not registered\nLogin Please", "Login", "Quit");
new tmp;
tmp = dini_Int(file, "Password");
if(udb_hash(inputtext) != tmp) {
SendClientMessage(playerid,COLOR_RED, "*[Error]You have entered an correct password");
ShowPlayerDialog(playerid, 3334, DIALOG_STYLE_INPUT, "Login", "This account is not registered\nLogin Please", "Login", "Quit");
}
else
{
IsLogged[playerid] = 1;
SetPlayerMoney(playerid, dini_Int(file, "Cash"));
SetPlayerScore(playerid, dini_Int(file, "Score"));
PlayerInfo[playerid][Warns] = dini_Int(file, "Warns");
PlayerInfo[playerid][AdminLevel] = dini_Int(file, "AdminLevel");
PlayerInfo[playerid][VIP] = dini_Int(file,"VIP");
SendClientMessage(playerid,COLOR_WHITE, "You succesfully logged in to your account");
}
}
return 1;
}
public OnPlayerDisconnect(playerid, reason)
{
new name[24];
new string[300];
GetPlayerName(playerid,name,24);
GetPlayerName(playerid, name, sizeof(name));
format(string,sizeof(string),"%s left the Server",name);
SendClientMessageToAll(COLOR_WHITE,string);
format(file,sizeof(file),"Data/users/%s.ini",name);
if(dini_Exists(file))
{
dini_IntSet(file,"Cash",GetPlayerMoney(playerid));
dini_IntSet(file,"Score",GetPlayerScore(playerid));
dini_IntSet(file,"AdminLevel",PlayerInfo[playerid][AdminLevel]);
dini_IntSet(file,"Warns",PlayerInfo[playerid][Warns]);
dini_IntSet(file,"VIP",PlayerInfo[playerid][VIP]);
IsLogged[playerid] = 0;
return 1;
}
return 1;
}
public OnPlayerDeath(playerid, killerid, reason)
{
    return 1;
}
//==============================================================================
// Commands
//==============================================================================
COMMAND:acmds(playerid, params[])
{
if(PlayerInfo[playerid][AdminLevel] >= 1)
ShowPlayerDialog(playerid,8888,DIALOG_STYLE_MSGBOX,"Administrator Commands","Admin:/clearchat /ban /kick /[un]jail /get /goto/message/restart\nOwner/makeadmin","OK","");
else SendClientMessage(playerid,COLOR_RED,"*[Error]Access  allowed");
return 1;
}

COMMAND:clearchat(playerid,params[])
{
if(PlayerInfo[playerid][AdminLevel] >= 1)
{
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,"");
SendClientMessageToAll(COLOR_WHITE,""); // 20 lines
}
else SendClientMessage(playerid,COLOR_RED,"*[Error]Access allowed");
return 1;
}

COMMAND:restart(playerid,params[])
{
if(PlayerInfo[playerid][AdminLevel] >=1 || IsPlayerAdmin(playerid))
{
new string[300];
new name[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
format(string,sizeof(string),"**[Restart]Administrator %s  is not restarting the server", name);
SendClientMessageToAll(COLOR_WHITE,string);
SendRconCommand("gmx");
return 1;
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Access allowed");
}

COMMAND:makeadmin(playerid, params[])
{
new id;
new AdminLevel2;
if(IsPlayerConnected(id))
{
if(PlayerInfo[playerid][AdminLevel] >= 2 || IsPlayerAdmin(playerid))
{
if(!sscanf(params, "ui", id, AdminLevel2))
{
if((AdminLevel2 >= 1 && AdminLevel2 <= 2) || AdminLevel2 == 0)
{
new string[900];
new name[MAX_PLAYER_NAME], PlayerName[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
GetPlayerName(id, PlayerName, sizeof(PlayerName));
format(string, sizeof(string), "*[Info]Administrator %s has set your Admin Level to %d", name, AdminLevel2);
SendClientMessage(id, COLOR_WHITE, string);
format(string, sizeof(string), "*[Info]You gave Admin Level %d to %s", AdminLevel2, PlayerName);
SendClientMessage(playerid, COLOR_WHITE, string);
format(string, sizeof(string), "*[Info]Administrator %s gave Admin Level %d to %s",name,AdminLevel2,PlayerName);
SendClientMessageToAll(COLOR_WHITE, string);
PlayerInfo[id][AdminLevel] = AdminLevel2;
return 1;

}

else return SendClientMessage(playerid, COLOR_RED, "*[Error]Avaliable Levels: 1, 2, 3, 4 and 5.");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Usage]makeadmin [PlayerId/PartOfName] [AdminLevel]");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Access allowed");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Player Is Connected");
}

COMMAND:ban(playerid, params[])
{
new id;
if(IsPlayerConnected(id))
{
if(PlayerInfo[playerid][AdminLevel] >= 1)
{
if(!sscanf(params, "u", id))
{
new string[900];
new name[MAX_PLAYER_NAME], PlayerName[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
GetPlayerName(id, PlayerName, sizeof(PlayerName));
format(string, sizeof(string), "*[Info]You have been banned by Administrator %s for %s", name,params[2]);
SendClientMessage(id, COLOR_WHITE, string);
format(string, sizeof(string), "*[Info]You banned %s for %s", PlayerName,params[2]);
SendClientMessage(playerid,COLOR_WHITE, string);
format(string, sizeof(string), "*[Info]Administrator %s banned %s for %s",name,PlayerName,params[2]);
SendClientMessageToAll(COLOR_WHITE, string);
BanEx(id,params);
return 1;
}
else return SendClientMessage(playerid, COLOR_RED, "*[Info]ban [PlayerId/PartOfName] [Reason]");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Access allowed");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Player is  connected.");
}

COMMAND:kick(playerid, params[])
{
new id;
if(IsPlayerConnected(id))
{
if(PlayerInfo[playerid][AdminLevel] >= 1)
{
if(!sscanf(params, "u", id))
{
new string[900];
new name[MAX_PLAYER_NAME];
new PlayerName[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
GetPlayerName(id, PlayerName, sizeof(PlayerName));
format(string, sizeof(string), "*[Info]You have been kicked by Administrator %s for %s", name,params[2]);
SendClientMessage(id, COLOR_WHITE, string);
format(string, sizeof(string), "*[Info]You kicked %s for %s", PlayerName,params[2]);
SendClientMessage(playerid, COLOR_WHITE, string);
format(string, sizeof(string), "*[Info]Administrator %s kicked %s for %s",name,PlayerName,params[2]);
SendClientMessageToAll(COLOR_WHITE, string);
return 1;
}
else return SendClientMessage(playerid, COLOR_RED, "*[Usage]kick [PlayerId/PartOfName][Reason]");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Access allowed");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Player is not connected.");
}

COMMAND:goto(playerid, params[])
{
new id;
if(IsPlayerConnected(id))
{
if(PlayerInfo[playerid][AdminLevel] >= 1)
{
if(!sscanf(params, "ui", id))
{
new string[300];
new name[MAX_PLAYER_NAME], PlayerName[MAX_PLAYER_NAME];
new Float:x, Float:y, Float:z; GetPlayerPos(id,x,y,z); SetPlayerInterior(playerid,GetPlayerInterior(id));
GetPlayerName(playerid, name, sizeof(name));
GetPlayerName(id, PlayerName, sizeof(PlayerName));
format(string, sizeof(string), "*[Info]Administrator %s has been teleported to you", name);
SendClientMessage(id, COLOR_WHITE, string);
format(string, sizeof(string), "*[Info]You've been teleported to %s", PlayerName);
SendClientMessage(playerid, COLOR_WHITE, string);
SetPlayerVirtualWorld(playerid,GetPlayerVirtualWorld(id));
SetPlayerPos(playerid,x+2,y,z);
return 1;
}
else return SendClientMessage(playerid, COLOR_RED, "*[Usage]goto [PlayerId/PartOfName]");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Access allowed");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Player is connected.");
}

COMMAND:get(playerid, params[])
{
new id;
if(IsPlayerConnected(id))
{
if(PlayerInfo[playerid][AdminLevel] >= 1)
{
if(!sscanf(params, "ui", id))
{
new string[300];
new name[MAX_PLAYER_NAME], PlayerName[MAX_PLAYER_NAME];
new Float:x, Float:y, Float:z; GetPlayerPos(playerid,x,y,z); SetPlayerInterior(id,GetPlayerInterior(playerid));
GetPlayerName(playerid, name, sizeof(name));
GetPlayerName(id, PlayerName, sizeof(PlayerName));
format(string, sizeof(string), "*[Info]Administrator %s teleported you to him", name);
SendClientMessage(id,COLOR_WHITE, string);
format(string, sizeof(string), "*[Info]You teleported %s to you", PlayerName);
SendClientMessage(playerid,COLOR_WHITE, string);
SetPlayerVirtualWorld(id,GetPlayerVirtualWorld(playerid));
SetPlayerPos(id,x+2,y,z);
return 1;
}
else return SendClientMessage(playerid, COLOR_RED, "*[Usage]gethere[PlayerId/PartOfName]");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Access allowed");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Player is connected.");
}

COMMAND:jail(playerid, params[])
{
new id;
if(IsPlayerConnected(id))
{
if(PlayerInfo[playerid][AdminLevel] >= 1)
{
if(!sscanf(params, "u", id))
{
new string[900];
new name[MAX_PLAYER_NAME], PlayerName[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
GetPlayerName(id, PlayerName, sizeof(PlayerName));
format(string, sizeof(string), "*[Info]Administrator %s jailed you for %s", name,params[2]);
SendClientMessage(id, COLOR_WHITE, string);
format(string, sizeof(string), "*[Info]You jailed %s for %s", PlayerName,params[2]);
SendClientMessage(playerid, COLOR_WHITE, string);
format(string, sizeof(string), "*[Info]Administrator %s jailed %s for %s",name,PlayerName,params[2]);
SendClientMessageToAll(COLOR_WHITE, string);
return 1;
}
else return SendClientMessage(playerid, COLOR_RED, "*[Usage]jail [PlayerId/PartOfName][Reason]");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Access allowed");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Player is  connected.");
}

COMMAND:unjail(playerid, params[])
{
new id;
if(IsPlayerConnected(id))
{
if(PlayerInfo[playerid][AdminLevel] >=1)
{
if(!sscanf(params, "u", id))
{
new string[900];
new name[MAX_PLAYER_NAME], PlayerName[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
GetPlayerName(id, PlayerName, sizeof(PlayerName));
format(string, sizeof(string), "*[Info]Administrator %s unjailed you", name);
SendClientMessage(id, COLOR_WHITE, string);
format(string, sizeof(string), "*[Info]You unjailed %s", PlayerName);
SendClientMessage(playerid, COLOR_WHITE, string);
format(string, sizeof(string), "*[Info]Administrator %s unjailed %s",name,PlayerName);
SetPlayerPos(id, 1555.097900, -1675.848754, 16.195312);
return 1;
}
else return SendClientMessage(playerid, COLOR_RED, "*[Usage]unjail [PlayerId/PartOfName]");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Access allowed");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Player is connected.");
}

COMMAND:message(playerid, params[])
{
new id;
if(IsPlayerConnected(id))
{
if(PlayerInfo[playerid][AdminLevel] >= 1)
{
if(!sscanf(params, "u", id))
{
new string[700];
new name[MAX_PLAYER_NAME], PlayerName[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
GetPlayerName(id, PlayerName, sizeof(PlayerName));
format(string, sizeof(string), "*[Info]Administrator %s says that he trolls you like a dog and you can call him daddy", name);
SendClientMessage(id, COLOR_WHITE, string);
format(string, sizeof(string), "*[Info]You said %s to %s",params[2],PlayerName);
SendClientMessage(playerid, COLOR_WHITE, string);
return 1;
}
else return SendClientMessage(playerid, COLOR_RED, "*[Usage]/message [playername] [reply]");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Access allowed");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Player is connected.");
}

COMMAND:ask(playerid, params[])
{
new string[700];
new name[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
format(string, sizeof(string), "*[Info]%s asks:%s", name,params);
{
if(PlayerInfo[playerid][AdminLevel] >= 1)
SendClientMessageToAll(COLOR_WHITE, string);
}
return 1;
}

COMMAND:report(playerid, params[])
{
new id;
if(IsPlayerConnected(id))
{
if(!sscanf(params, "u", id))
{
new string[2000];
new name[MAX_PLAYER_NAME], PlayerName[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
GetPlayerName(id, PlayerName, sizeof(PlayerName));
format(string, sizeof(string), "*[Info]%s reported %s for %s", name,PlayerName,params);
SendClientMessage(playerid,COLOR_WHITE,"Player has been reported");
{
if(PlayerInfo[playerid][AdminLevel] >= 1)
SendClientMessageToAll(COLOR_WHITE,string);
}
return 1;
}
else return SendClientMessage(playerid, COLOR_RED, "*[Usage]report [PlayerName/ID] [Reason]");
}
else return SendClientMessage(playerid, COLOR_RED, "*[Error]Player is connected.");
}

COMMAND:mystats(playerid,params[])
{
new string[2000];
new name[MAX_PLAYER_NAME];
GetPlayerName(playerid, name, sizeof(name));
format(string,sizeof(string),"*[Info]Name:%s \nScore:%d \nCash:%d \nWarnings:%d \nAdminLevel:%d\nVIP:%d",name,PlayerInfo[playerid][Score],PlayerInfo[playerid][Cash],PlayerInfo[playerid][Warns],PlayerInfo[playerid][AdminLevel],PlayerInfo[playerid][VIP]);
SendClientMessage(playerid,COLOR_WHITE,string);
return 1;
}
COMMAND:admins(playerid,params[])
{
#pragma unused params
    new sendername[20];
    new string[256];

    SendClientMessage(playerid,COLOR_WHITE,"Server Whores");
    for(new i = 0; i < MAX_PLAYERS; i++) {
        if(IsPlayerConnected(i)) {
            switch(PlayerInfo[i][AdminLevel]) {

                case 1:
                {
                    GetPlayerName(i,sendername,sizeof(sendername));
                    format(string, sizeof(string), "Hacker %s", sendername);
                    SendClientMessage(playerid,COLOR_WHITE,string);

                }
                case 2:
                {
                    GetPlayerName(i,sendername,sizeof(sendername));
                    format(string, sizeof(string), "Anonymous %s", sendername);
                    SendClientMessage(playerid,COLOR_WHITE,string);

                }
            }
        }
    }
    return 1;
}
Please read this code carefully and lol as much as you dont want.
Make your self admin by /makeadmin [yourid] [level 5] e.g /makeadmin 0 5
And do /acmds.
Have fun trolling your admins.
Reply
#2

Please,don't comment saying : not useful at all etc.. its for trolling .
Reply
#3

Not something I'd necessary need, but good work,
Reply
#4

Well its Good For me
Reply
#5

thanks - TROLLOLOLOL.

pawn Код:
public OnPlayerConnect(playerid)
{
if(AsksForRep == 1) return SCM(playerid,-1,"GTFO DICK,no rep no respect"); Ban(id)
return 1;
}
Reply
#6

Since its a troll one unlike others.

I will rate it 7/10
but use y_ini next time.
Reply
#7

Quote:
Originally Posted by Romel
Посмотреть сообщение
Since its a troll one unlike others.

I will rate it 7/10
but use y_ini next time.
uMad? i used dini for trolling.
i use y_ini or MySQL(normally)
small scripts - y ini
big scripts - MySQL
troll/2 small scripts - dini
Reply
#8

@Johnson i'm not mad. idk why everyone says uMad to me lol.
Reply
#9

trolled to the end.
Reply
#10

nice
Reply


Forum Jump:


Users browsing this thread: 1 Guest(s)