#include <a_samp>
#include <dini>
#include <ocmd>

#if defined FILTERSCRIPT



#define BLAU 0x0087FFFF
#define ROT 0xE10000FF

#define DIALOG_TUTORIAL 1
#define DIALOG_REGISTER 2
#define DIALOG_LOGIN 3


public OnFilterScriptInit()
{
	print("\n--------------------------------------");
	print(" EventMaster Server");
	print("--------------------------------------\n");
	return 1;
}

public OnFilterScriptExit()
{
	return 1;
}

#else

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

#endif

public OnGameModeInit()
{
	// Don't use these lines if it's a filterscript
	SetGameModeText("German Dynamic RolePlay");
	AddPlayerClass(0, 1129.0430,-1467.4781,15.7371,359.9771, 0, 0, 0, 0, 0, 0);

	//infernus vor spawn
	AddStaticVehicle(411,1134.8351,-1464.4891,15.5027,24.7271,116,1); // infernus1
	AddStaticVehicle(411,1123.4690,-1465.0637,15.5131,317.9860,116,1); // infernus2
	AddStaticVehicle(411,1123.6410,-1450.9844,15.5240,323.8395,116,1); // infernus3
	AddStaticVehicle(411,1137.0122,-1450.6638,15.5239,39.2565,116,1); // infernus4
	AddStaticVehicle(411,1136.3979,-1440.9822,15.5239,41.7527,116,1); // infernus5
	AddStaticVehicle(411,1121.4767,-1437.8411,15.5240,320.5278,116,1); // infernus6
	return 1;
}

public OnGameModeExit()
{
	return 1;
}

public OnPlayerRequestClass(playerid, classid)
{
	SetPlayerPos(playerid, 1129.0430,-1467.4781,15.7371);
	SetPlayerCameraPos(playerid, 1129.0430,-1467.4781,15.7371);
	SetPlayerCameraLookAt(playerid, 1129.0430,-1467.4781,15.7371);
	return 1;
}

public OnPlayerConnect(playerid)
{
	ShowPlayerDialog(playerid,DIALOG_REGISTER,DIALOG_STYLE_INPUT,"Registrieren","Gib bitte das gewünschte Passwort ein:","Register","Abbrechen");
	return 1;
}

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

public OnPlayerSpawn(playerid)
{
	return 1;
}

public OnPlayerDeath(playerid, killerid, reason)
{
	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("/help", cmdtext, true, 10) == 0)
	{
		SendClientMessage(playerid,ROT,"Hier stehen alle Befehle zum Server.");
		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==DIALOG_LOGIN)
	{
	    if(response==0)
	    {
	        SendClientMessage(playerid,BLAU,"Du hast den Vorgang abgebrochen.");
	        Kick(playerid);
	        return 1;
	    }
	    if(response==1)
	    {
	        if(!strlen(inputtext))
	        {
	            SendClientMessage(playerid,BLAU,"Das Passwort war nicht lang genug.");
             	ShowPlayerDialog(playerid,DIALOG_LOGIN,DIALOG_STYLE_INPUT,"Login","Dein Account wurde gefunden. Gib bitte das Passwort ein.","Login","Abbrechen");
	            return 1;
	        }
	        else
	        {
		        Login(playerid,inputtext);
		        return 1;
			}
	    }
	}
	if(dialogid==DIALOG_REGISTER)
	{
	    if(response==0)
	    {
	        SendClientMessage(playerid,BLAU,"Du hast den Vorgang abgebrochen.");
	        Kick(playerid);
	        return 1;
	    }
	    if(response==1)
	    {
	        if(!strlen(inputtext))
	        {
	            SendClientMessage(playerid,BLAU,"Das Passwort war nicht lang genug.");
	            ShowPlayerDialog(playerid,DIALOG_REGISTER,DIALOG_STYLE_INPUT,"Registrieren","Gib bitte das gewünschte Passwort ein:","Register","Abbrechen");
	            return 1;
	        }
	        else
	        {
		        Register(playerid,inputtext);
		        return 1;
			}
	    }
	}
	if(dialogid==DIALOG_TUTORIAL)
	{
	    if(response==1)
		{
		    SetPlayerPos(playerid,1227.1797,-914.0590,42.6812);
	    	SendClientMessage(playerid,0xFFFF00FF,"Du wurdest Teleportiert");
		}
		if(response==0)
		{
		    SendClientMessage(playerid,BLAU,"Ok dann halt nicht...");
		}
	}
	return 1;
}


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

stock SpielerName(playerid)
{
	new name[MAX_PLAYER_NAME];
	GetPlayerName(playerid,name,sizeof(name));
	return name;
}

stock Register(playerid,key[])
{
	new Spielerdatei[64];
	new name[MAX_PLAYER_NAME];
	GetPlayerName(playerid,name,sizeof(name));
	format(Spielerdatei,sizeof(Spielerdatei),"/Accounts/%s.txt",name);
	dini_Create(Spielerdatei);
	dini_Set(Spielerdatei,"Passwort",key);
	SendClientMessage(playerid,BLAU,"Erfolgreich registriert.");
	SetPlayerScore(playerid,0);
	SetPVarInt(playerid,"loggedin",1);
	return 1;
}

stock Login(playerid,key[])
{
    new Spielerdatei[64];
	new name[MAX_PLAYER_NAME];
	GetPlayerName(playerid,name,sizeof(name));
	format(Spielerdatei,sizeof(Spielerdatei),"/Accounts/%s.txt",name);

	if(gettime()<dini_Int(Spielerdatei,"timeban"))
	{
	    SendClientMessage(playerid,ROT,"Du bist noch gebannt. Komm später wieder.");
	    Kick(playerid);
	    return 1;
	}

	if(!strcmp(key,dini_Get(Spielerdatei,"Passwort"),false))
	{
	    LoadAccount(playerid);
	    SendClientMessage(playerid,BLAU,"Erfolgreich eingeloggt.");
	    return 1;
	}
	else
	{
	    SendClientMessage(playerid,BLAU,"Falsches Passwort.");
	    ShowPlayerDialog(playerid,DIALOG_LOGIN,DIALOG_STYLE_INPUT,"Login","Dein Account wurde gefunden. Gib bitte das Passwort ein.","Login","Abbrechen");
	    return 1;
	}
}

stock LoadAccount(playerid)
{
    new Spielerdatei[64];
	new name[MAX_PLAYER_NAME];
	GetPlayerName(playerid,name,sizeof(name));
	format(Spielerdatei,sizeof(Spielerdatei),"/Accounts/%s.txt",name);
	SetPlayerScore(playerid,dini_Int(Spielerdatei,"Level"));
	GivePlayerMoney(playerid,dini_Int(Spielerdatei,"Geld"));
	SetPVarInt(playerid,"Adminlevel",dini_Int(Spielerdatei,"Adminlevel"));
	SetPVarInt(playerid,"Fraktion",dini_Int(Spielerdatei,"Fraktion"));
	SetPVarInt(playerid,"Baned",dini_Int(Spielerdatei,"Baned"));
	if(GetPVarInt(playerid,"Baned")==1)
	{
		SendClientMessage(playerid,ROT,"Du bist vom Server gebannt.");
	    Kick(playerid);
	}
	SetPVarInt(playerid,"loggedin",1);
	return 1;
}

stock SpielerSpeichern(playerid)
{
    if(GetPVarInt(playerid,"loggedin")==1)
	{
	    new Spielerdatei[64];
		new name[MAX_PLAYER_NAME];
		GetPlayerName(playerid,name,sizeof(name));
		format(Spielerdatei,sizeof(Spielerdatei),"/Accounts/%s.txt",name);
		dini_IntSet(Spielerdatei,"Level",GetPlayerScore(playerid));
		dini_IntSet(Spielerdatei,"Geld",GetPlayerMoney(playerid));
		dini_IntSet(Spielerdatei,"Adminlevel",GetPVarInt(playerid,"Adminlevel"));
		dini_IntSet(Spielerdatei,"Fraktion",GetPVarInt(playerid,"Fraktion"));
		dini_IntSet(Spielerdatei,"Baned",GetPVarInt(playerid,"Baned"));
		dini_IntSet(Spielerdatei,"timeban",GetPVarInt(playerid,"timeban"));
	}
	return 1;
}

stock isPlayerInFrakt(playerid,fraktid)
{
	if(GetPVarInt(playerid,"Fraktion")==fraktid)return 1;
	return 0;
}

stock isPlayerAnAdmin(playerid,rang)
{
	if(GetPVarInt(playerid,"Adminlevel")>=rang)return 1;
	return 0;
}

stock sscanf(sstring[], format[], {Float,_}:...)
{
	#if defined isnull
		if (isnull(sstring))
	#else
		if (sstring[0] == 0 || (sstring[0] == 1 && sstring[1] == 0))
	#endif
		{
			return format[0];
		}
	#pragma tabsize 4
	new
		formatPos = 0,
		sstringPos = 0,
		paramPos = 2,
		paramCount = numargs(),
		delim = ' ';
	while (sstring[sstringPos] && sstring[sstringPos] <= ' ')
	{
		sstringPos++;
	}
	while (paramPos < paramCount && sstring[sstringPos])
	{
		switch (format[formatPos++])
		{
			case '\0':
			{
				return 0;
			}
			case 'i', 'd':
			{
				new
					neg = 1,
					num = 0,
					ch = sstring[sstringPos];
				if (ch == '-')
				{
					neg = -1;
					ch = sstring[++sstringPos];
				}
				do
				{
					sstringPos++;
					if ('0' <= ch <= '9')
					{
						num = (num * 10) + (ch - '0');
					}
					else
					{
						return -1;
					}
				}
				while ((ch = sstring[sstringPos]) > ' ' && ch != delim);
				setarg(paramPos, 0, num * neg);
			}
			case 'h', 'x':
			{
				new
					num = 0,
					ch = sstring[sstringPos];
				do
				{
					sstringPos++;
					switch (ch)
					{
						case 'x', 'X':
						{
							num = 0;
							continue;
						}
						case '0' .. '9':
						{
							num = (num << 4) | (ch - '0');
						}
						case 'a' .. 'f':
						{
							num = (num << 4) | (ch - ('a' - 10));
						}
						case 'A' .. 'F':
						{
							num = (num << 4) | (ch - ('A' - 10));
						}
						default:
						{
							return -1;
						}
					}
				}
				while ((ch = sstring[sstringPos]) > ' ' && ch != delim);
				setarg(paramPos, 0, num);
			}
			case 'c':
			{
				setarg(paramPos, 0, sstring[sstringPos++]);
			}
			case 'f':
			{

				new changestr[16], changepos = 0, strpos = sstringPos;
				while(changepos < 16 && sstring[strpos] && sstring[strpos] != delim)
				{
					changestr[changepos++] = sstring[strpos++];
    				}
				changestr[changepos] = '\0';
				setarg(paramPos,0,_:floatstr(changestr));
			}
			case 'p':
			{
				delim = format[formatPos++];
				continue;
			}
			case '\'':
			{
				new
					end = formatPos - 1,
					ch;
				while ((ch = format[++end]) && ch != '\'') {}
				if (!ch)
				{
					return -1;
				}
				format[end] = '\0';
				if ((ch = strfind(sstring, format[formatPos], false, sstringPos)) == -1)
				{
					if (format[end + 1])
					{
						return -1;
					}
					return 0;
				}
				format[end] = '\'';
				sstringPos = ch + (end - formatPos);
				formatPos = end + 1;
			}
			case 'u':
			{
				new
					end = sstringPos - 1,
					id = 0,
					bool:num = true,
					ch;
				while ((ch = sstring[++end]) && ch != delim)
				{
					if (num)
					{
						if ('0' <= ch <= '9')
						{
							id = (id * 10) + (ch - '0');
						}
						else
						{
							num = false;
						}
					}
				}
				if (num && IsPlayerConnected(id))
				{
					setarg(paramPos, 0, id);
				}
				else
				{
					#if !defined foreach
						#define foreach(%1,%2) for (new %2 = 0; %2 < MAX_PLAYERS; %2++) if (IsPlayerConnected(%2))
						#define __SSCANF_FOREACH__
					#endif
					sstring[end] = '\0';
					num = false;
					new
						name[MAX_PLAYER_NAME];
					id = end - sstringPos;
					foreach (Player, playerid)
					{
						GetPlayerName(playerid, name, sizeof (name));
						if (!strcmp(name, sstring[sstringPos], true, id))
						{
							setarg(paramPos, 0, playerid);
							num = true;
							break;
						}
					}
					if (!num)
					{
						setarg(paramPos, 0, INVALID_PLAYER_ID);
					}
					sstring[end] = ch;
					#if defined __SSCANF_FOREACH__
						#undef foreach
						#undef __SSCANF_FOREACH__
					#endif
				}
				sstringPos = end;
			}
			case 's', 'z':
			{
				new
					i = 0,
					ch;
				if (format[formatPos])
				{
					while ((ch = sstring[sstringPos++]) && ch != delim)
					{
						setarg(paramPos, i++, ch);
					}
					if (!i)
					{
						return -1;
					}
				}
				else
				{
					while ((ch = sstring[sstringPos++]))
					{
						setarg(paramPos, i++, ch);
					}
				}
				sstringPos--;
				setarg(paramPos, i, '\0');
			}
			default:
			{
				continue;
			}
		}
		while (sstring[sstringPos] && sstring[sstringPos] != delim && sstring[sstringPos] > ' ')
		{
			sstringPos++;
		}
		while (sstring[sstringPos] && (sstring[sstringPos] == delim || sstring[sstringPos] <= ' '))
		{
			sstringPos++;
		}
		paramPos++;
	}
	do
	{
		if ((delim = format[formatPos++]) > ' ')
		{
			if (delim == '\'')
			{
				while ((delim = format[formatPos++]) && delim != '\'') {}
			}
			else if (delim != 'z')
			{
				return delim;
			}
		}
	}
	while (delim > ' ');
	return 0;
}