OAdmin+Register

//credits: Owen007

//created in free time.

//gtakillerIV for ban/unban offline player

//th for fixing the errors sryeas

// source samp forum and wiki samp

// created for new scripters.

// good luck and happy scripting.

//Includes:
#include <a_samp>
#include <YSI\y_ini>
#include <zcmd>
#include <sscanf2>

//defines:
#define DIALOG_REGISTER 1
#define DIALOG_LOGIN 2
#define DIALOG_SUCCESS_1 3
#define DIALOG_SUCCESS_2 4

#define PATH "OAdmin/Users/%s.ini"

//colors:
#define ORANGE 0xF97804FF
#define BLUE 0x1229FAFF
#define GRAY 0xCECECEFF
#define GREEN 0x21DD00FF
#define red 0xFF0000AA
#define LIGHTBLUE 0x00C2ECFF
#define PURPLE 0xB360FDFF
#define COLOR_RED 0xFF0000FF
#define COLOR_YELLOW 0xFFFF00AA
#define COLOR_ORANGE 0xFF9900AA
#define COL_WHITE "{FFFFFF}"
#define COL_RED "{F81414}"
#define COL_GREEN "{00FF22}"
#define COL_LIGHTBLUE "{00CED1}"
#define ORANGE 0xF97804FF
#define BLUE 0x1229FAFF
#define COL_WHITE "{FFFFFF}"
#define COL_RED "{F81414}"
#define COL_GREEN "{00FF22}"
#define COL_LIGHTBLUE "{00CED1}"
#define COLOR_GRAD1 0xB4B5B7FF
#define COLOR_GRAD2 0xBFC0C2FF
#define COLOR_GRAD3 0xCBCCCEFF
#define COLOR_GRAD4 0xD8D8D8FF
#define COLOR_GRAD5 0xE3E3E3FF
#define COLOR_GRAD6 0xF0F0F0FF
#define COLOR_GREY 0xAFAFAFAA
#define COLOR_GREEN 0x33AA33AA
#define COLOR_RED 0xFF0000FF
#define COLOR_YELLOW 0xFFFF00AA
#define COLOR_WHITE 0xFFFFFFAA
#define COLOR_FADE1 0xE6E6E6E6
#define COLOR_FADE2 0xC8C8C8C8
#define COLOR_FADE3 0xAAAAAAAA
#define COLOR_FADE4 0x8C8C8C8C
#define COLOR_FADE5 0x6E6E6E6E
#define COLOR_PURPLE 0xC2A2DAAA
#define COLOR_DARKBLUE 0x2641FEAA
#define COLOR_ALLDEPT 0xFF8282AA
#define COLOR_ADMIN 0xD2CAAEFF


//fowards:
forward LoadUser_data(playerid,name[],value[]);
forward Unmute(playerid);

//enums:
enum OAInfo
{
    OAPass,
    OACash,
    OAKills,
    OADeaths,
    OAScore,
    OAAdmin,
    OABanned,
    BannedIP[22]
}

//new:
new PInfo[MAX_PLAYERS][OAInfo];
new bool:
muted[MAX_PLAYERS];

public LoadUser_data(playerid,name[],value[])
{
    INI_Int("Password",PInfo[playerid][OAPass]);
    INI_Int("Cash",PInfo[playerid][OACash]);
    INI_Int("Kills",PInfo[playerid][OAKills]);
    INI_Int("Deaths",PInfo[playerid][OADeaths]);
    INI_Int("Score",PInfo[playerid][OAScore]);
    INI_Int("Admin",PInfo[playerid][OAAdmin]);
    INI_Int("Banned",PInfo[playerid][OABanned]);
    return 1;
}

stock UserPath(playerid)
{
    new string[128],playername[MAX_PLAYER_NAME];
    GetPlayerName(playerid,playername,sizeof(playername));
    format(string,sizeof(string),PATH,playername);
    return string;
}

stock udb_hash(buf[]) {
    new length=strlen(buf);
    new s1 = 1;
    new s2 = 0;
    new n;
    for (n=0; n<length; n++)
    {
        s1 = (s1 + buf[n]) % 65521;
        s2 = (s2 + s1)     % 65521;
    }
    return (s2 << 16) + s1;
}

public OnGameModeInit()
{
    SetGameModeText("This server is using OA System by Owen007");
    return 1;
}

public OnGameModeExit()
{
    return 1;
}

public OnPlayerConnect(playerid)
{
    PInfo[playerid][OAScore] = 0;
    if(fexist(UserPath(playerid)))
    {
        INI_ParseFile(UserPath(playerid), "LoadUser_%s", .bExtra = true, .extra = playerid);
        ShowPlayerDialog(playerid, DIALOG_LOGIN, DIALOG_STYLE_PASSWORD,""COL_WHITE"Login",""COL_WHITE"Account already registered enter your password to signin.","Login","Quit");
    }
    else
    {
        ShowPlayerDialog(playerid, DIALOG_REGISTER, DIALOG_STYLE_PASSWORD,""COL_WHITE"Registering...",""COL_WHITE"Register your account at our server database","Register","Quit");
    }
    new pname[MAX_PLAYER_NAME], string[22 + MAX_PLAYER_NAME];
    GetPlayerName(playerid, pname, sizeof(pname));
    format(string, sizeof(string), "%s has joined the server", pname);
    SendClientMessageToAll(GREEN, string);
    return 1;
}

public OnPlayerDisconnect(playerid, reason)
{
	new INI:
    File = INI_Open(UserPath(playerid));
    INI_SetTag(File,"data");
    INI_WriteInt(File,"Cash",GetPlayerMoney(playerid));
    INI_WriteInt(File,"Kills",PInfo[playerid][OAKills]);
    INI_WriteInt(File,"Deaths",PInfo[playerid][OADeaths]);
    INI_WriteInt(File,"Score",GetPlayerScore(playerid));
    INI_WriteInt(File,"Admin",PInfo[playerid][OAAdmin]);
    INI_Close(File);
    return 1;
}


public OnPlayerDeath(playerid, killerid, reason)
{
    PInfo[killerid][OAKills]++;
    PInfo[playerid][OADeaths]++;
    return 1;
}


COMMAND:banoffline(playerid, params[])
{
    new filestring[79];
    if(isnull(params)) return SendClientMessage(playerid, -1, "Correct Usage: /banoflline [Player's Name]");
    format(filestring, sizeof(filestring), "OAdmin/Users/%s.ini", params);
    if(!fexist(filestring)) return SendClientMessage(playerid, -1, "Error: The player name you have chosen was not found in our system.");
    else
    {
		new INI:
        File = INI_Open(filestring);
        INI_SetTag(File, "data");
        INI_WriteInt(File, "Banned", 1);
        INI_Close(File);
        new done[128];
        format(done, sizeof(done), "You have banned %s", params);
        SendClientMessage(playerid,-1 , done);
    }
    return 1;
}

COMMAND:unban(playerid, params[])
{

    if(isnull(params))  return SendClientMessage(playerid,-1,"Correct Usage: /unban [Player Name] ");
    new filestring[79];
    format(filestring, sizeof(filestring), "OAdmin/Users/%s.ini", params);
    if(!fexist(filestring)) return SendClientMessage(playerid,red, "The name you've chosen was not found in our database ");
    else
    {
		new INI:
        File = INI_Open(filestring);
        INI_SetTag(File, "data");
        INI_WriteInt(File, "Banned",0);
        INI_Close(File);
        INI_ParseFile(filestring, "LoadIP_%s", .bExtra = true , .extra = playerid);
        new cmdstring[44];
        format(cmdstring, sizeof(cmdstring), "unbanip %s", PInfo[playerid][BannedIP]);
        SendRconCommand(cmdstring);
        SendRconCommand("reloadbans");
        new done[128];
        format(done, sizeof(done),"You have successfully unbanned %s", params);
        SendClientMessage(playerid, -1,done);
    }
    return 1;
}

COMMAND:stats(playerid, params[])
{
    new money = PInfo[playerid][OACash];
    new deaths = PInfo[playerid][OADeaths];
    new kills = PInfo[playerid][OAKills];
    new score = PInfo[playerid][OAScore];
    new admin = PInfo[playerid][OAAdmin];
    new string[500];
    format(string,sizeof(string),"Money: %d | Deaths: %d | Kills: %d | Score: %d | Admin: %d",money,deaths,kills,score,admin);
    SendClientMessage(playerid,GREEN,string);
    return 1;
}

COMMAND:ban(playerid, params[])
{
    new id, reason[50], string[128], banned[MAX_PLAYER_NAME];
    if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid,red,"You are not admin");
    if(sscanf(params, "uz", id, reason)) return SendClientMessage(playerid, -1, "USAGE: /ban [playerid] [reason(optional)]");
    GetPlayerName(id, banned, sizeof(banned));
    format(string, sizeof(string), "Server: %s has been banned by %s. reason: %s", banned, GetName(playerid), reason);
    SendClientMessageToAll(red, string);
    BanEx(id, reason);
    return 1;
}

CMD:mute(playerid, params[])
{
    new targetid, minutes, reason[128], string[128];
    if(!IsPlayerConnected(targetid)) return SendClientMessage(playerid, COLOR_RED, "Player is not connected to the server");
    if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid,red,"You are not admin");
    if(muted[targetid] == true) return SendClientMessage(playerid, COLOR_RED, "Player is already muted");
    if(sscanf(params,"uis[128]", targetid, minutes, reason)) return SendClientMessage(playerid, COLOR_RED, "Mute: /mute (id) (minutes) (reason)");
    format(string, sizeof(string), "Administrator %s muted %s for %d minutes: %s", GetName(playerid),GetName(targetid), minutes, reason);
    SetTimerEx("Unmute", minutes*60000, false, "i", targetid);
    SendClientMessageToAll(COLOR_RED, string);
    muted[targetid] = true;
    return 1;
}

CMD:unmute(playerid, params[])
{
    new targetid, string[128];
    if(!IsPlayerConnected(targetid)) return SendClientMessage(playerid, COLOR_RED, "Player is not connected to the server");
    if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid,red,"You are not admin");
    if(sscanf(params, "u", targetid)) return SendClientMessage(playerid, COLOR_RED, "Cancel player mute: /unmute (id)");
    format(string, sizeof(string), "Your mute has been canceled by administrator %s", GetName(playerid));
    SendClientMessage(targetid, COLOR_RED, string);
    format(string, sizeof(string), "Administrator %s has canceled %s's mute", GetName(playerid), GetName(targetid));
    SendClientMessageToAll(COLOR_RED, string);
    KillTimer(Unmute(playerid));
    muted[targetid] = false;
    return 1;
}

COMMAND:kick(playerid, params[])
{
    if(IsPlayerAdmin(playerid)) {
        if(!strlen(params[6])) {
            return SendClientMessage(playerid, 0xFFAA00AA, "Usage: /kick [targetid]");
        }
        new targetid = strval(params[6]);
        if(IsPlayerConnected(targetid)) {
            new string[128], playername[MAX_PLAYER_NAME], targetname[MAX_PLAYER_NAME];
            GetPlayerName(playerid, playername, MAX_PLAYER_NAME);
            GetPlayerName(targetid, targetname, MAX_PLAYER_NAME);
            format(string, 128, "Admin %s kicked you from the server.", playername);
            SendClientMessage(targetid, 0xFFAA00AA, string);
            Kick(targetid);
            format(string, 128, "Admin %s kicked %s from the server.", playername, targetname);
            SendClientMessageToAll(0xFFAA00AA, string);
        }
        else {
            return SendClientMessage(playerid, 0xFFAA00AA, "That player is not connected.");
        }
    }
    else {
        return SendClientMessage(playerid, 0xFFAA00AA, "Admins only.");
    }
    return 1;
}

stock GetName(playerid)
{
    new
    pName[MAX_PLAYER_NAME];

    GetPlayerName(playerid, pName, MAX_PLAYER_NAME);
    return pName;
}

public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
    switch( dialogid )
    {
    case DIALOG_REGISTER:
    {
        if (!response) return Kick(playerid);
        if(response)
        {
            if(!strlen(inputtext)) return ShowPlayerDialog(playerid, DIALOG_REGISTER, DIALOG_STYLE_PASSWORD, ""COL_WHITE"Registering",""COL_RED"You have entered an invalid password.\n"COL_WHITE"Type your password below to register a new account.","Register","Quit");
            new IP[22];
            GetPlayerIp(playerid, IP, sizeof(IP));
			new INI:
            File = INI_Open(UserPath(playerid));
            INI_SetTag(File,"data");
            INI_WriteInt(File,"Password",udb_hash(inputtext));
            INI_WriteString(File, "Ip", IP);
            INI_WriteInt(File,"Cash",0);
            INI_WriteInt(File,"Kills",0);
            INI_WriteInt(File,"Deaths",0);
            INI_WriteInt(File,"Score",0);
            INI_WriteInt(File,"Admin",0);
            INI_Close(File);

            ShowPlayerDialog(playerid, DIALOG_SUCCESS_1, DIALOG_STYLE_MSGBOX,""COL_WHITE"Success!",""COL_GREEN"Thanks! You are registered at,"COL_LIGHTBLUE"our server have fun around","Ok","");
        }
    }

    case DIALOG_LOGIN:
    {
        if ( !response ) return Kick ( playerid );
        if( response )
        {
            if(udb_hash(inputtext) == PInfo[playerid][OAPass])
            {
                INI_ParseFile(UserPath(playerid), "LoadUser_%s", .bExtra = true, .extra = playerid);
                GivePlayerMoney(playerid, PInfo[playerid][OACash]);
                SetPlayerScore(playerid,PInfo[playerid][OAScore]);
                ShowPlayerDialog(playerid, DIALOG_SUCCESS_2, DIALOG_STYLE_MSGBOX,""COL_WHITE"Success!",""COL_GREEN"You have successfully logged in!","Ok","");
            }
            else
            {
                ShowPlayerDialog(playerid, DIALOG_LOGIN, DIALOG_STYLE_PASSWORD,""COL_WHITE"Login",""COL_RED"You have entered an incorrect password.\n"COL_WHITE"Type your password below to login.","Login","Quit");
            }
            return 1;
        }
    }
    }
    return 1;
}

public OnPlayerRequestClass(playerid, classid)
{
    if(PInfo[playerid][OABanned] == 1)
    {
        Ban(playerid);
    }
    return 1;
}

public Unmute(playerid)
{
    muted[playerid] = false;
    SendClientMessage(playerid, COLOR_RED, "You have been unmuted automatically");
    return 1;
}