Advertisement
Brucord-Xloxn1296

Whois Command | By Xloxn#4050

Oct 5th, 2022 (edited)
1,253
1
Never
1
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Ruby 5.32 KB | None | 1 0
  1. $nomention
  2. $c[
  3. // ⚠️ For normal triggered commands just make the trigger as your prefix
  4.  
  5. // ⚠️ If you want to make this a slash simply follow these directions below!
  6.  
  7. ➡️ Trigger Settings:
  8.  
  9. Slash Trigger: /whois (optional, put this to anything you want!)
  10.  
  11. Slash Description: Get information on a user! (optional, put this to anything you want!)
  12.  
  13. ➡️ Options: (1/1)
  14.  
  15. Option Name: user
  16. Option Description: Who do you want to get info on?
  17. Option Type: User
  18.  
  19. Once you’re finished with this you’re all done!]
  20.  
  21. $if[$or[$checkContains[$toLowercase[$message[1]];whois]==true;$isSlash==true]==true]
  22.  
  23.  
  24. $if[$isSlash==true]
  25. $defer
  26. $var[user;$findUser[$message[user];yes]]
  27. $else
  28. $var[user;$findUser[$replaceText[$message;$message[1] ;-1];yes]]
  29. $endif
  30.  
  31. $authorIcon[$userAvatar[$var[user]]]
  32. $author[$username[$var[user]]#$discriminator[$var[user]]]
  33. $description[<@$var[user]>]
  34.  
  35. $try
  36. $addField[Joined;$userJoined[$var[user];Mon, Jan 2, 2006 3:04 PM];yes]
  37. $catch
  38. $endtry
  39.  
  40. $try
  41. $addField[Registered;$userJoinedDiscord[$var[user];Mon, Jan 2, 2006 3:04 PM];yes]
  42. $catch
  43. $endtry
  44.  
  45.  
  46. $try
  47. $if[$userRoles[$var[user]]!=]
  48. $textSplit[$userRoles[$var[user]];
  49. ]
  50. $var[roles;$getTextSplitLength]
  51. $textSplit[$userRoles[$var[user]];
  52. ]
  53. $if[$charCount[$userRoles[$authorID]]!=0]
  54. $var[n;1]
  55. $var[a;$eval[$replaceText[$cropText[$repeatMessage[10;$repeatMessage[10;$repeatMessage[10;a]]];$getTextSplitLength;];a;<@&%{DOL}%findRole[%{DOL}%splitText[%{DOL}%var[n%ESCAPED%%ESCAPED%%ESCAPED%> %{DOL}%var[n%{-SEMICOL-}%%{DOL}%sum[%{DOL}%var[n%ESCAPED%%{-SEMICOL-}%1%ESCAPED%%ESCAPED%;-1]]]
  56.  
  57. $textSplit[$userRoles[$var[user]];
  58. ]
  59.  
  60. $if[$var[roles]==1]
  61. $addField[Roles [$var[roles]\];
  62. <@&$findRole[$splitText[1]]>]
  63. $else
  64. $addField[Roles [$var[roles]\];
  65. $cropText[$var[a];$sub[$charCount[$var[a]];0];]]
  66. $endif
  67.  
  68. $endif
  69. $endif
  70. $catch
  71. $endtry
  72.  
  73. $thumbnail[$userAvatar[$var[user]]]
  74. $footer[ID: $var[user]]
  75. $addTimestamp
  76.  
  77. $var[keyperms;$trimSpace[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$toTitleCase[$replaceText[$toLowercase[$userPerms[$var[user];-1;, ], ];_; ;-1]];Use External Emojis, ;;-1];Use External Stickers, ;;-1];Connect ,;;-1];Request To Speak, ;;-1];Use Vad, ;;-1];Use Application Commands, ;;-1];Create Public Threads, ;;-1];Send Messages In Threads, ;;-1];Manage Emojis And Stickers, ;;-1];Connect, ;;-1];Speak, ;;-1];Move Members, ;;-1];Read Message History, ;;-1];Create Instant Invite, ;;-1];Send Tts Messages, ;;-1];Embed Links, ;;-1];View Guild Insights, ;;-1];Manage Events, ;;-1];Priority Speaker, ;;-1];Stream, ;;-1];Add Reactions, ;;-1];Mute Members, ;;-1];Deafen Members, ;;-1];Manage Threads, ;;-1];View Audit Log, ;;-1];Attach Files, ;;-1];Manage Guild, ;;-1];Create Private Threads, ;;-1];Change Nickname, ;;-1];Manage Webhooks, ;;-1]]]
  78.  
  79. $var[keyperms;$trimSpace[$var[keyperms]]]
  80.  
  81. $var[keyperms;$cropText[$var[keyperms];$sub[$charCount[$var[keyperms]];1];]]
  82.  
  83. $try
  84. $addField[Key Permissions;$var[keyperms]]
  85. $catch
  86. $endtry
  87.  
  88. $if[$serverOwner==$var[user]]
  89. $var[Acknowledgements;Server Owner]
  90. $elseif[$checkUserPerms[$var[user];manageserver]==true]
  91. $var[Acknowledgements;Server Admin]
  92. $elseif[$checkUserPerms[$var[user];admin]==true]
  93. $var[Acknowledgements;Administrator]
  94. $elseif[$or[$checkUserPerms[$var[user];kick]==true;$checkUserPerms[$var[user];ban]==true;$checkUserPerms[$var[user];managemessages]==true;$checkUserPerms[$var[user];moderatemembers]==true]==true]
  95. $var[Acknowledgements;Moderator]
  96. $elseif[$and[$checkUserPerms[$var[user];admin;ban;kick]==false;$checkUserPerms[$var[user];sendmessages]==true]==true]
  97. $var[Acknowledgements;Normal Member]
  98. $elseif[$checkUserPerms[$var[user];sendmessages]==false]
  99. $var[Acknowledgements;Normal Member]
  100. $else
  101. $var[Acknowledgements;Normal Member]
  102. $endif
  103.  
  104.  
  105. $addField[Acknowledgements;
  106. $var[Acknowledgements]
  107. ]
  108.  
  109. $textSplit[$userRoles[$var[user]];
  110. ]
  111.  
  112. $try
  113. $if[$getRoleColor[$highestRole[$var[user]]]!=0]
  114. $color[$getRoleColor[$highestRole[$var[user]]]]
  115. $else
  116. $if[$getRoleColor[$findRole[$splitText[1]]]!=0]
  117. $color[$getRoleColor[$findRole[$splitText[1]]]]
  118. $elseif[$getRoleColor[$findRole[$splitText[2]]]!=0]
  119. $color[$getRoleColor[$findRole[$splitText[2]]]]
  120. $elseif[$getRoleColor[$findRole[$splitText[3]]]!=0]
  121. $color[$getRoleColor[$findRole[$splitText[3]]]]
  122. $elseif[$getRoleColor[$findRole[$splitText[4]]]!=0]
  123. $color[$getRoleColor[$findRole[$splitText[4]]]]
  124. $elseif[$getRoleColor[$findRole[$splitText[5]]]!=0]
  125. $color[$getRoleColor[$findRole[$splitText[5]]]]
  126. $elseif[$getRoleColor[$findRole[$splitText[6]]]!=0]
  127. $color[$getRoleColor[$findRole[$splitText[6]]]]
  128. $elseif[$getRoleColor[$findRole[$splitText[7]]]!=0]
  129. $color[$getRoleColor[$findRole[$splitText[7]]]]
  130. $elseif[$getRoleColor[$findRole[$splitText[8]]]!=0]
  131. $color[$getRoleColor[$findRole[$splitText[8]]]]
  132. $elseif[$getRoleColor[$findRole[$splitText[9]]]!=0]
  133. $color[$getRoleColor[$findRole[$splitText[9]]]]
  134. $elseif[$getRoleColor[$findRole[$splitText[10]]]!=0]
  135. $color[$getRoleColor[$findRole[$splitText[10]]]]
  136. $else
  137. $color[#2f3136]
  138. $endif
  139. $endif
  140. $catch
  141. $color[#2f3136]
  142. $endtry
  143.  
  144.  
  145. $endif
Advertisement
Comments
Add Comment
Please, Sign In to add comment
Advertisement