API tools faq
paste
Guest User

Dovydas.

a guest
Sep 14th, 2013
577
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 12.21 KB | None | 0 0
raw download clone embed print report
  1. #include <a_samp>
  2. #include <Dini>
  3. #include <foreach>
  4. #include <zcmd>
  5. #include <dudb>
  6. #pragma unused ret_memcpy
  7.  
  8. #define WHITE 0xFFFFFFAA
  9.  
  10. forward Saugojimas( playerid );
  11. forward Uzkraunam( playerid );
  12. forward TaskuPridejimas(playerid);
  13.  
  14. //kintamieji
  15. new bool:Logged[MAX_PLAYERS];
  16. new bool:Naujokas[MAX_PLAYERS];
  17. new Lytis[MAX_PLAYERS];
  18. new Admin[MAX_PLAYERS];
  19.  
  20.  
  21.  
  22. public OnGameModeInit()
  23. {
  24. SetGameModeText("LifeFierRP 0.1.00");
  25. SendRconCommand("mapname SAN FIERRO");
  26. AddPlayerClass(0, 1958.33, 1343.12, 15.36, 269.15, 26, 36, 28, 150, 0, 0);
  27. AddPlayerClass(1, 1958.33, 1343.12, 15.36, 269.15, 26, 36, 28, 150, 0, 0);
  28. return 1;
  29. }
  30.  
  31. public OnGameModeExit()
  32. {
  33. SendClientMessageToAll( -1, "Serveris išjungiamas, prisijung vėliau. ");
  34. return 1;
  35. }
  36.  
  37. public OnPlayerRequestClass(playerid, classid)
  38. {
  39. return 1;
  40. }
  41.  
  42. public OnPlayerConnect(playerid)
  43. {
  44. Logged[playerid] = false; //tikrinam ar zaidejas prisijunges
  45. Lytis[playerid] = false; //nustatom, kad zaidejas nepasirinkes lyties
  46. Admin[playerid] = false; //nustatom, kad zaidejas prisijunges netaptu adminu
  47.  
  48. new name[MAX_PLAYER_NAME],file[128];
  49. GetPlayerName(playerid,name,sizeof(name));
  50. format(file,sizeof(file),"vartotojai/%s.ini",name);
  51. if(!dini_Exists(file))
  52. {
  53. ShowPlayerDialog(playerid,0, DIALOG_STYLE_PASSWORD, "LifeFierRP registracija", "Prašome įvesti slaptažodį,\n{FF0000}> {FFFFFF}Slaptodis turi būti sudarytas minimaliai iš 3 skaitemų.\n{FF0000}> {FFFFFF}Norint apsaugoti paskyrą, dėkite sunku slaptažodį.", "Registuotis", "Atsijungti");
  54. }
  55. else if(dini_Exists(file))
  56. {
  57. ShowPlayerDialog(playerid,1, DIALOG_STYLE_PASSWORD, "LifeFierRP prisijungimas", "Prašome įvesti slaptažodį,\n{FF0000}> {FFFFFF}Kuri užrašėte registruodamėsi.", "Prisijungti", "Atsijungti");
  58. }
  59.  
  60. //prisijungimo tekstai
  61. SendClientMessage(playerid,WHITE,"{EE5555}***{ffffff} Sveikas atvykęs į LifeFierRP serverį!");
  62. SendClientMessage(playerid,WHITE,"{EE5555}***{ffffff} Mūsų projekto tinklapis: LifeFierRP.US.lt !");
  63. SendClientMessage(playerid,WHITE,"{EE5555}***{ffffff} Serverio kūrėjas: Johan_Fozzy !");
  64. SendClientMessage(playerid,WHITE,"{EE5555}***{ffffff} Serverio SAVININKAI: Johan_Fozzy ; Micheal_Shadow !");
  65. return 1;
  66. }
  67.  
  68. public OnPlayerDisconnect(playerid, reason)
  69. {
  70. Saugojimas( playerid );
  71. return 1;
  72. }
  73.  
  74. public OnPlayerSpawn(playerid)
  75. {
  76. Uzkraunam(playerid);
  77.  
  78. new name[MAX_PLAYER_NAME],file[128];
  79. GetPlayerName(playerid,name,sizeof(name));
  80. format(file,sizeof(file),"saves/users/%s.ini",name);
  81. //lyties tikrinimas
  82. if(Lytis[playerid] == 1)
  83. {
  84. SetPlayerSkin(playerid, 188);
  85. }
  86. else if (Lytis[playerid] == 0)
  87. {
  88. SetPlayerSkin(playerid, 93);
  89. }
  90.  
  91.  
  92. //tikrinam ar naujokas, jei taip duodam pinigus, nustatom pozicija ir skiriam lyti
  93. if(Naujokas[playerid] == true)
  94. {
  95. GivePlayerMoney(playerid, 5000);
  96. SetPlayerPos(playerid, -1972.8463,137.9732,27.6875,89.8435);
  97. }
  98.  
  99. if(Naujokas[playerid] == true)
  100. {
  101. ShowPlayerDialog(playerid,2,DIALOG_STYLE_MSGBOX,"Lyties pasirinkimas","Prašome pasirinkti žaidimo lytį, lyties žaidime pasikeisti negalėsite,\nsiūlome rinktis savo tikrąją lyti!","Vaikinas","Mergina");
  102. }
  103.  
  104. //tikrinam ar adminas
  105. if(Admin[playerid] == 1)
  106. {
  107. SendClientMessage(playerid,WHITE,"{EE5555}***{ffffff} Sveiki prisijungę prie serverio, mūsų serverio {006600}Administratoriau !{ffffff} .");
  108. }
  109.  
  110. SetTimerEx("TaskuPridejimas", 61000, true, "i", playerid); //nustatau taimeri kad kiltu xp
  111. return 1;
  112. }
  113.  
  114. public OnPlayerDeath(playerid, killerid, reason)
  115. {
  116. return 1;
  117. }
  118.  
  119. public OnVehicleSpawn(vehicleid)
  120. {
  121. return 1;
  122. }
  123.  
  124. public OnVehicleDeath(vehicleid, killerid)
  125. {
  126. return 1;
  127. }
  128.  
  129. public OnPlayerText(playerid, text[])
  130. {
  131. new vardas[ 24 ], stringas[ 158 ];
  132. GetPlayerName( playerid, vardas, 24 );
  133. format( stringas, 158, "{99FF00}%s{ffffff} %s", vardas, text);
  134. SendClientMessage( playerid, -1, stringas);
  135. return 0;
  136. }
  137.  
  138.  
  139. public OnPlayerCommandText(playerid, cmdtext[])
  140. {
  141. }
  142.  
  143.  
  144. public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
  145. {
  146. return 1;
  147. }
  148.  
  149. public OnPlayerExitVehicle(playerid, vehicleid)
  150. {
  151. return 1;
  152. }
  153.  
  154. public OnPlayerStateChange(playerid, newstate, oldstate)
  155. {
  156. return 1;
  157. }
  158.  
  159. public OnPlayerEnterCheckpoint(playerid)
  160. {
  161. return 1;
  162. }
  163.  
  164. public OnPlayerLeaveCheckpoint(playerid)
  165. {
  166. return 1;
  167. }
  168.  
  169. public OnPlayerEnterRaceCheckpoint(playerid)
  170. {
  171. return 1;
  172. }
  173.  
  174. public OnPlayerLeaveRaceCheckpoint(playerid)
  175. {
  176. return 1;
  177. }
  178.  
  179. public OnRconCommand(cmd[])
  180. {
  181. return 1;
  182. }
  183.  
  184. public OnPlayerRequestSpawn(playerid)
  185. {
  186. if(Logged[playerid] == false && Naujokas[playerid] == false)
  187. {
  188. SendClientMessage(playerid,WHITE,"{EE5555}***{ffffff} Pirmiausia prisijungite!");
  189. return 0;
  190. }
  191. return 1;
  192. }
  193.  
  194. public OnObjectMoved(objectid)
  195. {
  196. return 1;
  197. }
  198.  
  199. public OnPlayerObjectMoved(playerid, objectid)
  200. {
  201. return 1;
  202. }
  203.  
  204. public OnPlayerPickUpPickup(playerid, pickupid)
  205. {
  206. return 1;
  207. }
  208.  
  209. public OnVehicleMod(playerid, vehicleid, componentid)
  210. {
  211. return 1;
  212. }
  213.  
  214. public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
  215. {
  216. return 1;
  217. }
  218.  
  219. public OnVehicleRespray(playerid, vehicleid, color1, color2)
  220. {
  221. return 1;
  222. }
  223.  
  224. public OnPlayerSelectedMenuRow(playerid, row)
  225. {
  226. return 1;
  227. }
  228.  
  229. public OnPlayerExitedMenu(playerid)
  230. {
  231. return 1;
  232. }
  233.  
  234. public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
  235. {
  236. return 1;
  237. }
  238.  
  239. public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
  240. {
  241. return 1;
  242. }
  243.  
  244. public OnRconLoginAttempt(ip[], password[], success)
  245. {
  246. return 1;
  247. }
  248.  
  249. public OnPlayerUpdate(playerid)
  250. {
  251. return 1;
  252. }
  253.  
  254. public OnPlayerStreamIn(playerid, forplayerid)
  255. {
  256. return 1;
  257. }
  258.  
  259. public OnPlayerStreamOut(playerid, forplayerid)
  260. {
  261. return 1;
  262. }
  263.  
  264. public OnVehicleStreamIn(vehicleid, forplayerid)
  265. {
  266. return 1;
  267. }
  268.  
  269. public OnVehicleStreamOut(vehicleid, forplayerid)
  270. {
  271. return 1;
  272. }
  273.  
  274. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  275. {
  276.  
  277. if(dialogid == 0) //registracija
  278. {
  279. if(response) //jeigu paspaude registruotis
  280. {
  281. if(strlen(inputtext) < 3)
  282. {
  283. SendClientMessage(playerid,WHITE,"{EE5555}***{ffffff} Slaptodis turi būti nemažesnis nei trijų skaitmenų.");
  284. ShowPlayerDialog(playerid, 0, DIALOG_STYLE_PASSWORD, "LifeFierRP registracija", "Prašome įvesti slaptažodį,\n{FF0000}> {FFFFFF}Slaptodis turi būti sudarytas minimaliai iš 3 skaitemų.\n{FF0000}> {FFFFFF}Norint apsaugoti paskyrą, dėkite sunku slaptažodį.", "Registuotis", "Atsijungti");
  285. }
  286. else
  287. {
  288. new name[MAX_PLAYER_NAME],file[128];
  289. GetPlayerName(playerid,name,sizeof(name));
  290. format(file,sizeof(file),"vartotojai/%s.ini",name);
  291. dini_Create(file);
  292. dini_IntSet(file,"slaptazodis",udb_hash(inputtext));
  293. format(file,sizeof(file),"{EE5555}***{ffffff} Jūs užsiregistravote, jūsų slaptažodis( %s ), Spauskite SPAWN kad pradėti toliau žaidimą",inputtext);
  294. SendClientMessage(playerid,WHITE,file);
  295. Naujokas[playerid] = true;
  296. }
  297. }
  298. else if(!response)
  299. {
  300. Kick(playerid);
  301. SendClientMessage(playerid,WHITE,"{EE5555}***{ffffff} Jūs esate išspirtas iš serverio.");
  302. }
  303. }
  304.  
  305. if(dialogid == 1) // prisijungimas
  306. {
  307. if(response) // jeigu paspaude prisijungti
  308. {
  309. new file[128], name[128], pass[256]; // kintamieji
  310. GetPlayerName(playerid, name, 128); // gaunam slapyvardi
  311. format(file,sizeof(file),"vartotojai/%s.ini",name);
  312. pass = dini_Get(file,"slaptazodis"); // Gaunam zaidejo tikra slaptazodi.
  313. if(udb_hash(inputtext) != strval(pass)) // Jai zaidejo irasytas slaptazodis neatitinka tikram slaptazodziui.
  314. {
  315. ShowPlayerDialog(playerid,1, DIALOG_STYLE_PASSWORD, "Prisijungimas", "Jūsų suvestas slaptažodis neteisingas", "Prisijungti", "Atsijungti");
  316. }
  317. else
  318. {
  319. Logged[playerid] = true;
  320. SendClientMessage(playerid,WHITE,"{EE5555}***{ffffff} Sveikiname prisijungus prie serverio, geros dienos.");
  321. }
  322. }
  323. else if(!response)
  324. {
  325. Kick(playerid);
  326. SendClientMessage(playerid,WHITE,"{EE5555}***{ffffff} Jūs esate išspirtas iš serverio.");
  327. }
  328. }
  329.  
  330. if(dialogid == 2) // lyties pasirinkimas
  331. {
  332. if(response)
  333. {
  334. SendClientMessage(playerid,WHITE,"{EE5555}***{ffffff} Jūs pasirinkote {EE5555}VAIKINO{ffffff} lyti, gero žaidimo jums linki {EE5555}Serverio administracija{ffffff}.");
  335. SetPlayerSkin(playerid, 2);
  336. Lytis[playerid] = true;
  337. }
  338. if(!response)
  339. {
  340. SendClientMessage(playerid,WHITE,"{EE5555}***{ffffff} Jūs pasirinkote {EE5555}MERGINOS{ffffff} lyti, gero žaidimo jums linki {EE5555}Serverio administracija{ffffff}.");
  341. SetPlayerSkin(playerid, 55);
  342. Lytis[playerid] = false;
  343. }
  344. }
  345.  
  346. return 1;
  347. }
  348.  
  349. public OnPlayerClickPlayer(playerid, clickedplayerid, source)
  350. {
  351. return 1;
  352. }
  353.  
  354.  
  355.  
  356. stock CheckPass(file[],password[])
  357. {
  358. if(!strcmp(dini_Get(file,"slaptazodis"), password, true )) return true;
  359. return false;
  360. }
  361.  
  362. public Saugojimas(playerid)
  363. {
  364. new Float:coo[3], weps[2][12];
  365. new name[MAX_PLAYER_NAME], file[256];
  366. GetPlayerName(playerid, name, sizeof(name));
  367. format(file, sizeof(file), "vartotojai/%s.ini", name);
  368. if(!fexist(file)){dini_Create(file);}
  369. GetPlayerPos(playerid,coo[0],coo[1],coo[2]);
  370. dini_IntSet(file,"Xp",GetPlayerScore(playerid));
  371. dini_IntSet(file,"Pinigai",GetPlayerMoney(playerid));
  372. dini_IntSet(file,"Lytis",Lytis[playerid]);
  373. dini_IntSet(file,"Admin",Admin[playerid]);
  374. for (new tmp=0; tmp<12; tmp++) GetPlayerWeaponData(playerid,tmp,weps[0][tmp],weps[1][tmp]);
  375. dini_IntSet(file,"Ginklas0",weps[0][0]); dini_IntSet(file,"Ammo0",weps[1][0]);
  376. dini_IntSet(file,"Ginklas1",weps[0][1]); dini_IntSet(file,"Ammo1",weps[1][1]);
  377. dini_IntSet(file,"Ginklas2",weps[0][2]); dini_IntSet(file,"Ammo2",weps[1][2]);
  378. dini_IntSet(file,"Ginklas3",weps[0][3]); dini_IntSet(file,"Ammo3",weps[1][3]);
  379. dini_IntSet(file,"Ginklas4",weps[0][4]); dini_IntSet(file,"Ammo4",weps[1][4]);
  380. dini_IntSet(file,"Ginklas5",weps[0][5]); dini_IntSet(file,"Ammo5",weps[1][5]);
  381. dini_IntSet(file,"Ginklas6",weps[0][6]); dini_IntSet(file,"Ammo6",weps[1][6]);
  382. dini_IntSet(file,"Ginklas7",weps[0][7]); dini_IntSet(file,"Ammo7",weps[1][7]);
  383. dini_IntSet(file,"Ginklas8",weps[0][8]); dini_IntSet(file,"Ammo8",weps[1][8]);
  384. dini_IntSet(file,"Ginklas9",weps[0][9]); dini_IntSet(file,"Ammo9",weps[1][9]);
  385. dini_IntSet(file,"Ginklas10",weps[0][10]); dini_IntSet(file,"Ammo10",weps[1][10]);
  386. dini_IntSet(file,"Ginklas11",weps[0][11]); dini_IntSet(file,"Ammo11",weps[1][11]);
  387. dini_FloatSet(file,"pos_X",coo[0]); dini_FloatSet(file,"pos_Y",coo[1]); dini_FloatSet(file,"pos_Z",coo[2]);
  388. return 1;
  389. }
  390.  
  391. public Uzkraunam(playerid)
  392. {
  393. new name[MAX_PLAYER_NAME],file[128];
  394. GetPlayerName(playerid,name,sizeof(name));
  395. format(file,sizeof(file),"vartotojai/%s.ini",name);
  396. new tmpxp = dini_Int(file,"Xp");
  397.  
  398. SetPlayerScore(playerid,tmpxp);
  399. GivePlayerMoney(playerid, dini_Int(file,"Pinigai"));
  400. Lytis[playerid] = dini_Int(file, "Lytis");
  401. Admin[playerid] = dini_Int(file, "Admin");
  402. SetPlayerPos(playerid,dini_Float(file,"pos_X"),dini_Float(file,"pos_Y"),dini_Float(file,"pos_Z"));
  403. GivePlayerWeapon(playerid,dini_Int(file,"Ginklas0"),dini_Int(file,"Ammo0"));
  404. GivePlayerWeapon(playerid,dini_Int(file,"Ginklas1"),dini_Int(file,"Ammo1"));
  405. GivePlayerWeapon(playerid,dini_Int(file,"Ginklas2"),dini_Int(file,"Ammo2"));
  406. GivePlayerWeapon(playerid,dini_Int(file,"Ginklas3"),dini_Int(file,"Ammo3"));
  407. GivePlayerWeapon(playerid,dini_Int(file,"Ginklas4"),dini_Int(file,"Ammo4"));
  408. GivePlayerWeapon(playerid,dini_Int(file,"Ginklas5"),dini_Int(file,"Ammo5"));
  409. GivePlayerWeapon(playerid,dini_Int(file,"Ginklas6"),dini_Int(file,"Ammo6"));
  410. GivePlayerWeapon(playerid,dini_Int(file,"Ginklas7"),dini_Int(file,"Ammo7"));
  411. GivePlayerWeapon(playerid,dini_Int(file,"Ginklas8"),dini_Int(file,"Ammo8"));
  412. GivePlayerWeapon(playerid,dini_Int(file,"Ginklas9"),dini_Int(file,"Ammo9"));
  413. GivePlayerWeapon(playerid,dini_Int(file,"Ginklas10"),dini_Int(file,"Ammo10"));
  414. GivePlayerWeapon(playerid,dini_Int(file,"Ginklas11"),dini_Int(file,"Ammo11"));
  415. return;
  416. }
  417.  
  418. public TaskuPridejimas(playerid)
  419. {
  420. SetPlayerScore(playerid, GetPlayerScore(playerid) + 2);
  421. return 1;
  422. }
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!