AlferZep

$onInteraction

Mar 27th, 2024
58
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.17 KB | None | 0 0
  1. $nomention
  2. $onlyIf[$and[$checkContains[$customID;bjhit;bjdeal]==true;$checkContains[$customID;$authorID]==true]==true;]
  3. $jsonParse[
  4. {
  5. "bj":$getVar[blackjack;$authorID]
  6. }
  7. ]
  8.  
  9. $var[A;<:A1:1119442649234014308>]
  10. $var[J;<:J_:1119434419082645664>]
  11. $var[K;<:K_:1119434464657948853>]
  12. $var[Q;<:Q_:1119434500083028009>]
  13. $var[2;<:2_:1119434134549450862>]
  14. $var[3;<:3_:1119434156712140840>]
  15. $var[4;<:4_:1119434180191866901>]
  16. $var[5;<:5_:1119434201884799046>]
  17. $var[6;<:6_:1119434221757419611>]
  18. $var[7;<:7_:1119434238450729131>]
  19. $var[8;<:8_:1119434261875925093>]
  20. $var[9;<:9_:1119434364451835946>]
  21. $var[10;<:10:1119434386425794701>]
  22.  
  23. $var[bet;$json[bj;bet]]
  24.  
  25. $if[$customID==bjhit $authorID]
  26. $optOff[
  27. $var[deck;$json[bj;deck] {$randomText[$random[2;11];$randomText[A;K;J;Q]]}]
  28. ]
  29. $else
  30. $var[deck;$json[bj;deck]]
  31. $var[deck1;$json[bj;deck1]]
  32. $endif
  33.  
  34. $optOff[
  35. $if[$json[bj;value1]<19]
  36. $var[deck1;$json[bj;deck1] {$randomText[$random[2;11];$randomText[A;K;J;Q]]}]
  37. $else
  38. $var[deck1;$json[bj;deck1]]
  39. $endif
  40. ]
  41.  
  42. $var[value;$calculate[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$var[deck];Q;10];J;10];K;10];A;1]; ;+;-1];{;];};]]]
  43. $var[value1;$calculate[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$var[deck1];Q;10];J;10];K;10];A;1]; ;+;-1];{;];};]]]
  44.  
  45. $if[$or[$var[deck]=={A} {J};$var[deck]=={J} {A};$var[value]==21]==true]
  46. $var[value;21]
  47. $var[win;blackjack]
  48. $endif
  49.  
  50. $if[$customID==bjdeal $authorID]
  51.  
  52. $if[$var[value]>$var[value1]]
  53. $var[win;true]
  54. $var[desc;win]
  55. $elseif[$var[value1]==21]
  56. $var[lose;true]
  57. $var[desc;dealer blackjack]
  58. $elseif[$or[$var[value]==$var[value1];$and[$var[value]>21;$var[value1]>21]==true]==true]
  59. $var[draw;true]
  60. $var[desc;money back!]
  61. $elseif[$var[value1]>21]
  62. $var[win;true]
  63. $var[desc;dealer bust]
  64. $else
  65. $var[lose;true]
  66. $var[desc;dealer win]
  67. $endif
  68.  
  69. $else
  70. $if[$var[value]==21]
  71. $var[win;true]
  72. $var[desc;blackjack]
  73. $elseif[$var[value]>21]
  74. $if[$var[value1]>21]
  75. $var[win;true]
  76. $var[desc;dealer bust]
  77. $endif
  78. $var[lose;true]
  79. $var[desc;bust]
  80. $endif
  81. $endif
  82.  
  83. $if[$and[$var[win]!=;$var[lose]!=]==true]
  84. $var[win;]
  85. $var[lose;]
  86. $var[draw;true]
  87. $var[desc;money back!]
  88. $endif
  89.  
  90. $jsonSet[bj;value;$var[value]]
  91. $jsonSet[bj;value1;$var[value1]]
  92.  
  93. $textSplit[$var[deck1]; ]
  94.  
  95. $if[$var[draw]$var[lose]$var[win]==]
  96. $var[value1;$calculate[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$splitText[1];Q;10];J;10];K;10];A;1]; ;+;-1];{;];};]]]
  97.  
  98. $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]]
  99. $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};$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]]
  100.  
  101. $author[$username]
  102. $authorIcon[$authorAvatar]
  103. $addField[You;
  104. $var[edeck]
  105. value: $var[value]]
  106. $addField[Dealer;
  107. $var[edeck1] ?
  108. value: $var[value1]]
  109. $footer[bet: $numberSeparator[$var[bet]]]
  110.  
  111. $else
  112. $editButton[bjhit $authorID;Hit;secondary;yes]
  113. $editButton[bjdeal $authorID;Deal;primary;yes]
  114.  
  115. $var[value1;$calculate[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$replaceText[$var[deck1];Q;10];J;10];K;10];A;1]; ;+;-1];{;];};]]]
  116.  
  117. $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]]
  118. $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]]
  119.  
  120. $author[$username]
  121. $authorIcon[$authorAvatar]
  122. $description[$replaceText[$var[win];true;win]$replaceText[$var[lose];true;lose]$replaceText[$var[draw];true;draw]: $var[desc]]
  123. $addField[You;
  124. $var[edeck]
  125. value: $var[value]]
  126. $addField[Dealer;
  127. $var[edeck1]
  128. value: $var[value1]]
  129. $footer[bet: $var[bet]]
  130.  
  131. $if[$var[win]==true]
  132.  
  133. $setVar[gold;$sum[$getVar[gold;$authorID];$multi[2;$var[bet]]];$authorID]
  134.  
  135. $elseif[$var[draw]==true]
  136.  
  137. $setVar[gold;$sum[$getVar[gold;$authorID];$var[bet]];$authorID]
  138.  
  139. $endif
  140.  
  141. $jsonSet[bj;bet;0]
  142.  
  143. $endif
  144.  
  145. $jsonSet[bj;deck;$var[deck]]
  146. $jsonSet[bj;deck1;$var[deck1]]
  147. $setVar[blackjack;$json[bj];$authorID]
Add Comment
Please, Sign In to add comment