AlferZep

(prefix)bj <bet>

Mar 27th, 2024
74
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 4.74 KB | None | 0 0
  1. $nomention
  2. $jsonParse[
  3. {
  4. "bj":$getVar[blackjack;$authorID]
  5. }
  6. ]
  7.  
  8. $c[CARD EMOJIS GOES HERE]
  9.  
  10. $var[A;<:A11:1119445077119479838>]
  11. $c[^^^ this should be the Ace with the value of 11]
  12. $var[J;<:J_:1119434419082645664>]
  13. $var[K;<:K_:1119434464657948853>]
  14. $var[Q;<:Q_:1119434500083028009>]
  15. $var[2;<:2_:1119434134549450862>]
  16. $var[3;<:3_:1119434156712140840>]
  17. $var[4;<:4_:1119434180191866901>]
  18. $var[5;<:5_:1119434201884799046>]
  19. $var[6;<:6_:1119434221757419611>]
  20. $var[7;<:7_:1119434238450729131>]
  21. $var[8;<:8_:1119434261875925093>]
  22. $var[9;<:9_:1119434364451835946>]
  23. $var[10;<:10:1119434386425794701>]
  24.  
  25. $c[—————————]
  26. $async[1]
  27. $replyIn[1]
  28. $if[$isNumber[$message[1]]==true]
  29. $var[bet;$message[1]]
  30. $elseif[$message[1]==half]
  31. $var[bet;$divide[$getVar[gold;$authorID];2]]
  32. $else
  33. $var[bet;0]
  34. $endif
  35. $endasync
  36. $await[1]
  37.  
  38. $onlyIf[$var[bet]<=$getVar[gold;$authorID];You don’t have enough gold.]
  39. $onlyIf[$var[bet]<=90000000;You can’t bet more than 90000000.]
  40.  
  41. $jsonSetString[bj;bet;$var[bet]]
  42. $setVar[gold;$sub[$getVar[gold;$authorID];$var[bet]];$authorID]
  43.  
  44. $optOff[
  45. $var[deck;{$randomText[$random[2;11];$randomText[A;K;J;Q]]} {$randomText[$random[2;11];$randomText[A;K;J;Q]]}]
  46. $var[deck1;{$randomText[$random[2;11];$randomText[A;K;J;Q]]} {$randomText[$random[2;11];$randomText[A;K;J;Q]]}]
  47. ]
  48.  
  49. $var[value;$calculate[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$var[deck];Q;10];J;10];K;10];A;1]; ;+;-1];{;];};]]]
  50. $var[value1;$calculate[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$var[deck1];Q;10];J;10];K;10];A;1]; ;+;-1];{;];};]]]
  51.  
  52. $jsonSet[bj;value;$var[value]]
  53. $jsonSet[bj;value1;$var[value1]]
  54.  
  55. $if[$or[$checkContains[$var[deck];{A} {K};{A} {Q};{A} {J};{A} {10};{K} {A};{Q} {A};{J} {A};{10} {A}]==true;$var[value]==21]==true]
  56. $var[value;21]
  57. $var[win;blackjack]
  58. $endif
  59.  
  60. $textSplit[$var[deck1]; ]
  61.  
  62. $if[$var[win]==]
  63. $var[value1;$calculate[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$splitText[1];Q;10];J;10];K;10];A;1]; ;+;-1];{;];};]]]
  64.  
  65. $var[edeck;$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$var[deck];{Q};$var[Q];-1];{K};$var[K];-1];{J};$var[J];-1];{A};<:A1:1119442649234014308>;-1];{2};$var[2];-1];{3};$var[3];-1];{4};$var[4];-1];{5};$var[5];-1];{6};$var[6];-1];{7};$var[7];-1];{8};$var[8];-1];{9};$var[9];-1];{10};$var[10];-1]]
  66. $var[edeck1;$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$splitText[1];{Q};$var[Q];-1];{K};$var[K];-1];{J};$var[J];-1];{A};<:A1:1119442649234014308>;-1];{2};$var[2];-1];{3};$var[3];-1];{4};$var[4];-1];{5};$var[5];-1];{6};$var[6];-1];{7};$var[7];-1];{8};$var[8];-1];{9};$var[9];-1];{10};$var[10];-1]]
  67.  
  68. $author[$username]
  69. $authorIcon[$authorAvatar]
  70. $addField[You;
  71. $var[edeck]
  72. value: $var[value]]
  73. $addField[Dealer;
  74. $var[edeck1] ?
  75. value: $var[value1]]
  76. $footer[bet: $numberSeparator[$json[bj;bet]]]
  77.  
  78. $addButton[no;bjhit $authorID;Hit;secondary]
  79. $addButton[no;bjdeal $authorID;Deal;primary]
  80. $else
  81. $var[value1;$calculate[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$var[deck1];Q;10];J;10];K;10];A;1]; ;+;-1];{;];};]]]
  82.  
  83. $var[edeck;$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$var[deck];{Q};$var[Q];-1];{K};$var[K];-1];{J};$var[J];-1];{A};$var[A];-1];{2};$var[2];-1];{3};$var[3];-1];{4};$var[4];-1];{5};$var[5];-1];{6};$var[6];-1];{7};$var[7];-1];{8};$var[8];-1];{9};$var[9];-1];{10};$var[10];-1]]
  84. $var[edeck1;$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$var[deck1];{Q};$var[Q];-1];{K};$var[K];-1];{J};$var[J];-1];{A};$var[A];-1];{2};$var[2];-1];{3};$var[3];-1];{4};$var[4];-1];{5};$var[5];-1];{6};$var[6];-1];{7};$var[7];-1];{8};$var[8];-1];{9};$var[9];-1];{10};$var[10];-1]]
  85.  
  86. $author[$username]
  87. $authorIcon[$authorAvatar]
  88. $description[win: $var[win]]
  89. $addField[You;
  90. $var[edeck]
  91. value: $var[value]]
  92. $addField[Dealer;
  93. $var[edeck1]
  94. value: $var[value1]]
  95. $footer[bet: $json[bj;bet]]
  96.  
  97. $if[$var[win]==blackjack]
  98.  
  99. $setVar[gold;$sum[$getVar[gold;$authorID];$multi[2;$var[bet]];$divide[$var[bet];2]];$authorID]
  100.  
  101. $elseif[$var[draw]==true]
  102.  
  103. $setVar[gold;$sum[$getVar[gold;$authorID];$var[bet]];$authorID]
  104.  
  105. $endif
  106.  
  107. $jsonSet[bj;bet;0]
  108.  
  109. $endif
  110.  
  111. $jsonSet[bj;deck;$var[deck]]
  112. $jsonSet[bj;deck1;$var[deck1]]
  113. $setVar[blackjack;$json[bj];$authorID]
Add Comment
Please, Sign In to add comment