[RPG] Registracija / prisijungimas. Automatinis saugojimas.

#Karolis · Sausio 14, 2014

Ilgų tekstu nerašysiu einu iš kart prie reikalo

Visu pirma viršui prisirašome :

#include <Dini>//Includinam, Dini include, kurį naudosime saugojimui / krovimui

Po OnPlayerConnect :

new vardas[MAX_PLAYER_NAME], failas[128];//kintamieji: vardui, bei failo tikrtinimui.
GetPlayerName(playerid, vardas,sizeof(vardas));//Išgauname vardą.
format(failas,sizeof(failas),"vartotojai/%s.ini",vardas);//Tikrinia ar failas yra "Vartotojai" aplankale, beje nueikit į scriptfiles ir sukurtkit aplanką "vartotojai".
if(!fexist(failas))//Jai nėra tokio vartoojo jam išmatame registracijos GUI langą.
{//Atidarom eilutę 
	ShowPlayerDialog(playerid, 0, DIALOG_STYLE_PASSWORD,"{ffffff}[ {fff159}REGISTRACIJA {ffffff}]","{ffffff}Sveikas, naujoke prasom uzsirekgistruoti, kitaip negalesi zaisti","Registruotis","Atsaukti");//Kaip ir minėjau jai žaidėjas neregistruotas jam išmes registracijos GUI. Tai vat šitas langas jam ir išlys. Tekstą galite pasikeisti 
}//Yždraome eilutę 
if(fexist(failas))//Priešingu atveju jai toks vartotojas yra tai jam išmes prisijungimo langą.
{//Atidarom eilutę 
	ShowPlayerDialog(playerid, 1, DIALOG_STYLE_PASSWORD,"{ffffff}[ {fff136}PRISIJUNGIMAS {ffffff}]","{ffffff}Sveikas sugryzes, prasom prisijungti kad galetum zaisti pas mus serveryje.","Prisijungti","Atsaukti");//Vat va šitą langą išmes jau registruotam nariui . Tekstą galite keisti 
}//Uždarome eilutę

Po OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])

if(dialogid == 0)//Jai dialogas lygus 0. T.y Registracijos langui.
{//Atidarom eilutę
	if(response)//Jai paspaude "Registruotis"
	{//Atidarom eilutę
	    new vardas[MAX_PLAYER_NAME], failas[128], msg[128];//Kintamieji: Vardui, Failui bei žinutei
	    GetPlayerName(playerid, vardas,sizeof(vardas));//Išgauname vardą
	    format(failas,sizeof(failas),"vartotojai/%s.ini",vardas);//Jai nėra tokio vartotojo
	    dini_Create(failas);//Tada sukuria failą su jo vardu.
	    dini_Set(failas,"slaptazodis", inputtext);
		format(msg,sizeof(msg),"Jus uzregistruotas, jusu slaptazodis - %s",inputtext);//Išsiunčiam žinutę, koks jo slaptažodis jai pamirštu -.-
		SendClientMessage(playerid, 0xFFFFFFFF, msg);//Žinutes Siuntimas.
		ShowPlayerDialog(playerid, 2, DIALOG_STYLE_MSGBOX,"Lyties pasirinkimas","Prasome pasirinkti savo lyti:\nVyras       		Moteris","Vyras","Moteris");
	}//Uždarome eilutę
	else if(!response)//Priešingu atveju jai paspaude atšaukti arba ESC
	{//Atidarome eilutę
	    Kick(playerid);//Išmetame žaidėją.
	}//Uždarome eilutę
	return 1;//Baigiame procesą
}//Uždarome visiškai eilutę 
if(dialogid == 1)//Jai dialogas lygus 1 t.y Prisijungimui
{//Atidarome eilutę
	if(response)//Jai paspaude prisijungti mygtuką.
	{//Atidarome eilutę
	    new vardas[MAX_PLAYER_NAME], failas[128];//Kintamieji: Vardui, failui.
	    GetPlayerName(playerid, vardas,sizeof(vardas));//Sistema vardui išgauti.
	    format(failas,sizeof(failas),"vartotojai/%s.ini",vardas);
	    if(CheckPass(failas,inputtext))//Tikriną slaptažodi
	    {//Atidarome eilutę.
	        SendClientMessage(playerid, -1,"Sveikas sugryzes {00ff00}mielas zaidejau ;)");//Išsiunčiame žinutę jog sėkmingai prisijunge
		}//Atidarome eilutę.
		else//Priešingu atveju jai slaptažodis neteisingas.
		{//Atidarome eilutę.
		    SendClientMessage(playerid, -1,"Slaptazodis neteisingas, prasom pasitikrink dar karta!");//Išsiunčiame žinutę jog slaptažodis neteisingas
		    ShowPlayerDialog(playerid, 1, DIALOG_STYLE_PASSWORD,"{ffffff}[ PRISIJUNGIMAS ]","Slaptazodis neteisingas, prasom pasitikrtink dar karta","Prisijungti","Atsaukti");//Leidžiame įvesti dar kartą slaptažodi
		}//Uždarome eilute
		
		new exp;
		if(exp == -1)
		//baigiame procesąreturn 1;//
	}//Uždarome eilute
	else if(!response)//Priešingu atveju jai paspaude atšaukti arba ESC
	{//Atidarome eilutę.
	    Kick(playerid);//Išmetame žaidėją
	}//Atidarome eilutę.
	return 1;//Baigiame procesą
}//Visiškai uždarome eilutę

Kur nors modo gale :

stock CheckPass(failas[], password[])
{
	if(!strcmp(dini_Get(failas, "slaptazodis"), password, true )) return true;
	return false;
}

Lengviausia dalis baigta, einame prie sunkesnes - Krovimas / Saugojimas.

Viršui modo :

enum PlayerInfo//Enum'as
{//Atidarome
skin,//Skinui krauti / saugoti
admin,// Admin saugoti / krauti
lytis,
ieskomas,//Star Saugoti / krauti.
litai,//Pinigų saugojimui / krovimui
interioras// Interioro saugojimui / krovimui
}//Uždarome eilute
new pinfo[MAX_PLAYERS][PlayerInfo];//Pasidarome kad nereiktu rašyti ilgo žodžio t.y Nereikės rašyti PlayerInfo o tiesiog pinfo

+ dar kur nors žemiau sukuriame forward'us :

forward Saugojimas(playerid, bool:simple);//Saugojimui, tas bool:simple beveik nereikalingas bet viskgi panaudosiu ji ;D
forward Krovimas(playerid);//Krovimui.

Ir kodo gale dedame(paaiškinsiu ryt kas ką reiškia ) :

public Saugojimas(playerid, bool:simple)
{
	if(!simple) GameTextForPlayer(playerid, "~r~Saugojamas tavo zaidimas", 50000, 5);
	new file[128];
	new vardas[MAX_PLAYER_NAME];
	GetPlayerName(playerid, vardas,sizeof(vardas));
	format(file, sizeof(file), "vartotojai/%s.ini", vardas);
	new Float:pos[3], weps[2][12];
	GetPlayerPos(playerid, pos[0], pos[1], pos[2]);
	if(!fexist(file)){dini_Create(file);}
	dini_IntSet(file, "skin",GetPlayerSkin(playerid));
	dini_IntSet(file, "litai",GetPlayerMoney(playerid));
	dini_IntSet(file, "admin",pinfo[playerid][admin]);
	dini_IntSet(file, "ieskomumas",GetPlayerWantedLevel(playerid));
	dini_IntSet(file, "interioras",GetPlayerInterior(playerid));
	for(new tmp=0; tmp<12; tmp++) GetPlayerWeaponData(playerid, tmp,weps[0] [tmp],weps[1][tmp]);
	dini_IntSet(file,"Ginklas0",weps[0][0]); dini_IntSet(file,"Ammo0",weps[1][0]);
	dini_IntSet(file,"Ginklas1",weps[0][1]); dini_IntSet(file,"Ammo1",weps[1][1]);
	dini_IntSet(file,"Ginklas2",weps[0][2]); dini_IntSet(file,"Ammo2",weps[1][2]);
	dini_IntSet(file,"Ginklas3",weps[0][3]); dini_IntSet(file,"Ammo3",weps[1][3]);
	dini_IntSet(file,"Ginklas4",weps[0][4]); dini_IntSet(file,"Ammo4",weps[1][4]);
	dini_IntSet(file,"Ginklas5",weps[0][5]); dini_IntSet(file,"Ammo5",weps[1][5]);
	dini_IntSet(file,"Ginklas6",weps[0][6]); dini_IntSet(file,"Ammo6",weps[1][6]);
	dini_IntSet(file,"Ginklas7",weps[0][7]); dini_IntSet(file,"Ammo7",weps[1][7]);
	dini_IntSet(file,"Ginklas8",weps[0][8]); dini_IntSet(file,"Ammo8",weps[1][8]);
	dini_IntSet(file,"Ginklas9",weps[0][9]); dini_IntSet(file,"Ammo9",weps[1][9]);
	dini_IntSet(file,"Ginklas10",weps[0][10]); dini_IntSet(file,"Ammo10",weps[1][10]);
	dini_IntSet(file,"Ginklas11",weps[0][11]); dini_IntSet(file,"Ammo11",weps[1][11]);
	dini_FloatSet(file,"pos_X",pos[0]);
	dini_FloatSet(file,"pos_Y",pos[1]);
	dini_FloatSet(file,"pos_Z",pos[2]);
	return 1;
}

public Krovimas(playerid)
{
	print("Ikeliamas tavo zaidimas");
	new name[MAX_PLAYER_NAME],file[128];
	GetPlayerName(playerid,name,sizeof(name));
	format(file,sizeof(file),"Vartotojai/%s.ini",name);
	if(!fexist(file)) return;
	new tmpxp = dini_Int(file,"Xp");
	new pinigai = dini_Int(file,"litai");
	GivePlayerMoney(playerid, pinigai);
	SetPlayerScore(playerid, tmpxp);
	pinfo[playerid][admin] = dini_Int(file, "admin");
	SetPlayerPos(playerid,dini_Float(file,"pos_X"),dini_Float(file,"pos_Y"),dini_Float(file,"pos_Z"));
	GetPlayerSkin(dini_Int(file,"skin"));
	GetPlayerInterior(dini_Int(file,"Interioras"));
	GetPlayerWantedLevel(dini_Int(file,"ieskomumas"));
	GivePlayerWeapon(playerid,dini_Int(file,"Ginklas0"),dini_Int(file,"Ammo0"));
	GivePlayerWeapon(playerid,dini_Int(file,"Ginklas1"),dini_Int(file,"Ammo1"));
	GivePlayerWeapon(playerid,dini_Int(file,"Ginklas2"),dini_Int(file,"Ammo2"));
	GivePlayerWeapon(playerid,dini_Int(file,"Ginklas3"),dini_Int(file,"Ammo3"));
	GivePlayerWeapon(playerid,dini_Int(file,"Ginklas4"),dini_Int(file,"Ammo4"));
	GivePlayerWeapon(playerid,dini_Int(file,"Ginklas5"),dini_Int(file,"Ammo5"));
	GivePlayerWeapon(playerid,dini_Int(file,"Ginklas6"),dini_Int(file,"Ammo6"));
	GivePlayerWeapon(playerid,dini_Int(file,"Ginklas7"),dini_Int(file,"Ammo7"));
	GivePlayerWeapon(playerid,dini_Int(file,"Ginklas8"),dini_Int(file,"Ammo8"));
	GivePlayerWeapon(playerid,dini_Int(file,"Ginklas9"),dini_Int(file,"Ammo9"));
	GivePlayerWeapon(playerid,dini_Int(file,"Ginklas10"),dini_Int(file,"Ammo10"));
	GivePlayerWeapon(playerid,dini_Int(file,"Ginklas11"),dini_Int(file,"Ammo11"));
	return;
}

Pamoka nebaigta, ryt pridėsiu Automatini Saugojimą bei pridėsiu ką reiškia paskutiniame punkte, neber laiko

Ken · Sausio 14, 2014

Vietoj to

if(fexist(failas))

Nelogiškiau naudot :

else

?

Blankas · Sausio 14, 2014

mldč .

Diro` · Sausio 14, 2014

Hustrines pamoka, patiko ripint, ne?

MartynasK · Sausio 14, 2014

1. Atidarom ne eilutę, o naują kodą pradedam;

2. Kodėl kintamojo "failas" masyvas toks didelis? Pakaktų ir 50 - 60.

Ryt peržiūrėsiu pilnai ir paredaguosiu pranešimą kas negerai. Per telefoną nepatogiai kodas skaitosi.

Redaguota Sausio 14, 2014, nario Martis.`

#Karolis · Sausio 15, 2014

Hustrines pamoka, patiko ripint, ne?

Ne ne gėda, nes pats redagavau, taip kad jai nors raidę pakeiti pamoka yra man

Stuneris · Sausio 15, 2014

GetPlayerSkin(dini_Int(file,"skin"));

GetPlayerInterior(dini_Int(file,"Interioras"));

GetPlayerWantedLevel(dini_Int(file,"ieskomumas"));

Puikus duomenų krovimas, tikrai veiks. Kur playerid? Duodi žaidėjui interjerą, ieškomumą arba skiną su Get funkcijom?

skin,

ieskomas,

litai,

interioras

Kam visi šitie kintamieji, jei jų net nepanaudoji? Kaip matosi praeitoje citatoje tu juos „krauni“ tiesiogiai.

[RPG] Registracija / prisijungimas. Automatinis saugojimas.

Taip pat pavadinimas, kodėl būtent RPG? Vadinasi GRP, RP, FreeRoam, Stunt, Race ir galybėje kitų kategorijų serverių negalima naudot?

jai nors raidę pakeiti pamoka yra man

Pasakyk tai Lietuvos Autorių Teisių Gynybos Agentams (LATGA).

Redaguota Sausio 15, 2014, nario ≤ STUNERIS ≥

Nike_Eisma · Sausio 16, 2014

O MLDC

Pok33r · Sausio 16, 2014

dėkui,pravers gamemodų editinimų man.ačiū dar karta

PaulixxLT · Balandžio 8, 2015

Būkit, geri žmonės surašykit viską kaip turi būt.. Nieko neįkertu.

newyorkas · Balandžio 8, 2015

Būkit, geri žmonės surašykit viską kaip turi būt.. Nieko neįkertu.

taigi viskas parašyta kur ką rašyt.. atsimerk tu

Dennis_Dumars · Balandžio 15, 2015

Atsiprasau, man meta va vienoje eiluteje visus errorus galite pasakyti kad cia yra blogai?

http://www.part.lt/img/2c9e430b7479ab944ae3ec441c8a74f3369.png

vil · Balandžio 16, 2015

Atsiprasau, man meta va vienoje eiluteje visus errorus galite pasakyti kad cia yra blogai?

http://www.part.lt/img/2c9e430b7479ab944ae3ec441c8a74f3369.png

Prie visu stocku pridėk šita jei nepadėjei dar

stock CheckPass(failas[], password[])

{

if(!strcmp(dini_Get(failas, "slaptazodis"), password, true )) return true;

return false;

}

arba kur yra if(CheckPass(failas,inputtext)) eilutė pas tave truksta vieno ) kaip matau

Pats nesigaudau bet turėtu padėt :/

Redaguota Balandžio 16, 2015, nario vil

Prisijungti

[RPG] Registracija / prisijungimas. Automatinis saugojimas.

Recommended Posts

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Nuoroda į komentarą

Dalintis per kitą puslapį

Prisijungti prie diskusijos

Šiame puslapyje naršo: 0 nariai

Skelbimai

Naujausios temos

Naujausi būsenos atnaujinimai Nustatymai Teksto formatavimas Nario nuotrauka Member Išsaugoti

Nustatymai

Populiariausi nariai

Naujausi būsenos atnaujinimai

Nustatymai

Teksto formatavimas

Nario nuotrauka

Member