Tutorials_for_BDFD

Hang man EN

Oct 26th, 2022 (edited)
305
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.82 KB | None | 0 0
  1. Code 1 : hangman
  2. -----------------
  3. $nomention
  4. $botTyping
  5. $reply
  6. $var[level;$randomText[E;M]]
  7.  
  8. $httpPost[https://rpchangman.herokuapp.com/api/start/;{ "difficulty": "$var[level]" }]
  9. $httpPost[https://rpchangman.herokuapp.com/api/guess/;{ "id": "$httpResult[id]", "guess": "z" }]
  10. $textSplit[$httpResult[max_guesses];.]
  11. $var[color;ff8888]
  12. $var[board;$httpResult[board]]
  13. $var[rem;$sub[$splitText[1];$charCount[$httpResult[missed_letters]]] misses remaining!]
  14. $title[🏟️ • HangMan]
  15. $footer[$var[rem] • Level : $replaceText[$replaceText[$replaceText[$httpResult[difficulty];E;🐣 Easy;1];M;🐶 Normal;1];H;😈 Hard;1]]
  16. $color[$var[color]]
  17. $addField[📋 BOARD • Clue : $replaceText[$replaceText[$checkCondition[$multi[$charCount[$httpResult[missed_letters]];2]>=$splitText[1]];true;||*$httpResult[secret_set]*||;1];false;*After $sub[$divide[$splitText[1];2];$charCount[$httpResult[missed_letters]]] mistake(s).*;1];$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[$toLowercase[$var[board]];a;🇦 ;-1];b;🇧 ;-1];c;🇨 ;-1];d;🇩 ;-1];e;🇪 ;-1];f;🇫 ;-1];g;🇬 ;-1];h;🇭 ;-1];i;🇮 ;-1];j;🇯 ;-1];k;🇰 ;-1];l;🇱 ;-1];m;🇲 ;-1];n;🇳 ;-1];o;🇴 ;-1];p;🇵 ;-1];q;🇶 ;-1];r;🇷 ;-1];s;🇸 ;-1];t;🇹 ;-1];u;🇺 ;-1];v;🇻 ;-1];w;🇼 ;-1];x;🇽 ;-1];y;🇾 ;-1];z;🇿 ;-1];_;❔ ;-1];no]
  18.  
  19. $addButton[yes;hangman@a@$httpResult[id]@$authorID;A;secondary;no;]
  20. $addButton[no;hangman@b@$httpResult[id]@$authorID;B;secondary;no;]
  21. $addButton[no;hangman@c@$httpResult[id]@$authorID;C;secondary;no;]
  22. $addButton[no;hangman@d@$httpResult[id]@$authorID;D;secondary;no;]
  23. $addButton[no;hangman@e@$httpResult[id]@$authorID;E;secondary;no;]
  24.  
  25. $addButton[yes;hangman@f@$httpResult[id]@$authorID;F;secondary;no;]
  26. $addButton[no;hangman@g@$httpResult[id]@$authorID;G;secondary;no;]
  27. $addButton[no;hangman@h@$httpResult[id]@$authorID;H;secondary;no;]
  28. $addButton[no;hangman@i@$httpResult[id]@$authorID;I;secondary;no;]
  29. $addButton[no;hangman@j@$httpResult[id]@$authorID;J;secondary;no;]
  30.  
  31. $addButton[yes;hangman@k@$httpResult[id]@$authorID;K;secondary;no;]
  32. $addButton[no;hangman@l@$httpResult[id]@$authorID;L;secondary;no;]
  33. $addButton[no;hangman@m@$httpResult[id]@$authorID;M;secondary;no;]
  34. $addButton[no;hangman@n@$httpResult[id]@$authorID;N;secondary;no;]
  35. $addButton[no;hangman@o@$httpResult[id]@$authorID;O;secondary;no;]
  36.  
  37. $addButton[yes;hangman@p@$httpResult[id]@$authorID;P;secondary;no;]
  38. $addButton[no;hangman@q@$httpResult[id]@$authorID;Q;secondary;no;]
  39. $addButton[no;hangman@r@$httpResult[id]@$authorID;R;secondary;no;]
  40. $addButton[no;hangman@s@$httpResult[id]@$authorID;S;secondary;no;]
  41. $addButton[no;hangman@t@$httpResult[id]@$authorID;T;secondary;no;]
  42.  
  43. $addButton[yes;hangman@u@$httpResult[id]@$authorID;U;secondary;no;]
  44. $addButton[no;hangman@v@$httpResult[id]@$authorID;V;secondary;no;]
  45. $addButton[no;hangman@w@$httpResult[id]@$authorID;W;secondary;no;]
  46. $addButton[no;hangman@x@$httpResult[id]@$authorID;X;secondary;no;]
  47. $addButton[no;hangman@y@$httpResult[id]@$authorID;Y;secondary;no;]
  48.  
  49.  
  50. code 2 : $onInteraction
  51. ---------------------
  52. $nomention
  53. $if[$checkContains[$customID;hangman]==true]
  54. $if[$checkContains[$customID;$authorID]==true]
  55. $async[get button]
  56. $textSplit[$customID;@]
  57. $var[letter;$splitText[2]]
  58. $var[id;$splitText[3]]
  59. $endasync
  60. $await[get button]
  61. $httpPost[https://rpchangman.herokuapp.com/api/guess/;{ "id": "$var[id]", "guess": "$var[letter]" }]
  62. $textSplit[$httpResult[max_guesses];.]
  63. $if[$httpResult[is_done]==false]
  64. 🕐 **Game ongoing.**
  65. $var[color;ff8888]
  66. $var[board;$httpResult[board]]
  67. $var[rem;$sub[$splitText[1];$charCount[$httpResult[missed_letters]]] misses remaining!]
  68. $elseif[$httpResult[is_done]==true]
  69. $removeButtons
  70. $if[$httpResult[result]==W]
  71. 🟩 **You won!**
  72. $var[color;BFF4A0]
  73. $var[board;$httpResult[secret_word]]
  74. $var[rem;$sub[$splitText[1];$charCount[$httpResult[missed_letters]]] misses remaining!]
  75. $elseif[$httpResult[result]==L]
  76. 🟥 **You Lost!**
  77. $var[color;F45353]
  78. $var[board;$httpResult[secret_word]]
  79. $var[rem;$sub[$splitText[1];$charCount[$httpResult[missed_letters]]] misses remaining!]
  80. $endif
  81. $endif
  82. $title[🏟️ • HangMan]
  83. $footer[$var[rem] • Level : $replaceText[$replaceText[$replaceText[$httpResult[difficulty];E;🐣 Easy;1];M;🐶 Normal;1];H;😈 Hard;1]]
  84. $color[$var[color]]
  85. $addField[📋 BOARD • Clue : $replaceText[$replaceText[$checkCondition[$multi[$charCount[$httpResult[missed_letters]];2]>=$splitText[1]];true;||*$httpResult[secret_set]*||;1];false;*After $sub[$divide[$splitText[1];2];$charCount[$httpResult[missed_letters]]] mistake(s).*;1];$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[$toLowercase[$var[board]];a;🇦 ;-1];b;🇧 ;-1];c;🇨 ;-1];d;🇩 ;-1];e;🇪 ;-1];f;🇫 ;-1];g;🇬 ;-1];h;🇭 ;-1];i;🇮 ;-1];j;🇯 ;-1];k;🇰 ;-1];l;🇱 ;-1];m;🇲 ;-1];n;🇳 ;-1];o;🇴 ;-1];p;🇵 ;-1];q;🇶 ;-1];r;🇷 ;-1];s;🇸 ;-1];t;🇹 ;-1];u;🇺 ;-1];v;🇻 ;-1];w;🇼 ;-1];x;🇽 ;-1];y;🇾 ;-1];z;🇿 ;-1];_;❔ ;-1];no]
  86. $if[$sub[$splitText[1];$charCount[$httpResult[missed_letters]]]==$cropText[$getEmbedData[$channelID;$messageID;1;footer];1;]]
  87. $var[butt;success]
  88. $else
  89. $var[butt;danger]
  90. $endif
  91. $editButton[$customID;$toUppercase[$var[letter]];$var[butt];yes;]
  92. $else
  93. $ephemeral
  94. $removeButtons
  95. ‼️ This is not your game!
  96. $endif
  97. $endif
  98.  
Advertisement
Add Comment
Please, Sign In to add comment