Advertisement
Guest User

Untitled

a guest
Jan 3rd, 2017
469
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 76.18 KB | None | 0 0
  1.  
  2. #include <a_samp>
  3. #include <zcmd>
  4. #include <sscanf2>
  5. #include <streamer>
  6. #include <a_mysql>
  7.  
  8. #define MySQL_HOST "s1.justhost.lt"
  9. #define MySQL_USER "s508"
  10. #define MySQL_DATA "s508"
  11. #define MySQL_PASS "vAC1oEgmq"
  12.  
  13.  
  14. #define COLOR_ACTIVEBORDER 0xB4B4B4FF
  15. #define COLOR_ACTIVECAPTION 0x99B4D1FF
  16. #define COLOR_ACTIVECAPTIONTEXT 0x000000FF
  17. #define COLOR_ALICEBLUE 0xF0F8FFFF
  18. #define COLOR_ANTIQUEWHITE 0xFAEBD7FF
  19. #define COLOR_APPWORKSPACE 0xABABABFF
  20. #define COLOR_AQUA 0x00FFFFFF
  21. #define COLOR_AQUAMARINE 0x7FFFD4FF
  22. #define COLOR_AZURE 0xF0FFFFFF
  23. #define COLOR_BEIGE 0xF5F5DCFF
  24. #define COLOR_BISQUE 0xFFE4C4FF
  25. #define COLOR_BLACK 0x000000FF
  26. #define COLOR_BLANCHEDALMOND 0xFFEBCDFF
  27. #define COLOR_BLUE 0x0000FFFF
  28. #define COLOR_BLUEVIOLET 0x8A2BE2FF
  29. #define COLOR_BROWN 0xA52A2AFF
  30. #define COLOR_BURLYWOOD 0xDEB887FF
  31. #define COLOR_BUTTONFACE 0xF0F0F0FF
  32. #define COLOR_BUTTONHIGHLIGHT 0xFFFFFFFF
  33. #define COLOR_BUTTONSHADOW 0xA0A0A0FF
  34. #define COLOR_CADETBLUE 0x5F9EA0FF
  35. #define COLOR_CHARTREUSE 0x7FFF00FF
  36. #define COLOR_CHOCOLATE 0xD2691EFF
  37. #define COLOR_CONTROL 0xF0F0F0FF
  38. #define COLOR_CONTROLDARK 0xA0A0A0FF
  39. #define COLOR_CONTROLDARKDARK 0x696969FF
  40. #define COLOR_CONTROLLIGHT 0xE3E3E3FF
  41. #define COLOR_CONTROLLIGHTLIGHT 0xFFFFFFFF
  42. #define COLOR_CONTROLTEXT 0x000000FF
  43. #define COLOR_CORAL 0xFF7F50FF
  44. #define COLOR_CORNFLOWERBLUE 0x6495EDFF
  45. #define COLOR_CORNSILK 0xFFF8DCFF
  46. #define COLOR_CRIMSON 0xDC143CFF
  47. #define COLOR_CYAN 0x00FFFFFF
  48. #define COLOR_DARKBLUE 0x00008BFF
  49. #define COLOR_DARKCYAN 0x008B8BFF
  50. #define COLOR_DARKGOLDENROD 0xB8860BFF
  51. #define COLOR_DARKGRAY 0xA9A9A9FF
  52. #define COLOR_DARKGREEN 0x006400FF
  53. #define COLOR_DARKKHAKI 0xBDB76BFF
  54. #define COLOR_DARKMAGENTA 0x8B008BFF
  55. #define COLOR_DARKOLIVEGREEN 0x556B2FFF
  56. #define COLOR_DARKORANGE 0xFF8C00FF
  57. #define COLOR_DARKORCHID 0x9932CCFF
  58. #define COLOR_DARKRED 0x8B0000FF
  59. #define COLOR_DARKSALMON 0xE9967AFF
  60. #define COLOR_DARKSEAGREEN 0x8FBC8BFF
  61. #define COLOR_DARKSLATEBLUE 0x483D8BFF
  62. #define COLOR_DARKSLATEGRAY 0x2F4F4FFF
  63. #define COLOR_DARKTURQUOISE 0x00CED1FF
  64. #define COLOR_DARKVIOLET 0x9400D3FF
  65. #define COLOR_DEEPPINK 0xFF1493FF
  66. #define COLOR_DEEPSKYBLUE 0x00BFFFFF
  67. #define COLOR_DESKTOP 0x000000FF
  68. #define COLOR_DIMGRAY 0x696969FF
  69. #define COLOR_DODGERBLUE 0x1E90FFFF
  70. #define COLOR_FIREBRICK 0xB22222FF
  71. #define COLOR_FLORALWHITE 0xFFFAF0FF
  72. #define COLOR_FORESTGREEN 0x228B22FF
  73. #define COLOR_FUCHSIA 0xFF00FFFF
  74. #define COLOR_GAINSBORO 0xDCDCDCFF
  75. #define COLOR_GHOSTWHITE 0xF8F8FFFF
  76. #define COLOR_GOLD 0xFFD700FF
  77. #define COLOR_GOLDENROD 0xDAA520FF
  78. #define COLOR_GRADIENTACTIVECAPTION 0xB9D1EAFF
  79. #define COLOR_GRADIENTINACTIVECAPTION 0xD7E4F2FF
  80. #define COLOR_GRAY 0x808080FF
  81. #define COLOR_GRAYTEXT 0x808080FF
  82. #define COLOR_GREEN 0x008000FF
  83. #define COLOR_GREENYELLOW 0xADFF2FFF
  84. #define COLOR_HIGHLIGHT 0x3399FFFF
  85. #define COLOR_HIGHLIGHTTEXT 0xFFFFFFFF
  86. #define COLOR_HONEYDEW 0xF0FFF0FF
  87. #define COLOR_HOTPINK 0xFF69B4FF
  88. #define COLOR_HOTTRACK 0x0066CCFF
  89. #define COLOR_INACTIVEBORDER 0xF4F7FCFF
  90. #define COLOR_INACTIVECAPTION 0xBFCDDBFF
  91. #define COLOR_INACTIVECAPTIONTEXT 0x434E54FF
  92. #define COLOR_INDIANRED 0xCD5C5CFF
  93. #define COLOR_INDIGO 0x4B0082FF
  94. #define COLOR_INFO 0xFFFFE1FF
  95. #define COLOR_INFOTEXT 0x000000FF
  96. #define COLOR_IVORY 0xFFFFF0FF
  97. #define COLOR_KHAKI 0xF0E68CFF
  98. #define COLOR_LAVENDER 0xE6E6FAFF
  99. #define COLOR_LAVENDERBLUSH 0xFFF0F5FF
  100. #define COLOR_LAWNGREEN 0x7CFC00FF
  101. #define COLOR_LEMONCHIFFON 0xFFFACDFF
  102. #define COLOR_LIGHTBLUE 0xADD8E6FF
  103. #define COLOR_LIGHTCORAL 0xF08080FF
  104. #define COLOR_LIGHTCYAN 0xE0FFFFFF
  105. #define COLOR_LIGHTGOLDENRODYELLOW 0xFAFAD2FF
  106. #define COLOR_LIGHTGRAY 0xD3D3D3FF
  107. #define COLOR_LIGHTGREEN 0x90EE90FF
  108. #define COLOR_LIGHTPINK 0xFFB6C1FF
  109. #define COLOR_LIGHTSALMON 0xFFA07AFF
  110. #define COLOR_LIGHTSEAGREEN 0x20B2AAFF
  111. #define COLOR_LIGHTSKYBLUE 0x87CEFAFF
  112. #define COLOR_LIGHTSLATEGRAY 0x778899FF
  113. #define COLOR_LIGHTSTEELBLUE 0xB0C4DEFF
  114. #define COLOR_LIGHTYELLOW 0xFFFFE0FF
  115. #define COLOR_LIME 0x00FF00FF
  116. #define COLOR_LIMEGREEN 0x32CD32FF
  117. #define COLOR_LINEN 0xFAF0E6FF
  118. #define COLOR_MAGENTA 0xFF00FFFF
  119. #define COLOR_MAROON 0x800000FF
  120. #define COLOR_MEDIUMAQUAMARINE 0x66CDAAFF
  121. #define COLOR_MEDIUMBLUE 0x0000CDFF
  122. #define COLOR_MEDIUMORCHID 0xBA55D3FF
  123. #define COLOR_MEDIUMPURPLE 0x9370DBFF
  124. #define COLOR_MEDIUMSEAGREEN 0x3CB371FF
  125. #define COLOR_MEDIUMSLATEBLUE 0x7B68EEFF
  126. #define COLOR_MEDIUMSPRINGGREEN 0x00FA9AFF
  127. #define COLOR_MEDIUMTURQUOISE 0x48D1CCFF
  128. #define COLOR_MEDIUMVIOLETRED 0xC71585FF
  129. #define COLOR_MENU 0xF0F0F0FF
  130. #define COLOR_MENUBAR 0xF0F0F0FF
  131. #define COLOR_MENUHIGHLIGHT 0x3399FFFF
  132. #define COLOR_MENUTEXT 0x000000FF
  133. #define COLOR_MIDNIGHTBLUE 0x191970FF
  134. #define COLOR_MINTCREAM 0xF5FFFAFF
  135. #define COLOR_MISTYROSE 0xFFE4E1FF
  136. #define COLOR_MOCCASIN 0xFFE4B5FF
  137. #define COLOR_NAVAJOWHITE 0xFFDEADFF
  138. #define COLOR_NAVY 0x000080FF
  139. #define COLOR_OLDLACE 0xFDF5E6FF
  140. #define COLOR_OLIVE 0x808000FF
  141. #define COLOR_OLIVEDRAB 0x6B8E23FF
  142. #define COLOR_ORANGE 0xFFA500FF
  143. #define COLOR_ORANGERED 0xFF4500FF
  144. #define COLOR_ORCHID 0xDA70D6FF
  145. #define COLOR_PALEGOLDENROD 0xEEE8AAFF
  146. #define COLOR_PALEGREEN 0x98FB98FF
  147. #define COLOR_PALETURQUOISE 0xAFEEEEFF
  148. #define COLOR_PALEVIOLETRED 0xDB7093FF
  149. #define COLOR_PAPAYAWHIP 0xFFEFD5FF
  150. #define COLOR_PEACHPUFF 0xFFDAB9FF
  151. #define COLOR_PERU 0xCD853FFF
  152. #define COLOR_PINK 0xFFC0CBFF
  153. #define COLOR_PLUM 0xDDA0DDFF
  154. #define COLOR_POWDERBLUE 0xB0E0E6FF
  155. #define COLOR_PURPLE 0x800080FF
  156. #define COLOR_RED 0xFF0000FF
  157. #define COLOR_ROSYBROWN 0xBC8F8FFF
  158. #define COLOR_ROYALBLUE 0x4169E1FF
  159. #define COLOR_SADDLEBROWN 0x8B4513FF
  160. #define COLOR_SALMON 0xFA8072FF
  161. #define COLOR_SANDYBROWN 0xF4A460FF
  162. #define COLOR_SCROLLBAR 0xC8C8C8FF
  163. #define COLOR_SEAGREEN 0x2E8B57FF
  164. #define COLOR_SEASHELL 0xFFF5EEFF
  165. #define COLOR_SIENNA 0xA0522DFF
  166. #define COLOR_SILVER 0xC0C0C0FF
  167. #define COLOR_SKYBLUE 0x87CEEBFF
  168. #define COLOR_SLATEBLUE 0x6A5ACDFF
  169. #define COLOR_SLATEGRAY 0x708090FF
  170. #define COLOR_SNOW 0xFFFAFAFF
  171. #define COLOR_SPRINGGREEN 0x00FF7FFF
  172. #define COLOR_STEELBLUE 0x4682B4FF
  173. #define COLOR_TAN 0xD2B48CFF
  174. #define COLOR_TEAL 0x008080FF
  175. #define COLOR_THISTLE 0xD8BFD8FF
  176. #define COLOR_TOMATO 0xFF6347FF
  177. #define COLOR_TRANSPARENT 0xFFFFFF00
  178. #define COLOR_TURQUOISE 0x40E0D0FF
  179. #define COLOR_VIOLET 0xEE82EEFF
  180. #define COLOR_WHEAT 0xF5DEB3FF
  181. #define COLOR_WHITE 0xFFFFFFFF
  182. #define COLOR_WHITESMOKE 0xF5F5F5FF
  183. #define COLOR_WINDOW 0xFFFFFFFF
  184. #define COLOR_WINDOWFRAME 0x646464FF
  185. #define COLOR_WINDOWTEXT 0x000000FF
  186. #define COLOR_YELLOW 0xFFFF00FF
  187. #define COLOR_YELLOWGREEN 0x9ACD32FF
  188. #define STEALTH_ORANGE 0xFF880000
  189. #define STEALTH_OLIVE 0x66660000
  190. #define STEALTH_GREEN 0x33DD1100
  191. #define STEALTH_PINK 0xFF22EE00
  192. #define STEALTH_BLUE 0x0077BB00
  193. #define VEHICLE_PARAMS_UNSET -1
  194. #define VEHICLE_PARAMS_OFF 0
  195. #define VEHICLE_PARAMS_ON 1
  196.  
  197.  
  198. enum Players {
  199. ID,
  200. Vardas[MAX_PLAYER_NAME],
  201. Pinigai,
  202. Xp,
  203. Darbas,
  204. Float:Hp,
  205. moneyb,
  206. nonreg,
  207. glic,
  208. Adminlvl,
  209. Admin,
  210. Helper,
  211. aispejimai,
  212. Aod,
  213. Kreditai,
  214. Logged
  215. };
  216. new pData[MAX_PLAYERS][Players]; // Sukuriame masyvą.
  217.  
  218.  
  219. enum vehicle_e_DATA {
  220. gas,
  221. Float:prav,
  222. };
  223.  
  224. new gunshoppickup;
  225. new bankopickup;
  226. new vehicleDB[MAX_VEHICLES][vehicle_e_DATA];
  227. new Text:spidometras[MAX_PLAYERS];
  228. new Text:SPEEDOS[MAX_PLAYERS];
  229. new bool: ShiftInfo[MAX_PLAYERS] = true;
  230. new ShiftTimer[MAX_PLAYERS];
  231. new playerxp[ MAX_PLAYERS ];
  232. new nuoma[6],isspiria[MAX_PLAYERS],NUOMACAR[MAX_PLAYERS];
  233.  
  234. new money[MAX_PLAYERS];
  235. new new_money[MAX_PLAYERS];
  236. new Text:moneyTD[MAX_PLAYERS];
  237.  
  238. new engine, lights, alarm, doors, bonnet, boot, objective;
  239.  
  240. main()
  241. {
  242. print("\n----------------------------------");
  243. print(" Visos teisės priklauso ToE");
  244. print(" srw.lt");
  245. print(" Pavogus, ar kitaip pasisavunus gamemodą busite nubaustas");
  246. print("----------------------------------\n");
  247. }
  248.  
  249.  
  250. public OnGameModeInit()
  251. {
  252. mysql_debug( true );
  253. mysql_connect( MySQL_HOST,MySQL_USER,MySQL_DATA,MySQL_PASS );
  254. if( mysql_ping( ) >= 1 )
  255. {
  256. print( "Prisijungeme prie MySQL sekmingai!" );
  257. }
  258. else
  259. {
  260. SendRconCommand( "exit" );
  261. }
  262.  
  263.  
  264. for(new i; i < MAX_VEHICLES; i++)
  265. {
  266. vehicleDB[i][gas] = 100;
  267. }
  268.  
  269.  
  270.  
  271.  
  272. nuoma[1] = CreateVehicle(587,-215.5246,1209.6172,19.4672,269.9487,95,10,15); //Euros
  273. nuoma[2] = CreateVehicle(587,-215.6059,1212.4589,19.4691,269.8694,95,10,15); //Euros
  274. nuoma[3] = CreateVehicle(587,-215.6954,1215.1445,19.4670,272.2100,95,10,15); //Euros
  275. nuoma[4] = CreateVehicle(587,-215.6512,1217.8951,19.4655,272.2929,95,10,15); //Euros
  276. nuoma[5] = CreateVehicle(587,-220.5004,1222.2449,19.4619,2.3949,95,10,15); //Euros
  277.  
  278. DisableInteriorEnterExits();
  279.  
  280. // Don't use these lines if it's a filterscript
  281. SetGameModeText("srw.lt // 0.0.4");
  282. AddPlayerClass( 0, -204.2540, 1212.8514, 19.7422, 277.1067, 0, 0, 0, 0, 0, 0);
  283.  
  284. //labels
  285. Create3DTextLabel("Įeiti galite su enter", -1, -205.8055,1062.2072,19.7422, 40.0, 0, 0);
  286. Create3DTextLabel("Įeiti galite su enter", -1, -176.5860,1112.0245,19.7422, 40.0, 0, 0);
  287. //pickuops
  288. gunshoppickup = CreatePickup(1318, 2, 288.4622,-106.3227,1001.5156, -1);
  289. bankopickup = CreatePickup(1318, 2, 361.8300,173.5526,1008.3828, -1);
  290.  
  291. SetTimer("moneyProfit", 333, true);
  292. SetTimer("serveriozinutes", 120000, true);
  293. SetTimer("serveriozinutest", 180000, true);
  294.  
  295.  
  296. return 1;
  297. }
  298.  
  299. public OnGameModeExit()
  300. {
  301. mysql_close( );
  302.  
  303. return 1;
  304. }
  305.  
  306. public OnPlayerRequestClass(playerid, classid)
  307. {
  308. SetPlayerPos(playerid, 204.2540, 1212.8514, 19.7422);
  309. SetPlayerCameraPos(playerid, 1958.3783, 1343.1572, 15.3746);
  310. SetPlayerCameraLookAt(playerid, 1958.3783, 1343.1572, 15.3746);
  311.  
  312. if(!pData[playerid][Logged])
  313. {
  314. SendClientMessage(playerid, -1, "Sveikas atvykęs į SRW.LT");
  315. return 0;
  316. }
  317.  
  318. return 1;
  319. }
  320.  
  321. public OnPlayerConnect(playerid)
  322. {
  323.  
  324.  
  325. pData[playerid][Logged] = false; // Nustatome neigiamą reikšmę Logged kintamajam, nes kai žaidėjas prisijungia į serverį, jis nebūna prisijungęs prie savo sąskaitos, right ?
  326.  
  327. new string[128],pName[MAX_PLAYER_NAME+1],query[256]; // sukuriame kintamuosius, vardo atpažinimui, duomenims į mysql paduoti bei žinutei išreikšti.
  328.  
  329. GetPlayerName(playerid,pName,sizeof pName); // įdedame į kintamajį dabartinį žaidėjo vardą, jį naudosime teisingai MYSQL eilutei surasti.
  330.  
  331. format(query,sizeof(query),"SELECT * FROM `players` WHERE Vardas = '%s'",pName); // Sudedame apklausą kurią siūsime užklausai gauti visai informacijai apie žaidėją.
  332. mysql_query(query); // siunčiame užklausą kurią sūdėjome į query
  333.  
  334. if(IsPlayerConnected(playerid)) // patikriname jeigu žaidėjas prisijunęs
  335. {
  336. GetPlayerName(playerid,pName,sizeof pName); // paimame dar kartą jo vardą.
  337. mysql_store_result(); // atsikeliame iš MYSQL gautą rezultatą
  338.  
  339. if(mysql_num_rows() > 0) // Jeigu rado duomenis apie vartotoją reiškiasi jis užregistruotas. Duodame jam šansą prisijungti :D
  340. {
  341. ShowPlayerDialog(playerid,2,DIALOG_STYLE_INPUT,"Prisijungimas","Įveskite savo sąskaitos prisijungimo slaptažodį:","Tęsti","Išeiti"); // parodome DIALOG langą, kad būtų kur suvesti sąskaitos slaptažodį, o gal naudojame komanda ? :D
  342. format(string,sizeof(string),"Sąskaita su vardu - (%s) yra užregistruota. Prašome įvesti sąskaitos slaptažodį norėdami prisijungti.",pName); // formatuojame textą
  343. SendClientMessage(playerid,-1,string); // parašome suformatuotą textą.
  344. }
  345. else // jeigu nerado nieko apie vartotoją reiškiasi jis neregistruotas, so we dump
  346. {
  347. ShowPlayerDialog(playerid,1,DIALOG_STYLE_INPUT,"Registracija","Registracijai įveskite slaptažodį kurį naudosite kas kartą prisijungiant prie sąskaitos","Tęsti","Išeiti"); // parodome DIALOGĄ kuriame užregistruos savo slaptažodį.
  348. format(string,sizeof(string),"Sveikas atvykęs %s, tu šiame serveryje neturi sąskaitos, įvesk slaptažodį norėdamas užregistruoti.",pName); // formatuojame žinutę, kad pasakyti žaidėjui apie neturimą sąskaitą ir reikalingą registraciją.
  349. SendClientMessage(playerid,-1,string); // Siunčiame suformatuotą žinutę klientui kuris to prašo.
  350. pData[playerid][nonreg] = 0;
  351. }
  352. mysql_free_result(); // paleidžiame visus paimtus duomenis, kai reiks vėl pasiimsime.
  353. }
  354.  
  355. spidometras[playerid] = TextDrawCreate(285.000000, 390.000000, "spidometras");
  356. TextDrawFont(spidometras[playerid], 3);
  357. TextDrawLetterSize(spidometras[playerid], 0.390000, 0.899999);
  358. TextDrawColor(spidometras[playerid], -1);
  359. TextDrawSetOutline(spidometras[playerid], 1);
  360. TextDrawSetProportional(spidometras[playerid], 1);
  361. TextDrawTextSize(spidometras[playerid], 405.000000, 0.000000);
  362.  
  363. SPEEDOS[playerid] = TextDrawCreate(254.000000, 389.000000, " ");
  364. TextDrawBackgroundColor(SPEEDOS[playerid], 0x000000bb);
  365. TextDrawFont(SPEEDOS[playerid], 2);
  366. TextDrawLetterSize(SPEEDOS[playerid], 0.2300, 0.8999);
  367. TextDrawColor(SPEEDOS[playerid], -1);
  368. TextDrawSetOutline(SPEEDOS[playerid], 1);
  369. TextDrawSetProportional(SPEEDOS[playerid], 1);
  370. TextDrawUseBox(SPEEDOS[playerid], 1);
  371. TextDrawBoxColor(SPEEDOS[playerid], 0x00000055);
  372. TextDrawTextSize(SPEEDOS[playerid], 405.000000, 0.000000);
  373.  
  374. ShiftInfo[playerid] = (ShiftInfo[playerid] == false) ? (true) : (true);
  375. ShiftTimer[playerid] = SetTimerEx("Speedometer", 200, true, "e", playerid);
  376.  
  377. playerxp[ playerid ] = SetTimerEx("XP",1000*60, true, "i", playerid);
  378.  
  379.  
  380. moneyTD[playerid] = TextDrawCreate(500.000000, 99.000000, "");
  381. TextDrawBackgroundColor(moneyTD[playerid], -16776961);
  382. TextDrawFont(moneyTD[playerid], 1);
  383. TextDrawLetterSize(moneyTD[playerid], 0.440000, 1.899999);
  384. TextDrawColor(moneyTD[playerid], 16711935);
  385. TextDrawSetOutline(moneyTD[playerid], 0);
  386. TextDrawSetProportional(moneyTD[playerid], 1);
  387. TextDrawSetShadow(moneyTD[playerid], 0);
  388. TextDrawSetSelectable(moneyTD[playerid], 0);
  389.  
  390. SetPlayerColor(playerid,0x80808000);
  391. pData[playerid][Logged] = false;
  392.  
  393. return 1;
  394. }
  395.  
  396. public OnPlayerDisconnect(playerid, reason)
  397. {
  398. KillTimer(NUOMACAR[playerid]);
  399.  
  400. KillTimer(playerxp[ playerid ]);
  401.  
  402. new query[300],pName[MAX_PLAYER_NAME]; // kintamieji užklausoms bei vardui.
  403.  
  404. GetPlayerName(playerid,pName,sizeof(pName)); // paimame žaidėjo vardą kuriam viską darysime.
  405.  
  406. if(pData[playerid][Logged]) // jeigu žaidėjas prisijungęs, tai yra jeigu jis suvędęs savo duomenis teisingai arba ką tik užsiregistravęs ir automatiškai prijungtas.
  407. {
  408. SaveStats(playerid);
  409. mysql_query(query); // siunčiame užklausą duomenų bazei.
  410. }
  411. return 1;
  412. }
  413.  
  414. public OnPlayerSpawn(playerid)
  415. {
  416. RemoveBuildingForPlayer(playerid, 16740, -152.3203, 1144.0703, 30.3047, 0.25);
  417. RemoveBuildingForPlayer(playerid, 1308, -225.7344, 1208.8125, 17.3672, 0.25);
  418.  
  419.  
  420. LoadStats(playerid);
  421. SetPlayerColor(playerid,0x80808000);
  422. if(!pData[playerid][nonreg])
  423. {
  424. SetPlayerPos(playerid, -204.4454,1212.1095,19.7422);
  425. SetPlayerSkin(playerid, 7);
  426. pData[playerid][nonreg] = 1;
  427. }
  428. return 1;
  429. }
  430.  
  431. public OnPlayerDeath(playerid, killerid, reason)
  432. {
  433. KillTimer(NUOMACAR[playerid]);
  434. return 1;
  435. }
  436.  
  437. public OnVehicleSpawn(vehicleid)
  438. {
  439.  
  440. vehicleDB[vehicleid][gas] = 100;
  441. return 1;
  442. }
  443.  
  444. public OnVehicleDeath(vehicleid, killerid)
  445. {
  446. return 1;
  447. }
  448.  
  449. public OnPlayerText(playerid, text[])
  450. {
  451. return 1;
  452. }
  453. public OnPlayerCommandPerformed ( playerid , cmdtext [ ] , success )
  454. {
  455. if(!success)
  456. {
  457. new msg[128];
  458. format(msg, 128,"{FF8585}KLAIDA{ffffff}: tokios komandos nėra ( {FF8585}%s{ffffff} ) !",cmdtext);
  459. SendClientMessage(playerid, -1, msg);
  460. }
  461. return true;
  462. }
  463. public OnPlayerCommandText(playerid, cmdtext[])
  464. {
  465. if (strcmp("/mycommand", cmdtext, true, 10) == 0)
  466. {
  467. // Do something here
  468. return 1;//visos komandos ZCMD
  469. }
  470. return 0;
  471. }
  472.  
  473. public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
  474. {
  475. SetTimer("tikrinam", 10000, true);
  476.  
  477. SetTimer("mazeja", 100000, true);
  478. return 1;
  479. }
  480.  
  481. public OnPlayerExitVehicle(playerid, vehicleid)
  482. {
  483. KillTimer(NUOMACAR[playerid]);
  484. return 1;
  485. }
  486.  
  487. public OnPlayerStateChange(playerid, newstate, oldstate)
  488. {
  489. new vehicleid = GetPlayerVehicleID(playerid);
  490.  
  491. if(newstate == PLAYER_STATE_DRIVER)
  492. {
  493. SetPlayerArmedWeapon(playerid,0);
  494. }
  495. if(newstate == PLAYER_STATE_DRIVER)
  496. {
  497. if(GetVehicleModel(GetPlayerVehicleID(playerid)) != 481 )
  498. if(GetVehicleModel(GetPlayerVehicleID(playerid)) != 509 )
  499. if(GetVehicleModel(GetPlayerVehicleID(playerid)) != 510 )
  500. SetVehicleParamsEx(vehicleid, 0, 0, 0, 0, 0, 0, 0);
  501. }
  502.  
  503.  
  504. if(vehicleid == nuoma[1] || vehicleid == nuoma[2] || vehicleid == nuoma[3] || vehicleid == nuoma[4] || vehicleid == nuoma[5])
  505. if(newstate == PLAYER_STATE_DRIVER)
  506. {
  507. ShowPlayerDialog(playerid,3,DIALOG_STYLE_MSGBOX,"Mašinų nuomą","Ar norite išinuomoti automobilį 150€/min","Taip","Ne");
  508. isspiria[playerid]=SetTimerEx("spyris",5000,false,"i",playerid);
  509.  
  510. }
  511. if(newstate == PLAYER_STATE_DRIVER)
  512. {
  513. SendClientMessage(playerid, 0x00FF00FF, "_____|{FF0000}Valdymas {00FF00}|_____");
  514. SendClientMessage(playerid, 0x00FF00FF, "Spausk {FF0000}ctrl {00FF00}noredamas {FF0000}ijungti/isjungti {00FF00}Sviesas.");
  515. SendClientMessage(playerid, 0x00FF00FF, "Spausk {FF0000}alt {00FF00}noredamas {FF0000}ijungti/isjungti {00FF00}Varikli.");
  516. SendClientMessage(playerid, 0x00FF00FF, "Spausk {FF0000}6 {00FF00}noredamas {FF0000}atidaryti/uzdaryti {00FF00}kapota.");
  517. SendClientMessage(playerid, 0x00FF00FF, "Spausk {FF0000}4 {00FF00}noredamas {FF0000}atidaryti/uzdaryti {00FF00}bagazine.");
  518. }
  519.  
  520.  
  521. return 1;
  522. }
  523.  
  524. public OnPlayerEnterCheckpoint(playerid)
  525. {
  526. return 1;
  527. }
  528.  
  529. public OnPlayerLeaveCheckpoint(playerid)
  530. {
  531. return 1;
  532. }
  533.  
  534. public OnPlayerEnterRaceCheckpoint(playerid)
  535. {
  536. return 1;
  537. }
  538.  
  539. public OnPlayerLeaveRaceCheckpoint(playerid)
  540. {
  541. return 1;
  542. }
  543.  
  544. public OnRconCommand(cmd[])
  545. {
  546. return 1;
  547. }
  548.  
  549. public OnPlayerRequestSpawn(playerid)
  550. {
  551. return 1;
  552. }
  553.  
  554. public OnObjectMoved(objectid)
  555. {
  556. return 1;
  557. }
  558.  
  559. public OnPlayerObjectMoved(playerid, objectid)
  560. {
  561. return 1;
  562. }
  563.  
  564. public OnPlayerPickUpPickup(playerid, pickupid)
  565. {
  566.  
  567. if(pickupid == bankopickup)
  568. {
  569. ShowPlayerDialog(playerid,16, DIALOG_STYLE_LIST,"BANKAS", "Padėti pinigus\nPaimti pinigus\nbalansas", "Toliau", "Atšaukti");
  570. }
  571.  
  572.  
  573. if(pickupid == gunshoppickup)
  574. {
  575. ShowPlayerDialog(playerid,15, DIALOG_STYLE_LIST,"Gun Shop", "ak-47\ndesert eagle\ngun lic", "Toliau", "Atšaukti");
  576. }
  577. return 1;
  578. }
  579.  
  580. public OnVehicleMod(playerid, vehicleid, componentid)
  581. {
  582. return 1;
  583. }
  584.  
  585. public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
  586. {
  587. return 1;
  588. }
  589.  
  590. public OnVehicleRespray(playerid, vehicleid, color1, color2)
  591. {
  592. return 1;
  593. }
  594.  
  595. public OnPlayerSelectedMenuRow(playerid, row)
  596. {
  597. return 1;
  598. }
  599.  
  600. public OnPlayerExitedMenu(playerid)
  601. {
  602. return 1;
  603. }
  604.  
  605. public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
  606. {
  607. return 1;
  608. }
  609.  
  610. public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
  611. {
  612. if (newkeys & KEY_SECONDARY_ATTACK)
  613. {
  614. if(IsPlayerInRangeOfPoint(playerid, 2, -205.8055,1062.2072,19.7422))//Koordinates lauke (tik x, y, z)
  615. {
  616. SetPlayerPos(playerid,296.9278,-111.6685,1001.5156);//Koordinates viduje (kur atsidūrsi) (tik x, y, z)
  617. SetPlayerInterior(playerid,6);
  618. }
  619. if(IsPlayerInRangeOfPoint(playerid, 2, 296.9278,-111.6685,1001.5156))//Koordinates viduje (išeinant) (tik x, y, z)
  620. {
  621. SetPlayerPos(playerid,-205.8055,1062.2072,19.7422);//Koordinates išeinant iš pastato į lauką (tik x, y, z)
  622. SetPlayerInterior(playerid,0);
  623. }
  624. if(IsPlayerInRangeOfPoint(playerid, 2, -176.5860,1112.0245,19.7422))
  625. {
  626. SetPlayerPos(playerid,384.808624,173.804992,1008.382812);
  627. SetPlayerInterior(playerid,3);
  628. }
  629. if(IsPlayerInRangeOfPoint(playerid, 2, 384.808624,173.804992,1008.382812 ))
  630. {
  631. SetPlayerPos(playerid,-176.5860,1112.0245,19.7422);
  632. SetPlayerInterior(playerid,0);
  633. }
  634. }
  635.  
  636.  
  637.  
  638. new vid = GetPlayerVehicleID(playerid);
  639. GetVehicleParamsEx(vid,engine,lights,alarm,doors,bonnet,boot,objective);
  640. if(newkeys == KEY_ACTION)
  641. {
  642. if(lights == 1)
  643. {
  644. if(!IsPlayerInVehicle(playerid, vid)){ return 1;}
  645. SetVehicleParamsEx(vid,engine,0,alarm,doors,bonnet,boot,objective);
  646. SendClientMessage(playerid, 0xFF9900FF, "sviesos {FF0000}isjungtos.");
  647. }
  648. else if(lights == -1||lights == 0)
  649. {
  650. if(!IsPlayerInVehicle(playerid, vid)){ return 1;}
  651. SetVehicleParamsEx(vid,engine,1,alarm,doors,bonnet,boot,objective);
  652. SendClientMessage(playerid, 0xFF9900FF, "sviesos {FF0000}ijungtos.");
  653. }
  654. }
  655.  
  656.  
  657. if(newkeys &= 4)
  658. {
  659. if(engine == 1)
  660. {
  661. if(!IsPlayerInVehicle(playerid, vid)){ return 1;}
  662. SetVehicleParamsEx(vid,0,lights,alarm,doors,bonnet,boot,objective);
  663. SendClientMessage(playerid, 0xFF9900FF, "Variklis {FF0000}uzgesintas.");
  664. }
  665. else if(engine == -1||engine == 0)
  666. {
  667. if(!IsPlayerInVehicle(playerid, vid)){ return 1;}
  668. if(vehicleDB[vid][gas] < 1) return SendClientMessage(playerid, 0xFF9900FF, "Transporto priemonėje nėra degalų.");
  669. SetVehicleParamsEx(vid, 1, lights, alarm, doors, bonnet, boot, objective);
  670. SendClientMessage(playerid, 0xFF9900FF, "Variklis {FF0000}uzvestas.");
  671. }
  672. }
  673.  
  674. if(newkeys == KEY_ANALOG_LEFT)
  675. {
  676. if(boot == 1)
  677. {
  678. if(!IsPlayerInVehicle(playerid, vid)){ return 1;}
  679. SetVehicleParamsEx(vid,engine,lights,alarm,doors,bonnet,0,objective);
  680. SendClientMessage(playerid, 0xFF9900FF, "Bagazine {FF0000}uzdaryta.");
  681. }
  682. else if(boot == -1||boot == 0)
  683. {
  684. if(!IsPlayerInVehicle(playerid, vid)){ return 1;}
  685. SetVehicleParamsEx(vid,engine,lights,alarm,doors,bonnet,1,objective);
  686. SendClientMessage(playerid, 0xFF9900FF, "Bagazine {FF0000}atidaryta.");
  687. }
  688. }
  689.  
  690. if(newkeys == KEY_ANALOG_RIGHT)
  691. {
  692. if(bonnet == 1)
  693. {
  694. if(!IsPlayerInVehicle(playerid, vid)){ return 1;}
  695. SetVehicleParamsEx(vid,engine,lights,alarm,doors,0,boot,objective);
  696. SendClientMessage(playerid, 0xFF9900FF, "Kapotas {FF0000}uzdarytas.");
  697. }
  698. else if(bonnet == -1||bonnet == 0)
  699. {
  700. if(!IsPlayerInVehicle(playerid, vid)){ return 1;}
  701. SetVehicleParamsEx(vid,engine,lights,alarm,doors,1,boot,objective);
  702. SendClientMessage(playerid, 0xFF9900FF, "Kapotas {FF0000}atidarytas.");
  703. }
  704. }
  705. return 1;
  706. }
  707. public OnRconLoginAttempt(ip[], password[], success)
  708. {
  709. return 1;
  710. }
  711.  
  712. public OnPlayerUpdate(playerid)
  713. {
  714. return 1;
  715. }
  716.  
  717. public OnPlayerStreamIn(playerid, forplayerid)
  718. {
  719. return 1;
  720. }
  721.  
  722. public OnPlayerStreamOut(playerid, forplayerid)
  723. {
  724. return 1;
  725. }
  726.  
  727. public OnVehicleStreamIn(vehicleid, forplayerid)
  728. {
  729. return 1;
  730. }
  731.  
  732. public OnVehicleStreamOut(vehicleid, forplayerid)
  733. {
  734. return 1;
  735. }
  736.  
  737. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  738. {
  739. if(dialogid == 19)
  740. {
  741. if(response)
  742. {
  743. SendClientMessage(playerid, -1, "Sekmės žaidime");
  744. }
  745. if(!response)
  746. {
  747. SendClientMessage(playerid, -1, "Sekmės žaidime");
  748. }
  749. return 1;
  750. }
  751.  
  752.  
  753. if(dialogid == 18)
  754. {
  755. if(response)
  756. {
  757. if(!strlen(inputtext)) return SendClientMessage(playerid,-1,"Laukelis Negali būti tuščias.");
  758. if(pData[playerid][moneyb] < strval(inputtext)) return SendClientMessage(playerid,-1,"* Banke Jūs tiek neturite!");
  759. pData[playerid][moneyb]-= strval(inputtext);
  760. GivePlayerMoney(playerid,strval(inputtext));
  761. SendClientMessage(playerid, COLOR_GREEN, "Sėkmingai paėmėte pinigus iš banko");
  762. }
  763. return 1;
  764. }
  765.  
  766.  
  767. if(dialogid == 17)
  768. {
  769. if(response)
  770. {
  771. if(!strlen(inputtext)) return SendClientMessage(playerid,-1,"Laukelis Negali būti tuščias.");
  772. // if(GetPlayerMoney(playerid) < strval(inputtext)) return SendClientMessage(playerid,-1,"* Rankose Jūs tiek neturite!");
  773. if(strval(inputtext) > GetPlayerMoney(playerid)) return SendClientMessage(playerid,-1,"*Rankose Jūs tiek neturite!");
  774. pData[playerid][moneyb]+= strval(inputtext);
  775. GivePlayerMoney(playerid,-strval(inputtext));
  776. SendClientMessage(playerid, COLOR_GREEN, "Sėkmingai padėjote pinigus į banką");
  777. }
  778. return 1;
  779. }
  780. if(dialogid == 16)
  781. {
  782. if(response)
  783. {
  784. switch(listitem)
  785. {
  786. case 0:
  787. {
  788. ShowPlayerDialog(playerid, 17, DIALOG_STYLE_INPUT, "Padėti pinigus", "Įveskite sumą", "Toliau", "Išeiti");
  789. }
  790. case 1:
  791. {
  792. ShowPlayerDialog(playerid, 18, DIALOG_STYLE_INPUT, "Paimti pinigus", "Įveskite sumą", "Toliau", "Išeiti");
  793. }
  794. case 2:
  795. {
  796. new balansas[128];
  797. format(balansas,sizeof(balansas), "Jūsų saskaitoje padėta %d eurai",pData[playerid][moneyb]);
  798. ShowPlayerDialog(playerid, 19, DIALOG_STYLE_MSGBOX, "BALANSAS", balansas, "Išeiti", "Išeiti");
  799. }
  800. }
  801. }
  802. return 1;
  803. }
  804. if(dialogid == 15)
  805. {
  806. if(response)
  807. {
  808. switch(listitem)
  809. {
  810. case 0:
  811. {
  812. if(GetPlayerMoney(playerid) < 2000) return SendClientMessage(playerid, -1, "Neužtenka pinigų");
  813. if(!pData[playerid][glic]) return SendClientMessage(playerid, -1, "Neturi ginklų licenzijos");
  814. GivePlayerMoney(playerid, -2000);
  815. GivePlayerWeapon(playerid,30,500);
  816. SendClientMessage(playerid, -1, "Sėkmingai nusipirkai ak-47 už 2000 eurų");
  817. }
  818. case 1:
  819. {
  820. if(GetPlayerMoney(playerid) < 1000) return SendClientMessage(playerid, -1, "Neužtenka pinigų");
  821. if(!pData[playerid][glic]) return SendClientMessage(playerid, -1, "Neturi ginklų licenzijos");
  822. GivePlayerMoney(playerid, -1000);
  823. GivePlayerWeapon(playerid,24,500);
  824. SendClientMessage(playerid, -1, "Sėkmingai nusipirkai Desert Eagle už 1000 eurų");
  825. }
  826. case 2:
  827. {
  828. if(pData[playerid][glic]) return SendClientMessage(playerid, -1, "Jau turi licenziją");
  829. if(GetPlayerMoney(playerid) < 5000) return SendClientMessage(playerid, -1, "Neužtenka pinigų");
  830. if(GetPlayerScore(playerid) < 2000) return SendClientMessage(playerid, -1, "Per mažai patirties tokiam pirkiniui");
  831. GivePlayerMoney(playerid, -5000);
  832. pData[playerid][glic] = 1;
  833. SendClientMessage(playerid, -1, "Sėkmingai nusipirkai ginklų licenziją už 5000 eurų");
  834. }
  835. }
  836. }
  837. return 1;
  838. }
  839. if(dialogid == 13)
  840. {
  841. if(response)
  842. {
  843. SendClientMessage(playerid, -1, "Sekmės");
  844. }
  845. else if(!response)
  846. {
  847. SendClientMessage(playerid, -1, "Sekmės");
  848. }
  849. return 1;
  850. }
  851. if(dialogid == 14)
  852. {
  853. if(response)
  854. {
  855. switch(listitem)
  856. {
  857. case 0: PlayAudioStreamForPlayer(playerid, "http://www.radijas.fm/media/_catalog/www.radijas.fm-radijo-stotis-radiocentras.pls");
  858. case 1: PlayAudioStreamForPlayer(playerid, "http://www.radijas.fm/media/_catalog/www.radijas.fm-radijo-stotis-zipfm.pls");
  859. case 2: PlayAudioStreamForPlayer(playerid, "http://www.radijas.fm/media/_catalog/www.radijas.fm-radijo-stotis-power-hit-radio.pls");
  860. case 3:
  861. {
  862. StopAudioStreamForPlayer(playerid);
  863. SendClientMessage(playerid, -1, "Radijas išjungtas");
  864. }
  865. }
  866. }
  867. return 1;
  868. }
  869.  
  870. if(dialogid == 12)
  871. {
  872. if(response)
  873. {
  874. if(listitem == 0)
  875. {
  876. if(pData[playerid][Adminlvl] < 5){SendClientMessage(playerid, -1, "ši komanda tik pagrindiniam {0259EA}admin'am{ffffff} ir scripteriam."); return 1;}
  877. SetPlayerColor(playerid,COLOR_RED);
  878. SendClientMessage(playerid,-1,"Pasikeitete spalva raudona{ffffff}.");
  879. }
  880. else if(listitem == 1)
  881. {
  882. if(pData[playerid][Adminlvl] < 4){SendClientMessage(playerid, -1, "ši komanda tik {41A317}admin'am{ffffff}."); return 1;}
  883. SetPlayerColor(playerid,STEALTH_GREEN);
  884. SendClientMessage(playerid,-1,"Pasikeitete spalva žalia{ffffff}.");
  885. }
  886. else if(listitem == 2)
  887. {
  888. SetPlayerColor(playerid,0x80808000);
  889. SendClientMessage(playerid,-1,"Pasikeitete spalva {B4B5B7}paprasta{ffffff}.");
  890. }
  891. }
  892. return 1;
  893. }
  894.  
  895. if(dialogid == 11)
  896. {
  897. if(response)
  898. {
  899. SendClientMessage(playerid,-1,"Sekmės žaidime");
  900. }
  901. else if(!response)
  902. {
  903. SendClientMessage(playerid,-1,"Sekmės žaidime");
  904. }
  905. return 1;
  906. }
  907.  
  908. if(dialogid == 10)
  909. {
  910. if(response)
  911. {
  912. SendClientMessage(playerid,-1,"Sekmės žaidime");
  913. }
  914. else if(!response)
  915. {
  916. SendClientMessage(playerid,-1,"Sekmės žaidime");
  917. }
  918. return 1;
  919. }
  920.  
  921. if(dialogid == 9)
  922. {
  923. if(response)
  924. {
  925. SendClientMessage(playerid,-1,"Sekmės žaidime");
  926. }
  927. else if(!response)
  928. {
  929. SendClientMessage(playerid,-1,"Sekmės žaidime");
  930. }
  931. return 1;
  932. }
  933.  
  934. if(dialogid == 8)
  935. {
  936. if(response)
  937. {
  938. SendClientMessage(playerid,-1,"Sekmės žaidime");
  939. }
  940. else if(!response)
  941. {
  942. SendClientMessage(playerid,-1,"Sekmės žaidime");
  943. }
  944. return 1;
  945. }
  946.  
  947. if(dialogid == 7)
  948. {
  949. if(response)
  950. {
  951. SendClientMessage(playerid,-1,"Sekmės žaidime");
  952. }
  953. else if(!response)
  954. {
  955. SendClientMessage(playerid,-1,"Sekmės žaidime");
  956. }
  957. return 1;
  958. }
  959.  
  960. if(dialogid == 6)
  961. {
  962. if(response)
  963. {
  964. SendClientMessage(playerid,-1,"Sekmės žaidime");
  965. }
  966. else if(!response)
  967. {
  968. SendClientMessage(playerid,-1,"Sekmės žaidime");
  969. }
  970. return 1;
  971. }
  972.  
  973. if(dialogid == 5)
  974. {
  975. if(response)
  976. {
  977. SendClientMessage(playerid,0xFFFFFFFF,"Sekmės žaidime");
  978. }
  979. else if(!response)
  980. {
  981. SendClientMessage(playerid,0xFFFFFFFF,"Sekmės žaidime");
  982. }
  983. return 1;
  984. }
  985.  
  986. if(dialogid == 4)
  987. {
  988. if(response)
  989. {
  990. SendClientMessage(playerid,0xFFFFFFFF,"Sekmės");
  991. }
  992. else if(!response)
  993. {
  994. SendClientMessage(playerid,0xFFFFFFFF,"Sekmės");
  995. }
  996. return 1;
  997. }
  998.  
  999. if(dialogid == 3)
  1000. {
  1001. if(response)
  1002. {
  1003. if(GetPlayerMoney(playerid) < 150) return SendClientMessage(playerid,0xFFFFFFFF,"* Neturite 150€"), RemovePlayerFromVehicle(playerid);
  1004. NUOMACAR[playerid]=SetTimerEx("JAUYRA",60000,true,"i",playerid);
  1005. GivePlayerMoney(playerid, -150);
  1006. KillTimer(isspiria[playerid]);
  1007. SendClientMessage(playerid, -1, "* Išsinuomavai automobilį 150€/min");
  1008. return 1;
  1009. }
  1010. else if(!response)
  1011. {
  1012. if(IsPlayerInAnyVehicle(playerid)) RemovePlayerFromVehicle(playerid);
  1013. return 1;
  1014. }
  1015. }
  1016. if(dialogid == 2)
  1017. {
  1018. if( response )
  1019. {
  1020. if( !strlen( inputtext ) )
  1021. return SendClientMessage( playerid,-1,"Laukelis Negali būti tuščias." );
  1022. if( strlen( inputtext ) > 40 )
  1023. return SendClientMessage( playerid,-1,"Slaptažodis negali būti ilgesnis nei 40simbolių." );
  1024.  
  1025.  
  1026. new
  1027. Query[ 150 ]
  1028. ;
  1029. format( Query,sizeof( Query ),"SELECT * FROM `players` WHERE `Vardas` = '%s' AND `Slaptazodis` = '%s'",GetPlayerNameEx( playerid ),inputtext );
  1030. mysql_query( Query );
  1031. mysql_store_result( );
  1032. pData[playerid][Logged] = true;
  1033.  
  1034.  
  1035. if(! mysql_num_rows( ) )
  1036. {
  1037. Kick( playerid );
  1038. }
  1039. else
  1040. {
  1041. SendClientMessage( playerid,-1,"Prisijungėte sekmingai!" );
  1042. }
  1043. if( !response )
  1044. {
  1045. Kick( playerid );
  1046. }
  1047. mysql_free_result( );
  1048. return true;
  1049. }
  1050. }
  1051.  
  1052.  
  1053. if(dialogid == 1)
  1054. {
  1055. if( response )
  1056. {
  1057. if( !strlen( inputtext ) )
  1058. return SendClientMessage( playerid,-1,"Laukelis Negali būti tuščias." );
  1059. if( strlen( inputtext ) > 40 )
  1060. return SendClientMessage( playerid,-1,"Slaptažodis negali buūti ilgesnis nei 40simbolių." );
  1061.  
  1062.  
  1063. new
  1064. Query[ 150 ]
  1065. ;
  1066. format( Query,sizeof( Query ),"INSERT INTO `players` (Vardas,Slaptazodis) VALUES ('%s','%s')",GetPlayerNameEx( playerid ),inputtext );
  1067. mysql_query( Query );
  1068. pData[playerid][nonreg] = 1;
  1069. }
  1070. else
  1071. {
  1072. Kick( playerid );
  1073. }
  1074. return true;
  1075. }
  1076. return 1;
  1077. }
  1078. public OnPlayerClickPlayer(playerid, clickedplayerid, source)
  1079. {
  1080. return 1;
  1081. }
  1082. // ============Saugojimas/Krovimas=============================
  1083. stock LoadStats(playerid)
  1084. {
  1085. new name[MAX_PLAYER_NAME],query[70];
  1086. GetPlayerName(playerid,name,sizeof(name));
  1087. format(query,sizeof(query),"SELECT * FROM players WHERE Vardas = '%s'",name);
  1088. mysql_query(query);
  1089. mysql_store_result();
  1090. if(mysql_retrieve_row())
  1091. {
  1092. new tmp[32];
  1093.  
  1094. mysql_fetch_field_row(tmp,"Adminlvl"); pData[playerid][Adminlvl] = strval(tmp);
  1095. mysql_fetch_field_row(tmp,"Admin"); pData[playerid][Admin] = strval(tmp);
  1096. mysql_fetch_field_row(tmp,"Aod"); pData[playerid][Aod] = strval(tmp);
  1097. mysql_fetch_field_row(tmp,"Logged"); pData[playerid][Logged] = strval(tmp);
  1098. mysql_fetch_field_row(tmp,"Kreditai"); pData[playerid][Kreditai] = strval(tmp);
  1099. mysql_fetch_field_row(tmp,"aispejimai"); pData[playerid][aispejimai] = strval(tmp);
  1100. mysql_fetch_field_row(tmp,"glic"); pData[playerid][glic] = strval(tmp);
  1101. mysql_fetch_field_row(tmp,"Helper"); pData[playerid][Helper] = strval(tmp);
  1102. mysql_fetch_field_row(tmp,"nonreg"); pData[playerid][nonreg] = strval(tmp);
  1103. mysql_fetch_field_row(tmp,"moneyb"); pData[playerid][moneyb] = strval(tmp);
  1104. mysql_fetch_field_row(tmp,"ID"); pData[playerid][ID] = strval(tmp);
  1105. mysql_fetch_field_row(pData[playerid][Vardas],"Vardas");
  1106. mysql_fetch_field_row(tmp,"Pinigai"); pData[playerid][Pinigai]= strval(tmp);
  1107. mysql_fetch_field_row(tmp,"Xp"); pData[playerid][Xp] = strval(tmp);
  1108. mysql_fetch_field_row(tmp,"Darbas"); pData[playerid][Darbas] = strval(tmp);
  1109. mysql_fetch_field_row(tmp,"Hp"); pData[playerid][Hp] = floatstr(tmp);
  1110. }
  1111. mysql_free_result();
  1112. return 1;
  1113. }
  1114. stock SaveStats(playerid)
  1115. {
  1116. new query[100];
  1117.  
  1118. format(query,sizeof(query),"UPDATE players SET Pinigai = %d, Xp = %d, Darbas = %d,Hp = %f, Adminlvl = %d, Admin = %d, Aod = %d, Logged = %d, Kreditai = %d, aispejimai = %d, glic = %d, Helper = %d, nonreg = %d, moneyb = %d WHERE ID = %d",
  1119. pData[playerid][Pinigai],pData[playerid][Xp],pData[playerid][Darbas],pData[playerid][Hp],pData[playerid][Adminlvl],pData[playerid][Admin],pData[playerid][Logged],pData[playerid][Kreditai],pData[playerid][aispejimai],pData[playerid][glic],pData[playerid][Helper],pData[playerid][nonreg],pData[playerid][moneyb],pData[playerid][ID]);
  1120. mysql_query(query);
  1121. return 1;
  1122. }
  1123. //==================Saugojimas/Krovimas pabaiga==================
  1124. //==================Serverio komandos============================
  1125. CMD:komandos(playerid,params[])
  1126. {
  1127. new String[2048];
  1128.  
  1129. strcat(String, "/klaida {ffffff}- pranešti apie serveryje esančią klaidą\n");
  1130. strcat(String, "/duoti {ffffff}- duoti pinigų kitam žaidėjui\n");
  1131. strcat(String, "/kaledos {ffffff}- užblokuoti žaidėję\n");
  1132. strcat(String, "/spalva {ffffff}- pasikeisti vardo spalvą(pagal privilegijas)\n");
  1133. strcat(String, "/info {ffffff}- žaidėjo informacija\n");
  1134. strcat(String, "/informacija {ffffff}- serverio informacija\n");
  1135.  
  1136. ShowPlayerDialog(playerid, 13, DIALOG_STYLE_MSGBOX, "Serverio komandos", String, "Supratau", "Uždaryti");
  1137.  
  1138. return 1;
  1139. }
  1140. CMD:mp3(playerid,params[])
  1141. {
  1142. new String[2048];
  1143.  
  1144. strcat(String, "Radijo centras \n");
  1145. strcat(String, "Zip Fm\n");
  1146. strcat(String, "Power Hit Radio\n");
  1147. strcat(String, "Išjungti radiją\n");
  1148.  
  1149. ShowPlayerDialog(playerid, 14, DIALOG_STYLE_LIST,"RADIJAS", String, "Tuoliau", "Atšaukti");
  1150. return 1;
  1151. }
  1152. CMD:info(playerid,params[])
  1153. {
  1154. ShowPlayerStats(playerid);
  1155. return 1;
  1156. }
  1157. CMD:klaida(playerid,params[])
  1158. {
  1159. if(isnull(params)) return SendClientMessage(playerid, 0xFF0000FF, "Naudojimas /klaida [Klaidos aprašymas]");
  1160. if(strlen(params) < 20) return SendClientMessage(playerid, 0xFF0000FF, "Prašome klaidą apibūtinti plačiau, min 20 simbolių.");
  1161. new File:klaiduSarasas = fopen("Klaidos.ini",io_append); // Jei failo nėra, io_append jį sukurs.
  1162. if(klaiduSarasas)
  1163. {
  1164. new name[MAX_PLAYER_NAME],string[32];
  1165.  
  1166.  
  1167. GetPlayerName(playerid,name,sizeof(name));
  1168. format(string,sizeof(string),"\r\nKlaidos pranešėjas: %s",name);
  1169. fwrite(klaiduSarasas, string);
  1170.  
  1171.  
  1172. new l[3];
  1173. getdate(l[0],l[1],l[2]);
  1174. format(string,sizeof(string),"%d.%d.%d",l[0],l[1],l[2]);
  1175. gettime(l[0],l[1],l[2]);
  1176. format(string,sizeof(string),"%s.%d.%d.%d",string,l[0],l[1],l[2]);
  1177. strins(string,"\r\nKlaidos pranešimo data: ",0);
  1178. fwrite(klaiduSarasas,string);
  1179.  
  1180. fwrite(klaiduSarasas,"\r\nKlaidos aprašymas: ");
  1181. fwrite(klaiduSarasas,params);
  1182. fwrite(klaiduSarasas,"\r\n\r\n\r\n");
  1183.  
  1184. fclose(klaiduSarasas);
  1185.  
  1186. SendClientMessage(playerid, 0x00FF00FF, "Ačiū kad pranešetė apie klaidą!");
  1187. }
  1188. return 1;
  1189. }
  1190. CMD:duoti(playerid, params[])
  1191. {
  1192. new
  1193. pID,
  1194. pKiekis,
  1195. Float: SavePos[3],
  1196. name[MAX_PLAYERS],
  1197. name2[MAX_PLAYERS],
  1198. String[280]
  1199. ;
  1200. if(!sscanf(params, "ud", pID, pKiekis))
  1201. {
  1202. if( pID != INVALID_PLAYER_ID )
  1203. {
  1204. if(GetPlayerMoney(playerid) >= pKiekis)
  1205. {
  1206. if( pKiekis > 0 )
  1207. {
  1208. GetPlayerPos( pID, SavePos[ 0 ],SavePos[ 1 ],SavePos[ 2 ] );
  1209. if( IsPlayerInRangeOfPoint( playerid, 10.0, SavePos[ 0 ],SavePos[ 1 ],SavePos[ 2 ] ) )
  1210. {
  1211. if(playerid != pID)
  1212. {
  1213. GivePlayerMoney( playerid, -pKiekis );
  1214. GivePlayerMoney( pID, pKiekis );
  1215. GetPlayerName(playerid, name, sizeof(name));
  1216. GetPlayerName(pID, name2, sizeof(name2));
  1217.  
  1218.  
  1219. format( String,280,"{33CCFF}* Gavote [{E08B1B}%d {33CCFF}EUR] iš {E08B1B}%s.", pKiekis, name);
  1220. SendClientMessage( pID, -1, String );
  1221.  
  1222. format( String,280,"{33CCFF}* Davėte [{E08B1B}%d {33CCFF}EUR] žaidėjui {E08B1B}( %s ).",pKiekis, name2);
  1223. SendClientMessage( playerid, -1, String );
  1224. }
  1225. else
  1226. {
  1227. SendClientMessage(playerid,-1, "{FF6600}Sau pinigų duoti negali!");
  1228. }
  1229. }
  1230. else
  1231. {
  1232. SendClientMessage(playerid,-1, "{FF6600}Žaidėjas per toli nuo jūsų!");
  1233. }
  1234. }
  1235. else
  1236. {
  1237. SendClientMessage(playerid,-1, "{FF6600}Minimali pinigų davimo suma 1eur!");
  1238. }
  1239. }
  1240. else
  1241. {
  1242. SendClientMessage(playerid,-1, "{FF6600}Savo rankose neturi tiek pinigų!");
  1243. }
  1244. }
  1245. else
  1246. {
  1247. SendClientMessage(playerid,-1, "{FF6600}Žaidėjas neprisijungęs!");
  1248. }
  1249. }
  1250. else
  1251. {
  1252. SendClientMessage(playerid,-1, "{FF6600}/duoti [Žaidėjo vardas/ID][Kiekis].");
  1253. }
  1254. return (true);
  1255. }
  1256.  
  1257. CMD:kaledos(playerid, params[])
  1258. {
  1259. SetPlayerAttachedObject(playerid, 3, 19065, 2, 0.120000, 0.040000, -0.003500, 0, 100, 100, 1.4, 1.4, 1.4);
  1260. SendClientMessage(playerid,-1,"Užsidėjai kaledinę kepurę!!! Su šventėm!");
  1261. return 1;
  1262. }
  1263. CMD:spalva(playerid, params[])
  1264. {
  1265. ShowPlayerDialog(playerid, 12, DIALOG_STYLE_LIST,"Nick Spalvos", "Pagrindinis Admin ir Scripteriam\nAdmin\nPaprasta", "Tuoliau", "Atšaukti");
  1266. return 1;
  1267. }
  1268. CMD:informacija(playerid, params[])
  1269. {
  1270. ShowPlayerDialog(playerid,5,DIALOG_STYLE_MSGBOX,"Serverio Informacija","Serverio savininkas ToE - Edva_Rolling\n Serverio atnaujinimo būsena - 0.0.5\n Serverio dabartinis scripteris ToE","Supratau","Exit");
  1271. return 1;
  1272. }
  1273.  
  1274.  
  1275.  
  1276.  
  1277. //=================Serverio komandos pabaiga=====================
  1278.  
  1279.  
  1280. //helper komandos
  1281. CMD:helperhelp(playerid, params[])
  1282. {
  1283. if (!pData[playerid][Helper]){ SendClientMessage(playerid, STEALTH_GREEN, "*Ši komanda tik helperiams"); return 1;}
  1284. {
  1285. SendClientMessage(playerid, STEALTH_GREEN, "Helper komandos:\n /hkick /hheal");
  1286. }
  1287. return 1;
  1288. }
  1289. CMD:hheal(playerid, params[])
  1290. {
  1291. if (!pData[playerid][Helper]) return 0;
  1292. new targetid;
  1293. if(sscanf(params,"u", targetid)) return SendClientMessage(playerid, 0x33CCFFAA,"Naudojimas: /hheal [Vardas_Pavarde]");
  1294. if(!IsPlayerConnected(targetid)) return SendClientMessage(playerid, 0xFF0000AA,"Tokio zaidejo nera!");
  1295. SetPlayerHealth(targetid, 100);
  1296. new vehicleid = GetPlayerVehicleID(targetid);
  1297. SetVehicleHealth(vehicleid, 1000);
  1298. RepairVehicle(GetPlayerVehicleID(targetid));
  1299. return 1;
  1300. }
  1301. CMD:hkick(playerid, params[])
  1302. {
  1303. if (!pData[playerid][Helper]) return 0;
  1304. new reason[64];
  1305. new str[128];
  1306. new Playername[MAX_PLAYER_NAME], Adminname[MAX_PLAYER_NAME];
  1307. new id = GetPlayeridMid(Playername);
  1308. GetPlayerName(playerid, Adminname, sizeof(Adminname));
  1309. GetPlayerName(id, Playername, sizeof(Playername));
  1310. if(sscanf(params, "us[64]", id,reason)) return SendClientMessage(playerid, STEALTH_GREEN, "Naudojimas: /hkick [ Vardas_Pavarde ] [ Priezastis ]");
  1311. if (id == INVALID_PLAYER_ID){ SendClientMessage(playerid, STEALTH_GREEN, "{FFF1AF}[{F81414}ERROR{FFF1AF}]{C3C3C3}* Tokio Žaidėjo nėra"); return 1;}
  1312. format(str, sizeof(str), "'%s' buvo ismestas is serverio helperio '%s'. Priezastis: %s ", Playername, Adminname, reason);
  1313. SendClientMessageToAll(STEALTH_GREEN, str);
  1314. format(str, sizeof(str), "Jūs buvote išmestas iš serverio helperio '%s'. Priežastis: %s ", Adminname, reason);
  1315. SendClientMessage(id, STEALTH_GREEN, str);
  1316. Kick(id);
  1317. return 1;
  1318. }
  1319. // helper komandu pabaiga
  1320. // Admin komandos
  1321. CMD:anispeti(playerid,params[])
  1322. {
  1323. if (!pData[playerid][Admin]) return 0;
  1324. if (pData[playerid][Adminlvl] < 1) return 0;
  1325. if(pData[playerid][Aod] < 1) return 0;
  1326. new msgg[128],msgs[128],zaidejas[MAX_PLAYER_NAME],priezastis[50];
  1327. if(sscanf(params,"zs",zaidejas,priezastis)) return SendClientMessage(playerid,-1,"~r~/anispeti [Vardas_Pavarde] [Priezastis]");
  1328. new id = GetPlayeridMid( zaidejas );
  1329. if(pData[id][Adminlvl]==0) return SendClientMessage(playerid,-1,"~r~Zaidejas nera ADMIN narys");
  1330. if(id == INVALID_PLAYER_ID) return SendClientMessage(playerid,-1,"~r~Zaidejas neprisijunges");
  1331. GetPlayerName(id,zaidejas,sizeof(zaidejas));
  1332. format(msgg,sizeof(msgg),"Jums nuimė ADMIN įspėjimą. Priežastis: %s",priezastis);
  1333. pData[id][aispejimai]-=1;
  1334. SaveStats(id);
  1335. PlayerPlaySound(id,1149,0.0,0.0,0.0 );
  1336. SendClientMessage(id,-1,msgg);
  1337. format(msgs,sizeof(msgs),"{9FDD00}Nuimėtę ispėjimą administratoriui {DC00FF}%s. Priežastis: %s",zaidejas, priezastis);
  1338. SendClientMessage(playerid,-1,msgs);
  1339.  
  1340.  
  1341.  
  1342. return 1;
  1343. }
  1344. CMD:aispeti(playerid,params[])
  1345. {
  1346. if (!pData[playerid][Admin]) return 0;
  1347. if (pData[playerid][Adminlvl] < 1) return 0;
  1348. if(pData[playerid][Aod] < 1) return 0;
  1349. new msgg[128],msg[128],msgs[128],zaidejas[MAX_PLAYER_NAME],priezastis[50];
  1350. if(sscanf(params,"zs",zaidejas,priezastis)) return SendClientMessage(playerid,-1,"~r~/aispeti [Vardas_Pavarde] [Priezastis]");
  1351. new id = GetPlayeridMid( zaidejas );
  1352. if(pData[id][Adminlvl]==0) return SendClientMessage(playerid,-1,"~r~Zaidejas nera ADMIN narys");
  1353. if(id == INVALID_PLAYER_ID) return SendClientMessage(playerid,-1,"~r~Zaidejas neprisijunges");
  1354. GetPlayerName(id,zaidejas,sizeof(zaidejas));
  1355. format(msgg,sizeof(msgg),"Gavote ADMIN įspėjimą. Priežastis: %s",priezastis);
  1356. pData[id][aispejimai]+=1;
  1357. SaveStats(id);
  1358. PlayerPlaySound(id,1149,0.0,0.0,0.0 );
  1359. SendClientMessage(id,-1,msgg);
  1360. format(msgs,sizeof(msgs),"{9FDD00}Įspėjote administratoriu {DC00FF}%s. Priežastis: %s",zaidejas, priezastis);
  1361. SendClientMessage(playerid,-1,msgs);
  1362.  
  1363. if(pData[id][aispejimai]==3)
  1364. {
  1365. pData[id][Adminlvl]=0;
  1366. pData[id][Admin]=0;
  1367. pData[id][aispejimai]=0;
  1368. SaveStats(id);
  1369. SendClientMessage(id,-1,"Jūs surinkote {00FF00}3 {FF0000}ADMIN įspėjimus. {00FF00}Todėl netekote pareigų!!");
  1370. PlayerPlaySound(id,1149,0.0,0.0,0.0 );
  1371. format(msgg,sizeof(msg),"Žaidejas {FFD400}%s {FF0000}neteko ADMIN pareigų, nes surinko 3 įspėjimus.",zaidejas);
  1372. SendClientMessage(playerid,-1,msg);
  1373. }
  1374. return 1;
  1375. }
  1376. CMD:random(playerid, params[])
  1377. {
  1378. if (!pData[playerid][Admin]) return 0;
  1379. if (pData[playerid][Adminlvl] < 6) return 0;
  1380. if(pData[playerid][Aod] < 1) return 0;
  1381. new string[90], onlineids[MAX_PLAYERS], playersonline,vardas[MAX_PLAYER_NAME];
  1382.  
  1383. for(new i=0; i<MAX_PLAYERS; i++)
  1384. {
  1385. if(IsPlayerConnected(i))
  1386. {
  1387. onlineids[playersonline] = i;
  1388. playersonline++;
  1389. }
  1390. }
  1391. GetPlayerName(onlineids[random(playersonline)], vardas, sizeof(vardas));
  1392. format(string, 90, "{FF0000}(RANDOM) žmogus kuriam nusišypsojo laimė yra: {FF8C00}%s",vardas);
  1393. SendClientMessageToAll(0x00CC00AA,string);
  1394. return 1;
  1395. }
  1396. CMD:adminhelp(playerid, params[])
  1397. {
  1398.  
  1399. new String[2048];
  1400.  
  1401. if(pData[playerid][Admin] < 1) return 0;
  1402.  
  1403. switch(pData[playerid][Adminlvl])
  1404. {
  1405. case 1:
  1406. {
  1407. strcat(String, "/aod {ffffff}- admin on duty\n");
  1408. strcat(String, "/kick {ffffff}- išmesti žaidėję\n");
  1409. strcat(String, "/ban {ffffff}- užblokuoti žaidėję\n");
  1410. strcat(String, "/aheal {ffffff}- parašysite pranešimą, kurį visi matys\n");
  1411. strcat(String, "/to {ffffff}- nusiteleportuoti pas žaidėję\n");
  1412. strcat(String, "/get {ffffff}- atsiteleportuoti žaidėję pas save\n");
  1413.  
  1414. ShowPlayerDialog(playerid, 6, DIALOG_STYLE_MSGBOX, "Administratoriaus komandos", String, "", "Uždaryti");
  1415. }
  1416.  
  1417. case 2:
  1418. {
  1419. strcat(String, "/aod {ffffff}- admin on duty\n");
  1420. strcat(String, "/kick {ffffff}- išmesti žaidėję\n");
  1421. strcat(String, "/ban {ffffff}- užblokuoti žaidėję\n");
  1422. strcat(String, "/aheal {ffffff}- parašysite pranešimą, kurį visi matys\n");
  1423. strcat(String, "/to {ffffff}- nusiteleportuoti pas žaidėję\n");
  1424. strcat(String, "/get {ffffff}- atsiteleportuoti žaidėję pas save\n");
  1425.  
  1426. ShowPlayerDialog(playerid, 7, DIALOG_STYLE_MSGBOX, "Administratoriaus komandos", String, "", "Uždaryti");
  1427. }
  1428.  
  1429. case 3:
  1430. {
  1431. strcat(String, "/aod {ffffff}- admin on duty\n");
  1432. strcat(String, "/kick {ffffff}- išmesti žaidėję\n");
  1433. strcat(String, "/ban {ffffff}- užblokuoti žaidėję\n");
  1434. strcat(String, "/aheal {ffffff}- parašysite pranešimą, kurį visi matys\n");
  1435. strcat(String, "/to {ffffff}- nusiteleportuoti pas žaidėję\n");
  1436. strcat(String, "/get {ffffff}- atsiteleportuoti žaidėję pas save\n");
  1437.  
  1438. ShowPlayerDialog(playerid, 8, DIALOG_STYLE_MSGBOX, "Administratoriaus komandos", String, "", "Uždaryti");
  1439. }
  1440.  
  1441. case 4:
  1442. {
  1443. strcat(String, "/aod {ffffff}- admin on duty\n");
  1444. strcat(String, "/kick {ffffff}- išmesti žaidėję\n");
  1445. strcat(String, "/ban {ffffff}- užblokuoti žaidėję\n");
  1446. strcat(String, "/aheal {ffffff}- parašysite pranešimą, kurį visi matys\n");
  1447. strcat(String, "/to {ffffff}- nusiteleportuoti pas žaidėję\n");
  1448. strcat(String, "/get {ffffff}- atsiteleportuoti žaidėję pas save\n");
  1449.  
  1450. ShowPlayerDialog(playerid, 9, DIALOG_STYLE_MSGBOX, "Administratoriaus komandos", String, "", "Uždaryti");
  1451. }
  1452.  
  1453. case 5:
  1454. {
  1455. strcat(String, "/aod {ffffff}- admin on duty\n");
  1456. strcat(String, "/kick {ffffff}- išmesti žaidėję\n");
  1457. strcat(String, "/ban {ffffff}- užblokuoti žaidėję\n");
  1458. strcat(String, "/aheal {ffffff}- parašysite pranešimą, kurį visi matys\n");
  1459. strcat(String, "/to {ffffff}- nusiteleportuoti pas žaidėję\n");
  1460. strcat(String, "/get {ffffff}- atsiteleportuoti žaidėję pas save\n");
  1461.  
  1462. ShowPlayerDialog(playerid, 10, DIALOG_STYLE_MSGBOX, "Administratoriaus komandos", String, "", "Uždaryti");
  1463. }
  1464.  
  1465. case 6:
  1466. {
  1467. strcat(String, "/aod {ffffff}- admin on duty\n");
  1468. strcat(String, "/kick {ffffff}- išmesti žaidėję\n");
  1469. strcat(String, "/ban {ffffff}- užblokuoti žaidėję\n");
  1470. strcat(String, "/aheal {ffffff}- parašysite pranešimą, kurį visi matys\n");
  1471. strcat(String, "/to {ffffff}- nusiteleportuoti pas žaidėję\n");
  1472. strcat(String, "/get {ffffff}- atsiteleportuoti žaidėję pas save\n");
  1473. strcat(String, "/gun {ffffff}- duoti žaidėjui ginklą\n");
  1474. strcat(String, "/setadmin {ffffff}- skirti žaidėję administratoriumi\n");
  1475. strcat(String, "/takeoffadmin {ffffff}- nuimti žaidėjui admin\n");
  1476. strcat(String, "/setskin {ffffff}- uždėti žaidėjui skin\n");
  1477. strcat(String, "/sethelper {ffffff}- uždėti žaidėjui helperį\n");
  1478. strcat(String, "/takeoffhelper {ffffff}- nuimti žaidėjui helperį\n");
  1479. strcat(String, "/loadgm {ffffff}- restartuoja serverį ir užkrauna gamemodą\n");
  1480. strcat(String, "/chpass {ffffff}- pakeisti serverio slaptažodį (0 - nuima slaptažodį)\n");
  1481. strcat(String, "/aispeti {ffffff}- uždėi žaidėjui admin ispėjima\n");
  1482. strcat(String, "/anispeti {ffffff}- nuimti žaidėjui admin ispėjima\n");
  1483.  
  1484. ShowPlayerDialog(playerid, 11, DIALOG_STYLE_MSGBOX, "Administratoriaus komandos", String, "", "Uždaryti");
  1485. }
  1486. }
  1487. return 1;
  1488.  
  1489. }
  1490. //admin lygiai
  1491. //1lvl - paprastas admin
  1492. //2lvl - paprastas admin
  1493. //3lvl - vad.admin
  1494. //4lvl - pagr.admin
  1495. //5lvl - coder of the project
  1496. //6lvl - owner of the project
  1497. //
  1498. CMD:admin(playerid, params[])
  1499. {
  1500. new String[1500], Stringas[1500], AdminCount, KoksLygis[60];
  1501.  
  1502. if(sscanf(params, "s[500]", String))
  1503. {
  1504. for(new i = 0; i < MAX_PLAYERS; i++)
  1505. {
  1506. if(IsPlayerConnected(i) && pData[i][Adminlvl])
  1507. {
  1508. AdminCount ++;
  1509.  
  1510. switch(pData[i][Adminlvl])
  1511. {
  1512. case 1: KoksLygis = "{33AA33}I lygio administratorius";
  1513. case 2: KoksLygis = "{33AA33}II lygio administratorius";
  1514. case 3: KoksLygis = "{33AA33}Vad.Administratorius";
  1515. case 4: KoksLygis = "{33AA33}Pagr.Administratorius";
  1516. case 5: KoksLygis = "{33AA33}Coder Of The Project";
  1517. case 6: KoksLygis = "{33AA33}Owner Of The Project";
  1518. }
  1519.  
  1520. format(Stringas, sizeof(Stringas), "%d. %s. Pareigos: %s", AdminCount, GetPlayerNameEx(i), KoksLygis);
  1521. strcat(String, Stringas);
  1522.  
  1523. ShowPlayerDialog(playerid, 4, DIALOG_STYLE_MSGBOX, "Prisijungusi serverio valdžia", String, "Uždaryti", "Išeiti");
  1524. }
  1525. }
  1526. }
  1527. return 1;
  1528. }
  1529. CMD:kill(playerid, params[])
  1530. {
  1531. if (!pData[playerid][Admin]) return 0;
  1532. if (pData[playerid][Adminlvl] < 1) return 0;
  1533. if(pData[playerid][Aod] < 1) return 0;
  1534.  
  1535.  
  1536. new reason[64];
  1537. new str[128];
  1538. new killername[MAX_PLAYER_NAME];
  1539. new killedname[MAX_PLAYER_NAME];
  1540. new id = GetPlayeridMid(killedname);
  1541. if(sscanf(params,"us[64]", id,reason))
  1542. {
  1543. SendClientMessage(playerid,-1,"/kill [vardas] [priežastis] ");
  1544. return 1;
  1545. }
  1546. {
  1547. GetPlayerName(playerid, killername, sizeof(killername));
  1548. GetPlayerName(id, killedname, sizeof(killedname));
  1549. if (id == INVALID_PLAYER_ID){ SendClientMessage(playerid, STEALTH_GREEN, "{FFF1AF}[{F81414}ERROR{FFF1AF}]{C3C3C3}* Tokio Žaidėjo nėra"); return 1;}
  1550. }
  1551. if(!IsPlayerConnected(id))
  1552. {
  1553. SendClientMessage(playerid,-1,"Šis žaidėjas neprisijungęs");
  1554. return 1;
  1555. }
  1556. format(str, sizeof(str), "Administratorius %s panaudojo /kill ant %s", killername, killedname);
  1557. SendClientMessageToAll(STEALTH_GREEN, str);
  1558. format(str, sizeof(str), "Tave nužudė Administratorius %s su /kill komanda", killername);
  1559. SendClientMessage(id, STEALTH_GREEN, str);
  1560. SetPlayerHealth(id, 0);
  1561. return 1;
  1562. }
  1563.  
  1564.  
  1565. CMD:atimtikreditus(playerid, params[])
  1566. {
  1567. if(pData[playerid][Aod] < 1) return 0;
  1568. if (pData[playerid][Adminlvl] < 6) return 0;
  1569. if(pData[playerid][Admin] < 1) return 0;
  1570.  
  1571. new id, kreditusk;
  1572. if(sscanf(params,"ui",id,kreditusk))
  1573. {
  1574. SendClientMessage(playerid,-1,"/atimtikreditus [vardas] [kiek]");
  1575. return 1;
  1576. }
  1577. if(!IsPlayerConnected(id))
  1578. {
  1579. SendClientMessage(playerid,-1,"Šis žaidėjas nėra prisijungęs");
  1580. return 1;
  1581. }
  1582. pData[id][Kreditai] -= kreditusk;
  1583. SendClientMessage(id,-1,"Tavo kreditai buvo atimti");
  1584. SendClientMessage(playerid,-1,"Tu atėmiai kreditus");
  1585. SaveStats(id);
  1586. return 1;
  1587. }
  1588. CMD:duotikreditu(playerid, params[])
  1589. {
  1590. if(pData[playerid][Aod] < 1) return 0;
  1591. if (pData[playerid][Adminlvl] < 6) return 0;
  1592. if(pData[playerid][Admin] < 1) return 0;
  1593. new id,kreditusk;
  1594. if(sscanf(params,"ui",id,kreditusk))
  1595. {
  1596. SendClientMessage(playerid,-1,"/duotikreditu [vardas] [kiek]");
  1597. return 1;
  1598. }
  1599. if(!IsPlayerConnected(id))
  1600. {
  1601. SendClientMessage(playerid,-1,"Sis zaidejas neprisijunges!");
  1602. return 1;
  1603. }
  1604. pData[id][Kreditai] += kreditusk;
  1605. SendClientMessage(id,-1,"Tau davė kreditų");
  1606. SendClientMessage(playerid,-1,"Tu davei kreditų");
  1607. SaveStats(id);
  1608. return 1;
  1609. }
  1610. CMD:sethelper(playerid, params[])
  1611. {
  1612. if (!pData[playerid][Admin]) return 0;
  1613. if (pData[playerid][Adminlvl] < 6) return 0;
  1614. if(pData[playerid][Aod] < 1) return 0;
  1615.  
  1616. new id;
  1617. if(sscanf(params,"ui",id))
  1618. {
  1619. SendClientMessage(playerid,-1,"/sethelper [vardas] ");
  1620. return 1;
  1621. }
  1622. if(!IsPlayerConnected(id))
  1623. {
  1624. SendClientMessage(playerid,-1,"Sis zaidejas neprisijunges!");
  1625. return 1;
  1626. }
  1627. pData[id][Helper] = 1;
  1628. SendClientMessage(id,-1,"Tu buvai paskirtas atlikti Helperio pareigas");
  1629. SendClientMessage(playerid,-1,"Tu paskyrei žaidėję atlikti Helperio pareigas");
  1630. SaveStats(id);
  1631.  
  1632. return 1;
  1633. }
  1634. CMD:takeoffhelper(playerid, params[])
  1635. {
  1636. if (!pData[playerid][Admin]) return 0;
  1637. if (pData[playerid][Adminlvl] < 6) return 0;
  1638. if(pData[playerid][Aod] < 1) return 0;
  1639.  
  1640. new id;
  1641. if(sscanf(params, "us[64]", id))
  1642. {
  1643. SendClientMessage(playerid, -1,"/takeoffhelper [vardas] ");
  1644. return 1;
  1645. }
  1646. if(!IsPlayerConnected(id))
  1647. {
  1648. SendClientMessage(playerid,-1,"Šis žaidėjęs neprisijungęs.");
  1649. return 1;
  1650. }
  1651. pData[id][Helper] = 0;
  1652. SendClientMessage(id,-1,"Tau buvo nuimtos helperio pareigos");
  1653. SendClientMessage(playerid,-1,"Tu nuimiai žaidėjuo helperio pareigas");
  1654. SaveStats(id);
  1655. return 1;
  1656. }
  1657. CMD:setskin(playerid, params[])
  1658. {
  1659. new skinidas;
  1660. new playerD;
  1661. if (!pData[playerid][Admin]) return 0;
  1662. if (pData[playerid][Adminlvl] < 1) return 0;
  1663. if(pData[playerid][Aod] < 1) return 0;
  1664.  
  1665. if(sscanf(params, "ui", playerD,skinidas)) return SendClientMessage(playerid, STEALTH_GREEN, "Naudojimas: /setskin [Vardas_Pavarde] [skin id]");
  1666. if(skinidas > 299 || skinidas < 0) return SendClientMessage(playerid, -1,"Invalid Skin ID!");
  1667. if(!IsPlayerConnected(playerD))
  1668. return SendClientMessage(playerid, STEALTH_GREEN, "Tokio zaidejo nera!");
  1669.  
  1670. SetPlayerSkin(playerD, skinidas);
  1671. SaveStats(playerD);
  1672. return 1;
  1673. }
  1674. CMD:aod(playerid, params[])
  1675. {
  1676. if (!pData[playerid][Admin]) return 0;
  1677. if (pData[playerid][Adminlvl] < 1) return 0;
  1678.  
  1679. if( pData[ playerid ][ Aod ] )
  1680. {
  1681. SetPlayerHealth(playerid, 100);
  1682. SetPlayerArmour(playerid,0);
  1683. SetPlayerColor(playerid, 0x80808000);
  1684. SetPlayerChatBubble(playerid, "", STEALTH_GREEN, 20.0, 10000);
  1685. SendClientMessage(playerid, STEALTH_GREEN, "* {FF0000}AOD rėžimas išjungtas!");
  1686.  
  1687. new zin[126],name[MAX_PLAYER_NAME];
  1688. GetPlayerName(playerid,name,MAX_PLAYER_NAME);
  1689. format(zin,sizeof(zin),"{ff0000}[SERVERIS] {ffffff}Administratorius %s išjungė AOD {ff0000}[Admin On Duty] {ffffff}rėžimą.", name);
  1690. SendClientMessageToAll(STEALTH_GREEN, zin);
  1691.  
  1692. pData[ playerid ][ Aod ] = false;
  1693. }
  1694. else
  1695. {
  1696. SetPlayerHealth(playerid, 100);
  1697. SetPlayerArmour(playerid, 100);
  1698. SetPlayerColor(playerid, STEALTH_GREEN);
  1699. SetPlayerChatBubble(playerid, "BŪDINTIS ADMINISTRATORIUS", STEALTH_GREEN, 20.0, 10000);
  1700. SendClientMessage(playerid, STEALTH_GREEN, "* {D4F20C}AOD rėžimas įjungtas!");
  1701.  
  1702. new zin[126],name[MAX_PLAYER_NAME];
  1703. GetPlayerName(playerid,name,MAX_PLAYER_NAME);
  1704. format(zin,sizeof(zin), "{ff0000}[SERVERIS] {ffffff}Administratorius %s įjungė AOD {ff0000}[Admin On Duty] {ffffff}rėžimą.", name);
  1705. SendClientMessageToAll(STEALTH_GREEN, zin);
  1706.  
  1707. pData[ playerid ][ Aod ] = true;
  1708. }
  1709. return 1;
  1710. }
  1711.  
  1712. CMD:kick(playerid, params[])
  1713. {
  1714. if(pData[playerid][Admin] < 1) return 0;
  1715. if (pData[playerid][Adminlvl] < 1) return 0;
  1716. if(pData[playerid][Aod] < 1) return 0;
  1717. new reason[64];
  1718. new str[128];
  1719. new Playername[MAX_PLAYER_NAME], Adminname[MAX_PLAYER_NAME];
  1720. new id = GetPlayeridMid(Playername);
  1721. GetPlayerName(playerid, Adminname, sizeof(Adminname));
  1722. GetPlayerName(id, Playername, sizeof(Playername));
  1723. if(sscanf(params, "us[64]", id,reason)) return SendClientMessage(playerid, STEALTH_GREEN, "Naudojimas: /kick [ Vardas_Pavarde ] [ Priezastis ]");
  1724. if (id == INVALID_PLAYER_ID){ SendClientMessage(playerid, STEALTH_GREEN, "{FFF1AF}[{F81414}ERROR{FFF1AF}]{C3C3C3}* Tokio Žaidėjo nėra"); return 1;}
  1725. format(str, sizeof(str), "'%s' buvo ismestas is serverio administratoriumi '%s'. Priezastis: %s ", Playername, Adminname, reason);
  1726. SendClientMessageToAll(STEALTH_GREEN, str);
  1727. format(str, sizeof(str), "Jūs buvote išmestas iš serverio administratoriaus '%s'. Priežastis: %s ", Adminname, reason);
  1728. SendClientMessage(id, STEALTH_GREEN, str);
  1729. Kick(id);
  1730. return 1;
  1731. }
  1732. CMD:ban(playerid, params[])
  1733. {
  1734. if(pData[playerid][Aod] < 1) return 0;
  1735. if (pData[playerid][Adminlvl] < 1) return 0;
  1736. if(pData[playerid][Admin] < 1) return 0;
  1737. new reason[64];
  1738. new str[128];
  1739. new Playername[MAX_PLAYER_NAME], Adminname[MAX_PLAYER_NAME];
  1740. new id = GetPlayeridMid(Playername);
  1741. GetPlayerName(playerid, Adminname, sizeof(Adminname));
  1742. GetPlayerName(id, Playername, sizeof(Playername));
  1743. if(sscanf(params, "us[64]", id,reason)) return SendClientMessage(playerid, STEALTH_GREEN, "Naudojimas: /ban [ Vardas_Pavardė ] [ Priežastis ]");
  1744. if (id == INVALID_PLAYER_ID){ SendClientMessage(playerid, STEALTH_GREEN, "{FFF1AF}[{F81414}ERROR{FFF1AF}]{C3C3C3}* Tokio Žaidėjo nėra"); return 1;}
  1745.  
  1746. format(str, sizeof(str), "'%s' buvo užblokuotas administratoriumi '%s'. Priežastis: %s ", Playername, Adminname, reason);
  1747. SendClientMessageToAll(STEALTH_GREEN, str);
  1748. format(str, sizeof(str), "Jūs buvote užblokuotas administratoriaus '%s'. Priežastis: %s Norėdami atsibluokuoti rašykite anketą forume", Adminname, reason);
  1749. SendClientMessage(id, STEALTH_GREEN, str);
  1750. BanEx(id,reason);
  1751.  
  1752. return 1;
  1753. }
  1754. CMD:aheal(playerid, params[])
  1755. {
  1756. if(pData[playerid][Aod] < 1) return 0;
  1757. if (pData[playerid][Adminlvl] < 1) return 0;
  1758. if(pData[playerid][Admin] < 1) return 0;
  1759. new targetid;
  1760. if(sscanf(params,"u", targetid)) return SendClientMessage(playerid, 0x33CCFFAA,"Naudojimas: /heal [Vardas_Pavarde]");
  1761. if(!IsPlayerConnected(targetid)) return SendClientMessage(playerid, 0xFF0000AA,"Tokio zaidejo nera!");
  1762. SetPlayerHealth(targetid, 100);
  1763. new vehicleid = GetPlayerVehicleID(targetid);
  1764. SetVehicleHealth(vehicleid, 1000);
  1765. RepairVehicle(GetPlayerVehicleID(targetid));
  1766. return 1;
  1767. }
  1768. CMD:setadmin(playerid,params[])
  1769. {
  1770. if(pData[playerid][Aod] < 1) return 0;
  1771. if (pData[playerid][Adminlvl] < 6) return 0;
  1772. if(pData[playerid][Admin] < 1) return 0;
  1773.  
  1774. new id,lygis;
  1775. if(sscanf(params,"ui",id,lygis))
  1776. {
  1777. SendClientMessage(playerid,-1,"/setadmin [vardas] [lygis 1-6]");
  1778. return 1;
  1779. }
  1780. if(lygis < 0 || lygis > 6)
  1781. {
  1782. SendClientMessage(playerid,-1,"Tokio lygio nera!");
  1783. return 1;
  1784. }
  1785. if(!IsPlayerConnected(id))
  1786. {
  1787. SendClientMessage(playerid,-1,"Sis zaidejas neprisijunges!");
  1788. return 1;
  1789. }
  1790. pData[id][Adminlvl] = lygis;
  1791. pData[id][Admin] = 1;
  1792. SendClientMessage(id,-1,"Tu gavai admin lygi");
  1793. SendClientMessage(playerid,-1,"davei zaidejui admin lygi");
  1794. SaveStats(id);
  1795. return 1;
  1796. }
  1797. CMD:takeoffadmin(playerid,params[])
  1798. {
  1799. if(pData[playerid][Aod] < 1) return 0;
  1800. if (pData[playerid][Adminlvl] < 6) return 0;
  1801. if(pData[playerid][Admin] < 1) return 0;
  1802.  
  1803. new id;
  1804. if(sscanf(params,"ui",id))
  1805. {
  1806. SendClientMessage(playerid,-1,"/takeoffadmin [vardas]");
  1807. return 1;
  1808. }
  1809. if(!IsPlayerConnected(id))
  1810. {
  1811. SendClientMessage(playerid,-1,"Šis Žaidėjas Neprisijungęs");
  1812. return 1;
  1813. }
  1814. pData[id][Adminlvl] = 0;
  1815. pData[id][Admin] = 0;
  1816. pData[id][Aod] = 0;
  1817. SendClientMessage(id,-1,"Tau buvo nuimtas admin");
  1818. SendClientMessage(playerid,-1,"Tu nuimiai admin");
  1819. SaveStats(id);
  1820. return 1;
  1821. }
  1822. CMD:to(playerid, params[])
  1823. {
  1824.  
  1825. if(pData[playerid][Aod] < 1) return 0;
  1826. if (pData[playerid][Adminlvl] < 1) return 0;
  1827. if(pData[playerid][Admin] < 1) return 0;
  1828. new to;
  1829. if(sscanf(params, "u", to)) return SendClientMessage(playerid, STEALTH_GREEN, "Naudojimas : /to [VARDAS]");
  1830. if(to == INVALID_PLAYER_ID) return SendClientMessage(playerid, STEALTH_GREEN, "Tokio žaidėjo nėra");
  1831. new Float:POS[4];
  1832. GetPlayerPos(to, POS[0], POS[1], POS[2]);
  1833. GetPlayerFacingAngle(to, POS[3]);
  1834. SetPlayerPos(playerid, POS[0], POS[1], POS[2]);
  1835. SetPlayerFacingAngle(playerid, POS[3]);
  1836. new m[256];
  1837. new va[MAX_PLAYER_NAME];
  1838. GetPlayerName(to, va, sizeof(va));
  1839. format(m, sizeof(m), "Nusikėlete pas %s", va);
  1840. SendClientMessage(playerid, STEALTH_GREEN, m);
  1841. return 1;
  1842. }
  1843. CMD:get(playerid,params[])
  1844. {
  1845. if(pData[playerid][Aod] < 1) return 0;
  1846. if (pData[playerid][Adminlvl] < 1) return 0;
  1847. if(pData[playerid][Admin] < 1) return 0;
  1848. new zaidejas[MAX_PLAYER_NAME],zaidejoID;
  1849. if(sscanf(params,"z",zaidejas)) return SendClientMessage(playerid, -1, "{FFD400}Atsiteleportuoti zaideja pas save {FF0000}/get (Vardas_Pavarde)");
  1850. zaidejoID = GetPlayeridMid( zaidejas );
  1851. if(zaidejoID == playerid) return SendClientMessage(playerid, -1, "{FF0000}Atsiteleportuoti saves negalite.");
  1852. else if(zaidejoID == INVALID_PLAYER_ID) return SendClientMessage(playerid, -1, "{FF0000}Tokio zaidėjo nera.");
  1853. new Float:Poz[3];
  1854. GetPlayerPos(playerid,Poz[0],Poz[1],Poz[2]);
  1855. SetPlayerPos(zaidejoID,Poz[0],Poz[1],Poz[2]);
  1856. SetPlayerInterior(zaidejoID,GetPlayerInterior(playerid));
  1857. SetPlayerVirtualWorld(zaidejoID,GetPlayerVirtualWorld(playerid));
  1858. return 1;
  1859. }
  1860. /*CMD:giveweapon(playerid,params[])
  1861. {
  1862. if(pData[playerid][Aod] < 1) return SendClientMessage(playerid, STEALTH_GREEN, "Jūs nesate įsijungę AOD");
  1863. if (pData[playerid][Adminlvl] < 4){ SendClientMessage(playerid, STEALTH_GREEN, "* Jūs neturite tinkamo admin lygio"); return 1;}
  1864. if(pData[playerid][Admin] < 1) return SendClientMessage(playerid, STEALTH_GREEN, "Jus nesate administratorius!");
  1865.  
  1866. new Index;
  1867. new Gavejas[MAX_PLAYER_NAME];
  1868. new id = GetPlayeridMid(Gavejas);
  1869. new tmp2[256]; tmp2 = strtok(params, Index);
  1870. new tmp3[256]; tmp3 = strtok(params,Index);
  1871. new PlayerName2[MAX_PLAYER_NAME];
  1872.  
  1873.  
  1874. if(sscanf(params, "us[64]", id,tmp2,tmp3 )) return SendClientMessage(playerid, STEALTH_GREEN, "Naudojimas: /giveweapon [ Vardas_Pavardė ] [ ginklas ] [kulkos] ");
  1875. if (id == INVALID_PLAYER_ID){ SendClientMessage(playerid, STEALTH_GREEN, "{FFF1AF}[{F81414}ERROR{FFF1AF}]{C3C3C3}* Tokio Žaidėjo nėra"); return 1;}
  1876. SendClientMessage(playerid, STEALTH_GREEN, "Duosite žaidėjui ginklą.");
  1877. GetPlayerName(playerid, PlayerName2, sizeof(PlayerName2));
  1878. GetPlayerName(id, Gavejas, sizeof(Gavejas));
  1879.  
  1880.  
  1881. new weap, ammo, WeapName[32];
  1882. new string[128];
  1883. if(!strlen(tmp3) || !IsNumeric(tmp3) || strval(tmp3) <= 0 || strval(tmp3) > 99999) ammo = 500;
  1884. else ammo = strval(tmp3);
  1885. if(!IsNumeric(tmp2)) weap = GetWeaponIDFromName(tmp2);
  1886. else weap = strval(tmp2);
  1887.  
  1888. GetWeaponName(weap,WeapName,32);
  1889. format(string,sizeof(string), "== Tu davei\"%s\" ginlą (%d) su %d kulkomis ", Gavejas, weap, ammo);
  1890. SendClientMessage(playerid,STEALTH_GREEN,string);
  1891.  
  1892. format(string,sizeof(string),"== \"%s\" tau davė ginklą (%d) su %d kulkomis ", PlayerName2, weap, ammo);
  1893. SendClientMessage(id, STEALTH_GREEN,string);
  1894. GivePlayerWeapon(id, weap, ammo);
  1895.  
  1896. return 1;
  1897. } */
  1898. CMD:chpass(playerid, params[])
  1899. {
  1900. if(pData[playerid][Aod] < 1) return 0;
  1901. if (pData[playerid][Adminlvl] < 5) return 0;
  1902. if(pData[playerid][Admin] < 1) return 0;
  1903.  
  1904. new pas[20];
  1905. if(sscanf(params,"s",pas)) return SendClientMessage(playerid, 0xffff00aa,"*Uždėti serverio slaptažodį : {ffffff}/chpass [Slaptažodis]");
  1906.  
  1907. SendClientMessage(playerid, 0xffff00aa,"*Norėdami nuimti slaptažodį rašykite : {ffffff} /chpass 0");
  1908.  
  1909. new zin[30];
  1910. new string[40];
  1911. format(zin,sizeof(zin),"password %s",pas);
  1912. format(string,sizeof(string),"Serverio slaptažodis yra %s",pas);
  1913. SendClientMessage(playerid, -1, string);
  1914. SendRconCommand(zin);
  1915. return 1;
  1916. }
  1917. CMD:loadgm(playerid, params[])
  1918. {
  1919. if(pData[playerid][Aod] < 1) return 0;
  1920. if (pData[playerid][Adminlvl] < 5) return 0;
  1921. if(pData[playerid][Admin] < 1) return 0;
  1922.  
  1923.  
  1924. new pas[20];
  1925. new zin[30];
  1926. new string[40];
  1927.  
  1928. if(sscanf(params, "s", pas)) return SendClientMessage(playerid, -1, "[NAUDOJIMAS]: /loadgm <serverio slaptažodis kuris bus po serverio perkrovimo>");
  1929.  
  1930. format(zin,sizeof(zin),"password %s",pas);
  1931. format(string,sizeof(string),"Serverio slaptažodis yra %s",pas);
  1932. SendClientMessage(playerid, -1, string);
  1933. SendRconCommand(zin);
  1934. SendClientMessage(playerid, -1, "Serveris netrukus bus perkrautas");
  1935. SetTimer("Loadinggm",3000, false);
  1936. return 1;
  1937. }
  1938. CMD:gun(playerid, params[])
  1939. {
  1940. if(pData[playerid][Aod] < 1) return 0;
  1941. if (pData[playerid][Adminlvl] < 6) return 0;
  1942. if(pData[playerid][Admin] < 1) return 0;
  1943.  
  1944. new WeaponID, Ammo, pid, WeaponName[64], String[216];
  1945.  
  1946. if(sscanf(params, "udd", pid, WeaponID, Ammo)) return SendClientMessage(playerid, -1, "[NAUDOJIMAS]: /gun <žaidėjo id> <ginklo id> <kulkos>");
  1947.  
  1948. if(!IsPlayerConnected(pid))
  1949. {
  1950. SendClientMessage(playerid,-1,"Sis zaidejas neprisijunges!");
  1951. return 1;
  1952. }
  1953.  
  1954. if(WeaponID < 1) return 1;
  1955.  
  1956. if(Ammo < 1) return 1;
  1957.  
  1958. GivePlayerWeapon(pid, WeaponID, Ammo);
  1959.  
  1960. GetWeaponName(WeaponID, WeaponName, sizeof(WeaponName));
  1961.  
  1962. format(String, sizeof(String), "[ADMIN]: {ffffff}Davėte žaidėjui {ff0000}%s{ffffff}ginklą su{ff0000}%d{ffffff}kulkomis!", WeaponName, Ammo);
  1963. SendClientMessage(playerid, -1, String);
  1964.  
  1965. return 1;
  1966. }
  1967. CMD:premija(playerid,params[])
  1968. {
  1969. if(pData[playerid][Aod] < 1) return 0;
  1970. if (pData[playerid][Adminlvl] < 6) return 0;
  1971. if(pData[playerid][Admin] < 1) return 0;
  1972.  
  1973.  
  1974. new mona,xpa;
  1975. if(sscanf(params,"dd",mona,xpa)) return SendClientMessage(playerid, 0xffff00aa,"*Duoti premiją :{ffffff} /premija [Pinigų kiekis] [XP kiekis]");
  1976. for(new i=0; i<MAX_PLAYERS; i++)
  1977. {
  1978. if(IsPlayerConnected(i))
  1979. {
  1980. GivePlayerMoney(i, mona);
  1981. SetPlayerScore(i, GetPlayerScore(i)+ xpa);
  1982. new name[MAX_PLAYER_NAME],msg[128];
  1983. GetPlayerName(playerid, name, sizeof(name));
  1984. format(msg, sizeof(msg), "{99FF99}[Premija] {FFFFFF}Administratorius %s išdalino po %i$ ir %i XP !", name,mona,xpa);
  1985. SendClientMessageToAll(-1,msg);
  1986. }
  1987. }
  1988. return 1;
  1989. }
  1990. /*CMD:giveweapon(playerid,params[])
  1991. {
  1992. if(pData[playerid][Aod] < 1) return SendClientMessage(playerid, STEALTH_GREEN, "Jūs nesate įsijungę AOD");
  1993. if (pData[playerid][Adminlvl] < 4){ SendClientMessage(playerid, STEALTH_GREEN, "* Jūs neturite tinkamo admin lygio"); return 1;}
  1994. if(pData[playerid][Admin] < 1) return SendClientMessage(playerid, STEALTH_GREEN, "Jus nesate administratorius!");
  1995.  
  1996. new pid, wid, amt;
  1997. if(sscanf(params,"udd",pid,wid,amt))return SendClientMessage(playerid,0xff0000FF,"ERROR: Usage /giveweapon [playerid/name][weaponid][ammo]");
  1998. if(wid < 0 || wid >40)return SendClientMessage(playerid,0xff0000FF,"ERROR: Invalid weaponid");
  1999. if(pid != INVALID_PLAYER_ID && IsPlayerConnected(pid))
  2000. {
  2001. SendClientMessage(playerid, 0xff0000FF,"ERROR: Žaidėjas neprisijungęs");
  2002. }
  2003. else
  2004. {
  2005. GivePlayerWeapon(pid, wid, amt);
  2006. }
  2007. return 1;
  2008. }
  2009. */
  2010. //baigiasi admin komamdos
  2011. stock GetPlayeridMid(name[])
  2012. {
  2013. for (new i = 0; i < MAX_PLAYERS; i++)
  2014. {
  2015. if (IsPlayerConnected(i))
  2016. {
  2017. new gPlayerName[MAX_PLAYER_NAME];
  2018. GetPlayerName(i, gPlayerName, MAX_PLAYER_NAME);
  2019. if(strfind(gPlayerName, name, true) != -1)
  2020. {
  2021. return i;
  2022. }
  2023. }
  2024. }
  2025. return INVALID_PLAYER_ID;
  2026. }
  2027.  
  2028. /*IsNumeric(const string[])
  2029. {
  2030. for (new i = 0, j = strlen(string); i < j; i++)
  2031. {
  2032. if (string[i] > '9' || string[i] < '0') return 0;
  2033. }
  2034. return 1;
  2035. } */
  2036. stock GetWeaponIDFromName(WeaponName[])
  2037. {
  2038. if(strfind("molotov",WeaponName,true)!=-1) return 18;
  2039. for(new i = 0; i <= 46; i++)
  2040. {
  2041. switch(i)
  2042. {
  2043. case 0,19,20,21,44,45: continue;
  2044. default:
  2045. {
  2046. new name[32]; GetWeaponName(i,name,32);
  2047. if(strfind(name,WeaponName,true) != -1) return i;
  2048. }
  2049. }
  2050. }
  2051. return -1;
  2052. }
  2053. forward ShowPlayerStats(playerid);
  2054. public ShowPlayerStats(playerid)
  2055. {
  2056.  
  2057.  
  2058.  
  2059.  
  2060.  
  2061. new Helperis[128];
  2062. if(pData[playerid][Helper] == 1) Helperis = "Turi";
  2063. else if(pData[playerid][Helper] < 1) Helperis = "Neturi";
  2064.  
  2065. new adminas[128];
  2066. if(pData[playerid][Admin] == 1) adminas = "Turi";
  2067. else if(pData[playerid][Admin] < 1) adminas = "Neturi";
  2068.  
  2069. new pinigaii = GetPlayerMoney(playerid);
  2070. new XPas = GetPlayerScore(playerid);
  2071. new gaudomass = GetPlayerWantedLevel(playerid);
  2072. new Float:thealth, Float:armo;
  2073. GetPlayerHealth(playerid,thealth);
  2074. GetPlayerArmour(playerid,armo);
  2075. new name[MAX_PLAYER_NAME], statzin[800];
  2076. GetPlayerName(playerid, name, sizeof(name));
  2077. format(statzin, sizeof(statzin), "Vardas: [%s]\nXP: [%i]\nKiseneje: [%i]\nADMIN: [%s]\nHelper: [%s]\nSveikata: [%i HP / %i Armour]\nGaudomas: [%i lygiu]",name,XPas,pinigaii,adminas,Helperis,floatround(thealth),floatround(armo),gaudomass);
  2078. ShowPlayerDialog(playerid,5,DIALOG_STYLE_MSGBOX,"Jusu statistika",statzin,"Uzdaryti","Uždaryti");
  2079. return 1;
  2080. }
  2081. forward Loadinggm(playerid);
  2082. public Loadinggm(playerid)
  2083. {
  2084. SendRconCommand("gmx");
  2085. SendClientMessageToAll(-1, "Dėmesio, serveris perkraunamas, netrukus bus vėl įjungtas!!!");
  2086. }
  2087. forward Speedometer(playerid);
  2088. public Speedometer(playerid)
  2089. {
  2090. new vehicleid,Float:speed_x,Float:speed_y,Float:speed_z,Float:final_speed,speed_string[256],final_speed_int;
  2091. vehicleid = GetPlayerVehicleID(playerid);
  2092. if(GetPlayerState(playerid) == PLAYER_STATE_DRIVER)
  2093. {
  2094.  
  2095. new VehicleNames[212][] = {
  2096. "Landstalker","Bravura","Buffalo","Linerunner","Pereniel","Sentinel","Dumper","Firetruck","Trashmaster","Stretch","Manana","Infernus",
  2097. "Voodoo","Pony","Mule","Cheetah","Ambulance","Leviathan","Moonbeam","Esperanto","Taxi","Washington","Bobcat","Mr Whoopee","BF Injection",
  2098. "Hunter","Premier","Enforcer","Securicar","Banshee","Predator","Bus","Rhino","Barracks","Hotknife","Trailer","Previon","Coach","Cabbie",
  2099. "Stallion","Rumpo","RC Bandit","Romero","Packer","Monster","Admiral","Squalo","Seasparrow","Pizzaboy","Tram","Trailer","Turismo","Speeder",
  2100. "Reefer","Tropic","Flatbed","Yankee","Caddy","Solair","Berkley's RC Van","Skimmer","PCJ-600","Faggio","Freeway","RC Baron","RC Raider",
  2101. "Glendale","Oceanic","Sanchez","Sparrow","Patriot","Quad","Coastguard","Dinghy","Hermes","Sabre","Rustler","ZR3 50","Walton","Regina",
  2102. "Comet","BMX","Burrito","Camper","Marquis","Baggage","Dozer","Maverick","News Chopper","Rancher","FBI Rancher","Virgo","Greenwood",
  2103. "Jetmax","Hotring","Sandking","Blista Compact","Police Maverick","Boxville","Benson","Mesa","RC Goblin","Hotring Racer A","Hotring Racer B",
  2104. "Bloodring Banger","Rancher","Super GT","Elegant","Journey","Bike","Mountain Bike","Beagle","Cropdust","Stunt","Tanker","RoadTrain",
  2105. "Nebula","Majestic","Buccaneer","Shamal","Hydra","FCR-900","NRG-500","HPV1000","Cement Truck","Tow Truck","Fortune","Cadrona","FBI Truck",
  2106. "Willard","Forklift","Tractor","Combine","Feltzer","Remington","Slamvan","Blade","Freight","Streak","Vortex","Vincent","Bullet","Clover",
  2107. "Sadler","Firetruck","Hustler","Intruder","Primo","Cargobob","Tampa","Sunrise","Merit","Utility","Nevada","Yosemite","Windsor","Monster A",
  2108. "Monster B","Uranus","Jester","Sultan","Stratum","Elegy","Raindance","RC Tiger","Flash","Tahoma","Savanna","Bandito","Freight","Trailer",
  2109. "Kart","Mower","Duneride","Sweeper","Broadway","Tornado","AT-400","DFT-30","Huntley","Stafford","BF-400","Newsvan","Tug","Trailer A","Emperor",
  2110. "Wayfarer","Euros","Hotdog","Club","Trailer B","Trailer C","Andromada","Dodo","RC Cam","Launch","Police Car (LSPD)","Police Car (SFPD)",
  2111. "Police Car (LVPD)","Police Ranger","Picador","S.W.A.T. Van","Alpha","Phoenix","Glendale","Sadler","Luggage Trailer A","Luggage Trailer B",
  2112. "Stair Trailer","Boxville","Farm Plow","Utility Trailer" };
  2113.  
  2114.  
  2115. new masinosbukle[10];
  2116. new Float:health;
  2117. GetVehicleHealth(vehicleid, health);
  2118. if(health >900)
  2119. {
  2120. format(masinosbukle, sizeof(masinosbukle), "~g~%.1f%", health/10);
  2121. }
  2122. else if(health >800)
  2123. {
  2124. format(masinosbukle, sizeof(masinosbukle), "~g~%.1f%", health/10);
  2125. }
  2126. else if(health >700)
  2127. {
  2128. format(masinosbukle, sizeof(masinosbukle), "~g~%.1f%", health/10);
  2129. }
  2130. else if(health >600)
  2131. {
  2132. format(masinosbukle, sizeof(masinosbukle), "~y~%.1f%", health/10);
  2133. }
  2134. else if(health >500)
  2135. {
  2136. format(masinosbukle, sizeof(masinosbukle), "~y~%.1f%", health/10);
  2137. }
  2138. else if(health >400)
  2139. {
  2140. format(masinosbukle, sizeof(masinosbukle), "~y~%.1f%", health/10);
  2141. }
  2142. else if(health >300)
  2143. {
  2144. format(masinosbukle, sizeof(masinosbukle), "~r~%.1f%", health/10);
  2145. }
  2146. else if(health >200)
  2147. {
  2148. format(masinosbukle, sizeof(masinosbukle), "~r~%.1f%", health/10);
  2149. }
  2150. else if(health >100)
  2151. {
  2152. format(masinosbukle, sizeof(masinosbukle), "~r~%.1f%", health/10);
  2153. }
  2154. else if(health <100)
  2155. {
  2156. format(masinosbukle, sizeof(masinosbukle), "~r~%.1f%", health/10);
  2157. }
  2158. new model = GetVehicleModel(vehicleid);
  2159. GetVehicleVelocity(vehicleid,speed_x,speed_y,speed_z);
  2160. final_speed = floatsqroot(((speed_x*speed_x)+(speed_y*speed_y))+(speed_z*speed_z))*216.666667; // 136.666667 = kmph // 85.4166672= mph
  2161. final_speed_int = floatround(final_speed,floatround_round);
  2162. vehicleDB[vehicleid][prav] += final_speed;
  2163. if(ShiftInfo[playerid] == true)
  2164. {
  2165. format(speed_string,156,"~n~~n~ ~y~Transportas: ~w~%s~n~ ~g~Greitis: ~w~%i KM/h~n~ ~r~Bukle: ~w~%s~n~ ~b~Degalai: ~w~%dL~n~ ~p~Pravaziuota: ~w~%.2fKm", VehicleNames[model-400], final_speed_int, masinosbukle, vehicleDB[vehicleid][gas], vehicleDB[vehicleid][prav]/100000);
  2166. TextDrawSetString(SPEEDOS[playerid], speed_string);
  2167. TextDrawShowForPlayer(playerid, spidometras[playerid]);
  2168. TextDrawShowForPlayer(playerid, SPEEDOS[playerid]);
  2169. }else{
  2170. TextDrawHideForPlayer(playerid, spidometras[playerid]);
  2171. TextDrawHideForPlayer(playerid, SPEEDOS[playerid]);
  2172. }
  2173. }else{
  2174. TextDrawHideForPlayer(playerid, spidometras[playerid]);
  2175. TextDrawHideForPlayer(playerid, SPEEDOS[playerid]);
  2176. }
  2177. return 1;
  2178. }
  2179. forward XP(playerid);
  2180. public XP(playerid)
  2181. {
  2182. SetPlayerScore(playerid,GetPlayerScore(playerid)+3);
  2183. return 1;
  2184. }
  2185.  
  2186. forward spyris(playerid);
  2187. public spyris(playerid)
  2188. {
  2189. RemovePlayerFromVehicle(playerid);
  2190. ShowPlayerDialog(playerid,-1,0,"","","","");
  2191. }
  2192.  
  2193. forward JAUYRA( playerid );
  2194. public JAUYRA( playerid )
  2195. {
  2196. GivePlayerMoney(playerid, -100);
  2197. }
  2198. forward mazeja(playerid);
  2199. public mazeja(playerid)
  2200. {
  2201. new vid = GetPlayerVehicleID(playerid);
  2202. if(vehicleDB[vid][gas] > 0)
  2203. if(IsPlayerInAnyVehicle(playerid))
  2204. vehicleDB[vid][gas] -= 1;
  2205. }
  2206. forward tikrinam(playerid);
  2207. public tikrinam(playerid)
  2208. {
  2209. new vid = GetPlayerVehicleID(playerid);
  2210. if(IsPlayerInAnyVehicle(playerid))
  2211. if(vehicleDB[vid][gas] < 1)
  2212. SetVehicleParamsEx(vid, 0, lights, alarm, doors, bonnet, boot, objective);
  2213. return 1;
  2214. }
  2215. stock GetPlayerNameEx(playerid)
  2216. {
  2217. new pName[21];
  2218. GetPlayerName(playerid, pName, 21);
  2219. return pName;
  2220. }
  2221. forward serveriozinutest(playerid);
  2222. public serveriozinutest(playerid)
  2223. {
  2224. SendClientMessageToAll(-1, "{0000cc}<<{99ff66}Visos komandos {cc0066}- {ff0066}/komandos{0000cc}>>");
  2225. SendClientMessageToAll(-1, "{0000cc}<<{99ff66}TEKSTAS{0000cc}>>");
  2226. SendClientMessageToAll(-1, "{0000cc}<<{99ff66}TEKSTAS{0000cc}>>");
  2227. return 1;
  2228. }
  2229. forward serveriozinutes(playerid);
  2230. public serveriozinutes(playerid)
  2231. {
  2232. SendClientMessageToAll(-1, "{0000cc}<<{3300ff}Srwnick.lt{0000cc}>>");
  2233. SendClientMessageToAll(-1, "{0000cc}<<Serverio savininkas {ff0000}Edva_Rolling{0000cc}>>");
  2234. SendClientMessageToAll(-1, "{0000cc}<<Serverio scripteris {ff0000}Edva_Rolling{0000cc}>>");
  2235. return 1;
  2236. }
  2237. forward moneyProfitHide(playerid);
  2238. public moneyProfitHide(playerid)
  2239. {
  2240. TextDrawHideForPlayer(playerid, moneyTD[playerid]);
  2241. return 1;
  2242. }
  2243.  
  2244.  
  2245. forward moneyProfit();
  2246. public moneyProfit()
  2247. {
  2248. for(new playerid; playerid < MAX_PLAYERS; playerid++)
  2249. {
  2250. if(IsPlayerConnected(playerid)){
  2251. new_money[playerid] = GetPlayerMoney(playerid);
  2252. new minus[15], plus[15];
  2253. format(plus, sizeof(plus), "~g~+%i", new_money[playerid]-money[playerid]);
  2254. format(minus, sizeof(minus), "~r~%i", new_money[playerid]-money[playerid]);
  2255. if(new_money[playerid] > money[playerid])
  2256. {
  2257. TextDrawSetString(moneyTD[playerid], plus);
  2258. TextDrawShowForPlayer(playerid, moneyTD[playerid]);
  2259. SetTimerEx("moneyProfitHide", 2000, false, "i", playerid);
  2260. }
  2261. else if(new_money[playerid] < money[playerid])
  2262. {
  2263. TextDrawSetString(moneyTD[playerid], minus);
  2264. TextDrawShowForPlayer(playerid, moneyTD[playerid]);
  2265. SetTimerEx("moneyProfitHide", 2000, false, "i", playerid);
  2266. }
  2267. money[playerid] = new_money[playerid];
  2268. }
  2269. }
  2270. return 1;
  2271. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement