#include <a_samp>
#include <Dini>

/*cores*/
#define vermelho 0xFF0000AA

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

stock PlayerName(playerid) {
	new name[25],strl[50];GetPlayerName(playerid,name,25);
	format(strl,128,"%s.ini",name);
	return strl;
}
stock GetPlayerOrgMember(id) {
	new orgp;
	orgp=dini_Int(PlayerName(id),"Member");
	return orgp;
}
stock GetPlayerOrgLeader(id) {
	new orgp;
	orgp=dini_Int(PlayerName(id),"Leader");
	return orgp;
}
stock PutPlayerOrgLeader(id,OrgID) {
	new orgp[60],namep[25];
	GetPlayerName(id,namep,25);
	format(orgp,70,"orgs/%i.ini",OrgID);
	dini_Set(orgp,"Lider",namep);
	return 1;
}
stock GetOrgID(playerid) {
	new orgp;
	if(dini_Int(PlayerName(playerid),"Member")>0&&dini_Int(PlayerName(playerid),"Leader")==0) {orgp=dini_Int(PlayerName(playerid),"Member");}
	if(dini_Int(PlayerName(playerid),"Leader")>0) {orgp=dini_Int(PlayerName(playerid),"Leader");}
	return orgp;
}
stock Org(OrgID) {
	new msg[40];
	format(msg,40,"orgs/%i.ini",OrgID);
	return msg;
}
stock IsOrgFull(OrgID) {
	new orgp[60],Full;
	format(orgp,70,"orgs/%i.ini",OrgID);
	if(dini_Get(orgp,"Vaga1")!="Livre") {Full++;}
	if(dini_Get(orgp,"Vaga2")!="Livre") {Full++;}
	if(dini_Get(orgp,"Vaga3")!="Livre") {Full++;}
	if(dini_Get(orgp,"Vaga4")!="Livre") {Full++;}
	if(dini_Get(orgp,"Vaga5")!="Livre") {Full++;}
	if(dini_Get(orgp,"Vaga6")!="Livre") {Full++;}
	if(dini_Get(orgp,"Vaga7")!="Livre") {Full++;}
	if(dini_Get(orgp,"Vaga8")!="Livre") {Full++;}
	if(dini_Get(orgp,"Vaga9")!="Livre") {Full++;}
	if(dini_Get(orgp,"Vaga10")!="Livre") {Full++;}
	if(dini_Get(orgp,"Vaga11")!="Livre") {Full++;}
	if(dini_Get(orgp,"Vaga12")!="Livre") {Full++;}
	if(dini_Get(orgp,"Vaga13")!="Livre") {Full++;}
	if(dini_Get(orgp,"Vaga14")!="Livre") {Full++;}
	if(dini_Get(orgp,"Vaga15")!="Livre") {Full++;}
	if(Full==15) {return 1;}
	if(Full!=15) {return 0;}
	return 1;
}
stock IsLiderFree(OrgID) {
	new orgp[60];
	format(orgp,70,"orgs/%i.ini",OrgID);
	if(dini_Get(orgp,"Lider")!="Livre") {return 0;}
	return 1;
}
stock PutPlayerInOrg(id,OrgID) {
	new orgp[60],namepl[25];
	format(orgp,70,"orgs/%i.ini",OrgID);
	GetPlayerName(id,namepl,25);
	if(strlen(dini_Get(orgp,"Vaga1"))<3) {dini_Set(orgp,"Vaga1",namepl);return 1;}
	else if(dini_Get(orgp,"Vaga2")=="Livre") {dini_Set(orgp,"Vaga2",namepl);return 1;}
	else if(dini_Get(orgp,"Vaga3")=="Livre") {dini_Set(orgp,"Vaga3",namepl);return 1;}
	else if(dini_Get(orgp,"Vaga4")=="Livre") {dini_Set(orgp,"Vaga4",namepl);return 1;}
	else if(dini_Get(orgp,"Vaga5")=="Livre") {dini_Set(orgp,"Vaga5",namepl);return 1;}
	else if(dini_Get(orgp,"Vaga6")=="Livre") {dini_Set(orgp,"Vaga6",namepl);return 1;}
	else if(dini_Get(orgp,"Vaga7")=="Livre") {dini_Set(orgp,"Vaga7",namepl);return 1;}
	else if(dini_Get(orgp,"Vaga8")=="Livre") {dini_Set(orgp,"Vaga8",namepl);return 1;}
	else if(dini_Get(orgp,"Vaga9")=="Livre") {dini_Set(orgp,"Vaga9",namepl);return 1;}
	else if(dini_Get(orgp,"Vaga10")=="Livre") {dini_Set(orgp,"Vaga10",namepl);return 1;}
	else if(dini_Get(orgp,"Vaga11")=="Livre") {dini_Set(orgp,"Vaga11",namepl);return 1;}
	else if(dini_Get(orgp,"Vaga12")=="Livre") {dini_Set(orgp,"Vaga12",namepl);return 1;}
	else if(dini_Get(orgp,"Vaga13")=="Livre") {dini_Set(orgp,"Vaga13",namepl);return 1;}
	else if(dini_Get(orgp,"Vaga14")=="Livre") {dini_Set(orgp,"Vaga14",namepl);return 1;}
	else if(dini_Get(orgp,"Vaga15")=="Livre") {dini_Set(orgp,"Vaga15",namepl);return 1;}
	return 0;
}
stock CreateOrg(OrgID,OrgName[]) {
	new nam[60];
	format(nam,60,"orgs/%i.ini",OrgID);
	new File:file=fopen(nam,io_write);fclose(file);
	dini_Set(nam,"Nome",OrgName);
	dini_Set(nam,"Lider","Livre");
	dini_Set(nam,"Vaga1","Livre");
	dini_Set(nam,"Vaga2","Livre");
	dini_Set(nam,"Vaga3","Livre");
	dini_Set(nam,"Vaga4","Livre");
	dini_Set(nam,"Vaga5","Livre");
	dini_Set(nam,"Vaga6","Livre");
	dini_Set(nam,"Vaga7","Livre");
	dini_Set(nam,"Vaga8","Livre");
	dini_Set(nam,"Vaga9","Livre");
	dini_Set(nam,"Vaga10","Livre");
	dini_Set(nam,"Vaga11","Livre");
	dini_Set(nam,"Vaga12","Livre");
	dini_Set(nam,"Vaga13","Livre");
	dini_Set(nam,"Vaga14","Livre");
	dini_Set(nam,"Vaga15","Livre");
	return 1;
}
stock RemovePlayerOrg(playerid) {
    new orgp[60],namepl[25];
    new OrgID=GetOrgID(playerid);
	format(orgp,70,"orgs/%i.ini",OrgID);
	GetPlayerName(id,namepl,25);
	if(!strcmp(dini_Get(orgp,"Lider"),namepl,true)) {dini_Set(orgp,"Lider","Livre");return 1;}
	if(!strcmp(dini_Get(orgp,"Vaga1"),namepl,true)) {dini_Set(orgp,"Vaga1","Livre");return 1;}
	if(!strcmp(dini_Get(orgp,"Vaga2"),namepl,true)) {dini_Set(orgp,"Vaga2","Livre");return 1;}
	if(!strcmp(dini_Get(orgp,"Vaga3"),namepl,true)) {dini_Set(orgp,"Vaga3","Livre");return 1;}
	if(!strcmp(dini_Get(orgp,"Vaga4"),namepl,true)) {dini_Set(orgp,"Vaga4","Livre");return 1;}
	if(!strcmp(dini_Get(orgp,"Vaga5"),namepl,true)) {dini_Set(orgp,"Vaga5","Livre");return 1;}
	if(!strcmp(dini_Get(orgp,"Vaga6"),namepl,true)) {dini_Set(orgp,"Vaga6","Livre");return 1;}
	if(!strcmp(dini_Get(orgp,"Vaga7"),namepl,true)) {dini_Set(orgp,"Vaga7","Livre");return 1;}
	if(!strcmp(dini_Get(orgp,"Vaga8"),namepl,true)) {dini_Set(orgp,"Vaga8","Livre");return 1;}
	if(!strcmp(dini_Get(orgp,"Vaga9"),namepl,true)) {dini_Set(orgp,"Vaga9","Livre");return 1;}
	if(!strcmp(dini_Get(orgp,"Vaga10"),namepl,true)) {dini_Set(orgp,"Vaga10","Livre");return 1;}
	if(!strcmp(dini_Get(orgp,"Vaga11"),namepl,true)) {dini_Set(orgp,"Vaga11","Livre");return 1;}
	if(!strcmp(dini_Get(orgp,"Vaga12"),namepl,true)) {dini_Set(orgp,"Vaga12","Livre");return 1;}
	if(!strcmp(dini_Get(orgp,"Vaga13"),namepl,true)) {dini_Set(orgp,"Vaga13","Livre");return 1;}
	if(!strcmp(dini_Get(orgp,"Vaga14"),namepl,true)) {dini_Set(orgp,"Vaga14","Livre");return 1;}
	if(!strcmp(dini_Get(orgp,"Vaga15"),namepl,true)) {dini_Set(orgp,"Vaga15","Livre");return 1;}
	return 1;
}
stock ShowOrgMembers(playerid) {
	new orgp[70],info[512],N[60],OrgID,L[50],V1[50],V2[50],V3[50],V4[50],V5[50],V6[50],V7[50],V8[50],V9[50],V10[50],V11[50],V12[50],V13[50],V14[50],V15[50];
	OrgID=GetOrgID(playerid);
	format(orgp,70,"orgs/%i.ini",OrgID);
	strcat(N,dini_Get(orgp,"Nome"));
	strcat(L,dini_Get(orgp,"Lider"));
	strcat(V1,dini_Get(orgp,"Vaga1"));
	strcat(V2,dini_Get(orgp,"Vaga2"));
	strcat(V3,dini_Get(orgp,"Vaga3"));
	strcat(V4,dini_Get(orgp,"Vaga4"));
	strcat(V5,dini_Get(orgp,"Vaga5"));
	strcat(V6,dini_Get(orgp,"Vaga6"));
	strcat(V7,dini_Get(orgp,"Vaga7"));
	strcat(V8,dini_Get(orgp,"Vaga8"));
	strcat(V9,dini_Get(orgp,"Vaga9"));
	strcat(V10,dini_Get(orgp,"Vaga10"));
	strcat(V11,dini_Get(orgp,"Vaga11"));
	strcat(V12,dini_Get(orgp,"Vaga12"));
	strcat(V13,dini_Get(orgp,"Vaga13"));
	strcat(V14,dini_Get(orgp,"Vaga14"));
	strcat(V15,dini_Get(orgp,"Vaga15"));
 	format(info,512,"Nome da Org: %s\nLider: %s\nVaga 1: %s\nVaga 2: %s\nVaga 3: %s\nVaga 4: %s\nVaga 5: %s\nVaga 6: %s\nVaga 7: %s\nVaga 8: %s\nVaga 9: %s\nVaga 10: %s\nVaga 11: %s\nVaga 12: %s\nVaga 13: %s\nVaga 14: %s\nVaga 15: %s",N,L,V1,V2,V3,V4,V5,V6,V7,V8,V9,V10,V11,V12,V13,V14,V15);
	ShowPlayerDialog(playerid,11223,DIALOG_STYLE_MSGBOX,"Infoorg:",info,"Ok","Sair");
	return 1;
}

#if defined FILTERSCRIPT
#define FILTERSCRIPT

public OnFilterScriptInit()
{
	print("\n==============================================");
	print(" Infoorg Script By SuB_ZeRo0_ [0.3]");
	print("	 Versao: 0.0.1 || PREMIUM: NAO");
	print("   Comandos PREMIUM: //--=--\\");
	print("==============================================\n");
	return 1;
}

public OnFilterScriptExit()
{
	return 1;
}

#else

main()
{
}

#endif

public OnPlayerCommandText(playerid, cmdtext[])
{
	if(strcmp("/infoorg", cmdtext, true) == 0)
{
	if(GetPlayerOrgMember(playerid)==0&&GetPlayerOrgLeader(playerid)==0) return SendClientMessage(playerid,vermelho,"[INFOORG] Vocк nгo й um membro/lнder de uma Org!");
	ShowOrgMembers(playerid);
	return 1;
}
	dcmd(limparvaga,10,cmdtext);
	return 0;
}
//Sscanf
stock sscanf(string[], format[], {Float,_}:...)
{
	#if defined isnull
		if (isnull(string))
	#else
		if (string[0] == 0 || (string[0] == 1 && string[1] == 0))
	#endif
		{
			return format[0];
		}
	#pragma tabsize 4
	new
		formatPos = 0,
		stringPos = 0,
		paramPos = 2,
		paramCount = numargs(),
		delim = ' ';
	while (string[stringPos] && string[stringPos] <= ' ')
	{
		stringPos++;
	}
	while (paramPos < paramCount && string[stringPos])
	{
		switch (format[formatPos++])
		{
			case '\0':
			{
				return 0;
			}
			case 'i', 'd':
			{
				new
					neg = 1,
					num = 0,
					ch = string[stringPos];
				if (ch == '-')
				{
					neg = -1;
					ch = string[++stringPos];
				}
				do
				{
					stringPos++;
					if ('0' <= ch <= '9')
					{
						num = (num * 10) + (ch - '0');
					}
					else
					{
						return -1;
					}
				}
				while ((ch = string[stringPos]) > ' ' && ch != delim);
				setarg(paramPos, 0, num * neg);
			}
			case 'h', 'x':
			{
				new
					num = 0,
					ch = string[stringPos];
				do
				{
					stringPos++;
					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 = string[stringPos]) > ' ' && ch != delim);
				setarg(paramPos, 0, num);
			}
			case 'c':
			{
				setarg(paramPos, 0, string[stringPos++]);
			}
			case 'f':
			{
				setarg(paramPos, 0, _:floatstr(string[stringPos]));
			}
			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(string, format[formatPos], false, stringPos)) == -1)
				{
					if (format[end + 1])
					{
						return -1;
					}
					return 0;
				}
				format[end] = '\'';
				stringPos = ch + (end - formatPos);
				formatPos = end + 1;
			}
			case 'u':
			{
				new
					end = stringPos - 1,
					id = 0,
					bool:num = true,
					ch;
				while ((ch = string[++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
					string[end] = '\0';
					num = false;
					new
						name[MAX_PLAYER_NAME];
					id = end - stringPos;
					foreach (Player, playerid)
					{
						GetPlayerName(playerid, name, sizeof (name));
						if (!strcmp(name, string[stringPos], true, id))
						{
							setarg(paramPos, 0, playerid);
							num = true;
							break;
						}
					}
					if (!num)
					{
						setarg(paramPos, 0, INVALID_PLAYER_ID);
					}
					string[end] = ch;
					#if defined __SSCANF_FOREACH__
						#undef foreach
						#undef __SSCANF_FOREACH__
					#endif
				}
				stringPos = end;
			}
			case 's', 'z':
			{
				new
					i = 0,
					ch;
				if (format[formatPos])
				{
					while ((ch = string[stringPos++]) && ch != delim)
					{
						setarg(paramPos, i++, ch);
					}
					if (!i)
					{
						return -1;
					}
				}
				else
				{
					while ((ch = string[stringPos++]))
					{
						setarg(paramPos, i++, ch);
					}
				}
				stringPos--;
				setarg(paramPos, i, '\0');
			}
			default:
			{
				continue;
			}
		}
		while (string[stringPos] && string[stringPos] != delim && string[stringPos] > ' ')
		{
			stringPos++;
		}
		while (string[stringPos] && (string[stringPos] == delim || string[stringPos] <= ' '))
		{
			stringPos++;
		}
		paramPos++;
	}
	do
	{
		if ((delim = format[formatPos++]) > ' ')
		{
			if (delim == '\'')
			{
				while ((delim = format[formatPos++]) && delim != '\'') {}
			}
			else if (delim != 'z')
			{
				return delim;
			}
		}
	}
	while (delim > ' ');
	return 0;
}
dcmd_limparvaga(playerid,params[])
{
	new n,linkOrg[40],vag[30],msgp[128];
	if(sscanf(params,"i",n)) SendClientMessage(playerid, vermelho,"USO: /limparvaga [NUMERO-DA-VAGA]");
	else if(GetPlayerOrgLeader(playerid)==0) return SendClientMessage(playerid,vermelho,"[INFOORG] Vocк nгo й um lнder de uma Org!");
	else {
    new orgid=GetOrgID(playerid);
    strcat(linkOrg,Org(orgid));
    format(vag,30,"Vaga%i",n);
    dini_IntSet(linkOrg,vag,0);
    format(msgp,128,"[INFOORG] Vocк apagou o nome da Vaga: %i",n);
    SendClientMessage(playerid,vermelho,msgp);
	}
	return 1;
}