SHARE
TWEET

radio thing

a guest Jan 20th, 2019 58 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. -- This script has been converted to FE by iPxter
  2.  
  3.  
  4. if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
  5. local Player,Mouse,mouse,UserInputService,ContextActionService = owner
  6. do
  7.     print("FE Compatibility code by Mokiros | Translated to FE by iPxter")
  8.     script.Parent = Player.Character
  9.  
  10.     --RemoteEvent for communicating
  11.     local Event = Instance.new("RemoteEvent")
  12.     Event.Name = "UserInput_Event"
  13.  
  14.     --Fake event to make stuff like Mouse.KeyDown work
  15.     local function fakeEvent()
  16.         local t = {_fakeEvent=true,Connect=function(self,f)self.Function=f end}
  17.         t.connect = t.Connect
  18.         return t
  19.     end
  20.  
  21.     --Creating fake input objects with fake variables
  22.     local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
  23.     local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
  24.     local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
  25.         CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
  26.     end}
  27.     --Merged 2 functions into one by checking amount of arguments
  28.     CAS.UnbindAction = CAS.BindAction
  29.  
  30.     --This function will trigger the events that have been :Connect()'ed
  31.     local function te(self,ev,...)
  32.         local t = m[ev]
  33.         if t and t._fakeEvent and t.Function then
  34.             t.Function(...)
  35.         end
  36.     end
  37.     m.TrigEvent = te
  38.     UIS.TrigEvent = te
  39.  
  40.     Event.OnServerEvent:Connect(function(plr,io)
  41.         if plr~=Player then return end
  42.         if io.isMouse then
  43.             m.Target = io.Target
  44.             m.Hit = io.Hit
  45.         else
  46.             local b = io.UserInputState == Enum.UserInputState.Begin
  47.             if io.UserInputType == Enum.UserInputType.MouseButton1 then
  48.                 return m:TrigEvent(b and "Button1Down" or "Button1Up")
  49.             end
  50.             for _,t in pairs(CAS.Actions) do
  51.                 for _,k in pairs(t.Keys) do
  52.                     if k==io.KeyCode then
  53.                         t.Function(t.Name,io.UserInputState,io)
  54.                     end
  55.                 end
  56.             end
  57.             m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
  58.             UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
  59.         end
  60.     end)
  61.     Event.Parent = NLS([==[
  62.     local Player = owner
  63.     local Event = script:WaitForChild("UserInput_Event")
  64.  
  65.     local UIS = game:GetService("UserInputService")
  66.     local input = function(io,a)
  67.         if a then return end
  68.         --Since InputObject is a client-side instance, we create and pass table instead
  69.         Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState})
  70.     end
  71.     UIS.InputBegan:Connect(input)
  72.     UIS.InputEnded:Connect(input)
  73.  
  74.     local h,t
  75.     --Give the server mouse data 30 times every second, but only if the values changed
  76.     --If player is not moving their mouse, client won't fire events
  77.     while wait(1/30) do
  78.         if h~=Mouse.Hit or t~=Mouse.Target then
  79.             h,t=Mouse.Hit,Mouse.Target
  80.             Event:FireServer({isMouse=true,Target=t,Hit=h})
  81.         end
  82.     end]==],Player.Character)
  83.     Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
  84. end
  85.  
  86. --ffghjkgh67
  87.  
  88. --Script Builder Radio!
  89.  
  90. local Player = owner
  91. local c = Player.Character
  92. if not c or not c.Parent then
  93.     c = Player.CharacterAdded:wait()
  94. end
  95.  
  96. wait(1)
  97.  
  98. local radio = Instance.new("Part",c)
  99. radio.Name = "Radio"
  100. radio.CanCollide = false
  101. radio.Anchored = true
  102. radio.FormFactor = "Custom"
  103. radio.Size = Vector3.new(3.2, 1.43, 0.8)
  104. radio.CFrame = c.Torso.CFrame * CFrame.new(0,0,.8)
  105. radio.CFrame = radio.CFrame * CFrame.fromEulerAnglesXYZ(0,3.15,0)
  106. radio.CFrame = radio.CFrame * CFrame.fromEulerAnglesXYZ(0,0,-.7)
  107.  
  108. local mesh = Instance.new("SpecialMesh",radio)
  109. mesh.MeshId = "http://www.roblox.com/asset/?id=151760030"
  110. mesh.TextureId = "https://www.roblox.com/Sweg-item?id=156708131"
  111.  
  112. local weld = Instance.new("Weld",radio)
  113. weld.Part0 = c.Torso
  114. weld.Part1 = radio
  115. weld.C0 = c.Torso.CFrame:inverse()
  116. weld.C1 = radio.CFrame:inverse()
  117. radio.Anchored = false
  118.  
  119. local sound = Instance.new("Sound",radio)
  120. sound.Name = "Music"
  121. sound.Looped = true
  122. sound.Volume = 1
  123.  
  124. local gui = Instance.new("ScreenGui",Player.PlayerGui)
  125.  
  126. local frame = Instance.new("Frame",gui)
  127. frame.BackgroundColor3 = Color3.new(58/255,58/255,58/255)
  128. frame.BorderColor3 = Color3.new(0,0,0)
  129. frame.BorderSizePixel = 2
  130. frame.Size = UDim2.new(0,300,0,200)
  131. frame.Position = UDim2.new(0,20,.5,-100)
  132.  
  133. local playb = Instance.new("TextButton",frame)
  134. playb.BackgroundColor3 = Color3.new(0,85/255,0)
  135. playb.BorderColor3 = Color3.new(0,0,0)
  136. playb.BorderSizePixel = 2
  137. playb.Size = UDim2.new(.3,0,.2,0)
  138. playb.Position = UDim2.new(.1,0,.7,0)
  139. playb.Text = "Play"
  140. playb.TextColor3 = Color3.new(255,255,255)
  141. playb.TextScaled = true
  142.  
  143. local stopb = Instance.new("TextButton",frame)
  144. stopb.BackgroundColor3 = Color3.new(170/255,0,0)
  145. stopb.BorderColor3 = Color3.new(0,0,0)
  146. stopb.BorderSizePixel = 2
  147. stopb.Size = UDim2.new(.3,0,.2,0)
  148. stopb.Position = UDim2.new(.6,0,.7,0)
  149. stopb.Text = "Stop"
  150. stopb.TextColor3 = Color3.new(255,255,255)
  151. stopb.TextScaled = true
  152.  
  153. local stipb = Instance.new("TextBox",frame)
  154. stipb.BackgroundColor3 = Color3.new(0,0,127/255)
  155. stipb.BorderColor3 = Color3.new(0,0,0)
  156. stipb.BorderSizePixel = 2
  157. stipb:TweenSize(UDim2.new(.5,0,.25,0),"Out","Quad",1,true)
  158. stipb.Position = UDim2.new(.25,0,.3,0)
  159. stipb.Text = "SoundId"
  160. stipb.TextColor3 = Color3.new(255,255,255)
  161. stipb.TextScaled = true
  162.  
  163. local label = Instance.new("TextLabel",frame)
  164. label.Text = "Made By ChuckXZ!"
  165. label.TextScaled = true
  166. label:TweenSize(UDim2.new(1,0,.2,0))
  167. label.TextColor3 = Color3.new(255,255,255)
  168. label.BackgroundTransparency = 1
  169. --stipb.Size = UDim2.new(1,0,.2,0)
  170.  
  171. local Playing = false
  172.  
  173. stipb.Changed:connect(function()
  174.     sound.SoundId = "rbxassetid://" .. stipb.Text
  175. end)
  176.  
  177. playb.MouseButton1Click:connect(function()
  178.     sound:Play()
  179.     Playing = true
  180. end)
  181.  
  182. stopb.MouseButton1Click:connect(function()
  183.     sound:Stop()
  184.     Playing = false
  185. end)
  186.  
  187. while true do
  188.     if Playing then
  189.         mesh.Scale = Vector3.new(1.1,1.1,1.1)
  190.         wait(.2)
  191.         mesh.Scale = Vector3.new(1,1,1)
  192.     end
  193.     wait(.2)
  194. end
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top