Guest User

Untitled

a guest
Jan 24th, 2020
85
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. //YCMD-ebtan
  2. YCMD:mp(playerid, params[], help)
  3. {
  4. if(PlayerInfo[playerid][pLogin] == 0) return true;
  5. if(PlayerInfo[playerid][pAdmin] < 5 || dostup[playerid] == 0) return true;
  6. ShowPlayerDialogEx(playerid, 20055, 2, "MP Control","Iaragebis Micema\nHP Micema\nIaragebis Wartmeva","Archeva","Gauqmeba");
  7. return true;
  8. }
  9. YCMD:eventoff(playerid, params[], help)
  10. {
  11. if(PlayerInfo[playerid][pLogin] == 0) return true;
  12. if(PlayerInfo[playerid][pAdmin] < 5 || dostup[playerid] == 0) return true;
  13. if(mpstarted == 0) return SendClientMessage(playerid, COLOR_GREY, "Event Ar Mimdinareobs");
  14. mpstarted = 0;
  15. format(YCMDstr, sizeof(YCMDstr), "[Averange-RP] Administratorma {FF0000}%s {FFFFFF}Daasrula Event",Name(playerid));
  16. SendAdminMessage(COLOR_WHITE, YCMDstr);
  17. return true;
  18. }
  19. YCMD:eventon(playerid, params[], help)
  20. {
  21. if(PlayerInfo[playerid][pLogin] == 0) return true;
  22. if(PlayerInfo[playerid][pAdmin] < 5 || dostup[playerid] == 0) return true;
  23. new Float:Pos[3],interior,vw;
  24. GetPlayerPos(playerid,Pos[0],Pos[1],Pos[2]);
  25. interior = GetPlayerInterior(playerid);
  26. vw = GetPlayerVirtualWorld(playerid);
  27. foreach(new i:Player)
  28. {
  29. SetPVarInt(i, "Interior", interior);
  30. SetPVarInt(i, "VirtualWorld", vw);
  31. SetPVarFloat(i, "CoordX", Pos[0]);
  32. SetPVarFloat(i, "CoordY", Pos[1]);
  33. SetPVarFloat(i, "CoordZ", Pos[2]);
  34. mpstarted = 1;
  35. SetTimer("MPOFF", 120000, false);
  36. }
  37. format(YCMDstr, sizeof(YCMDstr), "[Averange-RP] Administratori {FF0000}%s {FFFFFF}Atarebs Events. Tu Gsurt Eventze Monawileobis Migeba Daweret: /goevent",Name(playerid));
  38. SendClientMessageToAll(COLOR_WHITE, YCMDstr);
  39. return 1;
  40. }
  41. //case-ebtan
  42. case 20055:
  43. {
  44. if(!response) return true;
  45. switch(listitem)
  46. {
  47. case 0:
  48. {
  49. ShowPlayerDialogEx(playerid, 20056, DIALOG_STYLE_INPUT, "Daweret Iaragis ID", "Chaweret ID\n24 - Deagle, 25 - Shotgun\n31-M4 30-AK47 29-M5","Micema","Gauqmeba");
  50. return true;
  51. }
  52. case 1:
  53. {
  54. foreach(new i:Player)
  55. {
  56. new Float:x,Float:y,Float:z;
  57. GetPlayerPos(playerid, x,y,z);
  58. if(GetDistanceBetweenPlayers(playerid,i) < 50 )
  59. {
  60. SetPlayerHealthAC(i, 100);
  61. SendClientMessage(i, COLOR_LIGHTRED, "Administratorma Shegivsot Sicocxle");
  62. }
  63. }
  64. }
  65. case 2:
  66. {
  67. foreach(new i:Player)
  68. {
  69. new Float:x,Float:y,Float:z;
  70. GetPlayerPos(playerid, x,y,z);
  71. if(GetDistanceBetweenPlayers(playerid,i) < 50 )
  72. {
  73. ResetWeapons(i);
  74. SendClientMessage(i, COLOR_LIGHTRED, "Administratorma Wagartvat Iaragi");
  75. }
  76. }
  77. }
  78. }
  79. return true;
  80. }
  81. case 20056:
  82. {
  83. if(!response) return true;
  84. if(!strlen(inputtext)) return ShowPlayerDialogEx(playerid, 20056, DIALOG_STYLE_INPUT, "Daweret Iaragis ID", "Chaweret ID\n24 - Deagle, 25 - Shotgun\n31-M4 30-AK47 29-M5","Micema","Gauqmeba");
  85. switch(strval(inputtext)) { case 35..40,9,16,18,26,45,44,22,32,28,27: return SendClientMessage(playerid, COLOR_GRAD1, "Akrdzaluli Iaragi"); }
  86. foreach(new i:Player)
  87. {
  88. new Float:x,Float:y,Float:z;
  89. GetPlayerPos(playerid, x,y,z);
  90. if(GetDistanceBetweenPlayers(playerid,i) < 50 )
  91. {
  92. GivePlayerServerWeapon(i, strval(inputtext), 1000);
  93. SendClientMessage(i, COLOR_LIGHTRED, "Administratorma Gadmogcat Iaragi");
  94. }
  95. }
  96. }
RAW Paste Data