20.06.2010, 05:35
Entгo tenho esses comandos que sгo usados para registrar
Aqui seriam as Stocks que Escriptam Etc:
Aqui as Arrays:
Aqui o FS:
http://pawn.pastebin.com/Nsaa4RqK
й um sistema de clan,com top player e top clans
Queri passa-los para Login Vou Agradecer muito a quem puder fazer isso Obrigado
pawn Код:
if(!strcmp("/registrar", cmd, true))
{
if(Registrado[playerid] == true) return SendClientMessage(playerid, ROJO, "Ya estбs registrado");
tmp = strtok(cmdtext, idx);
longitud = strlen(tmp);
if(longitud == 0) return SendClientMessage(playerid, BLANCO, "Uso /registrar [Contraseсa]");
if(longitud < 3 || longitud > 16)
{
return SendClientMessage(playerid, ROJO, "La contraseсa debe tener de 3 a 16 caracteres");
}
Registrar(playerid, tmp);
return 1;
}
if(!strcmp("/login", cmd, true))
{
if(Registrado[playerid] == false) return SendClientMessage(playerid, ROJO, "No estбs registrado");
if(Ingresado[playerid] == true) return SendClientMessage(playerid, ROJO, "Ya estбs logueado");
tmp = strtok(cmdtext, idx);
longitud = strlen(tmp);
if(longitud == 0) return SendClientMessage(playerid, BLANCO, "Uso /login [Contraseсa]");
Login(playerid, tmp);
return 1;
}
pawn Код:
stock Registrar(playerid, pass[])
{
new
Archivo[64],
str[128];
format(Archivo, sizeof(Archivo), "Jugadores/%s.ini", NickName(playerid));
if(!dini_Exists(Archivo))
{
dini_Create(Archivo);
dini_Set(Archivo, "Contrasena", pass);
dini_IntSet(Archivo, "Asesinatos", 0);
dini_IntSet(Archivo, "Muertes", 0);
dini_FloatSet(Archivo, "Ratio", 0.0);
dini_Set(Archivo, "Clan", "<Ninguno>");
format(str, sizeof(str), "Nick '%s' registrado. Contrasena: '%s' ", NickName(playerid), pass);
SendClientMessage(playerid, NICESKY, str);
Registrado[playerid] = true;
SendClientMessage(playerid, NARANJA, "Ahora usa /login [contraseсa]");
}
}
stock Login(playerid, pass[])
{
new
Archivo[64],
Nick[MAX_PLAYER_NAME];
format(Archivo, sizeof(Archivo), "Jugadores/%s.ini", NickName(playerid));
if(dini_Exists(Archivo))
{
if(!strcmp(dini_Get(Archivo, "Contrasena"), pass, false))
{
strmid(Nickname[playerid], NickName(playerid), 0, MAX_PLAYER_NAME, MAX_PLAYER_NAME);
Asesinatos[playerid] = dini_Int(Archivo, "Asesinatos");
Muertes[playerid] = dini_Int(Archivo, "Muertes");
Ratio[playerid] = dini_Float(Archivo, "Ratio");
Ingresado[playerid] = true;
format(Archivo, sizeof Archivo, "Clanes/%s.ini", dini_Get(Archivo, "Clan"));
if(dini_Exists(Archivo))
{
format(Clan_TAG[playerid], 4, dini_Get(Archivo, "TAG"));
format(Nick, sizeof Nick, "[%s]%s", Clan_TAG[playerid], Nickname[playerid]);
SetPlayerName(playerid, Nick);
SetPlayerColor(playerid, dini_Int(Archivo, "Color"));
Clan_ID[playerid] = dini_Int(Archivo, "ID");
EnClan[playerid] = true;
}
SendClientMessage(playerid, NICESKY, "Logueado Correctamente");
} else SendClientMessage(playerid, ROJO, "Contraseсa Incorrecta");
}
}
stock NickName(playerid)
{
new
NickP[MAX_PLAYER_NAME];
GetPlayerName(playerid, NickP, MAX_PLAYER_NAME);
return NickP;
}
pawn Код:
//JUGADORES:
new bool:Registrado[MAX_PLAYERS] = {false, ...};
new bool:Ingresado[MAX_PLAYERS] = {false, ...};
new Nickname[MAX_PLAYERS][MAX_PLAYER_NAME];
new Asesinatos[MAX_PLAYERS];
new Muertes[MAX_PLAYERS];
new Float:Ratio[MAX_PLAYERS];
http://pawn.pastebin.com/Nsaa4RqK
й um sistema de clan,com top player e top clans
Queri passa-los para Login Vou Agradecer muito a quem puder fazer isso Obrigado