API tools faq
paste
Guest User

Untitled

a guest
May 7th, 2020
549
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 18.61 KB | None | 0 0
raw download clone embed print report
  1. // Gamemode kūrėjas Tommy_Shelby [Povilasz]
  2.  
  3. #include <a_samp>
  4. #include <dini>
  5. #include <dudb>
  6. #include <dutils>
  7. #include <zcmd>
  8. #include <sscanf2>
  9. #include <streamer>
  10.  
  11.  
  12. #pragma unused ret_memcpy
  13.  
  14. forward Saugojimas(playerid, bool:simple);
  15. forward Krovimas(playerid);
  16. forward XP();
  17. forward SendMSG();
  18.  
  19. new bool:Logged[MAX_PLAYERS];
  20. // pickupai
  21. new prizi; // kelių prižiūrėtojų darbo pickupas
  22. // mašinos
  23. new prcr[6]; // kelių prižiūrėtojų darbo mašinos
  24. enum PlayerInfo
  25. {
  26. adminas,
  27. patirtis,
  28. naujokas,
  29. darbas,
  30. pinigai,
  31. vipas,
  32. pLead,
  33. leanvited
  34. }
  35.  
  36. new pInfo[MAX_PLAYERS][PlayerInfo];
  37.  
  38. main()
  39. {
  40. print("\n----------------------------------");
  41. print(" Gamemode Sekmingai Užkrautas!");
  42. print("----------------------------------\n");
  43. }
  44.  
  45. public OnGameModeInit()
  46. {
  47. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~XP kilimo timeris~~~~~~~~~~~~~~~~~~~~~~~~~
  48. SetTimer("XP", 60000, true); //Čia parašome kas kiek laiko kils po 1xp (60s)
  49. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~Gamemode versija~~~~~~~~~~~~~~~~~~~~~~~~~~~
  50. SetGameModeText("TLSFG 0.0.1");//Serverio versija
  51. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~Darbo text label~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  52. Create3DTextLabel("{FFFFFF}Darbas be pakvietimo\n{C2ECFF}Kelių prižiūrėtojai", 0xFFFFFF, -1977.7805,79.7342,27.6875, 50, 0, 1);
  53. Create3DTextLabel("• Sveiki atvykę į TLSFG.LT serverį\nMalonaus žaidimo linki\n Serverio administracija •",0x0000FFFF,-1974.9351,137.9220,27.6875, 50, 0, 1);
  54. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~Darbo pickupai~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  55. prizi = CreatePickup(1275, 2, -1977.7805,79.7342,27.6875); // kelių prižiūrėtojų pickup
  56. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~Kelių darbo mašinos~~~~~~~~~~~~~~~~~~~~~~~~~
  57. prcr[0] = AddStaticVehicleEx(422,-1963.6680,105.2518,27.6773,89.3024, 1,0,1); // kelių prižiūrėtojų mašina
  58. prcr[1] = AddStaticVehicleEx(422,-1963.5784,100.5904,27.6729,90.6105, 1,0,1); // kelių prižiūrėtojų mašina
  59. prcr[2] = AddStaticVehicleEx(422,-1963.5647,94.4268,27.6724,91.1661, 1,0,1); // kelių prižiūrėtojų mašina
  60. prcr[3] = AddStaticVehicleEx(422,-1963.5516,89.6235,27.6722,89.0221, 1,0,1); // kelių prižiūrėtojų mašina
  61. prcr[4] = AddStaticVehicleEx(422,-1963.7640,85.0626,27.6718,92.0624, 1,0,1); // kelių prižiūrėtojų mašina
  62. prcr[5] = AddStaticVehicleEx(422,-1963.6162,80.6045,27.6729,90.2839, 1,0,1); // kelių prižiūrėtojų mašina
  63. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~Dviračiai spawnui~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  64. AddStaticVehicle(510,-1986.4064,166.6300,27.2693,180.0412,31,31); // dviratis1
  65. AddStaticVehicle(510,-1986.3650,159.8101,27.2693,180.9170,31,31); // dviratis2
  66. AddStaticVehicle(510,-1986.2562,153.9006,27.2692,181.3264,31,31); // dviratis3
  67. AddStaticVehicle(510,-1986.0448,146.2727,27.2692,181.9796,31,31); // dviratis4
  68. AddStaticVehicle(510,-1986.2321,130.5169,27.2692,181.0686,31,31); // dviratis5
  69. AddStaticVehicle(510,-1986.1106,124.8674,27.2692,181.5334,31,31); // dviratis6
  70. AddStaticVehicle(510,-1985.9310,118.5375,27.2671,181.8190,31,31); // dviratis7
  71. AddStaticVehicle(510,-1986.0194,111.8940,27.2674,180.6153,37,37); // dviratis8
  72. }
  73.  
  74.  
  75. public OnGameModeExit()
  76. {
  77. return 1;
  78. }
  79.  
  80. public OnPlayerRequestClass(playerid, classid)
  81. {
  82. TogglePlayerSpectating(playerid, true);
  83. //~~~~~~~~~~~~~~~~~~~~Spawn vieta ir kameros pozicijos~~~~~~~~~~~~~~~~~~~~~~
  84. SetSpawnInfo(playerid, 0, 0, -1970.3409,137.9245,27.6875,89.6009,0,0,0,0,0,0); //spawno vieta
  85. SetPlayerPos(playerid, 1958.3783, 1343.1572, 15.3746);
  86. SetPlayerCameraPos(playerid, 1958.3783, 1343.1572, 15.3746);
  87. SetPlayerCameraLookAt(playerid, 1958.3783, 1343.1572, 15.3746);
  88. return 1;
  89. }
  90.  
  91. public OnPlayerConnect(playerid)
  92. {
  93. //~~~~~~~~~~~~~~~~~~~~~~~Kai užsiregina ką gauna~~~~~~~~~~~~~~~~~~~~~~~~~~~
  94. SetPlayerScore(playerid, 1500);//Parašome kiek žaidėjas gaus xp
  95. GivePlayerMoney(playerid, 25000);//Parašome kiek žaidėjas gaus eu
  96. SetPlayerHealth(playerid, 100);//nustatome kiek žaidėjas gaus gyvybių
  97. SetPlayerArmour(playerid, 100);//nustatome kiek žaidėjas gaus šarvų
  98. SetPlayerSkin(playerid,185);//Priskiriame žaidėjui skiną
  99. SetPlayerColor(playerid, 0x808080FF);//priskiriame žaidėjui spalvą
  100. //~~~~~~~~~~~~~~~~~~~~~~~~~~Adminas 3d labelis~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  101. if(pInfo[playerid][adminas])
  102. {
  103. new Text3D:adminas3d[MAX_PLAYERS];
  104. adminas3d[playerid] = Create3DTextLabel("Administratorius",0x008080FF,30.0,40.0,50.0,40.0,0);//virš admin galvos rašys
  105. Attach3DTextLabelToPlayer(adminas3d[playerid], playerid, 0.0, 0.0, 0.7);
  106. }
  107. //~~~~~~~~~~~~~~~~~~~~~~~LOGIN IR REGISTRACIJA~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  108. Logged[playerid] = false;
  109. new failas[128], vardas[128];
  110. GetPlayerName(playerid, vardas, 128);
  111. format(failas, 128,"Zaidejai/%s.ini", vardas);
  112. if(!dini_Exists(failas))
  113. {
  114. ShowPlayerDialog(playerid, 1,DIALOG_STYLE_PASSWORD,"Registracija prie serverio","Sveiki atvykę į TLSFG.LT, prašome užsiregistruoti\nĮveskite savo sugalvotą slaptažodį:","Gerai","Išeiti");
  115. }
  116. else if(dini_Exists(failas))
  117. {
  118. ShowPlayerDialog(playerid, 2, DIALOG_STYLE_PASSWORD,"Prisijungimas prie serverio","Sveiki sugryžę į TLSFG.LT, prašome prisijungti\nĮveskite savo paskyros slaptažodį:","Gerai","Išeiti");
  119. }
  120. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~INFORMACIJA~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  121. SendClientMessage(playerid,0x00FF00FF, "• [INFORMACIJA] {99ff00}Sveikas atvykęs į TLSFG.LT serverį, linkime gerai praleisti laiką. •");
  122. SendClientMessage(playerid,0x00FF00FF, "• [INFORMACIJA] {99ff00}Serverio taisykles galite sužinoti parašę /taisykles •");
  123. SendClientMessage(playerid,0x00FF00FF, "• [INFORMACIJA] {99ff00}Radus serveryje klaidą ar bugą, praneškite serverio savininkui •");
  124. SendClientMessage(playerid,0x00FF00FF, "• [INFORMACIJA] {99ff00}Serverio savininko discord: {ffffff}JŪSŲ DICSCORD•");
  125. return 1;
  126. }
  127.  
  128. public OnPlayerDisconnect(playerid, reason)
  129. {
  130. Saugojimas(playerid, true);
  131. return 1;
  132. }
  133.  
  134. public OnPlayerSpawn(playerid)
  135. {
  136. Krovimas(playerid);//krovimas
  137. if(pInfo[playerid][naujokas] == 1)
  138. {
  139. pInfo[playerid][adminas] = 0;//užkrauna jei turi adminą
  140. pInfo[playerid][darbas] = 0;//užkrauna jei turi darbą
  141. SetPlayerPos(playerid, -1970.3409,137.9245,27.6875);//nustato buvimo vietą
  142. pInfo[playerid][naujokas] = 0;
  143. }
  144. return 1;
  145. }
  146.  
  147. public OnPlayerDeath(playerid, killerid, reason)
  148. {
  149. return 1;
  150. }
  151.  
  152. public OnVehicleSpawn(vehicleid)
  153. {
  154. return 1;
  155. }
  156.  
  157. public OnVehicleDeath(vehicleid, killerid)
  158. {
  159. return 1;
  160. }
  161.  
  162. public OnPlayerText(playerid, text[])
  163. {
  164. /*new vardas[ 30 ], stringas[ 158 ];
  165. GetPlayerName( playerid, vardas, 24 );
  166. format( stringas, 158, "{99FF00}%s sako:{ffffff} %s", vardas, text);
  167. SendClientMessage( playerid, -1, stringas);
  168. return 1;*/
  169. }
  170.  
  171. public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
  172. {
  173. return 1;
  174. }
  175.  
  176. public OnPlayerExitVehicle(playerid, vehicleid)
  177. {
  178. return 1;
  179. }
  180.  
  181. public OnPlayerStateChange(playerid, newstate, oldstate)
  182. {
  183. new MasinosID = GetPlayerVehicleID(playerid);
  184. if(newstate == PLAYER_STATE_DRIVER)
  185. {
  186. if(MasinosID == prcr[5])
  187. {
  188. if(pInfo[playerid][darbas] == 10)
  189. {
  190. }
  191. else
  192. {
  193. RemovePlayerFromVehicle(playerid);
  194. SendClientMessage(playerid, 0x008000FF, "• Šį automobilį gali vairuoti tik darbuotojai •");
  195. }
  196. }
  197. }
  198. return 1;
  199. }
  200.  
  201.  
  202. public OnPlayerEnterCheckpoint(playerid)
  203. {
  204. return 1;
  205. }
  206.  
  207. public OnPlayerLeaveCheckpoint(playerid)
  208. {
  209. return 1;
  210. }
  211.  
  212. public OnPlayerEnterRaceCheckpoint(playerid)
  213. {
  214. return 1;
  215. }
  216.  
  217. public OnPlayerLeaveRaceCheckpoint(playerid)
  218. {
  219. return 1;
  220. }
  221.  
  222. public OnRconCommand(cmd[])
  223. {
  224. return 1;
  225. }
  226.  
  227. public OnPlayerRequestSpawn(playerid)
  228. {
  229. return 1;
  230. }
  231.  
  232. public OnObjectMoved(objectid)
  233. {
  234. return 1;
  235. }
  236.  
  237. public OnPlayerObjectMoved(playerid, objectid)
  238. {
  239. return 1;
  240. }
  241.  
  242. public OnPlayerPickUpPickup(playerid, pickupid)
  243. {
  244. //~~~~~~~~~~~~~~~~~~~Kelių prižiūrėtojo darbo pickupas~~~~~~~~~~~~~~~~~~~~~~
  245. if(pickupid == prizi)
  246. {
  247. SetPlayerSkin(playerid, 16);
  248. pInfo[playerid][darbas] = 10;
  249. SendClientMessage(playerid, 0x008000FF,"• Sėkmingai įsidarbinote į Kelių Prižiūrėtojus! Sėkmės darbe. •");
  250. }
  251. return 1;
  252. }
  253.  
  254. public OnVehicleMod(playerid, vehicleid, componentid)
  255. {
  256. return 1;
  257. }
  258.  
  259. public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
  260. {
  261. return 1;
  262. }
  263.  
  264. public OnVehicleRespray(playerid, vehicleid, color1, color2)
  265. {
  266. return 1;
  267. }
  268.  
  269. public OnPlayerSelectedMenuRow(playerid, row)
  270. {
  271. return 1;
  272. }
  273.  
  274. public OnPlayerExitedMenu(playerid)
  275. {
  276. return 1;
  277. }
  278.  
  279. public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
  280. {
  281. return 1;
  282. }
  283.  
  284. public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
  285. {
  286. return 1;
  287. }
  288.  
  289. public OnRconLoginAttempt(ip[], password[], success)
  290. {
  291. return 1;
  292. }
  293.  
  294. public OnPlayerUpdate(playerid)
  295. {
  296. return 1;
  297. }
  298.  
  299. public OnPlayerStreamIn(playerid, forplayerid)
  300. {
  301. return 1;
  302. }
  303.  
  304. public OnPlayerStreamOut(playerid, forplayerid)
  305. {
  306. return 1;
  307. }
  308.  
  309. public OnVehicleStreamIn(vehicleid, forplayerid)
  310. {
  311. return 1;
  312. }
  313.  
  314. public OnVehicleStreamOut(vehicleid, forplayerid)
  315. {
  316. return 1;
  317. }
  318.  
  319. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  320. {
  321. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~REGISTRACIJA/LOGIN~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  322. if(dialogid == 1)
  323. {
  324. if(response)
  325. {
  326. new failas[128], vardas[128];
  327. GetPlayerName(playerid, vardas, 128);
  328. format(failas, 128,"Zaidejai/%s.ini", vardas);
  329. dini_Create(failas);
  330. dini_IntSet(failas, "Slaptazodis", udb_hash(inputtext));
  331. dini_IntSet(failas, "naujokas", pInfo[playerid][naujokas] = 1);
  332. Logged[playerid] = true;
  333. SendClientMessage(playerid, 0xFFFFFFFF,"Sėkmingai prisiregistravote");
  334. SendClientMessage(playerid, 0xFFFFFFFF,"Malonaus žaidimo linki serverio administracija");
  335. }
  336. else if(!response)
  337. {
  338. Kick(playerid);
  339. }
  340. }
  341.  
  342. if(dialogid == 2)
  343. {
  344. if(response)
  345. {
  346. new failas[128], vardas[128], pass[300];
  347. GetPlayerName(playerid, vardas, 128);
  348. format(failas, 128, "Zaidejai/%s.ini", vardas);
  349. pass = dini_Get(failas, "Slaptazodis");
  350. if(udb_hash(inputtext) != strval(pass))
  351. {
  352. ShowPlayerDialog(playerid,2, DIALOG_STYLE_PASSWORD,"Prisijungimas prie serverio","Jūsų įvestas slaptažodis buvo neteisingas.\nĮveskite dar kartą:","Gerai","Išeiti");
  353. }
  354. else
  355. {
  356. Logged[playerid] = true;
  357. SendClientMessage(playerid, 0xFFFFFFFF,"Sėkmingai prisijungėte.");
  358. SendClientMessage(playerid, 0xFFFFFFFF,"Gero žaidimo linki serverio administracija.");
  359. }
  360. }
  361. else if(!response)
  362. {
  363. Kick(playerid);
  364. }
  365. return 1;
  366. }
  367. return 1;
  368. }
  369.  
  370. public OnPlayerClickPlayer(playerid, clickedplayerid, source)
  371. {
  372. return 1;
  373. }
  374. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~SAUGOJIMAS~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  375. public Saugojimas(playerid, bool:simple)
  376. {
  377. new vardas[MAX_PLAYER_NAME], failas[256];
  378. new Float:Pozicija_x,Float:Pozicija_y,Float:Pozicija_z;
  379. GetPlayerName(playerid, vardas, sizeof(vardas));
  380. format(failas, sizeof(failas), "Zaidejai/%s.ini", vardas);
  381. GetPlayerPos(playerid,Pozicija_x,Pozicija_y,Pozicija_z);
  382.  
  383. dini_FloatSet(failas,"Pozicija_X",Pozicija_x);
  384. dini_FloatSet(failas,"Pozicija_Y",Pozicija_y);
  385. dini_FloatSet(failas,"Pozicija_Z",Pozicija_z);
  386. dini_IntSet(failas, "AdminLygis",pInfo[playerid][adminas]);
  387. dini_IntSet(failas, "naujokas",pInfo[playerid][naujokas]);
  388. dini_IntSet(failas, "darbas",pInfo[playerid][darbas]);
  389. dini_IntSet(failas, "VIP",pInfo[playerid][vipas]);
  390. dini_IntSet(failas, "Patirtis", GetPlayerScore(playerid));
  391. dini_IntSet(failas, "pLead",pInfo[playerid][pLead]);
  392. dini_IntSet(failas, "Pinigai", GetPlayerMoney(playerid));
  393. return 1;
  394. }
  395. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~KROVIMAS~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  396. public Krovimas(playerid)
  397. {
  398. new vardas[MAX_PLAYER_NAME], failas[256];
  399. GetPlayerName(playerid, vardas, sizeof(vardas));
  400. format(failas, sizeof(failas), "Zaidejai/%s.ini", vardas);
  401. new Patirtis = dini_Int(failas, "Patirtis");
  402. new Pinigai = dini_Int(failas, "Pinigai");
  403. SetPlayerScore(playerid, Patirtis);
  404. GivePlayerMoney(playerid, Pinigai);
  405. pInfo[playerid][naujokas] = dini_Int(failas, "naujokas");
  406. pInfo[playerid][darbas] = dini_Int(failas, "darbas");
  407. pInfo[playerid][vipas] = dini_Int(failas, "VIP");
  408. pInfo[playerid][pLead] = dini_Int(failas, "pLead");
  409. pInfo[playerid][adminas] = dini_Int(failas, "AdminLygis");
  410. SetPlayerPos(playerid,dini_Float(failas,"Pozicija_X"),dini_Float(failas,"Pozicija_Y"),dini_Float(failas,"Pozicija_Z"));
  411. }
  412. //~~~~~~~~~~~~~~~~~~~~~~~~~~~~Serverio komandos~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  413. CMD:taisykles(playerid, params[])
  414. {
  415. ShowPlayerDialog(playerid, 1002, DIALOG_STYLE_MSGBOX,"=== Serverio taisyklės ===", "1.Draudžiama naudoti neleistinas programas\n{3300ff}2.Draudžiama reklamuoti kitus serverius\n{3300ff}3.Draudžiama įžeidinėti ar grąsinti serverio žaidėjams\n{3300ff}4.Draudžiama kenkti serveriui\n{3300ff}5.Draudžiama pardavinėti serverio valiutą už tikrus pinigus\n{3300ff}6.Draudžiama naudoti pagalbines programas\n{3300ff}7.Draudžiama floodinti administracijai.","Supratau","");
  416. return 1;
  417. }
  418. CMD:atnaujinimai(playerid, params[] )
  419. {
  420. ShowPlayerDialog( playerid, 1002, DIALOG_STYLE_MSGBOX, "=== Atnaujinimai ===", "1.Sukurtas login/registracija\n2.Pridėta keletas dviračių prie spawno\n3.Sukurtas naujokų pickup\n4.Savininkams keletas komandų\n5.Prisijungus rašys svarbią informaciją\n6.Sukurtas darbas\n7.Sukurta admin sistema.", "Supratau", "" );
  421. return 1;
  422. }
  423. CMD:komandos(playerid, params[])
  424. {
  425. ShowPlayerDialog(playerid,1002, DIALOG_STYLE_MSGBOX, "=== KOMANDOS ===", "/taisykles\n/atnaujinimai\n/akomandos\n/dkomandos\n/vkomandos\n/info\n","Ok","");
  426. return 1;
  427. }
  428.  
  429. //~~~~~~~~~~~~~~~~~~~~~~~~Administratoriaus komandos~~~~~~~~~~~~~~~~~~~~~~~~~~~
  430. CMD:s(playerid, params[])
  431. {
  432. if(pInfo[playerid][adminas] == 1)
  433. {
  434. new vardas[128], zin[128];
  435. GetPlayerName(playerid, vardas,MAX_PLAYER_NAME);
  436. format(zin,sizeof(zin),"{009900}Administratorius {FF0000}%s {009900}sako: {CC0099}%s ", vardas, params);
  437. SendClientMessageToAll(-1,zin);
  438. }
  439. else
  440. {
  441. SendClientMessage(playerid, -1, "Tokios komandos nėra, naudokite /komandos");
  442. }
  443. return 1;
  444. }
  445. CMD:tpspawn(playerid, params[])
  446. {
  447. if(pInfo[playerid][adminas] == 1)
  448. {
  449. SetPlayerPos(playerid, -1985.1917,137.8640,27.6875);
  450. SendClientMessage(playerid, 0xFFFFFF,"• Jūs sekmingai buvote nukeltas į serverio spawną! •");
  451. }
  452. else
  453. {
  454. SendClientMessage(playerid, -1, "Tokios komandos nėra, naudokite /komandos");
  455. }
  456. return 1;
  457. }
  458. CMD:jetpack(playerid, params[])
  459. {
  460. if(pInfo[playerid][adminas] == 1)
  461. {
  462. SetPlayerSpecialAction(playerid, 2);
  463. SendClientMessage(playerid,0xFF0000AA, "• Sėkmingai pasiemei jetpacką •");
  464. }
  465. else
  466. {
  467. SendClientMessage(playerid, -1, "Tokios komandos nėra, naudokite /komandos");
  468. }
  469. return 1;
  470. }
  471. CMD:milijonas(playerid, params[])
  472. {
  473. if(pInfo[playerid][adminas] == 1)
  474. {
  475. GivePlayerMoney(playerid,1000000);
  476. SendClientMessage(playerid,0x33CCFFAA, "• Sėkmingai gavote papildomų pinigų į rankas •");
  477. }
  478. else
  479. {
  480. SendClientMessage(playerid, -1, "Tokios komandos nėra, naudokite /komandos");
  481. }
  482. return 1;
  483. }
  484. CMD:get(playerid, params[])
  485. {
  486. if(pInfo[playerid][adminas] == 1)
  487. {
  488. new id;
  489. if (sscanf(params, "sr", id)) SendClientMessage(playerid, 0xFF0000AA, "Naudojimas: /get žaidėjo id/nick");
  490. else if(!IsPlayerConnected(id)) return SendClientMessage(playerid,-1,"Tokio žaidejo nėra");
  491. else
  492. {
  493. new Float:x, Float:y, Float:z;
  494. GetPlayerPos(playerid,x,y,z);
  495. SetPlayerPos(id, x,y,z);
  496. }
  497. }
  498. else
  499. {
  500. SendClientMessage(playerid, -1, "Tokios komandos nėra, naudokite /komandos");
  501. }
  502. return 1;
  503. }
  504. CMD:to(playerid, params[])
  505. {
  506. if(pInfo[playerid][adminas] == 1)
  507. {
  508. new id;
  509. if (sscanf(params, "sr", id)) SendClientMessage(playerid, 0xFF0000AA, "Naudojimas: /to žaidėjo id/nick");
  510. else if(!IsPlayerConnected(id)) return SendClientMessage(playerid,-1,"Tokio žaidejo nėra");
  511. else
  512. {
  513. new Float:x, Float:y, Float:z;
  514. GetPlayerPos(id,x,y,z);
  515. SetPlayerPos(playerid, x,y,z);
  516. }
  517. }
  518. else
  519. {
  520. SendClientMessage(playerid, -1, "Tokios komandos nėra, naudokite /komandos");
  521. }
  522. return 1;
  523. }
  524. CMD:heal(playerid, params[])
  525. {
  526. if(pInfo[playerid][adminas] == 1)
  527. {
  528. new id;
  529. if (sscanf(params, "sr", id)) SendClientMessage(playerid, 0xFF0000AA, "Naudojimas: /heal [žaidėjo id/nick]");
  530. else if(!IsPlayerConnected(id)) return SendClientMessage(playerid,-1,"Tokio žaidejo nėra");
  531. else
  532. {
  533. SetPlayerHealth(id, 100);
  534. SetPlayerArmour(id, 100);
  535. }
  536. }
  537. else
  538. {
  539. SendClientMessage(playerid, -1, "Tokios komandos nėra, naudokite /komandos");
  540. }
  541. return 1;
  542. }
  543. CMD:pasigydyti(playerid, params[])
  544. {
  545. if(pInfo[playerid][adminas] == 1)
  546. {
  547. if (sscanf(params, "sr")) SendClientMessage(playerid, 0xFF0000AA, "Naudojimas: /pasigydyti");
  548. else
  549. {
  550. SetPlayerHealth(playerid, 100);
  551. SetPlayerArmour(playerid, 100);
  552. }
  553. }
  554. else
  555. {
  556. SendClientMessage(playerid, -1, "Tokios komandos nėra, naudokite /komandos");
  557. }
  558. return 1;
  559. }
  560. //~~~~~~~~~~~~~~~~~~~~~~~~~~~VIP komandos~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  561. CMD:v(playerid, params[])
  562. {
  563. if(pInfo[playerid][vipas] == 1)
  564. {
  565. new vardas[128], zin[128];
  566. GetPlayerName(playerid, vardas,MAX_PLAYER_NAME);
  567. format(zin,sizeof(zin),"{FFFF33}VIP {FFFF00}%s {FFFF33}sako: %s ", vardas, params);
  568. SendClientMessageToAll(-1,zin);
  569. }
  570. else
  571. {
  572. SendClientMessage(playerid, -1, "Tokios komandos nėra, naudokite /komandos");
  573. }
  574. return 1;
  575. }
  576. //~~~~~~~~~~~~~~~~~~~~~~~~~Direktoriaus valdymas~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  577. CMD:priimti(playerid, params[])
  578. {
  579. if(pInfo[playerid][pLead] == 1)
  580. {
  581. new id;
  582. if (sscanf(params, "r", id)) SendClientMessage(playerid, -1, "Naudojimas: /priimti");
  583. else if(!IsPlayerConnected(id)) return SendClientMessage(playerid,-1,"Tokio žaidejo nėra");
  584. else
  585. {
  586. pInfo[id][leanvited] = 1;
  587. SendClientMessage(id, -1, "Sveikinu tu buvai priimtas į [NĖRA] Darbą!");
  588. SendClientMessage(playerid, -1, "Žaidėjas priimtas");
  589. }
  590. }
  591. else
  592. {
  593. SendClientMessage(playerid, -1, "• Jūs ne nesate direktorius! •");
  594. }
  595. return 1;
  596. }
  597. //~~~~~~~~~~~~~~~~~~~~~~~TOKIOS KOMANDOS NĖRA~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  598. public OnPlayerCommandPerformed ( playerid , cmdtext [ ] , success )
  599. {
  600. if(!success)
  601. {
  602. new msg[128];
  603. format(msg, 128,"{FF8585}• [KLAIDA]{ffffff}: Tokios komandos nėra ( {FF8585}%s{ffffff} ) ! •",cmdtext);
  604. SendClientMessage(playerid, -1, msg);
  605. }
  606. return true;
  607. }
  608. //~~~~~~~~~~~~~~~~~~~~~~~~~~~xp kilimo sistema~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  609. public XP()
  610. {
  611. for ( new i = 0; i < MAX_PLAYERS; i ++ )
  612. {
  613. if ( !IsPlayerConnected( i ) ) continue;
  614. SetPlayerScore( i, GetPlayerScore( i ) + 1 );
  615. }
  616. return 1;
  617. }
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!