Advertisement
otfr

User Info

May 19th, 2024
114
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
VBScript 3.71 KB | Source Code | 0 0
  1. $nomention
  2. $var[nm;2b2d31] $c[Normal color]
  3. $nomention
  4. $try
  5. $if[$isSlash==true]
  6. $var[id;$findUser[$message[user];true]]
  7. $else
  8. $var[id;$findUser[$message;true]]
  9. $endif
  10. $title[User Info]
  11. $addField[User;<@$var[id]>, $username[$var[id]]#$discriminator[$var[id]]]
  12. $addField[User ID;$var[id]]
  13. $addField[Status;Type: $getUserStatus[$var[id]]
  14. Info: $getCustomStatus[$var[id]]]
  15. $if[$userBadges[$var[id]]==]
  16. $addField[Badges;$if[$isBot[$var[id]]==true]<:normalbot:1223348866389381210>$elseNone$endif]
  17. $else
  18. $addField[Badges;$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$userBadges[$var[id];];hype_squad_balance;<:Balance:1222928841966751765>];hype_squad_brilliance;<:Brilliance:1222928892923478068>];hype_squad_bravery;<:Bravery:1222928934086246571>];verified_bot;<:Verified:1222965618878451832><:Bot:1222965665623834735>];hype_squad;<:hype_squad:1222965790136074301>];bug_hunter_level_2;<a:bug_hunter_level_2:1222965828509630535>];bug_hunter_level_1;<a:bug_hunter_level_1:1222965884625354853>];partner;<a:partner:1222966150103564479>];verified_developer;<:verified_developer:1222966185209892964>];staff;<a:staff:1222966265468026911>];certified_moderator;<a:mod:1222968914322133104>];active_developer;<a:active_developer:1222969026578354216>];premium_early_supporter;<:premium_early_supporter:1222969153355518043>]]
  19. $endif
  20. $if[$hypesquad[$var[id]]==]
  21. $addField[HypeSquad;None]
  22. $else
  23. $addField[HypeSquad;$replaceText[$replaceText[$replaceText[$hypesquad[$var[id]];balance;Balance <:Balance:1222928841966751765>];brilliance;Brilliance <:Brilliance:1222928892923478068>];bravery;Bravery <:Bravery:1222928934086246571>]]
  24. $endif
  25. $color[$var[nm]]
  26. $addButton[no;$var[id]-userRolesList-$authorID;Roles;primary;yes]
  27. $addButton[no;$var[id]-userPermsList-$authorID;Permissions;primary]
  28. $addButton[yes;$userServerAvatar[$var[id]]?size=2048;Download Avatar;link]
  29.  
  30. $allowMention
  31. $addField[Joined Discord;$creationDate[$var[id];Mon Jan 02, 2006 at 3:04PM]]
  32. $try$addField[Joined Server;0$userJoined[$var[id];Mon Jan 02, 2006 at 3:04PM]] $endtry
  33. $image[$userServerAvatar[$var[id]]?size=4096]
  34. $thumbnail[$userAvatar[$var[id]]]
  35. $if[$and[$var[id]==$serverOwner;$var[id]==$botOwnerID]]
  36. $addField[Acknowledgments;Server Owner, Server Admin, Bot Owner/Developer]
  37. $elseif[$var[id]==$serverOwner]
  38. $addField[Acknowledgments;Server Owner, Server Admin]
  39. $elseif[$and[$var[id]==$botOwnerID;$isAdmin[$var[id]]==true]]
  40. $addField[Acknowledgments;Bot Owner/Developer, Server Admin]
  41. $elseif[$isAdmin[$var[id]]==true]
  42. $addField[Acknowledgements;Server Admin]
  43. $elseif[$var[id]==$botOwnerID]
  44. $addField[Acknowledgments;Bot Owner]
  45. $else
  46. $endif
  47. $if[$userRoles[$var[id]]==]
  48. $addField[User Roles;None]
  49. $else
  50. $addField[User Roles;
  51. $var[user;$var[id]]
  52. $var[separator;
  53. ]
  54. $var[sort;asc]
  55.  
  56. $var[roleIDs;$trimSpace[$eval[%{DOL}%findRole[%{DOL}%url[decode\;$replaceText[$url[encode;$userRoles[$var[user]]];%0A;\]\] %{DOL}%findRole[%{DOL}%url[decode\;]\]\]]]]
  57. $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]
  58. $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.]\]>]]
  59. $var[roles]]
  60. $endif
  61. $if[$userBanner[$var[id]]!=]
  62. $try
  63. $image[$userBanner[$var[id]];2]
  64. $endtry
  65.  
  66. $try
  67. $color[$var[nm];2]
  68. $description[**Banner**;2]
  69. $endtry
  70. $endif
  71. $catch
  72. $endtry
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement