Guest User

PM System Made by Superhot

a guest
Oct 6th, 2013
430
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.37 KB | None | 0 0
  1. /* Private Message Filterscript by Ponii
  2. Feel free to edit the script, but please don't remove the credits*/
  3.  
  4. #include <a_samp>
  5. #include <sscanf2>
  6. #include <zCmd>
  7.  
  8. #define green 0x33FF33AA
  9. #define red 0xFF0000AA
  10. #define yellow 0xFFFF00AA
  11. #define cblue "{0087FF}"
  12. #define cwhite "{FFFFFF}"
  13. new DND[MAX_PLAYERS];
  14. new LastPm[MAX_PLAYERS];
  15.  
  16. #if defined FILTERSCRIPT
  17.  
  18. public OnFilterScriptInit()
  19. {
  20. print("\n--------------------------------------");
  21. print(" Private Message Filterscript by Superhot");
  22. print("--------------------------------------\n");
  23. return 1;
  24. }
  25.  
  26. #else
  27.  
  28. main()
  29. {
  30. print("\n----------------------------------");
  31. print(" Private Message Filterscript by Superhot");
  32. print("----------------------------------\n");
  33. }
  34.  
  35. #endif
  36.  
  37. public OnPlayerConnect(playerid)
  38. {
  39. DND[playerid] = 0;
  40. return 1;
  41. }
  42.  
  43. CMD:dnd(playerid, params[])
  44. {
  45. if(DND[playerid] == 0)
  46. {
  47. DND[playerid] = 1;
  48. SendClientMessage(playerid, green,"DND mode has been enabled.");
  49. }
  50. else if(DND[playerid] == 1)
  51. {
  52. DND[playerid] = 0;
  53. SendClientMessage(playerid, red,"DND mode has been disabled.");
  54. }
  55. return 1;
  56. }
  57. stock PlayerName(playerid)
  58. {
  59. new pName[MAX_PLAYER_NAME];
  60. GetPlayerName(playerid, pName, sizeof(pName));
  61. return pName;
  62. }
  63. CMD:pm(playerid, params[])
  64. {
  65. new str[128], str2[128], id;
  66. if(sscanf(params,"ds[128]", id, str2)) return SendClientMessage(playerid, red,"USAGE: /pm [id] [message]");
  67. if(IsPlayerConnected(id))
  68. {
  69. if(id != playerid)
  70. {
  71. if(DND[id] == 0)
  72. {
  73. format(str, sizeof(str),"PM to %s: %s", PlayerName(id), str2);
  74. SendClientMessage(playerid, yellow, str);
  75. format(str, sizeof(str),"PM from %s: %s", PlayerName(playerid), str2);
  76. SendClientMessage(id, yellow, str);
  77. SendClientMessage(id, -1,"Use "cblue"/reply [message] "cwhite"to reply to this PM, If you want to block incoming PM's use "cblue"/dnd");
  78. PlayerPlaySound(id,1057,0.0,0.0,0.0);
  79. LastPm[id] = playerid;
  80. }
  81. else return SendClientMessage(playerid, red,"PM failed. That player is in do not disturb mode!");
  82. }
  83. else return SendClientMessage(playerid, red,"You cannot PM yourself!");
  84. }
  85. else return SendClientMessage(playerid, red,"Player is not connected");
  86. return 1;
  87. }
  88. CMD:reply(playerid, params[])
  89. {
  90. new str[128], str2[128], adminstr[128];
  91. if(sscanf(params,"s[128]", str2)) return SendClientMessage(playerid, red,"USAGE: /reply [message]");
  92. new id = LastPm[playerid];
  93. if(IsPlayerConnected(id))
  94. {
  95. if(DND[id] == 0)
  96. {
  97. format(str, sizeof(str),"PM to %s: %s", PlayerName(id), str2);
  98. SendClientMessage(playerid, yellow, str);
  99. format(str, sizeof(str),"PM from %s: %s", PlayerName(playerid), str2);
  100. SendClientMessage(id, yellow, str);
  101. SendClientMessage(id, -1,"Use "cblue"/reply [message] "cwhite"to reply to this PM, If you want to block incoming PM's use "cblue"/dnd");
  102. PlayerPlaySound(id,1057,0.0,0.0,0.0);
  103. format(adminstr, sizeof(adminstr),"PM from %s[%d] to %s[%d]:%s", PlayerName(playerid), playerid, PlayerName(id), id, str2);
  104. LastPm[LastPm[playerid]] = playerid;
  105. }
  106. else return SendClientMessage(playerid, red,"That player is in do not disturb mode!");
  107. }
  108. else return SendClientMessage(playerid, red,"Player is not connected");
  109. return 1;
  110. }
Advertisement
Add Comment
Please, Sign In to add comment