Guest User

Fixed Version

a guest
Oct 5th, 2012
184
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.90 KB | None | 0 0
  1. //======================|======================================|
  2. // ADMIN CONTROL PANEL | To view admin control panel you need |
  3. // CREDITS: .:[XpLoR]:. | to be logged in as RCON, after this |
  4. // I HOPE YOU LIKE THIS | press on a player from the TAB list |
  5. //======================|======================================|
  6. #include < a_samp > //Thanx Kalocor
  7. #define CONTROLPANEL 9998
  8. #define COLOR 0x008000FF
  9.  
  10. new UserClicked[MAX_PLAYERS]; //This is a definition which goes over more than 1 public function.
  11.  
  12. main()
  13. {
  14. print("===== xAdminControlPanel Loaded =====");
  15. }
  16.  
  17.  
  18. public OnPlayerClickPlayer(playerid, clickedplayerid, source)
  19. {
  20. if(IsPlayerAdmin(playerid))
  21. {
  22. ShowPlayerDialog(playerid,CONTROLPANEL,DIALOG_STYLE_LIST,"{D17300}x{F81414}Admin ControlPanel", "{F81414}Kick\n{D17300}Ban\n{F81414}Freeze\n{D17300}UnFreeze\n{F81414}Slap\n{D17300}Set Money 999999999\n{F81414}Set Money 0\n{D17300}Set Score 999999\n{F81414}Set Score 0\n{D17300}Kill","{FFFFFF}Choose","{FFFFFF}Close");
  23. UserClicked[playerid] = clickedplayerid; //We store the clicked ID into the player's variable.
  24. }
  25. else
  26. {
  27. new Error[2042];
  28. strcat(Error,"{F81414}I'm Sorry, You aren't a RCON Admin to acces Control Panel!");
  29. ShowPlayerDialog(playerid, 12000, DIALOG_STYLE_MSGBOX, "{F81414}I'm Sorry", Error, "OK", "");
  30. }
  31. return 1;
  32. }
  33. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  34. {
  35. if(dialogid == CONTROLPANEL)
  36. {
  37. if(response)
  38. {
  39. if(listitem == 0)
  40. {
  41. SendClientMessage(UserClicked[playerid], COLOR, "{F81414}You Have Been Kicked!");
  42. Kick(UserClicked[playerid]);
  43. new KickDialog[2042];
  44. format(KickDialog, sizeof(KickDialog), "{F81414}You Have Kicked {00C0FF}%s", KickDialog, UserClicked[playerid]);
  45. ShowPlayerDialog(playerid, 12000, DIALOG_STYLE_MSGBOX, "{F81414}{F81414}Kicked", KickDialog, "OK", "");
  46. }
  47. if(listitem == 1)
  48. {
  49. SendClientMessage(UserClicked[playerid], COLOR, "{F81414}You Have Been Banned!");
  50. Ban(UserClicked[playerid]);
  51. new BanDialog[2042];
  52. format(BanDialog, sizeof(BanDialog), "{F81414}You Have Banned {00C0FF}%s", BanDialog, UserClicked[playerid]);
  53. ShowPlayerDialog(playerid, 12000, DIALOG_STYLE_MSGBOX, "{F81414}Banned", BanDialog, "OK", "");
  54. }
  55. if(listitem == 2)
  56. {
  57. SendClientMessage(UserClicked[playerid], COLOR, "{F81414}You Have Been Frozen!");
  58. new FreezeDialog[2042];
  59. format(FreezeDialog, sizeof(FreezeDialog), "{F81414}You Have Freezed {00C0FF}%s", FreezeDialog, UserClicked[playerid]);
  60. ShowPlayerDialog(playerid, 12000, DIALOG_STYLE_MSGBOX, "{F81414}Freezed", FreezeDialog, "OK", "");
  61. }
  62. if(listitem == 3)
  63. {
  64. SendClientMessage(UserClicked[playerid], COLOR, "{F81414}You Have Been UnFrozen!");
  65. new UnFreezeDialog[2042];
  66. format(UnFreezeDialog, sizeof(UnFreezeDialog), "{F81414}You Have UnFreezed {00C0FF}%s", UnFreezeDialog, UserClicked[playerid]);
  67. ShowPlayerDialog(playerid, 12000, DIALOG_STYLE_MSGBOX, "{F81414}UnFreezed", UnFreezeDialog, "OK", "");
  68. }
  69. if(listitem == 4)
  70. {
  71. SendClientMessage(UserClicked[playerid], COLOR, "{F81414}You Have Been Slapped!");
  72. SetPlayerHealth(UserClicked[playerid], 1);
  73. new SlapDialog[2042];
  74. format(SlapDialog, sizeof(SlapDialog), "{F81414}You Have Slaped {00C0FF}%s", SlapDialog, UserClicked[playerid]);
  75. ShowPlayerDialog(playerid, 12000, DIALOG_STYLE_MSGBOX, "{F81414}Slaped", SlapDialog, "OK", "");
  76. }
  77. if(listitem == 5)
  78. {
  79. SendClientMessage(UserClicked[playerid], COLOR, "{F81414}Your money has been set to $999.999.999");
  80. ResetPlayerMoney(UserClicked[playerid]);
  81. GivePlayerMoney(UserClicked[playerid], 999999999);
  82. new Money9Dialog[2042];
  83. format(Money9Dialog, sizeof(Money9Dialog), "{F81414}You Set {00C0FF}%s{F81414}'s Money to $999.999.999", Money9Dialog, UserClicked[playerid]);
  84. ShowPlayerDialog(playerid, 12000, DIALOG_STYLE_MSGBOX, "{F81414}Money $999.999.999", Money9Dialog, "OK", "");
  85. }
  86. if(listitem == 6)
  87. {
  88. SendClientMessage(UserClicked[playerid], COLOR, "{F81414}Your money has been set to $0!");
  89. ResetPlayerMoney(UserClicked[playerid]);
  90. new Money0Dialog[2042];
  91. format(Money0Dialog, sizeof(Money0Dialog), "{F81414}You Set {00C0FF}%s{F81414}'s Money to $0", Money0Dialog, UserClicked[playerid]);
  92. ShowPlayerDialog(playerid, 12000, DIALOG_STYLE_MSGBOX, "{F81414}Money $0", Money0Dialog, "OK", "");
  93. }
  94. if(listitem == 7)
  95. {
  96. SendClientMessage(UserClicked[playerid], COLOR, "{F81414}Your score has been set to 999999!");
  97. SetPlayerScore(UserClicked[playerid], 999999);
  98. new Score9Dialog[2042];
  99. format(Score9Dialog, sizeof(Score9Dialog), "{F81414}You Set {00C0FF}%s{F81414}'s Scre to 999999", Score9Dialog, UserClicked[playerid]);
  100. ShowPlayerDialog(playerid, 12000, DIALOG_STYLE_MSGBOX, "{F81414}Score 999999", Score9Dialog, "OK", "");
  101. }
  102. if(listitem == 9)
  103. {
  104. SendClientMessage(UserClicked[playerid], COLOR, "{F81414}Your score has been set to 0");
  105. SetPlayerScore(UserClicked[playerid], 0);
  106. new Score0Dialog[2042];
  107. format(Score0Dialog, sizeof(Score0Dialog), "{F81414}You Set {00C0FF}%s{F81414}'s Score at 0", Score0Dialog, UserClicked[playerid]);
  108. ShowPlayerDialog(playerid, 12000, DIALOG_STYLE_MSGBOX, "{F81414}Score 0", Score0Dialog, "OK", "");
  109. }
  110. if(listitem == 10)
  111. {
  112. SendClientMessage(UserClicked[playerid], COLOR, "{F81414}You Have Been Killed!");
  113. SetPlayerHealth(UserClicked[playerid], 0);
  114. new KillDialog[2042];
  115. format(KillDialog, sizeof(KillDialog), "{F81414}You Have Killed {00C0FF}%s", KillDialog, UserClicked[playerid]);
  116. ShowPlayerDialog(playerid, 12000, DIALOG_STYLE_MSGBOX, "{F81414}Score 0", KillDialog, "OK", "");
  117. }
  118. }
  119. }
  120. }
Advertisement
Add Comment
Please, Sign In to add comment