API tools faq
paste
Advertisement
Guest User

Public War Mod

a guest
Sep 12th, 2014
561
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.31 KB | None | 0 0
raw download clone embed print report
  1. #if defined Credits
  2. Nos, örülök, hogy te hasznát veszed a módnak!
  3. Mivel tudom, hogy úgy se rakjátok ki a jogvédelmet, csak annyit kérek, hogy írjátok ki. 'A szervert The[D]L támogatta!' ennyit elég lenne kiírni! Köszönöm!
  4.  
  5. IDEATENEVEDET -et írjátok felül a nevetekre!
  6. ezt megtehetitek gyorsbill.-el is. CTRL + H , felülre IDEATENEVEDET alúlra a te nevedet!
  7. #endif
  8. #include a_samp
  9. #include sscanf2
  10. #include dini
  11.  
  12. new File[120];
  13.  
  14. new gTeam[MAX_PLAYERS];
  15.  
  16. #define SPEC 0
  17. #define CLAN1 1
  18. #define CLAN2 2
  19.  
  20. new ClanOneScore;
  21. new ClanTwoScore;
  22.  
  23. new ClanOneMember;
  24. new ClanTwoMember;
  25.  
  26. new Groupolt[MAX_PLAYERS];
  27.  
  28. new Nyelv[MAX_PLAYERS];
  29.  
  30. new AdminJelszo = 1231590;
  31.  
  32. #define MAGYAR 1
  33. #define ANGOL 2
  34.  
  35. #define DIA_NYELV 1
  36. #define DIA_TEAM 2
  37. #define DIA_PASS 3
  38. #define DIA_MOD 10
  39.  
  40. #define scm SendClientMessage
  41. #define scmall SendClientMessageToAll
  42. stock GetName(playerid)
  43. {
  44. new pName[MAX_PLAYER_NAME];
  45.  
  46. GetPlayerName(playerid, pName, MAX_PLAYER_NAME);
  47. return pName;
  48. }
  49. stock msgall(color, magyar[],angol[])
  50. {
  51. for(new i; i < MAX_PLAYERS; i++)
  52. {
  53. if(IsPlayerConnected(i))
  54. {
  55. if(Nyelv[i] == MAGYAR)
  56. {
  57. scmall(color, magyar);
  58. }
  59. else if(Nyelv[i] == ANGOL)
  60. {
  61. scmall(color, angol);
  62. }
  63. }
  64. }
  65. }
  66. stock msg(color, magyar[],angol[])
  67. {
  68. for(new i; i < MAX_PLAYERS; i++)
  69. {
  70. if(IsPlayerConnected(i))
  71. {
  72. if(Nyelv[i] == MAGYAR)
  73. {
  74. scm(i, color, magyar);
  75. }
  76. else if(Nyelv[i] == ANGOL)
  77. {
  78. scm(i, color, angol);
  79. }
  80. }
  81. }
  82. }
  83. stock Egyezik(comp[], with[])
  84. {
  85. new LenghtComp = strlen(comp);
  86. new LenghtWith = strlen(with);
  87. new Character;
  88.  
  89. if( LenghtComp != LenghtWith ) return false;
  90.  
  91. for( new i; i < LenghtComp; i++ )
  92. {
  93. if( comp[i] == with[i] )
  94. {
  95. Character++;
  96. }
  97. }
  98.  
  99. if( LenghtComp == Character ) return true;
  100.  
  101. return false;
  102. }
  103. main(){}
  104.  
  105. public OnGameModeInit()
  106. {
  107. //dini_Get(File, "ClanOne"))
  108. //format(gmtext, sizeof(gmtext), "%s:0[0] vs. %s:0[0]",dini_Get(File, "ClanOne"),dini_Get(File, "ClanTwo"));
  109. SendRconCommand("hostname [HU/EN] Public War Server By The[D]L");
  110. SetGameModeText("Clan1:0[0] vs. Clan2:0[0]");
  111. SendRconCommand("mapname Wait...");
  112. //AddPlayerClass(0, 158.3783, 1343.1572, 15.3746, 269.1425, 0, 0, 0, 0, 0, 0);
  113. return 1;
  114. }
  115.  
  116. public OnGameModeExit()
  117. {
  118. return 1;
  119. }
  120.  
  121. public OnPlayerRequestClass(playerid, classid)
  122. {
  123. ShowPlayerDialog(playerid, DIA_NYELV, DIALOG_STYLE_MSGBOX,"Nyelv / Language", "Kérlek válasz nyelvet!\nPlease, select you language!", "Magyar", "English");
  124. /*SetPlayerPos(playerid, 1958.3783, 1343.1572, 15.3746);
  125. SetPlayerCameraPos(playerid, 1958.3783, 1343.1572, 15.3746);
  126. SetPlayerCameraLookAt(playerid, 1958.3783, 1343.1572, 15.3746);*/
  127. return 1;
  128. }
  129.  
  130. public OnPlayerConnect(playerid)
  131. {
  132. if(Egyezik(GetName(playerid), "IDEATENEVEDET"))
  133. {
  134. ShowPlayerDialog(playerid, DIA_PASS, DIALOG_STYLE_INPUT," "," "," "," ");
  135. return 1;
  136. }
  137. return 1;
  138. }
  139.  
  140. public OnPlayerDisconnect(playerid, reason)
  141. {
  142. new string[652],sting[542];
  143. switch(reason)
  144. {
  145. case 0:
  146. {
  147. format(string, sizeof(string), "%s has left the server. (TimeOut)",GetName(playerid));
  148. format(sting, sizeof(sting), "%s elhagyta a szervert. (Kifagyott)",GetName(playerid));
  149. }
  150. case 1:
  151. {
  152. format(string, sizeof(string), "%s has left the server. (Left)",GetName(playerid));
  153. format(sting, sizeof(sting), "%s elhagyta a szervert. (Kilépett)",GetName(playerid));
  154. }
  155. case 2:
  156. {
  157. format(string, sizeof(string), "%s has left the server. (Kicked)",GetName(playerid));
  158. format(sting, sizeof(sting), "%s elhagyta a szervert. (Kirúgva)",GetName(playerid));
  159. }
  160. }
  161. msgall(-1, string, sting);
  162. return 1;
  163. }
  164.  
  165. public OnPlayerSpawn(playerid)
  166. {
  167. if(gTeam[playerid] == CLAN1)
  168. {
  169.  
  170. }
  171. else if(gTeam[playerid] == CLAN2)
  172. {
  173.  
  174. }
  175. else if(gTeam[playerid] == SPEC)
  176. {
  177.  
  178. }
  179. return 1;
  180. }
  181.  
  182. public OnPlayerDeath(playerid, killerid, reason)
  183. {
  184. if(killerid == CLAN1)
  185. {
  186. ClanOneScore ++;
  187. }
  188. if(killerid == CLAN2)
  189. {
  190. ClanTwoScore ++;
  191. }
  192. return 1;
  193. }
  194.  
  195. public OnVehicleSpawn(vehicleid)
  196. {
  197. return 1;
  198. }
  199.  
  200. public OnVehicleDeath(vehicleid, killerid)
  201. {
  202. return 1;
  203. }
  204.  
  205. /*public OnPlayerText(playerid, text[])
  206. {
  207. if(text[0] == '!')
  208. {
  209. new string[256],name[24];
  210. GetPlayerName(playerid,name,24);
  211. format(string,256,"(Clan) %s: %s",name,text[1]);
  212. for(new i = 0; i < MAX_PLAYERS; i++)
  213. {
  214. if(IsPlayerConnected(i))
  215. {
  216. if(gTeam[i] == gTeam[playerid])
  217. SendClientMessage(i, GetPlayerColor(playerid), string);
  218. }
  219. }
  220. return 0;
  221. }
  222. return 1;
  223. }*/
  224.  
  225. public OnPlayerCommandText(playerid, cmdtext[])
  226. {
  227. if (strcmp("/amenu", cmdtext, true, 10) == 0) // ADMIN MENÜ
  228. {
  229. if(Egyezik(GetName(playerid), "IDEATENEVEDET"))
  230. {
  231. ShowPlayerDialog(playerid, DIA_MOD, DIALOG_STYLE_LIST,"Vezérlőpult", "Klánok\nSzerver\nJátékmenet", "Rendben", "Mégse");
  232. }else msg(-1, "Meg se próbáld.", "Do not even try.");
  233. return 1;
  234. }
  235. if (strcmp("/a", cmdtext, true, 10) == 0) // ADMIN MENÜ
  236. {
  237. if(Egyezik(GetName(playerid), "IDEATENEVEDET"))
  238. {
  239. new S[523];
  240. format(S, sizeof(S), "%s:%d[%d] vs. %s:%d[%d]",dini_Get(File, "ClanOne"), ClanOneScore, ClanOneMember, dini_Get(File, "ClanTwo"), ClanTwoScore, ClanOneMember);
  241. SetGameModeText(S);
  242. }else msg(-1, "Meg se próbáld.", "Do not even try.");
  243. return 1;
  244. }
  245. if (strcmp("/t", cmdtext, true, 10) == 0) // ADMIN MENÜ
  246. {
  247. if(Egyezik(GetName(playerid), "IDEATENEVEDET"))
  248. {
  249. new S[654];
  250. format(S, sizeof(S), "%s:%d[%d] vs. %s:%d[%d]",dini_Get(File, "ClanOne"), ClanOneScore, ClanOneMember, dini_Get(File, "ClanTwo"), ClanTwoScore, ClanOneMember);
  251. scm(playerid, -1, S);
  252. }else msg(-1, "Meg se próbáld.", "Do not even try.");
  253. return 1;
  254. }
  255. return 0;
  256. }
  257.  
  258. public OnPlayerEnterVehicle(playerid, vehicleid, ispassenger)
  259. {
  260. return 1;
  261. }
  262.  
  263. public OnPlayerExitVehicle(playerid, vehicleid)
  264. {
  265. return 1;
  266. }
  267.  
  268. public OnPlayerStateChange(playerid, newstate, oldstate)
  269. {
  270. return 1;
  271. }
  272.  
  273. public OnPlayerEnterCheckpoint(playerid)
  274. {
  275. return 1;
  276. }
  277.  
  278. public OnPlayerLeaveCheckpoint(playerid)
  279. {
  280. return 1;
  281. }
  282.  
  283. public OnPlayerEnterRaceCheckpoint(playerid)
  284. {
  285. return 1;
  286. }
  287.  
  288. public OnPlayerLeaveRaceCheckpoint(playerid)
  289. {
  290. return 1;
  291. }
  292.  
  293. public OnRconCommand(cmd[])
  294. {
  295. return 1;
  296. }
  297.  
  298. public OnPlayerRequestSpawn(playerid)
  299. {
  300. return 1;
  301. }
  302.  
  303. public OnObjectMoved(objectid)
  304. {
  305. return 1;
  306. }
  307.  
  308. public OnPlayerObjectMoved(playerid, objectid)
  309. {
  310. return 1;
  311. }
  312.  
  313. public OnPlayerPickUpPickup(playerid, pickupid)
  314. {
  315. return 1;
  316. }
  317.  
  318. public OnVehicleMod(playerid, vehicleid, componentid)
  319. {
  320. return 1;
  321. }
  322.  
  323. public OnVehiclePaintjob(playerid, vehicleid, paintjobid)
  324. {
  325. return 1;
  326. }
  327.  
  328. public OnVehicleRespray(playerid, vehicleid, color1, color2)
  329. {
  330. return 1;
  331. }
  332.  
  333. public OnPlayerSelectedMenuRow(playerid, row)
  334. {
  335. return 1;
  336. }
  337.  
  338. public OnPlayerExitedMenu(playerid)
  339. {
  340. return 1;
  341. }
  342.  
  343. public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
  344. {
  345. return 1;
  346. }
  347.  
  348. public OnPlayerKeyStateChange(playerid, newkeys, oldkeys)
  349. {
  350. if(newkeys & KEY_NO)
  351. {
  352. if(Groupolt[playerid] == 0)
  353. {
  354. Groupolt[playerid] = 1;
  355. msg(-1, "Készen állsz!", "You're ready!");
  356. }
  357. else if(Groupolt[playerid] == 1)
  358. {
  359. Groupolt[playerid] = 0;
  360. msg(-1, "Nem állsz készen!", "You're not ready!");
  361. }
  362. }
  363. return 1;
  364. }
  365.  
  366. public OnRconLoginAttempt(ip[], password[], success)
  367. {
  368. return 1;
  369. }
  370.  
  371. public OnPlayerUpdate(playerid)
  372. {
  373. return 1;
  374. }
  375.  
  376. public OnPlayerStreamIn(playerid, forplayerid)
  377. {
  378. return 1;
  379. }
  380.  
  381. public OnPlayerStreamOut(playerid, forplayerid)
  382. {
  383. return 1;
  384. }
  385.  
  386. public OnVehicleStreamIn(vehicleid, forplayerid)
  387. {
  388. return 1;
  389. }
  390.  
  391. public OnVehicleStreamOut(vehicleid, forplayerid)
  392. {
  393. return 1;
  394. }
  395.  
  396. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  397. {
  398. new selectclan[532], S[532],S2[532];
  399. if(dialogid == DIA_NYELV)
  400. {
  401. if(response)
  402. {
  403. Nyelv[playerid] = MAGYAR;
  404. }
  405. if(!response)
  406. {
  407. Nyelv[playerid] = ANGOL;
  408. }
  409. msg(-1, "Nyelv kiválasztva!","Language selected!");
  410. if(Nyelv[playerid] == MAGYAR)
  411. {
  412. format(selectclan, sizeof(selectclan), "%s\n%s\nNéző", dini_Get(File, "ClanOne"),dini_Get(File, "ClaTwo"));
  413. ShowPlayerDialog(playerid, DIA_TEAM, DIALOG_STYLE_LIST,"Válazd ki a klánod!", "#clanname1\n#clanname2\nNéző", "Kész!", "Kilépés");
  414. }
  415. else if(Nyelv[playerid] == ANGOL)
  416. {
  417. format(selectclan, sizeof(selectclan), "%s\n%s\nSpectator", dini_Get(File, "ClanOne"),dini_Get(File, "ClaTwo"));
  418. ShowPlayerDialog(playerid, DIA_TEAM, DIALOG_STYLE_LIST,"Select your clan!", "clanname1\n#clanname2\nSpectator", "Ready!", "Quit");
  419. }
  420. }
  421. if(dialogid == DIA_TEAM)
  422. {
  423. if(!response) return 1;
  424.  
  425. if(listitem == 0)
  426. {
  427. gTeam[playerid] = CLAN1;
  428. ClanOneMember ++;
  429. format(S, sizeof(S), "Csatlakozztál a %s", dini_Get(File, "ClanOne"));
  430. format(S2, sizeof(S2), "You are joined for %s", dini_Get(File, "ClanOne"));
  431. msg(-1, S,S2);
  432. }
  433. if(listitem == 1)
  434. {
  435. gTeam[playerid] = CLAN2;
  436. ClanTwoMember ++;
  437. format(S, sizeof(S), "Csatlakozztál a %s", dini_Get(File, "ClanTwo"));
  438. format(S2, sizeof(S2), "You are joined for %s", dini_Get(File, "ClanTwo"));
  439. msg(-1, S, S2);
  440. }
  441. if(listitem == 2)
  442. {
  443. gTeam[playerid] = SPEC;
  444. msg(-1, "Csatlakozztál a nézőkhöz!","You joined for spectator!");
  445. }
  446. SpawnPlayer(playerid);
  447. }
  448. if(dialogid == DIA_PASS)
  449. {
  450. if(!response) Kick(playerid);
  451.  
  452. if(strval(inputtext) == AdminJelszo)
  453. {
  454. ShowPlayerDialog(playerid, DIA_NYELV, DIALOG_STYLE_MSGBOX,"Nyelv / Language", "Kérlek válasz nyelvet!\nPlease, select you language!", "Magyar", "English");
  455. }
  456. else
  457. {
  458. Kick(playerid);
  459. }
  460. return 1;
  461. }
  462. if(dialogid == DIA_MOD)
  463. {
  464. if(!response) return 1;
  465.  
  466. if(listitem == 0)
  467. {
  468. ShowPlayerDialog(playerid, DIA_MOD+1, DIALOG_STYLE_LIST,"Vezérlőpult >>> Klánok", "Set Name Clan 1\nSet Name Clan 2", "Rendben", "Mégse");
  469. }
  470. if(listitem == 1)
  471. {
  472. ShowPlayerDialog(playerid, DIA_MOD+2, DIALOG_STYLE_LIST,"Vezérlőpult >>> Szerver", " ", "Rendben", "Mégse");
  473. }
  474. if(listitem == 2)
  475. {
  476. ShowPlayerDialog(playerid, DIA_MOD+3, DIALOG_STYLE_LIST,"Vezérlőpult >>> Játékmenet", " ", "Rendben", "Mégse");
  477. }
  478. }
  479. if(dialogid == DIA_MOD+1)
  480. {
  481. if(!response) return 1;
  482.  
  483. if(listitem == 0)
  484. {
  485. ShowPlayerDialog(playerid, DIA_MOD+4, DIALOG_STYLE_INPUT,"Clan One Name","Írd be a klán nevét.","Átnevez","Mégse");
  486. }
  487. if(listitem == 1)
  488. {
  489. ShowPlayerDialog(playerid, DIA_MOD+5, DIALOG_STYLE_INPUT,"Clan Two Name","Írd be a klán nevét.","Átnevez","Mégse");
  490. }
  491. }
  492. if(dialogid == DIA_MOD+4)
  493. {
  494. new S5[532];
  495. if(!response) return 1;
  496.  
  497. dini_Set(File, "ClanOne", inputtext);
  498.  
  499. format(S5, sizeof(S5), "Az egyes klán neve: %s",dini_Get(File, "ClanOne"));
  500. scm(playerid, -1, S5);
  501. }
  502. return 1;
  503. }
  504.  
  505. public OnPlayerClickPlayer(playerid, clickedplayerid, source)
  506. {
  507. return 1;
  508. }
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!