#include <a_samp>
#include <Dini>
#include <dudb>
#include <dutils>
#include <zcmd>
#include <sscanf2>

#pragma unused strtok
#pragma unused ret_memcpy

#define GAMEMODE	"-"
#define MAP_NAME	"-"
#define SERVER_NAME	"-"
#define WEBSITE	"-"
#define VERSION	"V0.1"
#define DEVELOPER	"Santi & Vito & Delta"
//==============================================================================================
#define PICKUP_RANGE 50
#define MAX_PICKUPZ 10000
//==============================================================================================

#define COLOR_SYSTEM 0xEFEFF7AA
#define COLOR_PURPLE 0xC2A2DAAA
#define COLOR_RED 0xFF0000AA
#define COLOR_YELLOW 0xFFFF00AA
#define COLOR_GREY 0xC0C0C0AA
#define COLOR_LIGHTBLUE 0x33CCFFAA
#define COLOR_ORANGE 0xFF9900AA
#define COLOR_GREEN 0x33AA00FF
#define COLOR_PINK 0xFF66FFAA
#define COLOR_BLUE 0x0080FF96
#define COLOR_BLACK 0x000000AA
#define COLOR_WHITE 0xFFFFFFAA
#define COLOR_BROWN 0xA52A2AAA
#define COLOR_LIME 0x99FF00AA
#define COLOR_NEON 0x00FF00AA
#define COLOR_CHAT1 0xFFFFFF96
#define COLOR_CHAT2 0xBCBCBC96
#define COLOR_CHAT3 0xB0B0B096
#define COLOR_CHAT4 0x95959596
#define COLOR_CHAT5 0x51515196
#define TEAM_GROVE_COLOR 0x00D900C8
#define COLOR_VALASZ 0x33CCFFAA
#define COLOR_GRAD2 0xBFC0C2FF

#define dcmd(%1,%2,%3) if ((strcmp((%3)[1], #%1, true, (%2)) == 0) && ((((%3)[(%2) + 1] == 0) && (dcmd_%1(playerid, "")))||(((%3)[(%2) + 1] == 32) && (dcmd_%1(playerid, (%3)[(%2) + 2]))))) return 1


forward ProxDetector(Float:radi, playerid, ta[],col1,col2,col3,col4,col5);
forward OnPlayerLogin(playerid,password[]);
forward OnPlayerUpdate(playerid);
forward OnPlayerRegister(playerid, password[]);
forward split(const strsrc[], strdest[][], delimiter);

new gPlayerLogged[MAX_PLAYERS];
new gPlayerLogTries[MAX_PLAYERS];
new gPlayerSpawned[MAX_PLAYERS];
new gPlayerAccount[MAX_PLAYERS];

enum pInfo
{
	pKey[128],
	pLevel,
	pAdmin
};

new PlayerInfo[MAX_PLAYERS][pInfo];

stock GetPlayerNameEx(playerid)
{
    new szName[MAX_PLAYER_NAME];
    GetPlayerName(playerid, szName, sizeof szName);
    return szName;
}

stock SendCloseMessage(playerid, Float: rad, color, const message[])
{
	static Float: fPosX, Float: fPosY, Float: fPosZ;
	for(new index = 0; index < MAX_PLAYERS; ++index)
	{
	    if(IsPlayerConnected(index))
		{
            GetPlayerPos(playerid, fPosX, fPosY, fPosZ);
            if(IsPlayerInRangeOfPoint(index, rad, fPosX, fPosY, fPosZ))
			{
                SendClientMessage(index, color, message);
			}
		}
	}
	return 1;
}

main()
{
	print("_________________________________________________________________________");
	printf("> %s - %s by %s betöltve.", GAMEMODE,MAP_NAME,DEVELOPER);
	printf("> Szerver név: %s", SERVER_NAME);
	printf("> Verzió: %s", VERSION);
	printf("> Map: %s", MAP_NAME);
	printf("> Weblap: %s", WEBSITE);
	printf("> Fejlesztő(k): %s", DEVELOPER);
	print("_________________________________________________________________________");
}


public OnGameModeInit()
{
	SetGameModeText("Role Play Gaming");

	CreateObject(1500, -1389.2734375, 2639.3017578125, 54.991500854492, 0, 0, 180);

	AllowInteriorWeapons(1);
	AllowAdminTeleport(1);
    DisableInteriorEnterExits();
	EnableStuntBonusForAll(0);
	ShowPlayerMarkers(0);
	ShowNameTags(0);

	AddPlayerClass( 212, -1275.4579, 2682.8604, 50.0625, 127.6630, 0, 0, 0, 0, 0, 0);
	return 1;
}

public OnGameModeExit()
{
	return 1;
}

public OnPlayerRequestClass(playerid, classid)
{
	if(gPlayerLogged[playerid] != 0)
	{
		if(gPlayerLogged[playerid] == 0)
		{
			SendClientMessage(playerid, COLOR_YELLOW, "Bejelentkezéshez írd be a jelszavadat a chatbe.");
		}
		else if(gPlayerLogged[playerid] == 1)
		{
			SendClientMessage(playerid, COLOR_VALASZ, "Regisztrációhoz gépeld be a jelszavadat a chatbe.");
		}
		SetPlayerPos(playerid, -1693.3926, 2568.4832, 103.6840);
		SetPlayerCameraPos(playerid, -1693.3926, 2568.4832, 103.6840);
		SetPlayerCameraLookAt(playerid, -1693.3926, 2568.4832, 103.6840);
	}
	else SpawnPlayer(playerid);
	return false;
}

public OnPlayerConnect(playerid)
{
    SetPlayerHealth(playerid, 100.1);

    gPlayerLogged[playerid] = 0;
	gPlayerLogTries[playerid] = 0;
	gPlayerAccount[playerid] = 0;
	gPlayerSpawned[playerid] = 0;

	return 1;
}

public OnPlayerDisconnect(playerid, reason)
{
    return 1;
}

public OnPlayerSpawn(playerid)
{
	return 1;
}


public OnPlayerText(playerid, text[])
{
	new
		string[128];

	if(gPlayerLogged[playerid] == 0)
	{
		format(string, sizeof(string), "users/%s.ini", PlayerName(playerid));
		new File: hFile = fopen(string, io_read);
		if (hFile)
		{
			fclose(hFile);
			OnPlayerLogin(playerid,text);
			return 0;
		}
		else
	 	{
			OnPlayerRegister(playerid,text);
			OnPlayerLogin(playerid,text);
			return 0;
		}
	}
	return 0;
}

public OnPlayerCommandText(playerid, cmdtext[])
{
	return SendClientMessage(playerid,0x33CCFFAA, "Nem létező parancs!");
}

public OnPlayerRegister(playerid, password[])
{
	if(IsPlayerConnected(playerid))
	{
			new string3[64], playername3[MAX_PLAYER_NAME], var[64];
			GetPlayerName(playerid, playername3, sizeof(playername3));

			format(string3, sizeof(string3), "users/%s.ini", playername3);
			new File: hFile = fopen(string3, io_write);
			if (hFile)
			{
			    strmid(PlayerInfo[playerid][pKey], password, 0, strlen(password), 255);
				format(var, 64, "Jelszó=%s\n", PlayerInfo[playerid][pKey]);fwrite(hFile, var);
				format(var, 64, "Szint=%d\n",PlayerInfo[playerid][pLevel]);fwrite(hFile, var);
				format(var, 64, "AdminSzint=%d\n",PlayerInfo[playerid][pAdmin]);fwrite(hFile, var);
				fclose(hFile);
			}
	}
	return 1;
}

public OnPlayerUpdate(playerid)
{
	if(IsPlayerConnected(playerid))
	{
		if(gPlayerLogged[playerid])
		{
			new string3[64], playername3[MAX_PLAYER_NAME], var[64];

			GetPlayerName(playerid, playername3, sizeof(playername3));
			format(string3, sizeof(string3), "users/%s.ini", playername3);
			new File: hFile = fopen(string3, io_write);
			if (hFile)
			{
				format(var, 64, "Jelszó=%s\n", PlayerInfo[playerid][pKey]);fwrite(hFile, var);
				format(var, 64, "Szint=%d\n",PlayerInfo[playerid][pLevel]);fwrite(hFile, var);
				format(var, 64, "AdminSzint=%d\n",PlayerInfo[playerid][pAdmin]);fwrite(hFile, var);
				fclose(hFile);
			}
		}
	}
	return 1;
}

public OnPlayerLogin(playerid,password[])
{
    new string2[64];
	new playername2[MAX_PLAYER_NAME], playernamesplit[3][MAX_PLAYER_NAME];
	GetPlayerName(playerid, playername2, sizeof(playername2));

	split(playername2, playernamesplit, '_');
	format(string2, sizeof(string2), "users/%s.ini", playername2);

	new File: UserFile = fopen(string2, io_read);
	if (UserFile)
	{
	    new PassData[256], keytmp[256], valtmp[256];

		fread(UserFile ,PassData ,sizeof(PassData));
	    keytmp = ini_GetKey(PassData);

		if(strcmp(keytmp , "Jelszó" , true) == 0)
		{
			valtmp = ini_GetValue(PassData);
			strmid(PlayerInfo[playerid][pKey], valtmp, 0, strlen(valtmp)-1, 255);
		}
		if(strcmp(PlayerInfo[playerid][pKey],password, true ) == 0 )
		{
			    new key[256], val[256], Data[256];

				while (fread(UserFile,Data ,sizeof(Data)))
				{
					key = ini_GetKey(Data);
					if(strcmp(key,"Szint", true) == 0) {val = ini_GetValue(Data); PlayerInfo[playerid][pLevel] = strval(val);}
			    	if(strcmp(key,"AdminSzint", true) == 0) {val = ini_GetValue(Data); PlayerInfo[playerid][pAdmin] = strval(val);}
                }
                fclose(UserFile);
		}
		else
		{
			SendClientMessage(playerid, COLOR_WHITE, "Szerver: Nem jó jelszó!");
	        fclose(UserFile);
	        gPlayerLogTries[playerid] += 1;
	        if(gPlayerLogTries[playerid] == 4)
			{
				Ban(playerid);
			}
	        return 1;
		}
		SendClientMessage(playerid, TEAM_GROVE_COLOR, "Szerver verzió száma: [0.1]");

		printf("[SCRIPT]: %s belépett a szerverre.",playername2);
		gPlayerLogged[playerid] = 1;
		SpawnPlayer(playerid);
	}
	return 1;
}

stock ini_GetKey(line[])
{
	new keyRes[256];
	keyRes[0] = 0;
    if ( strfind( line , "=" , true ) == -1 ) return keyRes;
    strmid( keyRes , line , 0 , strfind( line , "=" , true ) , sizeof( keyRes) );
    return keyRes;
}

stock ini_GetValue(line[])
{
	new valRes[256];
	valRes[0]=0;
	if ( strfind( line , "=" , true ) == -1 ) return valRes;
	strmid( valRes , line , strfind( line , "=" , true )+1 , strlen( line ) , sizeof( valRes ) );
	return valRes;
}
public split(const strsrc[], strdest[][], delimiter)
{
	new i, li, aNum, len;
	while(i <= strlen(strsrc)){
	    if(strsrc[i]==delimiter || i==strlen(strsrc)){
	        len = strmid(strdest[aNum], strsrc, li, i, 128);
	        strdest[aNum][len] = 0;
	        li = i+1;
	        aNum++;
		}
		i++;
	}
	return 1;
}

stock PlayerName(playerid)
{
  	new name[255];
	GetPlayerName(playerid, name, 255);
  	return name;
}