Advertisement
Guest User

Untitled

a guest
Jan 23rd, 2020
104
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 10.16 KB | None | 0 0
  1. local DungeonList = Instance.new("ScreenGui")
  2. local DungeonFrame = Instance.new("Frame")
  3. local Start = Instance.new("TextButton")
  4. local Difficulty = Instance.new("TextLabel")
  5. local NextDif = Instance.new("TextButton")
  6. local PrevDif = Instance.new("TextButton")
  7. local Dungeon = Instance.new("TextLabel")
  8. local PrevDung = Instance.new("TextButton")
  9. local NextDung = Instance.new("TextButton")
  10. local Mode = Instance.new("TextLabel")
  11. local PrevMode = Instance.new("TextButton")
  12. local NextMode = Instance.new("TextButton")
  13. local Type = Instance.new("TextLabel")
  14. local PrevType = Instance.new("TextButton")
  15. local NextType = Instance.new("TextButton")
  16.  
  17. DungeonList.Name = "Menus"
  18. DungeonList.Parent = game.CoreGui
  19.  
  20. DungeonFrame.Name = "DungeonFrame"
  21. DungeonFrame.Parent = DungeonList
  22. DungeonFrame.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  23. DungeonFrame.Position = UDim2.new(0, -45, 0, 245)
  24. DungeonFrame.Size = UDim2.new(0, 215, 0, 160)
  25. DungeonFrame.Style = Enum.FrameStyle.RobloxRound
  26. DungeonFrame.Active = true
  27. DungeonFrame.Selectable = true
  28. DungeonFrame.Draggable = true
  29.  
  30. Start.Name = "Start"
  31. Start.Parent = DungeonFrame
  32. Start.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  33. Start.Position = UDim2.new(0, 25, 0, 120)
  34. Start.Size = UDim2.new(0, 150, 0, 25)
  35. Start.Style = Enum.ButtonStyle.RobloxButton
  36. Start.Font = Enum.Font.GothamSemibold
  37. Start.Text = "START"
  38. Start.TextColor3 = Color3.fromRGB(255, 255, 255)
  39. Start.TextSize = 14.000
  40.  
  41. Difficulty.Name = "Difficulty"
  42. Difficulty.Parent = DungeonFrame
  43. Difficulty.BackgroundColor3 = Color3.fromRGB(129, 129, 129)
  44. Difficulty.BorderSizePixel = 0
  45. Difficulty.Position = UDim2.new(0, 10, 0, 5)
  46. Difficulty.Size = UDim2.new(0, 180, 0, 20)
  47. Difficulty.Font = Enum.Font.GothamSemibold
  48. Difficulty.Text = "Easy"
  49. Difficulty.TextColor3 = Color3.fromRGB(0, 0, 0)
  50. Difficulty.TextSize = 16.000
  51.  
  52. NextDif.Name = "NextDif"
  53. NextDif.Parent = Difficulty
  54. NextDif.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  55. NextDif.BackgroundTransparency = 1.000
  56. NextDif.Position = UDim2.new(0, 180, 0, 0)
  57. NextDif.Size = UDim2.new(0, 15, 0, 20)
  58. NextDif.Font = Enum.Font.GothamBold
  59. NextDif.Text = ">"
  60. NextDif.TextColor3 = Color3.fromRGB(255, 255, 255)
  61. NextDif.TextSize = 18.000
  62.  
  63. PrevDif.Name = "PrevDif"
  64. PrevDif.Parent = Difficulty
  65. PrevDif.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  66. PrevDif.BackgroundTransparency = 1.000
  67. PrevDif.Position = UDim2.new(0, -15, 0, 0)
  68. PrevDif.Size = UDim2.new(0, 15, 0, 20)
  69. PrevDif.Font = Enum.Font.GothamBold
  70. PrevDif.Text = "<"
  71. PrevDif.TextColor3 = Color3.fromRGB(255, 255, 255)
  72. PrevDif.TextSize = 18.000
  73.  
  74. Dungeon.Name = "Dungeon"
  75. Dungeon.Parent = DungeonFrame
  76. Dungeon.BackgroundColor3 = Color3.fromRGB(129, 129, 129)
  77. Dungeon.BorderSizePixel = 0
  78. Dungeon.Position = UDim2.new(0, 10, 0, 35)
  79. Dungeon.Size = UDim2.new(0, 180, 0, 20)
  80. Dungeon.Font = Enum.Font.GothamSemibold
  81. Dungeon.Text = "Ancient Jungle"
  82. Dungeon.TextColor3 = Color3.fromRGB(0, 0, 0)
  83. Dungeon.TextSize = 16.000
  84.  
  85. PrevDung.Name = "PrevDung"
  86. PrevDung.Parent = Dungeon
  87. PrevDung.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  88. PrevDung.BackgroundTransparency = 1.000
  89. PrevDung.Position = UDim2.new(0, -15, 0, 0)
  90. PrevDung.Size = UDim2.new(0, 15, 0, 20)
  91. PrevDung.Font = Enum.Font.GothamBold
  92. PrevDung.Text = "<"
  93. PrevDung.TextColor3 = Color3.fromRGB(255, 255, 255)
  94. PrevDung.TextSize = 18.000
  95.  
  96. NextDung.Name = "NextDung"
  97. NextDung.Parent = Dungeon
  98. NextDung.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  99. NextDung.BackgroundTransparency = 1.000
  100. NextDung.Position = UDim2.new(0, 180, 0, 0)
  101. NextDung.Size = UDim2.new(0, 15, 0, 20)
  102. NextDung.Font = Enum.Font.GothamBold
  103. NextDung.Text = ">"
  104. NextDung.TextColor3 = Color3.fromRGB(255, 255, 255)
  105. NextDung.TextSize = 18.000
  106.  
  107. Mode.Name = "Mode"
  108. Mode.Parent = DungeonFrame
  109. Mode.BackgroundColor3 = Color3.fromRGB(129, 129, 129)
  110. Mode.BorderSizePixel = 0
  111. Mode.Position = UDim2.new(0, 10, 0, 65)
  112. Mode.Size = UDim2.new(0, 180, 0, 20)
  113. Mode.Font = Enum.Font.GothamSemibold
  114. Mode.Text = "Classic"
  115. Mode.TextColor3 = Color3.fromRGB(0, 0, 0)
  116. Mode.TextSize = 16.000
  117.  
  118. PrevMode.Name = "PrevMode"
  119. PrevMode.Parent = Mode
  120. PrevMode.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  121. PrevMode.BackgroundTransparency = 1.000
  122. PrevMode.Position = UDim2.new(0, -15, 0, 0)
  123. PrevMode.Size = UDim2.new(0, 15, 0, 20)
  124. PrevMode.Font = Enum.Font.GothamBold
  125. PrevMode.Text = "<"
  126. PrevMode.TextColor3 = Color3.fromRGB(255, 255, 255)
  127. PrevMode.TextSize = 18.000
  128.  
  129. NextMode.Name = "NextMode"
  130. NextMode.Parent = Mode
  131. NextMode.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  132. NextMode.BackgroundTransparency = 1.000
  133. NextMode.Position = UDim2.new(0, 180, 0, 0)
  134. NextMode.Size = UDim2.new(0, 15, 0, 20)
  135. NextMode.Font = Enum.Font.GothamBold
  136. NextMode.Text = ">"
  137. NextMode.TextColor3 = Color3.fromRGB(255, 255, 255)
  138. NextMode.TextSize = 18.000
  139.  
  140. Type.Name = "Type"
  141. Type.Parent = DungeonFrame
  142. Type.BackgroundColor3 = Color3.fromRGB(129, 129, 129)
  143. Type.BorderSizePixel = 0
  144. Type.Position = UDim2.new(0, 10, 0, 95)
  145. Type.Size = UDim2.new(0, 180, 0, 20)
  146. Type.Font = Enum.Font.GothamSemibold
  147. Type.Text = "Solo"
  148. Type.TextColor3 = Color3.fromRGB(0, 0, 0)
  149. Type.TextSize = 16.000
  150.  
  151. PrevType.Name = "PrevType"
  152. PrevType.Parent = Type
  153. PrevType.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  154. PrevType.BackgroundTransparency = 1.000
  155. PrevType.Position = UDim2.new(0, -15, 0, 0)
  156. PrevType.Size = UDim2.new(0, 15, 0, 20)
  157. PrevType.Font = Enum.Font.GothamBold
  158. PrevType.Text = "<"
  159. PrevType.TextColor3 = Color3.fromRGB(255, 255, 255)
  160. PrevType.TextSize = 18.000
  161.  
  162. NextType.Name = "NextType"
  163. NextType.Parent = Type
  164. NextType.BackgroundColor3 = Color3.fromRGB(255, 255, 255)
  165. NextType.BackgroundTransparency = 1.000
  166. NextType.Position = UDim2.new(0, 180, 0, 0)
  167. NextType.Size = UDim2.new(0, 15, 0, 20)
  168. NextType.Font = Enum.Font.GothamBold
  169. NextType.Text = ">"
  170. NextType.TextColor3 = Color3.fromRGB(255, 255, 255)
  171. NextType.TextSize = 18.000
  172.  
  173. NextDung.MouseButton1Click:Connect(function()
  174. if Dungeon.Text == "Ancient Jungle" then
  175. Dungeon.Text = "Coral Kingdom"
  176. else if Dungeon.Text == "Coral Kingdom" then
  177. Dungeon.Text = "Crystal Cave"
  178. else if Dungeon.Text == "Crystal Cave" then
  179. Dungeon.Text = "Sacred Sands"
  180. else if Dungeon.Text == "Sacred Sands" then
  181. Dungeon.Text = "Candy Land"
  182. else if Dungeon.Text == "Candy Land" then
  183. Dungeon.Text = "Sinister Sewers"
  184. else if Dungeon.Text == "Sinister Sewers" then
  185. Dungeon.Text = "Magical Mushrooms"
  186. else if Dungeon.Text == "Magical Mushrooms" then
  187. Dungeon.Text = "Space Base"
  188. else if Dungeon.Text == "Space Base" then
  189. Dungeon.Text = "Daring Dojo"
  190. else if Dungeon.Text == "Daring Dojo" then
  191. Dungeon.Text = "Cryptic Castle"
  192. else if Dungeon.Text == "Cryptic Castle" then
  193. Dungeon.Text = "Ancient Jungle"
  194. end
  195. end
  196. end
  197. end
  198. end
  199. end
  200. end
  201. end
  202. end
  203. end
  204. end)
  205.  
  206. PrevDung.MouseButton1Click:Connect(function()
  207. if Dungeon.Text == "Cryptic Castle" then
  208. Dungeon.Text = "Daring Dojo"
  209. else if Dungeon.Text == "Daring Dojo" then
  210. Dungeon.Text = "Space Base"
  211. else if Dungeon.Text == "Space Base" then
  212. Dungeon.Text = "Magical Mushrooms"
  213. else if Dungeon.Text == "Magical Mushrooms" then
  214. Dungeon.Text = "Sinister Sewers"
  215. else if Dungeon.Text == "Sinister Sewers" then
  216. Dungeon.Text = "Candy Land"
  217. else if Dungeon.Text == "Candy Land" then
  218. Dungeon.Text = "Sacred Sands"
  219. else if Dungeon.Text == "Sacred Sands" then
  220. Dungeon.Text = "Crystal Cave"
  221. else if Dungeon.Text == "Crystal Cave" then
  222. Dungeon.Text = "Coral Kingdom"
  223. else if Dungeon.Text == "Coral Kingdom" then
  224. Dungeon.Text = "Ancient Jungle"
  225. else if Dungeon.Text == "Ancient Jungle" then
  226. Dungeon.Text = "Cryptic Castle"
  227. end
  228. end
  229. end
  230. end
  231. end
  232. end
  233. end
  234. end
  235. end
  236. end
  237. end)
  238.  
  239. NextDif.MouseButton1Click:Connect(function()
  240. if Difficulty.Text == "Easy" then
  241. Difficulty.Text = "Medium"
  242. else if Difficulty.Text == "Medium" then
  243. Difficulty.Text = "Hard"
  244. else if Difficulty.Text == "Hard" then
  245. Difficulty.Text = "Demon"
  246. else if Difficulty.Text == "Demon" then
  247. Difficulty.Text = "Impossible"
  248. else if Difficulty.Text == "Impossible" then
  249. Difficulty.Text = "Easy"
  250. end
  251. end
  252. end
  253. end
  254. end
  255. end)
  256.  
  257. PrevDif.MouseButton1Click:Connect(function()
  258. if Difficulty.Text == "Impossible" then
  259. Difficulty.Text = "Demon"
  260. else if Difficulty.Text == "Demon" then
  261. Difficulty.Text = "Hard"
  262. else if Difficulty.Text == "Hard" then
  263. Difficulty.Text = "Medium"
  264. else if Difficulty.Text == "Medium" then
  265. Difficulty.Text = "Easy"
  266. else if Difficulty.Text == "Easy" then
  267. Difficulty.Text = "Impossible"
  268. end
  269. end
  270. end
  271. end
  272. end
  273. end)
  274.  
  275. NextMode.MouseButton1Click:Connect(function()
  276. if Mode.Text == "Classic" then
  277. Mode.Text = "Endless"
  278. else if Mode.Text == "Endless" then
  279. Mode.Text = "Minibosses"
  280. else if Mode.Text == "Minibosses" then
  281. Mode.Text = "Uncapped"
  282. else if Mode.Text == "Uncapped" then
  283. Mode.Text = "Classic"
  284. end
  285. end
  286. end
  287. end
  288. end)
  289.  
  290. PrevMode.MouseButton1Click:Connect(function()
  291. if Mode.Text == "Uncapped" then
  292. Mode.Text = "Minibosses"
  293. else if Mode.Text == "Minibosses" then
  294. Mode.Text = "Endless"
  295. else if Mode.Text == "Endless" then
  296. Mode.Text = "Classic"
  297. else if Mode.Text == "Classic" then
  298. Mode.Text = "Uncapped"
  299. end
  300. end
  301. end
  302. end
  303. end)
  304.  
  305. NextType.MouseButton1Click:Connect(function()
  306. if Type.Text == "Solo" then
  307. Type.Text = "Friend"
  308. else if Type.Text == "Friend" then
  309. Type.Text = "Public"
  310. else if Type.Text == "Public" then
  311. Type.Text = "Solo"
  312. end
  313. end
  314. end
  315. end)
  316.  
  317. PrevType.MouseButton1Click:Connect(function()
  318. if Type.Text == "Public" then
  319. Type.Text = "Friend"
  320. else if Type.Text == "Friend" then
  321. Type.Text = "Solo"
  322. else if Type.Text == "Solo" then
  323. Type.Text = "Public"
  324. end
  325. end
  326. end
  327. end)
  328.  
  329. Start.MouseButton1Click:Connect(function()
  330. game:GetService("ReplicatedStorage").Remotes.Squads.Create:FireServer(Dungeon.Text, Mode.Text, Difficulty.Text, Type.Text)
  331. game:GetService("ReplicatedStorage").Remotes.Squads.Start:FireServer()
  332. end)
  333.  
  334. local q = Instance.new("ScreenGui", game.CoreGui)
  335. for i,v in pairs(game:service'Players'.LocalPlayer.PlayerGui.Quests:GetChildren()) do
  336. if v.Name == "MainFrame" then
  337. local copy = v:Clone()
  338. copy.Parent = q
  339. copy.Size = UDim2.new(0, 300, 0, 200)
  340. copy.Position = UDim2.new(0, 1300, 0, 0)
  341. end
  342. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement