#include <a_samp>
#include <YSI\y_ini>

#define DIALOG_REGISTER 1
#define DIALOG_LOGIN 2
#define DIALOG_SUCCESS_1 3
#define DIALOG_SUCCESS_2 4

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

#define COL_WHITE "{FFFFFF}"
#define COL_RED "{F81414}"
#define COL_GREEN "{00FF22}"
#define COL_LIGHTBLUE "{00CED1}"

forward AtsaldomZaideja(playerid);

enum pInfo
{
    pPass,
    pCash,
    pAdmin,
    pKills,
    pDeaths,
    Skin,
    Float:Xpos,
    Float:Ypos,
    Float:Zpos,
    NewReg,
}
new PlayerInfo[MAX_PLAYERS][pInfo];

forward LoadUser_data(playerid,name[],value[]);
public LoadUser_data(playerid,name[],value[])
{
    INI_Int("Slaptazodis",PlayerInfo[playerid][pPass]);
    INI_Int("Eurai",PlayerInfo[playerid][pCash]);
    INI_Int("Adminolvl1",PlayerInfo[playerid][pAdmin]);
    INI_Int("Nuzudymai",PlayerInfo[playerid][pKills]);
    INI_Int("Mirtys",PlayerInfo[playerid][pDeaths]);
    INI_Int("Skin",PlayerInfo[playerid][Skin]);
    INI_Float("Xpos",PlayerInfo[playerid][Xpos]);
    INI_Float("Ypos",PlayerInfo[playerid][Ypos]);
    INI_Float("ZXpos",PlayerInfo[playerid][Zpos]);
    INI_Int("NewReg",PlayerInfo[playerid][NewReg]);
    return 1;
}
public AtsaldomZaideja(playerid)
{
	TogglePlayerControllable(playerid, true);
	return 1;
}
stock LaikinaiUzsaldytiZaideja(playerid, Laikas)
{
	TogglePlayerControllable(playerid, false);
	SetTimerEx("AtsaldomZaideja", Laikas * 1000, false, "d", playerid);
	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;
}

main()
{
	print("\n----------------------------------");
	print(" Serveris");
	print("----------------------------------\n");
}

public OnGameModeInit()
{
	SetGameModeText("Satg");
	return 1;
}

public OnGameModeExit()
{
	return 1;
}

public OnPlayerRequestClass(playerid, classid)
{
	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,""COL_WHITE"Prisijungti",""COL_WHITE"Įveskite savo slaptažodį norėdami prisijungti.","Prisijungti","Išeiti");
    }
    else
    {
        ShowPlayerDialog(playerid, DIALOG_REGISTER, DIALOG_STYLE_INPUT,""COL_WHITE"Registracija",""COL_WHITE"Įveskite savo sugalvotą slaptažodį.","Registruotis","Išeiti");
    }
    return 1;
}

public OnPlayerDisconnect(playerid, reason)
{
    new INI:File = INI_Open(UserPath(playerid));
    new Float:Xlog, Float:Ylog, Float:Zlog;
	GetPlayerPos(playerid, Xlog, Ylog, Zlog);
	PlayerInfo[playerid][Xpos] = Xlog;
	PlayerInfo[playerid][Ypos] = Ylog;
	PlayerInfo[playerid][Zpos] = Zlog;
    INI_SetTag(File,"data");
    INI_WriteInt(File,"Eurai",GetPlayerMoney(playerid));
    INI_WriteInt(File,"Adminolvl",PlayerInfo[playerid][pAdmin]);
    INI_WriteInt(File,"Nuzudymai",PlayerInfo[playerid][pKills]);
    INI_WriteInt(File,"Mirtys",PlayerInfo[playerid][pDeaths]);
    new playerskin = GetPlayerSkin(playerid);
    INI_WriteInt(File,"Skin",playerskin);
    INI_WriteFloat(File,"Xpos",PlayerInfo[playerid][Xpos]);
    INI_WriteFloat(File,"Ypos",PlayerInfo[playerid][Ypos]);
    INI_WriteFloat(File,"Zpos",PlayerInfo[playerid][Zpos]);
    INI_WriteInt(File,"NewReg",0);
    INI_Close(File);
    return 1;
}

public OnPlayerSpawn(playerid)
{
    if(PlayerInfo[playerid][NewReg] == 0)
    {
        SetPlayerSkin(playerid, PlayerInfo[playerid][Skin]);
        SetPlayerPos(playerid, PlayerInfo[playerid][Xpos], PlayerInfo[playerid][Ypos], PlayerInfo[playerid][Zpos]);
		LaikinaiUzsaldytiZaideja(playerid, 2);
    }
    else
    {
        SetPlayerPos(playerid,-1979.5131,170.9385,27.7011);
    }
    return 1;
}

public OnPlayerDeath(playerid, killerid, reason)
{
    PlayerInfo[killerid][pKills]++;
    PlayerInfo[playerid][pDeaths]++;
    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 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, ""COL_WHITE"Registracika.",""COL_RED"Įvedėte neteisingą slaptažodį.\n"COL_WHITE"Įveskite slaptažodį norėdami užsiregistruoti","Registruotis","Išeiti");
                new INI:File = INI_Open(UserPath(playerid));
                INI_SetTag(File,"data");
                INI_WriteInt(File,"slaptazodis",udb_hash(inputtext));
                INI_WriteInt(File,"Eurai",50000);
                INI_WriteInt(File,"Adminolvl",0);
                INI_WriteInt(File,"nuzudymai",0);
                INI_WriteInt(File,"Mirtys",0);
                INI_WriteInt(File,"Skin",0);
                INI_WriteInt(File,"NewReg",0);
                INI_WriteInt(File,"Xpos",0);
                INI_WriteInt(File,"Ypos",0);
                INI_WriteInt(File,"Zpos",0);
                INI_Close(File);

                SetPlayerSkin(playerid, 0);
                PlayerInfo[playerid][NewReg] = 1;
                SetSpawnInfo(playerid, 0, 0, 1958.33, 1343.12, 15.36, 269.15, 0, 0, 0, 0, 0, 0); //-------------------------
                SpawnPlayer(playerid);
                ShowPlayerDialog(playerid, DIALOG_SUCCESS_1, DIALOG_STYLE_MSGBOX,""COL_WHITE"Sėkmingai prisijungėte prie serverio",""COL_GREEN"Prisijungėte sėkmingai, dabar galite žaisti.","Gerai","");
			}
        }

        case DIALOG_LOGIN:
        {
            if ( !response ) return Kick ( playerid );
            if( response )
            {
                if(udb_hash(inputtext) == PlayerInfo[playerid][pPass])
                {
                    INI_ParseFile(UserPath(playerid), "LoadUser_%s", .bExtra = true, .extra = playerid);
                    GivePlayerMoney(playerid, PlayerInfo[playerid][pCash]);
					ShowPlayerDialog(playerid, DIALOG_SUCCESS_2, DIALOG_STYLE_MSGBOX,""COL_WHITE"Sėkmingai prisijungėte prie serverio",""COL_GREEN"Prisijungėte sėkmingai, dabar galite žaisti.","Gerai","");
                }
                else
                {
                    ShowPlayerDialog(playerid, DIALOG_LOGIN, DIALOG_STYLE_INPUT,""COL_WHITE"Prisijungimas",""COL_RED"Įvedėte neteisingą slaptažodį.\n"COL_WHITE"Įrašykite savo teisingą slaptaždoį","Prisijungti","Išeiti");
                }
                return 1;
            }
        }
    }
    return 1;
}

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