Advertisement
Guest User

Untitled

a guest
Nov 19th, 2019
180
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. --Draw something, put your sound id in, and watch the light show!--
  2. --Enjoy lads.--
  3. Player=game:GetService("Players").LocalPlayer
  4. Character=Player.=owner
  5. Character.Humanoid.Name = "loomineh"
  6. hum = Character.noneofurbusiness
  7. LeftArm=Character["Left Arm"]
  8. LeftLeg=Character["Left Leg"]
  9. RightArm=Character["Right Arm"]
  10. RightLeg=Character["Right Leg"]
  11. Root=Character["HumanoidRootPart"]
  12. Head=Character["Head"]
  13. Torso=Character["Torso"]
  14. Neck=Torso["Neck"]
  15. mouse = Player:GetMouse()
  16. removeuseless = game:GetService("Debris")
  17. soundIsPlaying = false
  18. number = 0
  19. stop = false
  20. flatt = false
  21. standingg = true
  22. tf = 0
  23. idrewsomething = false
  24. tab2={}
  25. tab={}
  26. blue = false
  27. red = true
  28. green = false
  29. drawingallowed = true
  30. MseGuide = true
  31. RunSrv = game:GetService("RunService")
  32. RenderStepped = game:GetService("RunService").RenderStepped
  33.  
  34. local HEADLERP = Instance.new("ManualWeld")
  35. HEADLERP.Parent = Head
  36. HEADLERP.Part0 = Head
  37. HEADLERP.Part1 = Head
  38. HEADLERP.C0 = CFrame.new(0, -1.5, -0) * CFrame.Angles(math.rad(0), math.rad(0), math.rad(0))
  39.  
  40. OrgnC0 = Neck.C0
  41. local movelimbs = coroutine.wrap(function()
  42. while RunSrv.RenderStepped:wait() do
  43. TrsoLV = Torso.CFrame.lookVector
  44. Dist = nil
  45. Diff = nil
  46. if not MseGuide then
  47. print("l")
  48. else
  49. local _, Point = Workspace:FindPartOnRay(Ray.new(Head.CFrame.p, mouse.Hit.lookVector), Workspace, false, true)
  50. Dist = (Head.CFrame.p-Point).magnitude
  51. Diff = Head.CFrame.Y-Point.Y
  52. local _, Point2 = Workspace:FindPartOnRay(Ray.new(LeftArm.CFrame.p, mouse.Hit.lookVector), Workspace, false, true)
  53. Dist2 = (LeftArm.CFrame.p-Point).magnitude
  54. Diff2 = LeftArm.CFrame.Y-Point.Y
  55. HEADLERP.C0 = CFrame.new(0, -1.5, -0) * CFrame.Angles(math.rad(0), math.rad(0), math.rad(0))
  56. Neck.C0 = Neck.C0:lerp(OrgnC0*CFrame.Angles((math.tan(Diff/Dist)*1), 0, (((Head.CFrame.p-Point).Unit):Cross(Torso.CFrame.lookVector)).Y*1), .1)
  57. end
  58. end
  59. end)
  60. movelimbs()
  61.  
  62. godmode = coroutine.wrap(function()---- so you don't get killed by fucking random things
  63. while true do
  64. hum.MaxHealth = math.huge
  65. wait(0.0000001)
  66. hum.Health = math.huge
  67. wait()
  68. end
  69. end)
  70. godmode()
  71. ff = Instance.new("ForceField", Character)
  72. ff.Visible = false
  73.  
  74. coroutine.wrap(function()
  75. mouse.Button1Down:connect(function()
  76. if drawingallowed then
  77. fo = false
  78. while true do
  79. if fo then break end
  80. idrewsomething = true
  81. brick = Instance.new("Part",Character)
  82. brick.Anchored = true
  83. brick.Material = "Neon"
  84. brick.CanCollide = false
  85. brick.BrickColor = BrickColor.new("Really black")
  86. brick.Size = Vector3.new(1,1,1)
  87. brick.CFrame = CFrame.new(mouse.Hit.p)
  88. table.insert(tab2,brick)
  89. light = Instance.new("PointLight", brick)
  90. light.Color = brick.BrickColor.Color
  91. light.Range = 0
  92. light.Enabled = true
  93. light.Shadows = true
  94. light.Brightness = 0
  95. table.insert(tab,light)
  96. wait()
  97. end
  98. end
  99. end)
  100. end)()
  101.  
  102. coroutine.wrap(function()
  103. mouse.Button1Up:connect(function()
  104. if drawingallowed then
  105. fo = true
  106. end
  107. end)
  108. end)()
  109.  
  110. ---GUI---
  111.  
  112. screenGui = Instance.new("ScreenGui")
  113. screenGui.Parent = script.Parent
  114.  
  115. frame = Instance.new("Frame")
  116. frame.Parent = screenGui
  117. frame.Position = UDim2.new(0, 8, 0, 225)
  118. frame.Size = UDim2.new(0, 250, 0, 200)
  119. frame.BackgroundColor3 = BrickColor.new("White").Color
  120. frame.BackgroundTransparency = .5
  121.  
  122. textButton = Instance.new("TextButton")
  123. textButton.Parent = screenGui
  124. textButton.Position = UDim2.new(0, 12, 0, 400)
  125. textButton.Size = UDim2.new(0, 50, 0, 10)
  126. textButton.BackgroundColor3 = BrickColor.new("Really red").Color
  127. textButton.Text = "Red"
  128.  
  129. textButton.MouseButton1Down:connect(function()
  130. red = true
  131. green = false
  132. blue = false
  133. rainbow = false
  134. smooth = false
  135. end)
  136.  
  137. textButton2 = Instance.new("TextButton")
  138. textButton2.Parent = screenGui
  139. textButton2.Position = UDim2.new(0, 75, 0, 400)
  140. textButton2.Size = UDim2.new(0, 50, 0, 10)
  141. textButton2.BackgroundColor3 = BrickColor.new("Really blue").Color
  142. textButton2.Text = "Blue"
  143.  
  144. textButton2.MouseButton1Down:connect(function()
  145. red = false
  146. green = false
  147. blue = true
  148. rainbow = false
  149. smooth = false
  150. end)
  151.  
  152. textButton3 = Instance.new("TextButton")
  153. textButton3.Parent = screenGui
  154. textButton3.Position = UDim2.new(0, 138, 0, 400)
  155. textButton3.Size = UDim2.new(0, 50, 0, 10)
  156. textButton3.BackgroundColor3 = BrickColor.new("Lime green").Color
  157. textButton3.Text = "Green"
  158.  
  159. textButton3.MouseButton1Down:connect(function()
  160. red = false
  161. green = true
  162. blue = false
  163. rainbow = false
  164. smooth = false
  165. end)
  166.  
  167. textButton4 = Instance.new("TextButton")
  168. textButton4.Parent = screenGui
  169. textButton4.Position = UDim2.new(0, 201, 0, 400)
  170. textButton4.Size = UDim2.new(0, 50, 0, 10)
  171. coroutine.wrap(function()
  172. while true do
  173. textButton4.BackgroundColor3 = BrickColor.Random().Color
  174. wait(.05)
  175. end
  176. end)()
  177. textButton4.Text = "Rainbow"
  178.  
  179. textButton4.MouseButton1Down:connect(function()
  180. red = false
  181. green = false
  182. blue = false
  183. rainbow = true
  184. smooth = false
  185. end)
  186.  
  187. textBox = Instance.new("TextBox")
  188. textBox.Parent = screenGui
  189. textBox.Position = UDim2.new(0, 58, 0, 280)
  190. textBox.Size = UDim2.new(0, 150, 0, 20)
  191. textBox.BackgroundColor3 = BrickColor.new("White").Color
  192. textBox.Text = "Type Sound Id here"
  193.  
  194. form = Instance.new("TextButton")
  195. form.Parent = screenGui
  196. form.TextScaled = true
  197. form.Position = UDim2.new(0, 114, 0, 305)
  198. form.Size = UDim2.new(0, 40, 0, 20)
  199. form.BackgroundColor3 = BrickColor.new("White").Color
  200. form.Text = "Up"
  201.  
  202. form.MouseButton1Down:connect(function()
  203. if standingg then
  204. standingg = false
  205. flatt = true
  206. form.Text = "Flat"
  207. elseif flatt then
  208. flatt = false
  209. standingg = true
  210. form.Text = "Up"
  211. end
  212. end)
  213.  
  214. coroutine.wrap(function()
  215. while wait() do
  216. sid = textBox.Text
  217. end
  218. end)()
  219.  
  220. playbutton = Instance.new("TextButton")
  221. playbutton.Parent = screenGui
  222. playbutton.Position = UDim2.new(0, 58, 0, 305)
  223. playbutton.Size = UDim2.new(0, 50, 0, 20)
  224. playbutton.BackgroundColor3 = BrickColor.new("White").Color
  225. playbutton.Text = "Play"
  226.  
  227. playbutton.MouseButton1Down:connect(function()
  228. if not idrewsomething then return end
  229. if soundIsPlaying then
  230. sound1:Remove()
  231. sound1 = Instance.new("Sound", Character)
  232. sound1.Looped = true
  233. sound1.SoundId = "http://www.roblox.com/asset/?id=" .. sid
  234. sound1:Play()
  235. else
  236. soundIsPlaying = true
  237. vol.Text = 1
  238. pitch.Text = 1
  239. sound1 = Instance.new("Sound", Character)
  240. coroutine.wrap(function()
  241. while soundIsPlaying do
  242. wait()
  243. sound1.Volume = svol
  244. end
  245. end)()
  246. sound1.Looped = true
  247. coroutine.wrap(function()
  248. while soundIsPlaying do
  249. sound1.Pitch = pitchh
  250. wait()
  251. end
  252. end)()
  253. sound1.SoundId = "http://www.roblox.com/asset/?id=" .. sid
  254. sound1:Play()
  255. coroutine.wrap(function()
  256. while sound1.IsPlaying and soundIsPlaying do
  257. for i,v in pairs(tab) do
  258. v.Enabled = true
  259. v.Brightness = sound1.PlaybackLoudness/19
  260. v.Range = sound1.PlaybackLoudness/15
  261. if red then
  262. v.Color = Color3.new(sound1.PlaybackLoudness/200, 0,0)
  263. elseif blue then
  264. v.Color = Color3.new(0, 0,sound1.PlaybackLoudness/200)
  265. elseif green then
  266. v.Color = Color3.new(0, sound1.PlaybackLoudness/200,0)
  267. elseif rainbow then
  268. v.Color = brick.BrickColor.Color
  269. end
  270. end
  271. wait()
  272. end
  273. end)()
  274. while sound1.IsPlaying and soundIsPlaying do
  275. workspace.CurrentCamera.FieldOfView = 70 - sound1.PlaybackLoudness/100
  276. bcol = brick.BrickColor
  277. for _,v in pairs(tab2) do
  278. if standingg then
  279. v.Size = Vector3.new(1, sound1.PlaybackLoudness/math.random(10,25), 1)
  280. elseif flatt then
  281. v.Size = Vector3.new(sound1.PlaybackLoudness/math.random(10,25), 1, 1)
  282. end
  283. if red then
  284. v.BrickColor = BrickColor.new(Color3.new(sound1.PlaybackLoudness/200, 0,0))
  285. elseif blue then
  286. v.BrickColor = BrickColor.new(Color3.new(0,0,sound1.PlaybackLoudness/200))
  287. elseif green then
  288. v.BrickColor = BrickColor.new(Color3.new(0,sound1.PlaybackLoudness/200,0))
  289. elseif rainbow then
  290. v.BrickColor = BrickColor.Random()
  291. end
  292. end
  293. wait()
  294. end
  295. end
  296. end)
  297.  
  298. local stopbutton = Instance.new("TextButton")
  299. stopbutton.Parent = screenGui
  300. stopbutton.Position = UDim2.new(0, 158, 0, 305)
  301. stopbutton.Size = UDim2.new(0, 50, 0, 20)
  302. stopbutton.BackgroundColor3 = BrickColor.new("White").Color
  303. stopbutton.Text = "Stop"
  304.  
  305. vol = Instance.new("TextBox")
  306. vol.Parent = screenGui
  307. vol.Position = UDim2.new(0, 58, 0, 330)
  308. vol.Size = UDim2.new(0, 50, 0, 20)
  309. vol.BackgroundColor3 = BrickColor.new("White").Color
  310. vol.Text = "Volume"
  311.  
  312. coroutine.wrap(function()
  313. while wait() do
  314. svol = vol.Text
  315. end
  316. end)()
  317.  
  318. local remove = Instance.new("TextButton")
  319. remove.Parent = screenGui
  320. remove.Position = UDim2.new(0, 108, 0, 370)
  321. remove.Size = UDim2.new(0, 50, 0, 20)
  322. remove.BackgroundColor3 = BrickColor.new("White").Color
  323. remove.Text = "Clean"
  324.  
  325. pitch = Instance.new("TextBox")
  326. pitch.Parent = screenGui
  327. pitch.Position = UDim2.new(0, 158, 0, 330)
  328. pitch.Size = UDim2.new(0, 50, 0, 20)
  329. pitch.BackgroundColor3 = BrickColor.new("White").Color
  330. pitch.Text = "Pitch"
  331.  
  332. coroutine.wrap(function()
  333. while wait() do
  334. pitchh = pitch.Text
  335. end
  336. end)()
  337.  
  338. pitchup = Instance.new("ImageButton")
  339. pitchup.Parent = screenGui
  340. pitchup.Position = UDim2.new(0, 131, 0, 327)
  341. pitchup.BackgroundTransparency = 1
  342. pitchup.Size = UDim2.new(0, 25, 0, 25)
  343. pitchup.Image = "rbxassetid://29563813"
  344.  
  345. pitchup.MouseButton1Down:connect(function()
  346. if soundIsPlaying then
  347. pitch.Text = pitch.Text + .1
  348. end
  349. end)
  350.  
  351. pitchdown = Instance.new("ImageButton")
  352. pitchdown.Parent = screenGui
  353. pitchdown.Rotation = 180
  354. pitchdown.Position = UDim2.new(0, 211, 0, 327)
  355. pitchdown.BackgroundTransparency = 1
  356. pitchdown.Size = UDim2.new(0, 25, 0, 25)
  357. pitchdown.Image = "rbxassetid://29563813"
  358.  
  359. pitchdown.MouseButton1Down:connect(function()
  360. if soundIsPlaying then
  361. pitch.Text = pitch.Text - .1
  362. end
  363. end)
  364.  
  365. remove.MouseButton1Down:connect(function()
  366. if idrewsomething then
  367. if soundIsPlaying then
  368. soundIsPlaying = false
  369. workspace.CurrentCamera.FieldOfView = 70
  370. woosh = Instance.new("Sound",Character)
  371. woosh.Volume = 2
  372. woosh.SoundId = "rbxasstid://215402014"
  373. woosh:Play()
  374. sound1:Stop()
  375. pitch.Text = "Pitch"
  376. vol.Text = "Volume"
  377. removeuseless:AddItem(woosh,2)
  378. for _,v in pairs(tab2) do
  379. v:Remove()
  380. end
  381. idrewsomething = false
  382. elseif not soundIsPlaying then
  383. soundIsPlaying = false
  384. woosh = Instance.new("Sound",Character)
  385. woosh.Volume = 2
  386. woosh.SoundId = "rbxasstid://215402014"
  387. woosh:Play()
  388. for _,v in pairs(tab2) do
  389. v:Remove()
  390. end
  391. idrewsomething = false
  392. end
  393. end
  394. end)
  395.  
  396. local day = Instance.new("TextButton")
  397. day.Parent = screenGui
  398. day.Position = UDim2.new(0, 50, 0, 370)
  399. day.Size = UDim2.new(0, 50, 0, 20)
  400. day.BackgroundColor3 = BrickColor.new("Bright yellow").Color
  401. day.Text = "Day"
  402.  
  403. day.MouseButton1Down:connect(function()
  404. daytime = true
  405. nighttime = false
  406. turnon = Instance.new("Sound",Character)
  407. turnon.SoundId = "rbxassetid://858896518"
  408. turnon.Volume = 1
  409. turnon.Pitch = 1.05
  410. turnon:Play()
  411. removeuseless:AddItem(turnon,2)
  412. coroutine.wrap(function()
  413. while daytime do
  414. game.Lighting.TimeOfDay = 12
  415. game.Lighting.GlobalShadows = true
  416. game.Lighting.Ambient = Color3.fromRGB(10,10,10)
  417. game.Lighting.Brightness = 1
  418. wait()
  419. end
  420. end)()
  421. end)
  422.  
  423. local night = Instance.new("TextButton")
  424. night.Parent = screenGui
  425. night.Position = UDim2.new(0, 165, 0, 370)
  426. night.Size = UDim2.new(0, 50, 0, 20)
  427. night.BackgroundColor3 = BrickColor.new("Really black").Color
  428. night.TextColor = BrickColor.new("White")
  429. night.Text = "Night"
  430.  
  431. night.MouseButton1Down:connect(function()
  432. daytime = false
  433. nighttime = true
  434. turnoff = Instance.new("Sound",Character)
  435. turnoff.SoundId = "rbxassetid://858896518"
  436. turnoff.Volume = 1
  437. turnoff.Pitch = .9
  438. turnoff:Play()
  439. removeuseless:AddItem(turnoff,2)
  440. coroutine.wrap(function()
  441. while nighttime do
  442. game.Lighting.TimeOfDay = 0
  443. game.Lighting.GlobalShadows = false
  444. game.Lighting.Ambient = Color3.new(0,0,0)
  445. game.Lighting.Brightness = 0
  446. wait()
  447. end
  448. end)()
  449. end)
  450.  
  451. volumeup = Instance.new("ImageButton")
  452. volumeup.Parent = screenGui
  453. volumeup.Position = UDim2.new(0, 29, 0, 327)
  454. volumeup.BackgroundTransparency = 1
  455. volumeup.Size = UDim2.new(0, 25, 0, 25)
  456. volumeup.Image = "rbxassetid://29563813"
  457.  
  458. volumeup.MouseButton1Down:connect(function()
  459. if soundIsPlaying then
  460. vol.Text = vol.Text + 1
  461. end
  462. end)
  463.  
  464. volumedown = Instance.new("ImageButton")
  465. volumedown.Parent = screenGui
  466. volumedown.Rotation = 180
  467. volumedown.Position = UDim2.new(0, 111, 0, 327)
  468. volumedown.BackgroundTransparency = 1
  469. volumedown.Size = UDim2.new(0, 25, 0, 25)
  470. volumedown.Image = "rbxassetid://29563813"
  471.  
  472. Supr14 = Instance.new("ImageLabel")
  473. Supr14.Parent = screenGui
  474. Supr14.Rotation = 0
  475. Supr14.Position = UDim2.new(0, 13, 0, 222)
  476. Supr14.BackgroundTransparency = 1
  477. Supr14.Size = UDim2.new(0, 240, 0, 60)
  478. Supr14.Image = "rbxassetid://1815697653"
  479.  
  480. volumedown.MouseButton1Down:connect(function()
  481. if soundIsPlaying then
  482. vol.Text = vol.Text - 1
  483. end
  484. end)
  485.  
  486. stopbutton.MouseButton1Down:connect(function()
  487. if idrewsomething then
  488. if soundIsPlaying then
  489. sound1:Remove()
  490. soundIsPlaying = false
  491. workspace.CurrentCamera.FieldOfView = 70
  492. pitch.Text = "Pitch"
  493. vol.Text = "Volume"
  494. for i,v in pairs(tab) do
  495. v.Enabled = false
  496. end
  497. for i = 1, 10 do
  498. for _,v in pairs(tab2) do
  499. v.BrickColor = BrickColor.new("Really black")
  500. v.Size = v.Size - Vector3.new(0,15,0)
  501. end
  502. wait()
  503. end
  504. end
  505. end
  506. end)
  507.  
  508. print("Drawing visualiser!, Made by Supr14")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement