Advertisement
SlopranoDark

Milkman 2332

Jul 6th, 2014
180
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 2.13 KB | None | 0 0
  1. Script 1:
  2. repeat wait() until game.Players.LocalPlayer and game.Players.LocalPlayer.CharacterAdded
  3.  
  4. Cam = workspace:WaitForChild("TitleScreenCam")
  5. cam = workspace.CurrentCamera
  6. plr = game.Players.LocalPlayer.Character
  7. myplr = game.Players.LocalPlayer
  8. frame = myplr:WaitForChild("PlayerGui"):WaitForChild("TitleScreen_Play"):WaitForChild("Mainframe")
  9. themeA = myplr:WaitForChild("PlayerGui"):WaitForChild("TitleScreen_Play"):WaitForChild("Mainframe"):WaitForChild("PlayButton"):WaitForChild("ThemeMusic1")
  10. themeB = myplr:WaitForChild("PlayerGui"):WaitForChild("TitleScreen_Play"):WaitForChild("Mainframe"):WaitForChild("PlayButton"):WaitForChild("ThemeMusic2")
  11.  
  12. if myplr:WaitForChild("StarterGear"):findFirstChild("ClickedPlay")== nil then
  13. print("x")
  14. cam.CameraType = "Scriptable"
  15. cam.CoordinateFrame = Cam.CFrame
  16. print("Camera changed")
  17. frame.Visible = true
  18. end
  19.  
  20. function onclick()
  21. for i=1,10 do
  22. frame.PlayButton.BackgroundTransparency = frame.PlayButton.BackgroundTransparency+0.1
  23. frame.PlayButton.TextStrokeTransparency = frame.PlayButton.TextStrokeTransparency+0.1
  24. frame.PlayButton.TextTransparency = frame.PlayButton.TextTransparency+0.1
  25. themeA.Volume = themeA.Volume-0.1
  26. themeB.Volume = themeB.Volume-0.1
  27. wait(0.1)
  28. end
  29. cam.CameraType = "Custom"
  30. cam.CameraSubject = plr
  31. ClickedPlay = game:GetService('Lighting'):WaitForChild("ClickedPlay"):clone()
  32. ClickedPlay.Parent = myplr:WaitForChild("StarterGear")
  33. frame.Visible = false
  34. end
  35.  
  36.  
  37. script.Parent.MouseButton1Click:connect(onclick)
  38.  
  39.  
  40. Script 2:
  41.  
  42. plr = game.Players.LocalPlayer.Character
  43. myplr = game.Players.LocalPlayer
  44. themeA = myplr:WaitForChild("PlayerGui"):WaitForChild("TitleScreen_Play"):WaitForChild("Mainframe"):WaitForChild("PlayButton"):WaitForChild("ThemeMusic1")
  45. themeB = myplr:WaitForChild("PlayerGui"):WaitForChild("TitleScreen_Play"):WaitForChild("Mainframe"):WaitForChild("PlayButton"):WaitForChild("ThemeMusic2")
  46. frame = myplr:WaitForChild("PlayerGui"):WaitForChild("TitleScreen_Play"):WaitForChild("Mainframe")
  47.  
  48. repeat
  49. themeA:Play()
  50. wait(120)
  51. themeA:Stop()
  52. wait()
  53. themeB:Play()
  54. wait(85)
  55. themeB:Stop()
  56. until frame.Visible == false
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement