/* İyi kullanımlar, Sowingwa. */

/*Kütüphane*/
#include 				<a_samp>
#include 				<PAWN.cmd> // izcmd kullanıyorsan değiştirebilirsin.

/*Tanımlar*/
#define                 E_POSTA_MAX_KARAKTER            (34)
#define                 E_POSTA_MIN_KARAKTER            (5)

/*Dialoglar*/
#define                 BOS_MESAJ                       (9998) // Modunda bulunan dialog satırına uyarla, aksi taktirde çakışmalar oluşabilir.
#define                 E_POSTA_EKLE                    (9999) // Modunda bulunan dialog satırına uyarla, aksi taktirde çakışmalar oluşabilir.

/*Dize*/
enum oyuncu_d
{
	e_posta[E_POSTA_MAX_KARAKTER],
};
new oyuncuData[MAX_PLAYERS][oyuncu_d];

/*Diğer*/
public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
{
	switch(dialogid)
	{
	    case E_POSTA_EKLE:
	    {
	        if(response)
	        {
	            new str[128];
	            if(strfind(inputtext , "@" , true) == -1) return EpostaDialog(playerid, "Doğru bir e-posta adresi giriniz!");
				if(strlen(inputtext) < E_POSTA_MIN_KARAKTER || strlen(inputtext) > E_POSTA_MAX_KARAKTER)
				{
				    
				    format(str, sizeof(str), "Girdiğiniz e-posta, %d karakterden az %d karaktesrden fazla olamaz.", E_POSTA_MIN_KARAKTER, E_POSTA_MAX_KARAKTER);
					EpostaDialog(playerid, str);
					return 1;
  				}
  				str[0] = 0;
  				format(str, sizeof(str), "{FFFFFF}E-posta adresiniz, {FFFF00}%s {FFFFFF}olarak güncellendi!", inputtext);
				format(oyuncuData[playerid][e_posta], E_POSTA_MAX_KARAKTER, inputtext);
				ShowPlayerDialog(playerid, BOS_MESAJ, DIALOG_STYLE_MSGBOX, "E-Posta Adresi Ekle", str, "Kapat", "");
	        }
	    }
	}
	return 1;
}

stock EpostaDialog(playerid, hata[] = "-")
{
	new str[512];
    if(strcmp(hata, "-", true))
    {
		format(str, sizeof(str), "{FF0000}%s\n\n\
		{FFFFFF}E-posta adresi eklemek için aşağıda bulunan kısıma,\n\
		{FFFFFF}kullandığınız doğru E-posta adresini giriniz.\n\n\
		{FFFFFF}Doğru girilmediği taktirde, normalde olduğu gibi hesap çalınmalarında sorumluluk size aittir.\n\
		", hata);
	}
	else
	{
		format(str, sizeof(str), "{FF0000}\
		{FFFFFF}E-posta adresi eklemek için aşağıda bulunan kısıma,\n\
		{FFFFFF}kullandığınız doğru E-posta adresini giriniz.\n\n\
		{FFFFFF}Doğru girilmediği taktirde, normalde olduğu gibi hesap çalınmalarında sorumluluk size aittir.\n\
		");
	}
	return ShowPlayerDialog(playerid, E_POSTA_EKLE, DIALOG_STYLE_INPUT, "E-Posta Adresi Ekle", str, "Onayla", "Iptal");
}

CMD:eposta(playerid, params[])
{
	if(strlen(oyuncuData[playerid][e_posta]))
 	{
 	    new str[138];
		format(str, sizeof(str), "{FFFFFF}E-posta adresiniz zaten mevcut, {FFFF00}%s {FFFFFF}.", oyuncuData[playerid][e_posta]);
		ShowPlayerDialog(playerid, BOS_MESAJ, DIALOG_STYLE_MSGBOX, "E-Posta Adresi Ekle", str, "Kapat", "");
		return 1;
  	}
	EpostaDialog(playerid);
	return 1;
}