Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- // This is a comment
- // uncomment the line below if you want to write a filterscript
- //#define FILTERSCRIPT
- #include <a_samp>
- #include <dini>
- #include <dudb>
- #include <dutils>
- #pragma unused ret_memcpy
- forward LData(playerid);
- forward SData(playerid);
- LData(playerid);
- SData(playerid);
- new bool:Logged[MAX_PLAYERS];
- main()
- {
- print("\n----------------------------------");
- print(" v0.01 BETA by GOLF69");
- print("----------------------------------\n");
- }
- public OnGameModeInit()
- {
- // Don't use these lines if it's a filterscript
- SetGameModeText("GRP v 0.0.1");
- AddPlayerClass(0, 1958.3783, 1343.1572, 15.3746, 269.1425, 0, 0, 0, 0, 0, 0);
- return 1;
- }
- enum PlayerInfo
- {
- adminlevel,
- pAdminLevel,
- }
- new PInfo[MAX_PLAYERS][PlayerInfo];
- public OnGameModeExit()
- {
- return 1;
- }
- public OnPlayerRequestClass(playerid, classid)
- {
- SetPlayerPos(playerid, 1958.3783, 1343.1572, 15.3746);
- SetPlayerCameraPos(playerid, 1958.3783, 1343.1572, 15.3746);
- SetPlayerCameraLookAt(playerid, 1958.3783, 1343.1572, 15.3746);
- return 1;
- }
- public OnPlayerConnect(playerid)
- {
- Logged[playerid]=false;
- new file[128], vardas[128];
- GetPlayerName(playerid, vardas, 128);
- format(file,128,"vartotojai/%s.ini",vardas);
- dini_Exists(file);
- if(!dini_Exists(file))
- {
- ShowPlayerDialog(playerid,1,DIALOG_STYLE_INPUT,"Paskyros Registracija","Jei norite žaisti serveryje, turite susikurti paskyrą, kuri leis jum žaisti.\nĮveskite slaptažodį, kurį naudosite prisijungimui:","Registruotis","Išeiti");
- }
- else
- {
- ShowPlayerDialog(playerid,2,DIALOG_STYLE_INPUT,"Prisijungimas","Jei norite žaisti su savo paskyra serveryje, turite prisijungti\nĮveskite savo slaptažodį:","Prisijungti","Išeiti");
- }
- 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("/mycommand", cmdtext, true, 10) == 0)
- {
- // Do something here
- 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 == 1)
- {
- if(response)
- {
- new file[128], vardas[128];
- GetPlayerName(playerid,vardas,128);
- format(file,128,"vartotojai/%s.ini",vardas);
- dini_Create(file);
- dini_IntSet(file,"Slaptazodis",udb_hash(inputtext));
- dini_IntSet(file,"AdminLevel",PInfo[playerid][adminlevel] = 0);
- dini_IntSet(file,"Patirtis",SetPlayerScore(playerid, 200));
- dini_IntSet(file,"Eurai",GivePlayerMoney(playerid, 8000));
- Logged[playerid] = true;
- SendClientMessage(playerid,0xFFFFFFFF,"Paskyra sukurta sėkmingai, prie serverio jūs prijungtas automatiškai, o dabar spauskite SPAWN arba SHIFT klavišą.");
- }
- else if(!response)
- {
- Kick(playerid);
- }
- return 1;
- }
- if(dialogid == 2)
- {
- if(response) // jai paspaude prisijungti.
- {
- new file[128], vardas[128], pass[256];
- GetPlayerName(playerid, vardas, 128);
- format(file,128,"vartotojai/%s.ini",vardas);
- pass = dini_Get(file,"Slaptazodis");
- if(udb_hash(inputtext) != strval(pass))
- {
- ShowPlayerDialog(playerid,2,DIALOG_STYLE_INPUT,"Prisijungimas","Jūsų įvestas slaptažodis neteisingas.\nĮveskite savo slaptažodį:","Prisijungti","Išeiti");
- }
- else
- {
- Logged[playerid] = true;
- SendClientMessage(playerid,0xFFFFFFFF,"Jus sekmingai prisijungete");
- }
- }
- else if(!response)
- {
- Kick(playerid);
- }
- return 1;
- }
- return 1;
- }
- public OnPlayerClickPlayer(playerid, clickedplayerid, source)
- {
- return 1;
- }
- public LData(playerid)
- {
- new name[MAX_PLAYER_NAME], file[256];
- GetPlayerName(playerid, name, sizeof(name));
- format(file, sizeof(file), "vartotojai/%s.ini", name);
- GivePlayerMoney(playerid, dini_Int(file,"Eurai"));
- SetPlayerScore(playerid, dini_Int(file,"Patirtis"));
- PInfo[playerid][adminlevel] = dini_Int(file,"AdminLevel");
- return 1;
- }
- public SData(playerid)
- {
- new name[MAX_PLAYER_NAME], file[256];
- GetPlayerName(playerid, name, sizeof(name));
- format(file, sizeof(file), "vartotojai/%s.ini", name);
- dini_IntSet(file,"Eurai",GetPlayerMoney(playerid));
- dini_IntSet(file,"Patirtis",GetPlayerScore(playerid));
- dini_IntSet(file,"AdminLevel",PInfo[playerid][pAdminLevel]);
- return 1;
- }
Advertisement
Add Comment
Please, Sign In to add comment