API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Jul 22nd, 2018
69
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 12.92 KB | None | 0 0
raw download clone embed print report
  1. /* 0.1 2018.07.19
  2. 1. Pakeisti atsiradymo vietą, kameros pozicija, ir skin.[PADARYTA]
  3. 2. Sukurti gyvybių gyvybių/šarvų pickup kur duoda papildomai po 100 gyvybių/šarvų.[PADARYTA]
  4. 3. Padaryti ginklo pirkimo sistemą t.y. kad būtu galima pirkti 3 ginklus iš dėžės.[PADARYTA]
  5. 4. Padaryti kokį nors konteinerį kur būtu galima galima 5 random ginklus ir random kulkų.[PADARYTA]
  6. 0.2 2018.07.**
  7. 1. Žaidėjui prisijungus į serverį visiems žaidėjams praneš kad prisijungė dar vienas papildomas žaidėjas.[SUTVARKYTA/PADARYTA]
  8. 2. Padaryti DM zoną, bei įkelti stockini interierą.[PADARYTA]
  9. 3. Padaryti krepšį kuris atsirastu atsitiktinoj vietoj[PER VISĄ GTA ŽEMELAPĮ], ir būtu galima iš jo gauti pinigų arba kažkokį ginklą.[NEPADARYTA]
  10. 4. Sutvarkyti pickup kur yra serverio komandos - NEIŠMETA playerdialog.(Išmeta MSGBOX DIALOGĄ, su visomis serverio komandomis!)[PADARYTA/SUTVARKYTA.]
  11. 5. Sutvarkyti DM ZONA.[SUTVARKYTA 80% - prisijungus į zoną, žaidėjas kokius ginklus turėjo, gauna tarp DM zonos irgi, padaryti taip kad gautu tik DM zonos ginklus, o senus atimtu!]
  12. 6. Žaidėjui mirus atgal gausite TIK 100 gyvybių, kai prieš tai pasiėmus, 200 gyvybių, mirdamas, turėdavai 200 gyvybių.[PADARYTA/SUTVARKYTA]
  13. */
  14.  
  15. #include <a_samp>
  16. #include <streamer>
  17. #include <zcmd>
  18.  
  19. // Pickupai
  20. new gyvybiupickup;
  21. new sarvaipickup;
  22. new ginkludeze;
  23. new saudymozona;
  24. new komandupickup;
  25. new krepsiopickup;
  26.  
  27.  
  28. #define DIALOG_ginkludeze 1
  29. #define DIALOG_serveriokomandos 2
  30.  
  31. enum randomSpawns
  32. {
  33. Float:Posx,
  34. Float:Posy,
  35. Float:Posz
  36. }
  37.  
  38. new krepsioSpawn[5][randomSpawns] =
  39. {
  40. {2502.9539,-179.2008,34.0363},
  41. {2611.9463,-216.4190,38.6295},
  42. {2620.8257,-99.1316,49.9143},
  43. {2624.2319,126.8937,33.2807},
  44. {2697.9961,217.8583,57.2867}
  45. };
  46.  
  47. main()
  48. {
  49. print("\n----------------------------------");
  50. print(" Gamemode kūrėjas: louisas");
  51. print(" Serverio Modifikacija pilnai užkrauta!");
  52. print("----------------------------------\n");
  53. }
  54.  
  55.  
  56. public OnGameModeInit()
  57. {
  58. // Krepšių kūrimas
  59. SetTimer("randomkrepsis", 100000, true); // 1000 milisekundžių = 1 sekundė
  60. // kitka
  61. SetGameModeText("gm 0.2");
  62. //VIENO DAIKTO MAPP
  63. CreateObject(3571, 2029.4579,1352.3300,10.8203, 0.0, 0.0, 96.0, 300.0);
  64. // pickupai
  65. gyvybiupickup = CreatePickup(1240, 2, 2028.1981,1332.8795,10.8203, -1); // gyvybės
  66. sarvaipickup = CreatePickup(1242, 2, 2027.7743,1336.2875,10.8203, -1); // Šarvai
  67. komandupickup = CreatePickup(1239, 2, 2032.7869,1330.9691,10.8203, -1); // severio komandos
  68. ginkludeze = CreatePickup(3014, 2, 2032.2104,1334.3314,10.8203, -1); // Ginklų dėžė
  69. saudymozona = CreatePickup(1254, 0, 2019.5619,1341.8136,10.8130, -1); // DM ZONA
  70. //
  71. AddStaticVehicle(411,2039.6058,1339.2567,10.3990,137.4158,123,1); // infernus
  72. AddStaticVehicle(560,2039.9224,1344.5879,10.3990,135.2001,123,1); // sultan
  73. AddStaticVehicle(495,2040.0054,1349.6848,10.3989,136.1297,123,1); // SANDKING
  74. AddStaticVehicle(520,2040.1935,1366.8699,10.3990,181.4172,123,1); // HYDRA
  75. // labeliai3D
  76. Create3DTextLabel("Serverio Komandos", -1, 2032.7869,1330.9691,10.8203, 10.0, 0, 0); // serverio komandų pickup
  77. Create3DTextLabel("Gyvybių šaltinis", 0xFFFFFFFF, 2028.1981, 1332.8795, 10.8203, 10.0, 0, 0); // Gyvybės
  78. Create3DTextLabel("Šarvų šaltinis", 0xFFFFFFFF, 2027.7743, 1336.2875, 10.8203, 10.0, 0, 0); // Šarvai
  79. Create3DTextLabel("Ginklų šaltinis", 0xFFFFFFFF, 2032.2104, 1334.3314, 10.8203, 10.0, 0, 0); // Ginklų dėžė
  80. Create3DTextLabel("Paspausk ALT ir gausi random ginklą!", 0xFFFFFFFF, 2030.0360, 1347.3868, 10.8203, 10.0, 0, 0); // dėžė su random gun
  81. Create3DTextLabel("Norint patekti į DM zoną paspauskite ENTER klavišą!", -1, 2019.5619,1341.8136,10.8130, 10.0, 0, 0); // DM ZONA
  82. // Žaidėjo spawn
  83. AddPlayerClass(240,2040.3777,1332.4381,10.6719,69.2792,0,0,0,0,0,0); // spawn
  84. return 1;
  85. }
  86.  
  87. public OnGameModeExit()
  88. {
  89. return 1;
  90. }
  91.  
  92. public OnPlayerRequestClass(playerid, classid)
  93. {
  94. SetPlayerPos(playerid, 2105.6824,1303.7030,10.8203);
  95. SetPlayerCameraPos(playerid, 2105.6824,1303.7030,10.8203);
  96. SetPlayerCameraLookAt(playerid, 2105.6824,1303.7030,10.8203);
  97. return 1;
  98. }
  99.  
  100. public OnPlayerConnect(playerid)
  101. {
  102. // xp kylimas
  103. SetPlayerScore(playerid, GetPlayerScore(playerid)+random(1)+5);
  104. // TEST 0.2
  105. new vardaspavarde[MAX_PLAYER_NAME], stringas[125];
  106. GetPlayerName(playerid, vardaspavarde, MAX_PLAYER_NAME);
  107. format(stringas, sizeof(stringas), "{FFA1A1}""[SERVERIS]{FFFFFF}"" Žaidėjas {C9FFAB}%s{FFFFFF} prisijungė į serverį!", vardaspavarde);
  108. SendClientMessageToAll(-1, stringas);
  109. // TEST0.1
  110. GivePlayerMoney(playerid, 20000); // Prisijungus į serverį žaidėjui duoda 20'000 XP.
  111. SetPlayerColor(playerid, 0xAA3333AA); // žaidėjui prisijungus spalva bus raudona.
  112. return 1;
  113. }
  114.  
  115. public OnPlayerDisconnect(playerid, reason)
  116. {
  117. return 1;
  118. }
  119.  
  120. public OnPlayerSpawn(playerid)
  121. {
  122. SetPlayerHealth(playerid, 100);
  123. return 1;
  124. }
  125.  
  126. public OnPlayerDeath(playerid, killerid, reason)
  127. {
  128. return 1;
  129. }
  130.  
  131. public OnVehicleSpawn(vehicleid)
  132. {
  133. return 1;
  134. }
  135.  
  136. public OnVehicleDeath(vehicleid, killerid)
  137. {
  138. return 1;
  139. }
  140.  
  141. public OnPlayerText(playerid, text[])
  142. {
  143. return 1;
  144. }
  145.  
  146. public OnPlayerCommandText(playerid, cmdtext[])
  147. {
  148. if (strcmp("/mycommand", cmdtext, true, 10) == 0)
  149. {
  150. // Do something here
  151. return 1;
  152. }
  153. return 0;
  154. }
  155.  
  156. public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
  157. {
  158. return 1;
  159. }
  160.  
  161. public OnPlayerExitVehicle(playerid, vehicleid)
  162. {
  163. return 1;
  164. }
  165.  
  166. public OnPlayerStateChange(playerid, newstate, oldstate)
  167. {
  168. return 1;
  169. }
  170.  
  171. public OnPlayerEnterCheckpoint(playerid)
  172. {
  173. return 1;
  174. }
  175.  
  176. public OnPlayerLeaveCheckpoint(playerid)
  177. {
  178. return 1;
  179. }
  180.  
  181. public OnPlayerEnterRaceCheckpoint(playerid)
  182. {
  183. return 1;
  184. }
  185.  
  186. public OnPlayerLeaveRaceCheckpoint(playerid)
  187. {
  188. return 1;
  189. }
  190.  
  191. public OnRconCommand(cmd[])
  192. {
  193. return 1;
  194. }
  195.  
  196. public OnPlayerRequestSpawn(playerid)
  197. {
  198. return 1;
  199. }
  200.  
  201. public OnObjectMoved(objectid)
  202. {
  203. return 1;
  204. }
  205.  
  206. public OnPlayerObjectMoved(playerid, objectid)
  207. {
  208. return 1;
  209. }
  210.  
  211. public OnPlayerPickUpPickup(playerid, pickupid)
  212. {
  213. if(pickupid == gyvybiupickup)
  214. {
  215. new Float:gyvybes;
  216. GetPlayerHealth(playerid, gyvybes);
  217. SetPlayerHealth(playerid, gyvybes += 100);
  218. SendClientMessage(playerid, -1, "{FFA1A1}""[SERVERIS]{FFFFFF}"" Gavote dar papildomu 100 gyvybių!");
  219. }
  220. if(pickupid == sarvaipickup)
  221. {
  222. new float:sarvai;
  223. GetPlayerArmour(playerid, Float:sarvai);
  224. SetPlayerArmour(playerid, 100);
  225. SendClientMessage(playerid, -1, "{FFA1A1}""[SERVERIS]{FFFFFF}"" Gavote 100 šarvų!");
  226. }
  227. if(pickupid == ginkludeze)
  228. {
  229. ShowPlayerDialog(playerid, ginkludeze, DIALOG_STYLE_TABLIST_HEADERS, "Ginklų Pirkimas", "Ginklai\tKaina\tKulkas\nDeagle\t$6000\t150\nM4\t$15000\t500\nShotgun\t$5500\t100", "Pirkti", "Atšaukti");
  230. SendClientMessage(playerid, -1, "{FFA1A1}""[SERVERIS]{FFFFFF}"" Nusipirkite norima ginklą!");
  231. }
  232. if(pickupid == saudymozona)
  233. {}
  234. if(pickupid == komandupickup)
  235. {
  236. ShowPlayerDialog(playerid, DIALOG_serveriokomandos, DIALOG_STYLE_MSGBOX, "Serverio Komandos", "\n/money\n/skin1\n/skin2\nnaktis1\n/vakaras\n/diena\n/naktis2\n", "Supratau", "");
  237. }
  238. if(pickupid == krepsiopickup)
  239. {
  240. DestroyPickup(krepsiopickup);
  241. new random_money = 1000+random(5000);
  242. GivePlayerMoney(playerid, random_money);
  243. }
  244. return 1;
  245. }
  246.  
  247. public OnVehicleMod(playerid, vehicleid, componentid)
  248. {
  249. return 1;
  250. }
  251.  
  252. public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
  253. {
  254. return 1;
  255. }
  256.  
  257. public OnVehicleRespray(playerid, vehicleid, color1, color2)
  258. {
  259. return 1;
  260. }
  261.  
  262. public OnPlayerSelectedMenuRow(playerid, row)
  263. {
  264. return 1;
  265. }
  266.  
  267. public OnPlayerExitedMenu(playerid)
  268. {
  269. return 1;
  270. }
  271.  
  272. public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
  273. {
  274. return 1;
  275. }
  276.  
  277. public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
  278. {
  279. if(newkeys == KEY_SECONDARY_ATTACK) // DM ZONA
  280. {
  281. if(IsPlayerInRangeOfPoint(playerid, 0.7, 2019.5619,1341.8136,10.8130))
  282. {
  283. SetPlayerPos(playerid, -975.975708,1060.983032,1345.671875);
  284. SetPlayerInterior(playerid, 10);
  285. GivePlayerWeapon(playerid, 24, 450);
  286. GivePlayerWeapon(playerid, 25, 350);
  287. }
  288. }
  289. if(newkeys == KEY_WALK) // Konteineris
  290. {
  291. if(IsPlayerInRangeOfPoint(playerid, 0.7, 2030.0360, 1347.3868, 10.8203))
  292. {
  293. new string[125];
  294. new randomGuns[5] = {25, 28, 30, 35, 4};
  295. new randomAmmo[5] = {200, 800, 500, 333, 50};
  296. new gun = randomGuns[random(5)];
  297. new amount = randomAmmo[random(5)];
  298. format(string, sizeof(string),"{6EF83C}""[GINKLŲ KONTEINERIS]""{6EF83C}" "{FFFFFF}"" Jūs gavote ginklą (ID: %d) ir kulkų (Kiekis: %d) iš konteinerio (ID: %s)", gun, amount, MAX_PLAYER_NAME);
  299. SendClientMessage(playerid, -1, string);
  300. GivePlayerWeapon(playerid, gun, amount);
  301. }
  302. }
  303. return true;
  304. }
  305.  
  306. public OnRconLoginAttempt(ip[], password[], success)
  307. {
  308. return 1;
  309. }
  310.  
  311. public OnPlayerUpdate(playerid)
  312. {
  313. return 1;
  314. }
  315.  
  316. public OnPlayerStreamIn(playerid, forplayerid)
  317. {
  318. return 1;
  319. }
  320.  
  321. public OnPlayerStreamOut(playerid, forplayerid)
  322. {
  323. return 1;
  324. }
  325.  
  326. public OnVehicleStreamIn(vehicleid, forplayerid)
  327. {
  328. return 1;
  329. }
  330.  
  331. public OnVehicleStreamOut(vehicleid, forplayerid)
  332. {
  333. return 1;
  334. }
  335.  
  336. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  337. {
  338. if(dialogid == ginkludeze)
  339. {
  340. if(response)
  341. {
  342. if(listitem == 0)
  343. {
  344. if(GetPlayerMoney(playerid) < 6000) return SendClientMessage(playerid, -1, "{0049FF}""[GINKLŲ DĖŽĖ]""{{FFFFFF}}"" Jums neužtenka pinigų nusipirkti šio ginklo!");
  345. GivePlayerWeapon(playerid, 24, 150);
  346. GivePlayerMoney(playerid, -6000);
  347. SendClientMessage(playerid, -1, "{0049FF}""[GINKLŲ DĖŽĖ]""{FFFFFF}"" Nusipirkote Desert Deagle ginklą!!");
  348. }
  349.  
  350. }
  351. if(listitem == 1)
  352. {
  353. if(GetPlayerMoney(playerid) < 15000) return SendClientMessage(playerid, -1, "{0049FF}""[GINKLŲ DĖŽĖ]""{FFFFFF}"" Jums neužtenka pinigų nusipirkti šio ginklo!");
  354. GivePlayerWeapon(playerid, 31, 500);
  355. SendClientMessage(playerid, -1, "{0049FF}""[GINKLŲ DĖŽĖ]""{FFFFFF}"" Nusipirkote M4 automatą!");
  356. GivePlayerMoney(playerid, -15000);
  357. }
  358. }
  359. if(listitem == 2)
  360. {
  361. if(GetPlayerMoney(playerid) < 5000) return SendClientMessage(playerid, -1, "{0049FF}""[GINKLŲ DĖŽĖ]""{FFFFFF}"" Jums neužtenka pinigų nusipirkti šio ginklo!");
  362. SendClientMessage(playerid, -1, "{0049FF}""[GINKLŲ DĖŽĖ]""{FFFFFF}"" Nusipirkote Shotgun ginklą!");
  363. GivePlayerWeapon(playerid, 25, 100);
  364. GivePlayerMoney(playerid, -5500);
  365. }
  366. return 1;
  367. }
  368.  
  369. public OnPlayerClickPlayer(playerid, clickedplayerid, source)
  370. {
  371. return 1;
  372. }
  373. CMD:money(playerid, params[])
  374. {
  375. GivePlayerMoney(playerid, 1500000);
  376. SendClientMessage(playerid, -1, "{FFA1A1}""[SERVERIS]{FFFFFF}""Gavai 1.5mln eur!");
  377. return 1;
  378. }
  379. CMD:skin1(playerid, params[])
  380. {
  381. SetPlayerSkin(playerid, 230);
  382. SendClientMessage(playerid, -1, "{FFA1A1}""[SERVERIS]{FFFFFF}""Gavai 230 id SKIN(BOMŽO SKIN)!");
  383. return 1;
  384. }
  385. CMD:skin2(playerid, params[])
  386. {
  387. SetPlayerSkin(playerid, 250);
  388. SendClientMessage(playerid, -1, "{FFA1A1}""[SERVERIS]{FFFFFF}""Gavai 250 id SKIN!");
  389. return 1;
  390. }
  391. CMD:naktis1(playerid, params[])
  392. {
  393. SetWorldTime(24);
  394. return 1;
  395. }
  396. CMD:vakaras(playerid, params[])
  397. {
  398. SetWorldTime(20);
  399. return 1;
  400. }
  401. CMD:diena(playerid, params[])
  402. {
  403. SetWorldTime(16);
  404. return 1;
  405. }
  406. CMD:naktis2(playerid, params[])
  407. {
  408. SetWorldTime(3);
  409. return 1;
  410. }
  411. new rSpawn;
  412. forward randomkrepsis();
  413. public randomkrepsis()
  414. {
  415. DestroyPickup(krepsiopickup);
  416. rSpawn = random(4);
  417. krepsiopickup = CreatePickup(1550, 1, krepsioSpawn[rSpawn][Posx], krepsioSpawn[rSpawn][Posy], krepsioSpawn[rSpawn][Posz]);
  418. return true;
  419. }
  420. CMD:randomkrepsys(playerid)
  421. {
  422. if(IsPlayerInRangeOfPoint(playerid, 0.7, krepsioSpawn[rSpawn][Posx], krepsioSpawn[rSpawn][Posy], krepsioSpawn[rSpawn][Posz])) return SendClientMessage(playerid, -1, "[RANDOM KREPŠYS]"" Per toli nuo krepšio kad jį galėtum pasiimti surask jį!");
  423. new krepsiostring[125];
  424. format(krepsiostring, sizeof(krepsiostring), "[RANDOM KREPŠYS]"" Žaidėjas %s, rado krepšį su %d pinigų kiekių!");
  425. SendClientMessageToAll(playerid, krepsiostring);
  426. return 1;
  427. }
  428. /*
  429. KAIMELIŲ KREPŠIAI:
  430. AddPlayerClass(240,2502.9539,-179.2008,34.0363,302.2200,0,0,0,0,0,0); // pinigų/ginklų krepšys
  431. AddPlayerClass(240,2611.9463,-216.4190,38.6295,311.4028,0,0,0,0,0,0); // pinigų/ginklų krepšys2
  432. AddPlayerClass(240,2620.8257,-99.1316,49.9143,8.7917,0,0,0,0,0,0); // pinigų/ginklų krepšys3
  433. AddPlayerClass(240,2624.2319,126.8937,33.2807,350.3010,0,0,0,0,0,0); // pinigų/ginklų krepšys4
  434. AddPlayerClass(240,2697.9961,217.8583,57.2867,36.7927,0,0,0,0,0,0); // pinigų/ginklų krepšys5
  435. LAS-VENTURAS MIESTO KREPŠIAI:
  436.  
  437. Los-Santos KREPŠIAI:
  438.  
  439. San-Fierro KREPŠIAI:
  440.  
  441. */
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!