#include <a_samp>
#include <zcmd>
#include <sscanf2>
#include <iploc>
#include <YSI\y_ini>

native WP_Hash(buffer[],len,const str[]);

//------------------------PM STUFF------------------
new bool:togglepmon[MAX_PLAYERS];


//------------------- Login & Register System ----------------------
#define DIALOG_REGISTER 1
#define DIALOG_LOGIN 2
#define DIALOG_SUCCESS_1 3
#define DIALOG_SUCCESS_2 4
#define PATH "/Users/%s.ini" //Users Path

//------------------- Login & Register System ----------------------
enum pInfo
{
    pPass,
    pCash,
    pAdmin,
    pKills,
    pDeaths,
    pVip
}
new PlayerInfo[MAX_PLAYERS][pInfo];

forward LoadUser_data(playerid,name[],value[]);
public LoadUser_data(playerid,name[],value[])
{
    INI_Int("Password",PlayerInfo[playerid][pPass]);
    INI_Int("Cash",PlayerInfo[playerid][pCash]);
    INI_Int("Admin",PlayerInfo[playerid][pAdmin]);
    INI_Int("Kills",PlayerInfo[playerid][pKills]);
    INI_Int("Deaths",PlayerInfo[playerid][pDeaths]);
    INI_Int("Vip",PlayerInfo[playerid][pVip]);
    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;
}

main()
{
    print("\n----------------------------------");
    print("->>>>>>>>>>>>>>>>>>>>> Multimod Ver 1.2 Fully Loaded <<<<<<<<<<<<<<<<<<<<<");
    print("----------------------------------\n");
}


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_INPUT, "Registering...","You have entered an invalid password.\nType your password below to register a new account.","Register","Quit");
                new hashpass[129];
                WP_Hash(hashpass,sizeof(hashpass),inputtext);
                new INI:File = INI_Open(UserPath(playerid));
                INI_SetTag(File,"data");
                INI_WriteString(File,"Password",hashpass);
                INI_WriteInt(File,"Cash",0);
                INI_WriteInt(File,"Admin",0);
                INI_WriteInt(File,"Kills",0);
                INI_WriteInt(File,"Deaths",0);
                INI_WriteInt(File,"Vip",0);
                INI_Close(File);

                SetSpawnInfo(playerid, 0, 0, 1958.33, 1343.12, 15.36, 269.15, 0, 0, 0, 0, 0, 0);
                SpawnPlayer(playerid);
            }
        }

        case DIALOG_LOGIN:
        {
            if ( !response ) return Kick ( playerid );
            if( response )
            {
               new hashpass[129];
               WP_Hash(hashpass,sizeof(hashpass),inputtext);
               if(!strcmp(hashpass, PlayerInfo[playerid][pPass], false))
                {
                    INI_ParseFile(UserPath(playerid), "LoadUser_%s", .bExtra = true, .extra = playerid);
                    GivePlayerMoney(playerid, PlayerInfo[playerid][pCash]);
                    ShowPlayerDialog(playerid, DIALOG_SUCCESS_2, DIALOG_STYLE_MSGBOX,"Success!","You have successfully logged in!","Ok","");
                }
                else
                {
                    ShowPlayerDialog(playerid, DIALOG_LOGIN, DIALOG_STYLE_INPUT,"Login","You have entered an incorrect password.\nType your password below to login.","Login","Quit");
                }
                return 1;
            }
        }
    }
    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,"Admin",PlayerInfo[playerid][pAdmin]);
    INI_WriteInt(File,"Kills",PlayerInfo[playerid][pKills]);
    INI_WriteInt(File,"Deaths",PlayerInfo[playerid][pDeaths]);
    INI_WriteInt(File,"Vip",PlayerInfo[playerid][pVip]);
    INI_Close(File);
    return 1;
}




public OnGameModeInit()
{
    // Don't use these lines if it's a filterscript
    SetGameModeText("Multimod Ver1.0");
    AddPlayerClass(0, 1958.3783, 1343.1572, 15.3746, 269.1425, 0, 0, 0, 0, 0, 0);
    return 1;
}

public OnGameModeExit()
{
    return 1;
}

public OnPlayerRequestClass(playerid, classid)
{
    SetPlayerPos(playerid, 1958.3783, 1343.1572, 15.3746);
    SetPlayerCameraPos(playerid, 1958.3783, 1343.1572, 15.3746);
    SetPlayerCameraLookAt(playerid, 1958.3783, 1343.1572, 15.3746);
    return 1;
}

public OnRetrieveIpLocation(playerid, country[])
{
    new szStr[256];
    GetPlayerName(playerid, szStr, MAX_PLAYER_NAME);
    format( szStr, sizeof( szStr ), "[SERVER] {FF6600}%s{FFFFFF}(%i) Has Join The Server From {FFAC75}%s", szStr, playerid, country);
    SendClientMessageToAll( -1, szStr );
    return 1;
}

public OnPlayerConnect(playerid)
{
    if(fexist(UserPath(playerid)))
    {
        INI_ParseFile(UserPath(playerid), "LoadUser_%s", .bExtra = true, .extra = playerid);
        ShowPlayerDialog(playerid, DIALOG_LOGIN, DIALOG_STYLE_INPUT,"Login","Type your password below to login.","Login","Quit");
    }
    else
    {
        ShowPlayerDialog(playerid, DIALOG_REGISTER, DIALOG_STYLE_INPUT,"Registering...","Type your password below to register a new account.","Register","Quit");
    }
    new string[256], pname[MAX_PLAYER_NAME];
    GetPlayerName(playerid, pname, sizeof(pname));
    format( string, sizeof(string), "Welcome To {66CCFF}Cyber {FFFF99}Malaysian {99FF66}Army,  {FF6600}%s{FFFFFF}", pname);
    SendClientMessage(playerid, 0xFFFFFFFF, string);
    return 1;
}

public OnPlayerDeath(playerid, killerid, reason)
{
    PlayerInfo[killerid][pKills]++;
    PlayerInfo[playerid][pDeaths]++;
    return 1;
}

public OnPlayerSpawn(playerid)
{
    return 1;
}

public OnVehicleSpawn(vehicleid)
{
    return 1;
}

public OnVehicleDeath(vehicleid, killerid)
{
    return 1;
}

public OnPlayerText(playerid, text[])
{
    return 1;
}

public OnPlayerCommandText(playerid, cmdtext[])
{
    if (strcmp("/mycommand", cmdtext, true, 10) == 0)
    {
        // Do something here
        return 1;
    }
    return 0;
}

public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
{
    return 1;
}

public OnPlayerExitVehicle(playerid, vehicleid)
{
    return 1;
}

public OnPlayerStateChange(playerid, newstate, oldstate)
{
    return 1;
}

public OnPlayerEnterCheckpoint(playerid)
{
    return 1;
}

public OnPlayerLeaveCheckpoint(playerid)
{
    return 1;
}

public OnPlayerEnterRaceCheckpoint(playerid)
{
    return 1;
}

public OnPlayerLeaveRaceCheckpoint(playerid)
{
    return 1;
}

public OnRconCommand(cmd[])
{
    return 1;
}

public OnPlayerRequestSpawn(playerid)
{
    return 1;
}

public OnObjectMoved(objectid)
{
    return 1;
}

public OnPlayerObjectMoved(playerid, objectid)
{
    return 1;
}

public OnPlayerPickUpPickup(playerid, pickupid)
{
    return 1;
}

public OnVehicleMod(playerid, vehicleid, componentid)
{
    return 1;
}

public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
{
    return 1;
}

public OnVehicleRespray(playerid, vehicleid, color1, color2)
{
    return 1;
}

public OnPlayerSelectedMenuRow(playerid, row)
{
    return 1;
}

public OnPlayerExitedMenu(playerid)
{
    return 1;
}

public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
{
    return 1;
}

public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
{
    return 1;
}

public OnRconLoginAttempt(ip[], password[], success)
{
    return 1;
}

public OnPlayerUpdate(playerid)
{
    return 1;
}

public OnPlayerStreamIn(playerid, forplayerid)
{
    return 1;
}

public OnPlayerStreamOut(playerid, forplayerid)
{
    return 1;
}

public OnVehicleStreamIn(vehicleid, forplayerid)
{
    return 1;
}

public OnVehicleStreamOut(vehicleid, forplayerid)
{
    return 1;
}



public OnPlayerClickPlayer(playerid, clickedplayerid, source)
{
    return 1;
}

CMD:pm(playerid, params[])
{
        new str[256], msg[256], id, pname[MAX_PLAYER_NAME], preceive[MAX_PLAYER_NAME];
        GetPlayerName(playerid,pname,sizeof(pname));
        if(sscanf(params,"rs", id, msg))
        {
            SendClientMessage(playerid, 0xFF0000, "{FF0000}[USAGE]: /pm <id> <text>");
            return 1;
        }
        if(playerid == id) return SendClientMessage(playerid, 0xFF0000, "{FF0000}[ERROR]: You Can't PM Yourself");
        if(!IsPlayerConnected(id)) return SendClientMessage(playerid, 0xFF0000, "{FF0000}[ERROR]: The Player You Want To PM Is Not Connected");
        if(togglepmon[id])
        {
            SendClientMessage(playerid, 0xCCA37A, "[SYSTEM]The Player Is Currently Not Available Right Now.");
        }
        else
        {
            GetPlayerName(id, preceive, sizeof(preceive));
            format(str, sizeof(str), "{CCA37A}You Have Sent The Message To %s(%i) :%s", preceive, id, msg);
            SendClientMessage(playerid, 0xFF0000FF, str);
            format(str, sizeof(str), "{FFFF00}---------------------------------------------- \n{FFFFFF}PM From %s(%d) :%s {FFFF00}\n----------------------------------------------", pname, playerid, msg);
            SendClientMessage(id, 0xFF6600, str);
        }
        return 1;
}

CMD:togglepm(playerid, params[])
{
    if(!togglepmon[playerid])
    {
        PlayerPlaySound(playerid, 1052, 0.0, 0.0, 10.0);
        SendClientMessage(playerid, 0xFFFFFF, "[SYSTEM]{CCA37A}TogglePM is {00FF00}ON{CCA37A}.You Will Not Receive Any PM From Other Player.");
        togglepmon[playerid]=true;
    }
    else
    {
        PlayerPlaySound(playerid, 1052, 0.0, 0.0, 10.0);
        SendClientMessage(playerid, 0xFFFFFF, "[SYSTEM]{CCA37A}TogglePM is {FF0000}OFF{CCA37A}.You Will Receive Any PM From Other Player.");
        togglepmon[playerid]=false;
    }
    return 1;
}


CMD:me(playerid, params[])
{
        new string[256],msg[256],pname[MAX_PLAYER_NAME];
        if(sscanf(params,"s", msg)) return SendClientMessage(playerid, 0xFF0000, "{FF0000}[USAGE]: /me <text>");
        GetPlayerName(playerid, pname, sizeof(pname));
        format(string,sizeof(string),"%s %s", pname, msg);
        SendClientMessageToAll(0x99CCFF, string);
        return 1;
}

CMD:flip(playerid, params[])
{
 if(IsPlayerInAnyVehicle(playerid))
  {
    new currentveh;
    new Float:angle;
    currentveh = GetPlayerVehicleID(playerid);
    GetVehicleZAngle(currentveh, angle);
    SetVehicleZAngle(currentveh, angle);
    SendClientMessage(playerid, 0xFFFFFFFF, "[SYSTEM]{CCA37A}Your Vehicle Has Been Flipped.");
    return 1;
  }
  else
  {
    SendClientMessage(playerid, 0xFFFFFFFF, "{FF0000}[ERROR]You Are Not In Any Vehicle.");
    return 1;
  }
}



//-----------------------------------Draco's Blue Stuff------------------------
/**
 * Sets a string's value to source.
 * @param  dest
 *      source
 *      count
 */
stock set(dest[],source[]) {
    new count = strlen(source);
    new i=0;
    for (i=0;i<count;i++) {
        dest[i]=source[i];
    }
    dest[count]=0;
}