Advertisement
Sakkzz

Untitled

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