Guest User

Untitled

a guest
Nov 4th, 2020
126
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 23.82 KB | None | 0 0
  1. local q = require('lib.samp.events')
  2. requests = require 'requests'
  3. local encoding = require 'encoding'
  4. encoding.default = 'CP1251'
  5. u8 = encoding.UTF8
  6.  
  7. servak = {"185.169.134.3:7777", "185.169.134.4:7777", "185.169.134.43:7777", "185.169.134.44:7777", "185.169.134.45:7777", "185.169.134.5:7777", "185.169.134.59:7777", "185.169.134.61:7777", "185.169.134.107:7777", "185.169.134.109:7777", "185.169.134.166:7777", "185.169.134.171:7777", "185.169.134.172:7777"}
  8. kladnumb = 0
  9. token_vk = '2cf69d6480c083fe17cbc130eb0c5d188ceec69206fe095467126395c15ef174f36bf9618f01a37be5536' -- токен группы вк
  10. groupid_vk = '199904779' -- id группы (ТОЛЬКО ЦИФРЫ!)
  11. mode = 2 -- Режим работы бота.
  12. -- Если Режим = 1
  13. user_id = '483511928' -- id пользователя (ТОЛЬКО ЦИФРЫ!)
  14. -- Если режим = 2
  15. chat_id = '53' -- id беседы
  16. botovod = 'NUHAIBEBRU' -- Псевдоним
  17. --https://api.vk.com/method/messages.send?v=5.103&access_token=2cf69d6480c083fe17cbc130eb0c5d188ceec69206fe095467126395c15ef174f36bf9618f01a37be5536&chat_id=53&message=123&group_id=199904779&random_id=515848941
  18. coords = {
  19. "-1555.0145263672 -2506.1828613281 89.531120300293",
  20. "986.32458496094 15.252331733704 85.240425109863",
  21. "-776.26336669922 945.80554199219 1.288339972496",
  22. "-1637.576171875 532.34777832031 32.690540313721",
  23. "289.19430541992 -560.21295166016 16.263120651245",
  24. "-2827.0607910156 -1832.7004394531 123.79636494514",
  25. "-2625.9074707031 -997.0107421875 11.762429237366",
  26. "2488.8598632813 -1809.3796386719 14.94012928009",
  27. "-265.78546142578 -2181.5583496094 28.03005027771",
  28. "1817.3167724609 2833.5241699219 10.328179359436",
  29. "2650.564453125 224.7706451416 55.676471710205",
  30. "303.12265014648 -255.16917419434 0.61698001623154",
  31. "178.60859680176 1457.9509277344 9.7259492874146",
  32. "1086.4359130859 -2050.7009277344 55.992740631104",
  33. "-1253.6226806641 49.224720001221 13.284070014954",
  34. "551.49353027344 1222.2264404297 10.870379447937",
  35. "1502.6746826172 -1833.3646240234 13.118579864502",
  36. "1781.7172851563 -278.80676269531 68.069213867188",
  37. "1124.5002441406 -2021.2779541016 68.242149353027",
  38. "-306.86407470703 1797.7108154297 41.875610351563",
  39. "-1101.2518310547 -700.54956054688 31.554269790649",
  40. "-2069.1042480469 1220.4896240234 34.325031280518",
  41. "2185.3127441406 -2709.076171875 3.5722301006317",
  42. "-2564.2119140625 328.10757446289 9.6642093658447",
  43. "376.21139526367 -1479.1572265625 32.382831573486",
  44. "-2914.3305664063 906.67919921875 7.2093100547791",
  45. "782.33123779297 2066.8247070313 5.8476300239563",
  46. "2463.2878417969 708.88262939453 10.502669334412",
  47. "-2514.7336425781 -720.51226806641 138.18872070313",
  48. "-2672.3298339844 -2133.7973632813 36.962371826172",
  49. "-2903.0974121094 1015.4561157227 35.979636494514",
  50. "-2232.8830566406 -2295.6826171875 29.736019134521",
  51. "2350.1928710938 -647.29974365234 127.22103881836",
  52. "2764.9987792969 -2245.6823730469 1.796364945147",
  53. "-2262.7138671875 -1073.0777587891 14.771800041199",
  54. "-526.52642822266 -2704.4167480469 143.27575683594",
  55. "2522.5725097656 -1136.5804443359 40.293521881104",
  56. "-219.47760009766 1123.7203369141 18.876239776611",
  57. "830.4208984375 -481.56237792969 15.655109405518",
  58. "901.40905761719 -1044.6019287109 29.127750396729",
  59. "-451.08322143555 -1712.8026123047 7.6876602172852",
  60. "463.09375 794.61810302734 6.6404600143433",
  61. "2242.7817382813 674.20092773438 10.101259231567",
  62. "-749.21697998047 1126.7946777344 31.7161693573",
  63. "2435.8569335938 1871.6798095703 7.309229850769",
  64. "984.21472167969 -2188.3732910156 12.21895980835",
  65. "2261.5827636719 1073.9862060547 28.541330337524",
  66. "-1647.9920654297 380.31649780273 6.2779636494514",
  67. "1530.0245361328 2679.21484375 10.029949188232",
  68. "712.27777099609 1997.8930664063 4.0955300331116",
  69. "2155 -2726 5",
  70. "2254 -2270 14",
  71. "2298 -2118 14",
  72. "2648 -2017 14",
  73. "2645 -1993 14",
  74. "2788 -2214 10",
  75. "2890 -2118 4",
  76. "2200 -2013 14",
  77. "2090 -1850 4",
  78. "2511 -1778 14",
  79. "2413 -1402 25",
  80. "2501 -1134 39",
  81. "2562 -1110 65",
  82. "2339 -1052 52",
  83. "2689 -874 66",
  84. "2793 -637 58",
  85. "2609 -513 81",
  86. "2576 -641 136",
  87. "2346 -655 128",
  88. "2327 -565 128",
  89. "2177 -557 126",
  90. "1621 -892 53",
  91. "1833 -1023 25",
  92. "1844 -1058 25",
  93. "1894 -1061 24",
  94. "1938 -1062 24",
  95. "2007 -1048 25",
  96. "1874 -1324 15",
  97. "1996 -1319 23",
  98. "1738 -1510 14",
  99. "1898 -1559 14",
  100. "2078 -1556 13",
  101. "1657 -2139 14",
  102. "1703 -2285 -1",
  103. "1474 -2316 14",
  104. "1073 -2215 47",
  105. "1105 -2077 69",
  106. "976 -2168 13",
  107. "991 -2056 7",
  108. "893 -1860 9",
  109. "1293 -1871 13",
  110. "1077 -1754 13",
  111. "969 -1714 14",
  112. "972 -1636 14",
  113. "761 -1851 6",
  114. "479 -1809 6",
  115. "224 -1762 5",
  116. "380 -1478 33",
  117. "252 -1359 53",
  118. "268 -1074 85",
  119. "805 -1089 24",
  120. "931 -894 46",
  121. "852 -630 18",
  122. "825 -565 16",
  123. "819 -474 17",
  124. "642 -506 16",
  125. "329 -571 11",
  126. "303 -571 17",
  127. "157 -530 41",
  128. "-64 -101 3",
  129. "369 -114 1",
  130. "322 -254 2",
  131. "854 -225 21",
  132. "1041 -284 74",
  133. "1094 -313 74",
  134. "962 -29 93",
  135. "972 40 69",
  136. "867 -15 63",
  137. "646 69 12",
  138. "692 283 20",
  139. "738 271 27",
  140. "995 164 28",
  141. "1359 -96 28",
  142. "1570 40 25",
  143. "1726 -111 48",
  144. "1779 -291 74",
  145. "2115 223 13",
  146. "1740 602 11",
  147. "1840 965 11",
  148. "2405 700 11",
  149. "2657 843 6",
  150. "2696 867 10",
  151. "2440 1491 11",
  152. "1981 1796 12",
  153. "2419 1901 6",
  154. "2911 1690 12",
  155. "2938 2105 12",
  156. "2413 2183 19",
  157. "2607 2330 11",
  158. "2650 2390 11",
  159. "2587 2463 11",
  160. "2495 2528 22",
  161. "2745 2764 11",
  162. "2580 2844 11",
  163. "2523 2726 11",
  164. "2118 2409 65",
  165. "2064 2782 11",
  166. "1905 2791 11",
  167. "1835 2842 11",
  168. "1695 2707 11",
  169. "1534 2668 11",
  170. "1651 2500 9",
  171. "1423 2572 11",
  172. "1206 2618 11",
  173. "1276 2175 13",
  174. "1084 1392 11",
  175. "1364 1179 11",
  176. "1515 924 11",
  177. "1096 697 10",
  178. "958 1040 11",
  179. "417 851 8",
  180. "551 1218 12",
  181. "603 1246 12",
  182. "704 1205 13",
  183. "676 1698 7",
  184. "712 1998 5",
  185. "1029 2915 46",
  186. "548 2910 2",
  187. "265 2908 7",
  188. "309 2677 16",
  189. "330 2394 16",
  190. "277 2330 20",
  191. "-177 2655 63",
  192. "-770 2500 98",
  193. "-803 2446 157",
  194. "-780 2270 117",
  195. "-122 2265 38",
  196. "-304 1802 43",
  197. "-354 1617 76",
  198. "-397 1238 6",
  199. "-379 1203 20",
  200. "-222 1129 20",
  201. "-742 736 18",
  202. "-670 888 10",
  203. "-664 967 12",
  204. "-774 951 4",
  205. "-768 1119 33",
  206. "-1114 1123 15",
  207. "-735 1531 39",
  208. "-669 1599 33",
  209. "-727 1625 27",
  210. "-849 1877 23",
  211. "-1096 1947 113",
  212. "-1032 2080 98",
  213. "-1163 2282 110",
  214. "-1292 2810 86",
  215. "-1957 2383 49",
  216. "-2072 2460 20",
  217. "-1976 2628 94",
  218. "-2067 2930 67",
  219. "-2856 2188 175",
  220. "-2905 902 6",
  221. "-2940 739 7",
  222. "-2936 448 4",
  223. "-2568 326 11",
  224. "-2513 136 22",
  225. "-2765 -163 7",
  226. "-2546 -252 22",
  227. "-2493 -265 39",
  228. "-2411 -221 40",
  229. "-2155 -233 37",
  230. "-2116 160 36",
  231. "-1947 491 32",
  232. "-2179 612 35",
  233. "-2207 698 49",
  234. "-2192 963 80",
  235. "-2075 1205 45",
  236. "-1608 561 28",
  237. "-1692 573 25",
  238. "-1630 393 7",
  239. "-1574 50 17",
  240. "-1486 -365 15",
  241. "-2342 -1006 16",
  242. "-2354 -1045 88",
  243. "-2639 -993 10",
  244. "-2756 -1083 16",
  245. "-2790 -1317 127",
  246. "-2666 -1544 306",
  247. "-2816 -1823 134",
  248. "-2750 -1988 46",
  249. "-2679 -2130 38",
  250. "-2198 -1764 306",
  251. "-1915 -1626 26",
  252. "-2215 -2362 31",
  253. "-2131 -2560 31",
  254. "-2093 -2398 31",
  255. "-1982 -2380 31",
  256. "-1839 -2302 49",
  257. "-1743 -2403 60",
  258. "-1670 -2387 97",
  259. "-1613 -2282 37",
  260. "-1565 -2494 91",
  261. "-528 -2656 156",
  262. "-477 -2650 157",
  263. "-449 -2498 117",
  264. "-72 -2648 80",
  265. "54 -2645 40",
  266. "-5 -2489 37",
  267. "-255 -2187 29",
  268. "-827 -2172 24",
  269. "-964 -1960 68",
  270. "-556 -1910 9",
  271. "-516 -1961 40",
  272. "-297 -1900 19",
  273. "-299 -1807 9",
  274. "-453 -1722 9",
  275. "-590 -1486 12",
  276. "-845 -1474 112",
  277. "-962 -1673 75",
  278. "-994 -1663 76",
  279. "-1092 -1648 76",
  280. "-1252 -1572 39",
  281. "-1304 -1503 24",
  282. "-1399 -1541 102",
  283. "-1321 -1350 144",
  284. "-1219 -1147 129",
  285. "-760 -1143 62",
  286. "-1219 -834 89",
  287. "-1121 -686 32",
  288. "-945 -525 26",
  289. "-606 -608 24",
  290. "-478 -767 30",
  291. "-336 -458 2",
  292. "-666 -266 66",
  293. "-712 -103 69",
  294. "-791 -139 64",
  295. "1176 -2143 67",
  296. "1512 -1830 14",
  297. "587 -1604 16",
  298. "679 -1496 15",
  299. "826 -1527 14",
  300. "1477 -1404 47",
  301. "2818 -1212 25",
  302. "-395 -1153 70",
  303. "-364 -1417 26",
  304. "-466 -1421 18",
  305. "-760 -1785 117",
  306. "-1205 -2346 1",
  307. "-1004 -2299 61",
  308. "-2815 -1508 139",
  309. "-2520 -724 138",
  310. "-2514 -941 15",
  311. "-2775 -343 8",
  312. "-1884 -440 25",
  313. "-1133 -852 123",
  314. "-1663 877 136",
  315. "-2535 1156 55",
  316. "-2374 2216 5",
  317. "-876 1912 51",
  318. "-1227 1836 42",
  319. "-1006 1614 33",
  320. "679 832 -43",
  321. "1665 971 11",
  322. "1669 1055 11",
  323. "2718 781 11",
  324. "2624 760 11",
  325. "2619 246 57",
  326. "2266 1112 29",
  327. "1996 1381 9",
  328. "2586 2183 11",
  329. "1860 2385 11",
  330. "1146 2328 11",
  331. "781 2059 7",
  332. "671 343 20",
  333. "2185 -2711 4",
  334. "-2233 -2296 31",
  335. "1045 1013 55",
  336. "1430 2021 11",
  337. "-1332 -2592 42",
  338. "-1336 -2589 42",
  339. "-151 -1027 1",
  340. "1166 -2117 68",
  341. "1180 -1058 31",
  342. "1296 -980 33",
  343. "2035 -459 77",
  344. "-1857.4552001953 -2313.6716308594 44.360092163086",
  345. "1496.0688476563 -2302.9116210938 12.687759399414",
  346. "2201.2370605469 -2030.3232421875 12.680119514465",
  347. "1991.2661132813 2183.9887695313 9.8860092163086",
  348. "-2545.2697753906 692.07562255859 28.079636494514",
  349. "-1501.2393798828 1376.55859375 2.7384400367737",
  350. "2404.0551757813 1825.5991210938 10.830889701843",
  351. "2461.1872558594 2496.8603515625 9.9578495025635",
  352. "1958.9912109375 1379.4376220703 8.3464298248291",
  353. "1840.7130126953 964.83239746094 9.927339553833",
  354. "-2177.1784667969 615.90747070313 34.248332977295",
  355. "-2083.5368652344 2920.9567871094 68.719779968262",
  356. "-1452.8057861328 -348.36990356445 13.687139511108",
  357. "1416.7073974609 2547.580078125 9.9946994781494",
  358. "1987.6284179688 -1306.3503417969 19.896619796753",
  359. "-2549.7309570313 -951.95245361328 19.586568832397",
  360. "720.19653320313 356.64959716797 19.392189025879",
  361. "855.52233886719 -221.36175537109 19.753759384155",
  362. "1881.4862060547 -1312.8455810547 13.60825920105",
  363. "261.91680908203 -1075.9052734375 84.411193847656",
  364. "-2764.5927734375 -160.36288452148 6.2882399559021",
  365. "40.842876434326 -2649.9680175781 39.574390411377",
  366. "-2104.712890625 139.72756958008 34.266101837158",
  367. "-793.23913574219 2264.9169921875 58.38468170166",
  368. "2592.3732910156 2847.3041992188 9.9298000335693",
  369. "1835.1895751953 -1065.5373535156 23.810859680176",
  370. "-1436.9216308594 -967.33453369141 200.16317749023",
  371. "302.3623046875 -1352.3764648438 52.449001312256",
  372. "2932.6689453125 2110.0310058594 13.140619277954",
  373. "-557.79636494514 -1482.1083984375 8.5115299224854",
  374. "980.42864990234 -1707.0816650391 12.722299575806",
  375. "-2204.8103027344 961.43469238281 79.139671325684",
  376. "1900.9174804688 2793.775390625 10.023699760437",
  377. "853.73583984375 -1504.5710449219 13.416759490967",
  378. "-2113.3566894531 -2406.5100097656 30.371049880981",
  379. "-2932.3991699219 453.52862548828 3.1856100559235",
  380. "2642.3996582031 -1462.2476806641 15.346459388733",
  381. "2413.1242675781 -1399.2993164063 23.463150024414",
  382. "-1668.0303955078 -2422.8862304688 100.07484436035",
  383. "336.11532592773 2695.5993652344 18.972049713135",
  384. "2613.0776367188 -502.88977050781 78.000679016113",
  385. "-1966.0201416016 -209.29716491699 26.116109848022",
  386. "2448.8330078125 1510.119140625 9.8509197235107",
  387. "-1955.8090820313 497.50314331055 34.897262573242",
  388. "1668.1645507813 969.96026611328 10.140239715576",
  389. "1431.2762451172 -153.52743530273 24.444568634033",
  390. "2917.7521972656 1701.0046386719 8.3925495147705",
  391. "893.96514892578 -1863.7783203125 7.5980200767517",
  392. "374.40475463867 -116.46190643311 0.35130000114441",
  393. "845.85772705078 -620.79636494514 16.46715927124",
  394. "-1741.25 -2416.5317382813 40.428192138672",
  395. "-1111.0736083984 1126.4230957031 18.928070068359",
  396. "2511.4123535156 2704.9909667969 10.124899864197",
  397. "876.46264648438 -15.426488876343 62.401950836182",
  398. "2744.9411621094 2763.8493652344 9.9954891204834",
  399. "562.34979248047 2872.1220703125 1.1273599863052",
  400. "-2869.5122070313 2204.3562011719 173.62841796875",
  401. "-2061.8908691406 2428.0451660156 38.880664825439",
  402. "-1954.9418945313 2633.5063476563 91.316513061523",
  403. "-747.10272216797 2506.9494628906 85.962173461914",
  404. "319.779296875 2416.3659667969 17.281471252441",
  405. "524.57135009766 2904.5151367188 4.8845024108887",
  406. "1277.3005371094 2793.8681640625 10.812520980835",
  407. "1798.2659912109 798.32592773438 11.142210960388",
  408. "1367.4775390625 710.81909179688 10.8203125",
  409. "1098.8419189453 1411.3989257813 5.8203125",
  410. "681.06323242188 1196.2006835938 12.058568954468",
  411. "-916.91644287109 1915.1057128906 128.25564575195",
  412. "-627.06127929688 1539.1286621094 30.122945785522",
  413. "-716.03479003906 1528.1860351563 77.827751159668",
  414. "-1131.5955810547 1130.1090087891 37.763034820557",
  415. "-2172.2451171875 1221.6726074219 33.934707641602",
  416. "-2954.6811523438 438.15579223633 2.7058258056641",
  417. "-2522.6455078125 142.76062011719 4.3400068283081",
  418. "-2352.3083496094 -251.78744506836 42.958545684814",
  419. "-2451.9990234375 -254.21655273438 39.904708862305",
  420. "-2561.2021484375 -274.09164428711 26.890308380127",
  421. "-1242.4052734375 -845.31927490234 105.17471313477",
  422. "-647.97106933594 -934.84851074219 110.51071929932",
  423. "-956.21893310547 -976.95123291016 130.38827514648",
  424. "-687.47064208984 -1157.3188476563 45.85311126709",
  425. "-848.94818115234 -1303.826171875 96.439559936523",
  426. "-236.2818145752 -1633.6295166016 4.7963649451488",
  427. "-322.43579101563 -1876.4006347656 7.8871879577637",
  428. "-455.22082519531 -2023.5671386719 46.211608886719",
  429. "-276.17163085938 -2155.88671875 28.576368331909",
  430. "-554.76336669922 -2633.0026855469 151.27899169922",
  431. "-468.96109008789 -2495.74609375 114.2852935791",
  432. "-653.74450683594 -2400.6911621094 34.417930603027",
  433. "-789.50476074219 -2203.6479492188 21.934457778931",
  434. "-1031.4766845703 -2534.0385742188 75.064682006836",
  435. "-1198.7344970703 -2355.03125 18.529594421387",
  436. "-870.62963867188 -1955.35546875 16.60786819458",
  437. "-860.52770996094 -1876.3962402344 88.398330688477",
  438. "-943.04077148438 -1693.7567138672 76.329154968262",
  439. "-984.90856933594 -1691.3774414063 76.153839111328",
  440. "-1104.1400146484 -1631.5064697266 76.3671875",
  441. "-1301.2661132813 -1460.8939208984 103.6640625",
  442. "-1359.0137939453 -1476.2058105469 102.73141479492",
  443. "-1355.9073486328 -1365.0321044922 146.91047668457",
  444. "-1444.2297363281 -1534.4981689453 101.7578125",
  445. "-2256.4350585938 -1092.7886962891 15.671875",
  446. "-2285.7722167969 -1160.2628173828 139.07012939453",
  447. "-2690.1394042969 -1526.681640625 302.84664916992",
  448. "-2099.8859863281 -2222.4787597656 30.654499053955",
  449. "-1473.4851074219 -2175.0490722656 3.1645851135254",
  450. "-1262.1932373047 -2236.7993164063 24.757968902588",
  451. "-1261.9130859375 -2386.8176269531 15.885629653931",
  452. "-1521.6513671875 -2335.7473144531 2.1458778381348",
  453. "-1533.0731201172 -2709.5334472656 59.88451385498",
  454. "-1999.8209228516 -2366.9968261719 30.625",
  455. "-2255.0827636719 -2368.6784667969 30.274938583374",
  456. "-2158.9716796875 -2563.0378417969 30.625",
  457. "-738.13189697266 -109.49671173096 67.351165771484",
  458. "751.62280273438 295.83355712891 20.126316070557",
  459. "1341.4514160156 -148.87242126465 24.136405944824",
  460. "2153.0610351563 298.58218383789 11.784770965576",
  461. "2237.3359375 293.31195068359 7.9151167869568",
  462. "2623.4526367188 220.70176696777 60.117805480957",
  463. "2173.8698730469 -131.68946838379 4.1393995285034",
  464. "2568.7563476563 -298.85580444336 41.316715240479",
  465. "2781.8227539063 -471.51321411133 10.822435379028",
  466. "2269.2465820313 -808.03485107422 129.33155822754",
  467. "2307.9409179688 -549.63714599609 127.08695983887",
  468. "2150.2919921875 -549.11151123047 129.7586517334",
  469. "2037.5883789063 -531.18249511719 79.784393310547",
  470. "1916.8299560547 -374.87704467773 21.183500289917",
  471. "1719.3402099609 -229.37829589844 69.453323364258",
  472. "1105.6488037109 -334.51623535156 73.9921875",
  473. "955.29522705078 -890.78063964844 46.727333068848",
  474. "289.55282592773 -1335.8804931641 53.440139770508",
  475. "957.47937011719 -1653.2379150391 13.537117958069",
  476. "1568.9102783203 -1889.1462402344 13.558721542358",
  477. "1460.3892822266 -1956.6979980469 27.165012359619",
  478. "1115.5069580078 -2226.9338378906 50.393405914307",
  479. "2864.2824707031 -2112.6872558594 10.279636494514",
  480. "2855.8754882813 -1319.4080810547 11.932847976685",
  481. "1798.4468994141 -827.20196533203 68.090057373047",
  482. "-1922.8065185547 -1651.361328125 20.530199050903",
  483. "-1935.3756103516 2630.3073730469 82.775619506836",
  484. "-2178.4089355469 1209.7318115234 39.018939971924",
  485. "-2669.5070800781 1933.5692138672 2.4779636494514",
  486. "-729.60888671875 1604.8803710938 26.085489273071",
  487. "-927.87847900391 1907.4259033203 129.62632751465",
  488. "1713.9859619141 -2303.396484375 -2.4652800559998",
  489. "682.28179931641 -1471.7788085938 13.993330001831",
  490. "-826.46691894531 -1482.2005615234 115.73773193359",
  491. "-396.3254699707 1258.8192138672 6.2298498153687",
  492. "-762.31964111328 -122.95822906494 64.757225036621",
  493. "923.24237060547 -1129.5083007813 22.905248641968",
  494. "1676.9302978516 -2271.7934570313 -2.1384198665619"
  495. }
  496. local kladdelay = 0
  497.  
  498. function urlencode(str)
  499. if (str) then
  500. str = string.gsub (str, "\n", "\r\n")
  501. str = string.gsub (str, "([^%w ])",
  502. function (c) return string.format ("%%%02X", string.byte(c)) end)
  503. str = string.gsub (str, " ", "+")
  504. end
  505. return str
  506. end
  507.  
  508. function main()
  509. while not isSampAvailable() do wait(0) end
  510. if not sampIsLocalPlayerSpawned() then
  511. return false
  512. end
  513. wait(2000)
  514. servip, servport = sampGetCurrentServerAddress()
  515. sexip = ""..servip..":"..servport
  516.  
  517. for i, val in ipairs(servak) do
  518. if val == sexip then
  519. server = i
  520. end
  521. end
  522. if server then
  523. sampAddChatMessage("{808080}КладПоц {ffffff}| loaded. developed {db27a2}damag",-1)
  524. sampAddChatMessage("{808080}КладПоц {ffffff}| cmds", -1)
  525. sampAddChatMessage("{808080}КладПоц {ffffff}| {db27a2}/klad {ffffff}- начать поиск",-1)
  526. sampAddChatMessage("{808080}КладПоц {ffffff}| {db27a2}/kdelay {ffffff}- задержка поиска",-1)
  527. sampAddChatMessage("{808080}КладПоц {ffffff}| {db27a2}/fix {ffffff}- фикс телепортации по кладам",-1)
  528. sampRegisterChatCommand('kdelay', function(param)
  529. if tonumber(param) then
  530. kladdelay = tonumber(param)
  531. sampAddChatMessage('{6fe620}Успешно{FFFFFF}. Задержка {db27a2}'..param..' {FFFFFF}установлена.', -1)
  532. else
  533. sampAddChatMessage('{ff6666}Ошибка{FFFFFF}. Введите задержку', -1)
  534. end
  535. end)
  536. sampRegisterChatCommand('fix', function(param)
  537. kladik = not kladik
  538. if kladik then
  539. sampAddChatMessage('{6fe620}Успешно{FFFFFF}. Фикс тп [{19ff19} ON {FFFFFF}].', -1)
  540. end
  541. if not kladik then
  542. sampAddChatMessage('{6fe620}Успешно{FFFFFF}. Фикс тп [{ff6666} OFF {FFFFFF}].', -1)
  543. end
  544. end)
  545.  
  546. sampRegisterChatCommand('klad', function(param)
  547. klad = not klad
  548. if klad then
  549. sampAddChatMessage("{808080}КладПоц {ffffff} [ {19ff19}ON {ffffff}]", -1)
  550. end
  551. if not klad then
  552. sampAddChatMessage("{808080}КладПоц {ffffff} [ {ff6666}OFF {ffffff}]", -1)
  553. end
  554. end)
  555. lua_thread.create(function()
  556. while true do wait(0)
  557. if klad then
  558. if kladnumb == #coords then
  559. kladnumb = 0
  560. end
  561. name = coords[kladnumb + 1]
  562. x, y, z = name:match("(.*) (.*) (.*)")
  563. x = tonumber(x)
  564. y = tonumber(y)
  565. z = tonumber(z)
  566. setCharCoordinates(playerPed, x, y, z)
  567. sampfuncsLog("sent to pos: "..math.floor(x).." "..math.floor(y).." "..math.floor(z)..". dwIndex: "..kladnumb)
  568. kladnumb = kladnumb + 1
  569. wait(kladdelay)
  570. end
  571. end
  572. --end
  573. end)
  574. wait(-1)
  575. else
  576. sampAddChatMessage('{ff6666}Ошибка{FFFFFF}. Вы не на аризоне.', -1)
  577. end
  578. end
  579.  
  580. function q.onSendPlayerSync(data)
  581. if kladik then
  582. local sync = samp_create_sync_data('spectator')
  583. sync.position = data.position
  584. sync.send()
  585. return false
  586. end
  587. end
  588. function q.onCreateObject(objectId, data)
  589. if klad then
  590. if data.modelId == 2680 then
  591. xx = data.position.x
  592. xy = data.position.y
  593. xz = data.position.z
  594. vms = math.floor(xx)..", "..math.floor(xy)..", "..math.floor(xz)
  595. gor = getCityFromCoords(xx, xy, xz)
  596. if gor == 1 then
  597. gorod = 'Лос Сантосе'
  598. end
  599. if gor == 2 then
  600. gorod = 'Сан Фиерро'
  601. end
  602. if gor == 3 then
  603. gorod = 'Лас Вентурасе'
  604. end
  605. if gor == 0 then
  606. gorod = 'Неизвестном месте'
  607. end
  608. msgklad(vms)
  609. end
  610. return false
  611. end
  612. end
  613.  
  614. function msgklad(param)
  615. if klad then
  616. sampAddChatMessage("{808080}КладПоц {ffffff} Нашли клад [ {c21d8e}"..kladnumb.."{FFFFFF} ] Позиция [ {c21d8e} "..param.."{ffffff} ]", -1)
  617. if mode == 1 then
  618. mymsglol = "Сервер: "..server.." "..sampGetCurrentServerName().."\n\nНашли клад в [ "..gorod.." ]\nКоординаты: "..param
  619. requests.get("https://api.vk.com/method/messages.send?v=5.103&access_token="..token_vk.."&user_id="..user_id.."&message="..urlencode(u8:encode(mymsglol, 'CP1251')).."&group_id="..groupid_vk.."&random_id="..random(1111111111, 9999999999))
  620. elseif mode == 2 then
  621. mymsglol = "Сервер: "..server.." "..sampGetCurrentServerName().."\n\nНашли клад в [ "..gorod.." ]\nКоординаты: "..param.."\n\nБотоводит:\n"..botovod
  622. requests.get("https://api.vk.com/method/messages.send?v=5.103&access_token="..token_vk.."&chat_id="..chat_id.."&message="..urlencode(u8:encode(mymsglol, 'CP1251')).."&group_id="..groupid_vk.."&random_id="..random(1111111111, 9999999999))
  623. end
  624. end
  625. end
  626.  
  627.  
  628. function samp_create_sync_data(sync_type, copy_from_player)
  629. local ffi = require 'ffi'
  630. local sampfuncs = require 'sampfuncs'
  631. -- from SAMP.Lua
  632. local raknet = require 'samp.raknet'
  633. --require 'samp.synchronization'
  634.  
  635. copy_from_player = copy_from_player or true
  636. local sync_traits = {
  637. player = {'PlayerSyncData', raknet.PACKET.PLAYER_SYNC, sampStorePlayerOnfootData},
  638. vehicle = {'VehicleSyncData', raknet.PACKET.VEHICLE_SYNC, sampStorePlayerIncarData},
  639. passenger = {'PassengerSyncData', raknet.PACKET.PASSENGER_SYNC, sampStorePlayerPassengerData},
  640. aim = {'AimSyncData', raknet.PACKET.AIM_SYNC, sampStorePlayerAimData},
  641. trailer = {'TrailerSyncData', raknet.PACKET.TRAILER_SYNC, sampStorePlayerTrailerData},
  642. unoccupied = {'UnoccupiedSyncData', raknet.PACKET.UNOCCUPIED_SYNC, nil},
  643. bullet = {'BulletSyncData', raknet.PACKET.BULLET_SYNC, nil},
  644. spectator = {'SpectatorSyncData', raknet.PACKET.SPECTATOR_SYNC, nil}
  645. }
  646. local sync_info = sync_traits[sync_type]
  647. local data_type = 'struct ' .. sync_info[1]
  648. local data = ffi.new(data_type, {})
  649. local raw_data_ptr = tonumber(ffi.cast('uintptr_t', ffi.new(data_type .. '*', data)))
  650. -- copy player's sync data to the allocated memory
  651. if copy_from_player then
  652. local copy_func = sync_info[3]
  653. if copy_func then
  654. local _, player_id
  655. if copy_from_player == true then
  656. _, player_id = sampGetPlayerIdByCharHandle(PLAYER_PED)
  657. else
  658. player_id = tonumber(copy_from_player)
  659. end
  660. copy_func(player_id, raw_data_ptr)
  661. end
  662. end
  663. -- function to send packet
  664. local func_send = function()
  665. local bs = raknetNewBitStream()
  666. raknetBitStreamWriteInt8(bs, sync_info[2])
  667. raknetBitStreamWriteBuffer(bs, raw_data_ptr, ffi.sizeof(data))
  668. raknetSendBitStreamEx(bs, sampfuncs.HIGH_PRIORITY, sampfuncs.UNRELIABLE_SEQUENCED, 1)
  669. raknetDeleteBitStream(bs)
  670. end
  671. -- metatable to access sync data and 'send' function
  672. local mt = {
  673. __index = function(t, index)
  674. return data[index]
  675. end,
  676. __newindex = function(t, index, value)
  677. data[index] = value
  678. end
  679. }
  680. return setmetatable({send = func_send}, mt)
  681. end
  682.  
  683. function q.onSetPlayerDrunk(drunkLevel)
  684. return {1}
  685. end
  686.  
  687. u = 0 -- don't delete
  688.  
  689. function random(x, y)
  690. u = u + 1
  691. if x ~= nil and y ~= nil then
  692. return math.floor(x +(math.random(math.randomseed(os.time()+u))*999999 %y))
  693. else
  694. return math.floor((math.random(math.randomseed(os.time()+u))*100))
  695. end
  696. end
Add Comment
Please, Sign In to add comment