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

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

#define dregister 2011
#define dlogin 2012
#define UserPath "Users/%s.ini"

#define COLOR_PINK 0xFF80FFC8

enum PlayerInfo
{
   Pass[129],
   AdminLevel,
   Money,
   Scores,
   Kills,
   Deaths
}
new pInfo[MAX_PLAYERS][PlayerInfo];

stock Path(playerid)
{
   new str[128],name[MAX_PLAYER_NAME];
   GetPlayerName(playerid,name,sizeof(name));
   format(str,sizeof(str),UserPath,name);
   return str;
}

forward loadaccount_user(playerid, name[], value[]);

public loadaccount_user(playerid, name[], value[])
{
   INI_String("Password", pInfo[playerid][Pass],129);
   INI_Int("AdminLevel",pInfo[playerid][AdminLevel]);
   INI_Int("Money",pInfo[playerid][Money]);
   INI_Int("Scores",pInfo[playerid][Scores]);
   INI_Int("Kills",pInfo[playerid][Kills]);
   INI_Int("Deaths",pInfo[playerid][Kills]);
   return 1;
}

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

public OnGameModeInit()
{
	// Don't use these lines if it's a filterscript
	SetGameModeText("RolePlay");
	AddPlayerClass(281,1380.9154,-1088.9073,27.3844,272.3928,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 OnPlayerConnect(playerid)
{
    new name[MAX_PLAYER_NAME], goodbyemessage[108];
    GetPlayerName(playerid, name, sizeof(name));
    if (!IsRPName(name))
    {
        format (goodbyemessage, sizeof(goodbyemessage), "* %s was kicked, come back with a proper RolePlay name such as John_Doe", name);
        SendClientMessageToAll(-1, goodbyemessage);
        SendClientMessage(playerid,-1,"Come back with a Proper RolePlay name such as John_Doe");
        return Kick(playerid);
    }
	if(fexist(Path(playerid)))
	{
	   INI_ParseFile(Path(playerid),"loadaccount %s", .bExtra = true, .extra = playerid);
	   ShowPlayerDialog(playerid,dlogin,DIALOG_STYLE_INPUT,"Login","Welcome Back! This account is Registered. \nType your Password below yo Login","Login","Quit");
	}
	else
	{
	  ShowPlayerDialog(playerid,dregister,DIALOG_STYLE_INPUT,"Register","Welcome! You're not Registered Yet!\nEnter your password you want below to Register!","Register","Quit");
	  return 1;
    }

	return 1;

}

public OnPlayerDisconnect(playerid, reason)
{
   if(fexist(Path(playerid)))
   {
	  new INI:file = INI_Open(Path(playerid));
	  INI_SetTag(file,"Player's Data");
	  INI_WriteInt(file,"AdminLevel",pInfo[playerid][AdminLevel]);
	  INI_WriteInt(file,"Money",GetPlayerMoney(playerid));
	  INI_WriteInt(file,"Scores",GetPlayerScore(playerid));
	  INI_WriteInt(file,"Kills",pInfo[playerid][Kills]);
	  INI_WriteInt(file,"Deaths",pInfo[playerid][Deaths]);
	  return 1;
   }
   return 1;
}

public OnPlayerSpawn(playerid)
{
	return 1;
}

public OnPlayerDeath(playerid, killerid, reason)
{
	pInfo[killerid][Kills]++;
	pInfo[playerid][Deaths]++;
	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[])
{
	if(dialogid == dregister)
	{
	   if(!response) return Kick(playerid);
	   if(response)
	   {
		  if(!strlen(inputtext))
		  {
             ShowPlayerDialog(playerid,dregister,DIALOG_STYLE_INPUT,"Register","Welcome! You're not Registered Yet!\nEnter your password you want below to Register!","Register","Quit");
             return 1;
		  }

		  new hashpass[129];
		  WP_Hash(hashpass,sizeof(hashpass),inputtext);
		  new INI:file = INI_Open(Path(playerid));
		  INI_SetTag(file,"Player's Data");
		  INI_WriteString(file,"Password",hashpass);
		  INI_WriteInt(file,"AdminLevel",0);
		  INI_WriteInt(file,"Money",0);
		  INI_WriteInt(file,"Scores",0);
		  INI_WriteInt(file,"Kills",0);
		  INI_WriteInt(file,"Deaths",0);
		  SendClientMessage(playerid,-1,"You are now Registerd!");
		  return 1;
		  }
	 }
	 if(dialogid == dlogin)
	 {
	   if(!response) return Kick(playerid);
	   if(response)
	   {
		  new hashpass[129];
		  WP_Hash(hashpass,sizeof(hashpass),inputtext);
		  if(!strcmp(hashpass,pInfo[playerid][Pass]))
		  {
			 INI_ParseFile(Path(playerid),"loadaccount %s",.bExtra = true, .extra = playerid);
			 SetPlayerScore(playerid,pInfo[playerid][Scores]);
			 GivePlayerMoney(playerid,pInfo[playerid][Money]);
			 SendClientMessage(playerid,-1,"Welcome Back! You are now Logged in!");
		  }
		  else
		  {
            ShowPlayerDialog(playerid,dlogin,DIALOG_STYLE_INPUT,"Login","Welcome Back! This account is Registered. \nType your Password below yo Login","Login","Quit");
            return 1;
		  }
	   }
	}
	return 1;
}

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

stock IsRPName(const name[], max_underscores = 2)
{
    new underscores = 0;
    if (name[0] < 'A' || name[0] > 'Z') return false; // First letter is not capital
    for(new i = 1; i < strlen(name); i++)
    {
        if(name[i] != '_' && (name[i] < 'A' || name[i] > 'Z') && (name[i] < 'a' || name[i] > 'z')) return false; // a-zA-Z_
        if( (name[i] >= 'A' && name[i] <= 'Z') && (name[i - 1] != '_') ) return false; // unneeded capital letter
        if(name[i] == '_')
        {
            underscores++;
            if(underscores > max_underscores || i == strlen(name)) return false; // More underlines than limit, or underline at the last pos
            if(name[i + 1] < 'A' || name[i + 1] > 'Z') return false; // Not a capital letter after underline
        }
    }
    if (underscores == 0) return false; // No underline detected
    return true;
}