Advertisement
otfr

ModPanelOnInteraction

Feb 18th, 2024 (edited)
1,560
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 10.04 KB | Source Code | 0 0
  1. $var[su;43B581] $c[Success embed color]
  2. $var[er;F04947] $c[Error embed color]
  3. $var[nm;2b2d31] $c[Normal embed color]
  4.  
  5. $nomention
  6. $if[$checkContains[$customID;~Timeout-$authorID]==true]
  7. $textSplit[$customID;~]
  8. $if[$findUser[$splitText[<];no]!=]
  9. $newModal[TOModal;Timeout]
  10. $addTextInput[time;short;Timeout Duration (Note: 28 days is max);1;10;no;30s;10m]
  11. $addTextInput[userID;short;User ID;1;30;no;$splitText[<]; ]
  12. $else
  13. $ephemeral
  14. $removeButtons
  15. $addField[Timeout Failed; Invalid user ID.]
  16. $color[$var[er]]
  17. $endif
  18. $endif
  19. $try
  20. $if[$customID==TOModal]
  21. $if[$userExists[$input[userID]]==false]
  22. $addField[Timeout Failed; Invalid user ID.]
  23. $color[$var[er]]
  24. $elseif[$userExists[$input[userID]]==true]
  25. $if[$checkUserPerms[$botID;moderatemembers]==false]
  26. $addField[Timeout Failed;$username[$botID] needs permission to Timeout members]
  27. $color[$var[er]]
  28. $elseif[$checkUserPerms[$input[userID];admin]==true]
  29. $addField[Timeout Failed;Admins can't be timed out]
  30. $color[$var[er]]
  31. $elseif[$checkUserPerms[$authorID;moderatemembers]==false]
  32. $addField[Timeout Failed;You need "Timeout" permission to use this command]
  33. $color[$var[er]]
  34. $elseif[$input[userID]==$authorID]
  35. $addField[Timeout Failed;You can't Timeout yourself]
  36. $color[$var[er]]
  37. $elseif[$input[userID]==$botID]
  38. $addField[Timeout Failed;$username[$botID] can't Timeout itself]
  39. $color[$var[er]]
  40. $elseif[$input[userID]==$serverOwner]
  41. $addField[Timeout Failed;You can't Timeout the server owner]
  42. $color[$var[er]]
  43. $elseif[$rolePosition[$highestRole[$input[userID]]]>=$rolePosition[$highestRole[$authorID]]]
  44. $addField[Timeout Failed;This user has higher or same role position as you]
  45. $color[$var[er]]
  46. $elseif[$rolePosition[$highestRole[$input[userID]]]>=$rolePosition[$highestRole[$botID]]]
  47. $addField[Timeout Failed;This user has higher or same role position as $username[$botID]]
  48. $color[$var[er]]
  49. $else
  50. $timeout[$input[time];$input[userID]]
  51. $if[$isTimedOut[$input[userID]]==true]
  52. $addField[Timeout Successful;User - $username[$input[userID]] / $input[userID]
  53. Duration - $input[time]
  54. Moderater - <@$authorID> / $authorID]
  55. $color[$var[su]]
  56. $endif
  57. $endif
  58. $endif
  59. $endif
  60. $catch
  61. $addField[Timeout Failed; Invalid Time!
  62. Here are some examples you could use
  63. - 10s,10m,10h,10d,2w
  64. Note:
  65. > 28 days is the maximum]
  66. $color[$var[er]]
  67. $endtry
  68. $if[$checkContains[$customID;~Kick-$authorID]==true]
  69. $textSplit[$customID;~]
  70. $if[$findUser[$splitText[<];no]!=]
  71. $newModal[KModal;Kick]
  72. $addTextInput[reason;paragraph;Kick Reason;1;40;no;;Breaking the rules!]
  73. $addTextInput[userID;short;User ID;1;30;no;$splitText[<];]
  74. $else
  75. $ephemeral
  76. $removeButtons
  77. $addField[Kick Failed; Invalid user ID.]
  78. $color[$var[er]]
  79. $endif
  80. $endif
  81. $if[$customID==KModal]
  82. $if[$userExists[$findUser[$input[userID]]]==false]
  83. $addField[Kick Failed; Invalid user ID.]
  84. $color[$var[er]]
  85. $elseif[$userExists[$findUser[$input[userID]]]==true]
  86. $if[$checkUserPerms[$botID;kick]==false]
  87. $addField[Kick Failed;$username[$botID] needs permission to Kick members]
  88. $color[$var[er]]
  89. $elseif[$checkUserPerms[$authorID;kick]==false]
  90. $addField[Kick Failed;You need "Kick" permission to use this command]
  91. $color[$var[er]]
  92. $elseif[$input[userID]==$authorID]
  93. $addField[Kick Failed;You can't kick yourself]
  94. $color[$var[er]]
  95. $elseif[$input[userID]==$botID]
  96. $addField[Kick Failed;$username[$botID] can't kick itself]
  97. $color[$var[er]]
  98. $elseif[$input[userID]==$serverOwner]
  99. $addField[Kick Failed;You can't kick the server owner]
  100. $color[$var[er]]
  101. $elseif[$rolePosition[$highestRole[$input[userID]]]<=$rolePosition[$highestRole[$authorID]]]
  102. $addField[Kick Failed;This user has higher or same role position as you]
  103. $color[$var[er]]
  104. $elseif[$rolePosition[$highestRole[$input[userID]]]<=$rolePosition[$highestRole[$botID]]]
  105. $addField[Kick Failed;This user has higher or same role position as $username[$botID]]
  106. $color[$var[er]]
  107. $else
  108. $kick[$input[userID];$input[reason] by $username[$authorID]]
  109. $nomention
  110. $addField[Kick Successful;User - $username[$input[userID]] / $input[userID]
  111. Reason - $input[reason] by $username[$authorID]
  112. Moderater - <@$authorID> / $authorID]
  113. $color[$var[su]]
  114. $endif
  115. $endif
  116. $endif
  117. $endif
  118. $if[$checkContains[$customID;~Ban-$authorID]==true]
  119. $textSplit[$customID;~]
  120. $if[$findUser[$splitText[<];no]!=]
  121. $newModal[BModal;Ban]
  122. $addTextInput[reason;paragraph;Ban Reason;1;40;no;;Breaking the rules!]
  123. $addTextInput[userID;short;User ID;1;30;no;$splitText[<];]
  124. $else
  125. $ephemeral
  126. $removeButtons
  127. $addField[Ban Failed; Invalid user ID.]
  128. $color[$var[er]]
  129. $endif
  130. $endif
  131. $if[$customID==BModal]
  132. $if[$userExists[$input[userID]]==false]
  133. $addField[Ban Failed; Invalid user ID.]
  134. $color[$var[er]]
  135. $elseif[$userExists[$input[userID]]==true]
  136. $if[$checkUserPerms[$botID;ban]==false]
  137. $addField[Ban Failed;$username[$botID] needs permission to Ban members]
  138. $color[$var[er]]
  139. $elseif[$checkUserPerms[$authorID;ban]==false]
  140. $addField[Ban Failed;You need "Ban" permission to use this command]
  141. $color[$var[er]]
  142. $elseif[$input[userID]==$authorID]
  143. $addField[Ban Failed;You can't ban yourself]
  144. $color[$var[er]]
  145. $elseif[$input[userID]==$botID]
  146. $addField[Ban Failed;$username[$botID] can't ban itself]
  147. $color[$var[er]]
  148. $elseif[$input[userID]==$serverOwner]
  149. $addField[Ban Failed;You can't ban the server owner]
  150. $color[$var[er]]
  151. $elseif[$rolePosition[$highestRole[$input[userID]]]<=$rolePosition[$highestRole[$authorID]]]
  152. $addField[Ban Failed;This user has higher or same role position as you]
  153. $color[$var[er]]
  154. $elseif[$rolePosition[$highestRole[$input[userID]]]<=$rolePosition[$highestRole[$botID]]]
  155. $addField[Ban Failed;This user has higher or same role position as $username[$botID]]
  156. $color[$var[er]]
  157. $else
  158. $banID[$input[reason] by $username[$authorID];$input[userID]]
  159. $ephemeral
  160. $removeAllComponents
  161. $addField[Ban Successful;User - $username[$input[userID]] / $input[userID]
  162. Reason - $input[reason] by $username[$authorID]
  163. Moderater - <@$authorID> / $authorID]
  164. $color[$var[su]]
  165. $endif
  166. $endif
  167. $endif
  168. $if[$checkContains[$customID;~PermsList]==true]
  169. $textSplit[$customID;~]
  170. $if[$findUser[$splitText[<];no]!=]
  171. $var[userID;$splitText[<]]
  172. $endif
  173. $nomention
  174. $ephemeral
  175. $removeAllComponents
  176. $if[$userPerms[$var[userID];-1; ]==]
  177. $addField[Permissions;None]
  178. $else
  179. $addField[Permissions;$userPerms[$var[userID];-1;, ]]
  180. $endif
  181. $color[$var[nm]]
  182. $endif
  183. $if[$customID==CloseMP-$authorID]
  184. $nomention
  185. $removeAllComponents
  186. $addField[Closing...; Closing in 3 seconds]
  187. $color[$var[er]]
  188. $deleteIn[3]
  189. $endif
  190. $nomention
  191. $if[$checkContains[$customID;~UnTO-$authorID]==true]
  192. $textSplit[$customID;~]
  193. $if[$findUser[$splitText[<];no]!=]
  194. $var[userID;$splitText[<]]
  195.  
  196. $if[$userExists[$var[userID]]==false]
  197. $addField[Remove Timeout Failed; Invalid user ID.]
  198. $color[$var[er]]
  199. $elseif[$userExists[$var[userID]]==true]
  200. $if[$checkUserPerms[$botID;moderatemembers]==false]
  201. $addField[Remove Timeout Failed;$username[$botID] needs permission to Timeout/Remove Timeout members]
  202. $color[$var[er]]
  203. $elseif[$checkUserPerms[$authorID;moderatemembers]==false]
  204. $addField[Remove Timeout Failed;You need "Timeout/Remove Timeout" permission to use this command]
  205. $color[$var[er]]
  206. $elseif[$var[userID]==$authorID]
  207. $addField[Remove Timeout Failed;You can't remove timeout for yourself]
  208. $color[$var[er]]
  209. $elseif[$var[userID]==$botID]
  210. $addField[Remove Timeout Failed;$username[$botID] can't untimeout itself]
  211. $color[$var[er]]
  212. $else
  213. $untimeout[$var[userID]]
  214. $if[$isTimedOut[$var[userID]]==false]
  215. $editButton[$var[userID]~UnTO-$authorID;Remove Timeout;success;yes;;$messageID]
  216. $ephemeral
  217. $removeAllComponents
  218. $addField[Remove Timeout Successful;User - $username[$var[userID]] / $var[userID]
  219. Moderater - <@$authorID> / $authorID]
  220. $color[$var[su]]
  221. $endif
  222. $endif
  223. $endif
  224. $endif
  225. $endif
  226.  
  227. $if[$checkContains[$customID;~UnBn-$authorID]==true]
  228. $textSplit[$customID;~]
  229. $var[userID;$splitText[<]]
  230. $if[$userExists[$var[userID]]==false]
  231. $addField[UnBan Failed; Invalid user ID.]
  232. $color[$var[er]]
  233. $elseif[$userExists[$var[userID]]==true]
  234. $if[$checkUserPerms[$botID;ban]==false]
  235. $addField[UnBan Failed;$username[$botID] needs permission to Ban members]
  236. $color[$var[er]]
  237. $elseif[$checkUserPerms[$authorID;ban]==false]
  238. $addField[UnBan Failed;You need "Ban" permission to use this command]
  239. $color[$var[er]]
  240. $elseif[$var[userID]==$botID]
  241. $addField[UnBan Failed;$username[$botID] can't unban itself]
  242. $else
  243. $unbanID[$var[userID]]
  244. $if[$isBanned[$var[userID]]==false]
  245. $editButton[$var[userID]~UnBn-$authorID;UnBan;success;yes;;$messageID]
  246. $ephemeral
  247. $removeAllComponents
  248. $addField[UnBan Successful;User - $username[$var[userID]] / $var[userID]
  249. Moderater - <@$authorID> / $authorID]
  250. $color[$var[su]]
  251. $endif
  252. $endif
  253. $endif
  254. $endif
  255. $endif
  256.  
  257. $if[$checkContains[$customID;~RolesList]==true]
  258. $textSplit[$customID;~]
  259. $if[$findUser[$splitText[<];no]!=]
  260. $var[userID;$splitText[<]]
  261. $endif
  262. $nomention
  263. $ephemeral
  264. $removeAllComponents
  265. $if[$userRoles[$var[userID]]==]
  266. $addField[Roles;None]
  267. $else
  268. $allowMention
  269. $addField[Roles;
  270. $var[separator; ]
  271. $var[sort;asc]
  272. $var[roleIDs;$trimSpace[$eval[%{DOL}%findRole[%{DOL}%url[decode\;$replaceText[$url[encode;$userRoles[$var[userID]]];%0A;\]\] %{DOL}%findRole[%{DOL}%url[decode\;]\]\]]]]
  273. $eval[%{DOL}%try%{DOL}%var[role\;$replaceText[$var[roleIDs]; ;\]%{DOL}%var[role.%{DOL}%rolePosition[%{DOL}%var[role\]\]\;%{DOL}%var[role\]\]%{DOL}%endtry %{DOL}%try%{DOL}%var[role\;]\]%{DOL}%var[role.%{DOL}%rolePosition[%{DOL}%var[role\]\]\;%{DOL}%var[role\]\]%{DOL}%endtry]
  274. $var[roles;$eval[<@&%{DOL}%var[role.$replaceText[$sort[$unescape[$eval[%{DOL}%try%{DOL}%rolePosition[$replaceText[$var[roleIDs]; ;\]%{DOL}%endtry%{DOL}%try\;%{DOL}%rolePosition[]\]%{DOL}%endtry]];$var[sort];-1; ]; ;\]>$var[separator]<@&%{DOL}%var[role.]\]>]]
  275. $var[roles]]
  276. $endif
  277. $color[$var[nm]]
  278. $endif
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement