API tools faq
paste
Advertisement
Intec_002

Untitled

Intec_002
May 25th, 2018
94
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 25.60 KB | None | 0 0
raw download clone embed print report diff
  1. IsLocal=true NoGhost=false che=0 local Disabled=false
  2. if script.ClassName=="Script"then IsLocal=false end
  3. local WhiteListed={}
  4. WhiteListed[1]="tomonaoboys"WhiteListed[2]="Guest8899776"WhiteListed[3]="ObscuredDivinity"WhiteListed[4]="hoangphat123456"WhiteListed[5]="toiladuybao03"WhiteListed[6]="FracturedDarkness"WhiteListed[7]="SammydeMiami"
  5. local Target=""--Change here if you want to use with Script.
  6. if tostring(game.PlaceId)=="843468296"and not IsLocal then Target=tostring(owner)end
  7. print("tomonaoboys command script")
  8. if IsLocal then warn("Running with Local(Client) mode.")else warn("Running with Script mode.")end warn("This doesn't ALLOW you to become mod or you can get banned by saying. be careful!")
  9. Players=game:FindFirstChildOfClass("Players")
  10. Lighting=game:FindFirstChildOfClass("Lighting")local Exit=false
  11. Soundscape=game:FindFirstChildOfClass("Soundscape")local showsname=false
  12. local pos=Vector3.new()local Ring={}local rot=0 local modbypass=false
  13. if IsLocal then
  14. PL=Players.LocalPlayer
  15. local flg=false
  16. if tostring(game.PlaceId)=="843468296"and not IsLocal then if owner:isMod()then flg=true modbypass=true end end
  17. for i=1,#WhiteListed do
  18. if tostring(PL)==WhiteListed[i]then flg=true end
  19. end
  20. if flg==false then error("Invalid User.")end
  21. else RingActived=true
  22. while wait()do
  23.     if Players:FindFirstChild(Target)then
  24.         PL=Players:FindFirstChild(Target)print("Player found.")break
  25.     end
  26. end
  27. --local m=Instance.new("Model")script.Parent=m m:Destroy()
  28. end if not IsLocal and tostring(PL)=="tomonaoboys"then Disabled=true end
  29. RingActived=true wait(.1)script.Parent=game
  30. MusicVolume=5
  31. PBSpeed=100
  32. name="idk"AllowShowingCommands=false
  33. debri=game:GetService("Debris")
  34. function hwait(num)
  35.     if IsLocal then
  36.         if num==nil then game:GetService("RunService").RenderStepped:wait(0)
  37.         else
  38.         for i=1,num do
  39.             game:GetService("RunService").RenderStepped:wait(0)
  40.         end
  41.         end
  42.     else
  43.         if num==nil then game:GetService("RunService").Heartbeat:wait(0)
  44.         else
  45.         for i=1,num do
  46.             game:GetService("RunService").Heartbeat:wait(0)
  47.         end
  48.         end
  49.     end return true
  50. end
  51. function mute(Obj)
  52.     if Obj~=nil then
  53.         if Obj:IsA("Sound")then Obj:Destroy()end
  54.         local c=Obj:GetChildren()
  55.         for i=1,#c do
  56.             mute(c[i])
  57.         end
  58.     end
  59. end
  60. function anchor(target)
  61.     local child=target:GetChildren()
  62.     if target:FindFirstChild("HumanoidRootPart")then local p=target:FindFirstChild("HumanoidRootPart").CFrame while wait()do target.HumanoidRootPart.CFrame=p end end
  63.     hwait()
  64. end
  65. function ua(part)if part:IsA("Part")then part.Anchored=false end local c=part:GetChildren()for i=1,#c do ua(c[i])end end
  66. function FindCharacter(Text,Number)
  67.     Text=string.sub(Text,Number+2)
  68.     local Ret={}
  69.     local c=Players:GetChildren()local co=1
  70.     for i=1,#c do
  71.     if string.find(tostring(c[i]),Text,0,true)then Ret[co]=c[i]co=co+1 end
  72.     end
  73.     return Ret
  74. end
  75. function FiCo(Text,Command)
  76.     if string.find(Text,Command,0,true)~=nil then return true else return false end
  77. end
  78. function GAf(Text,Number)
  79.     return string.sub(Text,Number+2)
  80. end
  81. function UnParticle(child,idk)
  82.     if child:IsA("ParticleEmitter")then if idk then child:Destroy()else child.Enabled=false end end
  83.     local gc=child:GetChildren()
  84.     for i=1,#gc do
  85.         UnParticle(gc[i],idk)
  86.     end
  87. end
  88. if PL:FindFirstChildOfClass("Backpack")then PL:FindFirstChildOfClass("Backpack").Name="zzz"end
  89. if PL:FindFirstChildOfClass("PlayerGui")then PL:FindFirstChildOfClass("PlayerGui").Name="DED"end
  90. function ClearBase()
  91.     if workspace:FindFirstChild("Base")then workspace.Base:Remove()end
  92.     if workspace:FindFirstChild("Baseplate")then workspace.Baseplate:Remove()end
  93.     if workspace:FindFirstChildOfClass("Terrain"):FindFirstChild("Base")then workspace:FindFirstChildOfClass("Terrain").Base:Remove()end
  94.     if workspace:FindFirstChildOfClass("Terrain"):FindFirstChild("Baseplate")then workspace:FindFirstChildOfClass("Terrain").Baseplate:Remove()end
  95. end
  96. function unlocalsc(pt)
  97.     if pt:IsA("LocalScript")and pt.Name~="Animate"then pt:Remove()end
  98.     local c=pt:GetChildren()for i=1,#c do unlocalsc(c[i])end
  99. end
  100. function ShowCommands()
  101.     RMSG("!kill (Player) / Kill Player.")RMSG("!nil (Player) / It changes player character to nil.")RMSG("!ff (Player) / Add ForceField to Player.")RMSG("!ff (Player) / Delete ForceField from Player.")
  102.     RMSG("!anchor (Player) / Anchor Player.")RMSG("!clean (or !cl)/ Clear everything in workspace.(except Base and some things)")
  103.     RMSG("!m / Erase all sounds.")RMSG("!hint String / Create a hint instance with text(String).")RMSG("!msg String / Create a message instance with text(String).")
  104.     RMSG("!cmds / Show Commands.")RMSG("!np / Disable all ParticleEmitters in workspace.")RMSG("!dp / Erase all ParticleEmitters in workspace.")
  105.     RMSG("!norev / Change AmbientReverb to NoReverb.")RMSG("!fg / Change Gravity to 196.2(Default).")RMSG("!nobase / Clear base.")
  106.     RMSG("!base0 or !base1 / Clear base and create a base in workspace.Camera.")RMSG("!nols Player / Delete all LocalScripts(except Animate) in Player.Character.")
  107.     RMSG("!error String / just prints error.")RMSG("!respawn Player / Load Character to Player.")RMSG("!NoGhost / Active or Deactive(toggle) NoGhost.")
  108.     RMSG("!god (Player) / do NaN health to targeted player.")
  109.     RMSG("!rplchr (Player) / replace character to model. (this ~= nil) ")
  110. end
  111. local Jam=true
  112. function CMessage(str)
  113.     if IsLocal then
  114.     local m=Instance.new("Message",workspace)m.Text=str debri:AddItem(m,4)
  115.     else
  116.     for i,p in pairs(Players:GetChildren())do
  117.         local s=Instance.new("ScreenGui",p:FindFirstChildOfClass("PlayerGui"))
  118.         s.DisplayOrder=10 s.Name="!Message"
  119.         local t=Instance.new("TextLabel",s)t.BorderSizePixel=0 t.BackgroundColor3=Color3.new()t.Size=UDim2.new(1,0,.04,0)t.TextTransparency=1
  120.         t.BackgroundTransparency=1 t.Text="From "..tostring(PL)t.Font="ArialBold"t.TextScaled=true t.TextStrokeTransparency=1 t.TextColor3=Color3.new(1,1,1)t.Position=UDim2.new(0,0,.34,0)
  121.         t.TextColor3=Color3.new(.8,.8,.8)
  122.         local t2=Instance.new("TextLabel",s)t2.BorderSizePixel=0 t2.BackgroundColor3=Color3.new()t2.Size=UDim2.new(1,0,.1,0)t2.TextTransparency=1
  123.         t2.BackgroundTransparency=1 t2.Text=""t2.Font="ArialBold"t2.TextScaled=true t2.TextStrokeTransparency=1 t2.TextColor3=Color3.new(1,1,1)t2.Position=UDim2.new(0,0,.38,0)
  124.         spawn(function()
  125.             local function isAlive()
  126.                 if s.Parent and t.Parent and t2.Parent then return true else return false end
  127.             end
  128.             for i=1,0,-(1/3)/10 do
  129.                 if isAlive()then
  130.                 t.Position=t.Position+UDim2.new(0,0,.0025,0)t2.Position=t2.Position+UDim2.new(0,0,.0025,0)
  131.                 t.TextTransparency=i t.BackgroundTransparency=i/2+.7 t.TextStrokeTransparency=i/2+.5
  132.                 t2.TextTransparency=i t2.BackgroundTransparency=i/2+.5 t2.TextStrokeTransparency=i/2+.5
  133.                 hwait()end
  134.             end
  135.             for i=1,string.len(str)do
  136.                 if isAlive()then t2.Text=str:sub(1,i)hwait()end
  137.             end
  138.             debri:AddItem(s,10)for i=1,300 do if isAlive()then t2.Text=str hwait()end end
  139.             for i=0,1,(1/3)/10 do
  140.                 if isAlive()then
  141.                 t.Position=t.Position-UDim2.new(0,0,.0025,0)t2.Position=t2.Position-UDim2.new(0,0,.0025,0)
  142.                 t.TextTransparency=i t.BackgroundTransparency=i/2+.7 t.TextStrokeTransparency=i/2+.5
  143.                 t2.TextTransparency=i t2.BackgroundTransparency=i/2+.5 t2.TextStrokeTransparency=i/2+.5
  144.                 hwait()end
  145.             end if isAlive()then s:Destroy()end
  146.         end)
  147.     end
  148.     end
  149. end
  150.  
  151. function CCommand(msg)
  152.     if msg=="!cmds"then ShowCommands()end
  153.     if msg=="!Enable"then Disabled=false RMSG("Command has been enabled.",8)end
  154.     if msg=="!Disable"then Disabled=true RMSG("Command has been disabled.",8)end
  155.     if msg=="!Jam"then if Jam then Jam=false RMSG("Jamming Disabled.",8)else Jam=true RMSG("Jamming Enabled.",8) end end
  156.     if not Disabled then
  157.     if msg:sub(1,4)=="!exe"then RMSG("Executing : "..msg:sub(6),8,Color3.new(1,.5,0))loadstring(msg:sub(6))()end
  158.     if msg=="!Mod"then for i,p in pairs(Players:GetChildren())do if p:isMod()then RMSG(tostring(p).." is Moderator.",10,Color3.new(.8,1,.8))else RMSG(tostring(p).." is Player.",10)end end end
  159. --if msg=="!chat"then if AllowShowingCommands then AllowShowingCommands=false else AllowShowingCommands=true end end
  160.     if FiCo(msg,"!kick")then RMSG("NO KICK. NO. NO!!!",8)end
  161.     if FiCo(msg,"!ban")then RMSG("i've been nil'd u, "..tostring(PL).." lol.",8)if PL.Character then PL.Character=nil end end
  162.     if FiCo(msg,"!kill")then local t=GAf(msg,5)local ch=FindCharacter(msg,5)for i=1,#ch do if ch[i].Character then ch[i].Character:BreakJoints()RMSG("Killed "..tostring(ch[i].Character),8)end end end
  163.     if FiCo(msg,"!nil")then local t=GAf(msg,4)local ch=FindCharacter(msg,4)for i=1,#ch do if ch[i].Character then ch[i].Character=nil RMSG("Nil'd "..tostring(ch[i].Character),8)end end end
  164.     if FiCo(msg,"!ff")then local t=GAf(msg,3)local ch=FindCharacter(msg,3)for i=1,#ch do if ch[i].Character then if ch[i].Character:FindFirstChildOfClass("ForceField")==nil then Instance.new("ForceField",ch[i].Character)RMSG("Added ForceField to "..tostring(ch[i].Character),8)end end end end
  165.     if FiCo(msg,"!bp")then local t=GAf(msg,3)local ch=FindCharacter(msg,3)for i=1,#ch do for i2,v2 in pairs(ch[i]:FindFirstChildOfClass("Backpack"):GetChildren())do print(tostring(v2))RMSG(tostring(v2),8)end end end
  166.     if FiCo(msg,"!unff")then local t=GAf(msg,5)local ch=FindCharacter(msg,5)for i=1,#ch do if ch[i].Character then if ch[i].Character:FindFirstChildOfClass("ForceField")then ch[i].Character:FindFirstChildOfClass("ForceField"):Destroy()RMSG("Deleted ForceField to "..tostring(ch[i].Character),8)end end end end
  167.     if FiCo(msg,"!anchor")then local t=GAf(msg,7)local ch=FindCharacter(msg,7)for i=1,#ch do if ch[i].Character then anchor(ch[i].Character)RMSG("Anchored "..tostring(ch[i].Character),8)end end end
  168.     if FiCo(msg,"!hang")then local t=GAf(msg,5)local ch=FindCharacter(msg,5)for i=1,#ch do if ch[i].Character then Hang(ch[i])RMSG("Hang'd "..tostring(ch[i].Character),8)end end end
  169.     if FiCo(msg,"!hopperbin")then error("Hopperbin was removed because it's good for breaking server nub")end
  170.     if FiCo(msg,"!god")then local t=GAf(msg,5)local ch=FindCharacter(msg,4)for i=1,#ch do if ch[i].Character then if ch[i].Character:FindFirstChildOfClass("Humanoid")then local h=ch[i].Character:FindFirstChildOfClass("Humanoid")h.Health=(1/0)/(1/0)h.MaxHealth=(1/0)/(1/0)Instance.new("ForceField",ch[i].Character).Visible=false RMSG("Added Godmode to "..tostring(ch[i].Character),8)end end end end
  171.     if string.find(msg,"!play",1,true)~=nil then mute(PL)local num=""for i in string.gmatch(msg,"%w+")do num=i end local s=Instance.new("Sound",PL)s.Volume=MusicVolume s.PlaybackSpeed=PBSpeed/100 s.SoundId="rbxassetid://"..num s.Looped=true s:Play()end
  172.     if string.find(msg,"!vol",1,true)~=nil then local num=""for i in string.gmatch(msg,"%w+")do num=i end MusicVolume=tonumber(num)print("Volume set:"..num)end
  173.     if string.find(msg,"!pbs",1,true)~=nil then local num=""for i in string.gmatch(msg,"%w+")do num=i end PBSpeed=tonumber(num)print("PlaybackSpeed set:"..num.."%")end
  174.     if msg=="!clean"or msg=="!cl"then print("Command:Clean")local c=workspace:GetChildren()for i=1,#c do if c[i]:IsA("Camera")==false and c[i]:IsA("Terrain")==false and c[i].Name~="Base"and c[i].Name~="Baseplate" then c[i]:Destroy()end end end
  175.     if msg=="!c/r"then if IsLocal then error("This command must be used on Script mode.")else local c=workspace:GetChildren()for i=1,#c do if c[i]:IsA("Camera")==false and c[i]:IsA("Terrain")==false and c[i].Name~="Base"and c[i].Name~="Baseplate" then c[i]:Destroy()end end local c=Players:GetChildren()for i=1,#c do c[i]:LoadCharacter()end end RMSG("Cleared in workspace instance")end
  176.     if msg=="!ns"then local c=workspace:GetChildren()for i=1,#c do if c[i]:IsA("Script")then c[i]:Destroy()end end end
  177.     if msg=="!pmstop"then mute(PL)RMSG("Muted",8)end
  178.     if msg=="!m"then mute(workspace)mute(Players)mute(Lighting)mute(Soundscape)mute(game:GetService("SoundService"))RMSG("Muted all playing sounds",8)end
  179.     if string.find(msg,"!hint",1,true)then local m=Instance.new("Hint",workspace)m.Text="From "..tostring(PL).." : "..string.sub(msg,6)debri:AddItem(m,4)end
  180.     if string.find(msg,"!msg",1,true)then CMessage(string.sub(msg,6))end
  181.     if msg=="!np"then UnParticle(workspace,false)RMSG("Disabled all particles",8)end
  182.     if msg=="!dp"then UnParticle(workspace,true)RMSG("Erased all particles",8)end
  183.     if msg=="!norev"then Soundscape.AmbientReverb="NoReverb"RMSG("Reverb has changed to NoReverb",8)end
  184.     if msg=="!fg"then workspace.Gravity=196.2 RMSG("Fixed Gravity",8)end
  185.     if msg=="!nobase"then ClearBase()RMSG("Cleared Base",8)end
  186.     if msg=="!base0"then ClearBase()local b=Instance.new("Part")b.Name="Base"b.Anchored=true b.Locked=true b.Size=Vector3.new(600,20,600)b.BrickColor=BrickColor.new("Dark stone grey")b.Position=Vector3.new(0,-10,0)b.Parent=workspace:FindFirstChildOfClass("Terrain")RMSG("Base Replaced",8)end
  187.     if msg=="!base1"then ClearBase()local b=Instance.new("Part")b.Name="Base"b.Material="Grass"b.Anchored=true b.BrickColor=BrickColor.new("Shamrock")b.Locked=true b.Size=Vector3.new(600,1,600)b.Position=Vector3.new(0,-.5,0)b.Parent=workspace:FindFirstChildOfClass("Terrain")RMSG("Base Replaced",8)end
  188.     if msg=="!ts"then for i,v in pairs(Players:GetChildren())do if v.Character then ua(v.Character)end end end
  189.     if FiCo(msg,"!nols")then local t=GAf(msg,5)local ch=FindCharacter(msg,5)for i=1,#ch do if ch[i].Character then unlocalsc(ch[i].Character)RMSG("Killed all local script:"..tostring(ch[i].Character),8)end end end
  190.     if msg:sub(1,6)=="!error"then error(tostring(msg:sub(8)))end
  191.     if msg:sub(1,8)=="!respawn"then if not IsLocal then local ch=FindCharacter(msg,8)for i=1,#ch do ch[i]:LoadCharacter()RMSG("Respawned "..tostring(ch[i].Character),8)end else error("Not allowed to use respawn in Local Mode.")end end
  192.     if msg:sub(1,8)=="!NoGhost"then if NoGhost then NoGhost=false RMSG("NoGhost Disabled",8)else NoGhost=true RMSG("NoGhost Enabled",8)end end
  193.     if msg:sub(1,11)=="!activering"then if RingActived then if IsLocal then RingActived=false end else RingActived=true end end
  194.     if msg=="!name"then if showsname then showsname=false else showsname=true end end
  195.     if msg=="!rplchr"then local ch=FindCharacter(msg,7)for i=1,#ch do local m=Instance.new("Model",workspace)ch[i].Character=m m.Name=ch[i].Name RMSG("Replaced "..tostring(ch[i].Character).." 's Character",8)end end
  196.     else
  197.     if msg:sub(1,1)=="!"then RMSG("Commands are disabled!",8,Color3.new(1,0,0))end
  198.     end
  199. end
  200. PL.Chatted:connect(CCommand)
  201. if IsLocal then
  202. spawn(function()while wait()do if PL:FindFirstChildOfClass("PlayerGui"):FindFirstChild(name)==nil then local idk=Instance.new("ScreenGui",PL:FindFirstChildOfClass("PlayerGui"))idk.ResetOnSpawn=false local t=Instance.new("TextBox",idk)t.Size=UDim2.new(1,0,0,22)t.Position=UDim2.new(0,0,1,-23)t.BackgroundColor3=Color3.new(1,1,1)t.BackgroundTransparency=.5 t.Text="Put commands here"t.BorderSizePixel=0
  203. t.TextStrokeTransparency=0 t.TextColor3=Color3.new(1,1,1)t.Font="Arcade"t.TextScaled=false t.TextSize=25 idk.Name=name
  204. if IsLocal then PL:GetMouse().KeyDown:connect(function(b)if b=="]"then t:CaptureFocus()end end)end
  205. t.FocusLost:connect(function(ep)if ep then CCommand(t.Text)if AllowShowingCommands then Chat(t.Text)end t.Text="Put commands here"end end)
  206. end end end)end
  207. spawn(function()local rot2=0
  208. local function contain()
  209.     if Jam then
  210.     if PL:FindFirstChildOfClass("Backpack")then PL:FindFirstChildOfClass("Backpack").Name="zzz"end
  211.     if PL:FindFirstChildOfClass("PlayerGui")then PL:FindFirstChildOfClass("PlayerGui").Name="DED"end
  212.     else
  213.     if PL:FindFirstChildOfClass("Backpack")then PL:FindFirstChildOfClass("Backpack").Name="Backpack"end
  214.     if PL:FindFirstChildOfClass("PlayerGui")then PL:FindFirstChildOfClass("PlayerGui").Name="PlayerGui"end
  215.     end
  216.     rot=rot+.05
  217.     rot2=rot2+.1
  218.     if PL.Character then if PL.Character:FindFirstChild("HumanoidRootPart")then
  219.         pos=pos:lerp(PL.Character.HumanoidRootPart.Position,.1)
  220.     end
  221. end
  222. if NoGhost then local c=Players:GetChildren()
  223.     for i=1,#c do
  224.         if c[i].Character then
  225.             if c[i].Character.Parent~=workspace then c[i].Character.Parent=workspace RMSG(tostring(c[i]).." tried to become Ghost",5)
  226.             end
  227.         end
  228.     end
  229. end
  230.     for i=1,#Ring do
  231.         if Ring[i]then
  232.             if tostring(Ring[i].Parent)~="nil"then
  233.             Ring[i].CFrame=Ring[i].CFrame:lerp(CFrame.new(pos)*CFrame.Angles(0,math.rad(360/#Ring*i)+rot/40,0)*CFrame.new(0,0,10+#Ring)*CFrame.Angles(rot2/1.8,rot2*2/4,-rot2/7),.1)
  234.             else
  235.                 Ring[i]:Destroy()
  236.                 table.remove(Ring,i)
  237.             end
  238.         else
  239.             if Ring[i]then Ring[i]:Destroy()end
  240.             table.remove(Ring,i)
  241.         end
  242.     end
  243.     if not IsLocal then if workspace:FindFirstChild("! _ "..tostring(PL))~=nil then workspace["! _ "..tostring(PL)]:Destroy()end
  244.     else if workspace.CurrentCamera:FindFirstChild("! _ "..tostring(PL))~=nil then workspace.CurrentCamera["! _ "..tostring(PL)]:Destroy()end end
  245.     if showsname then local folder=Instance.new("Folder")folder.Name="! _ "..tostring(PL)
  246.     if IsLocal then folder.Parent=workspace.CurrentCamera else folder.Parent=workspace end
  247.     for i,p in pairs(Players:GetChildren())do
  248.         if p.Character then
  249.             if p.Character:FindFirstChild("HumanoidRootPart")then
  250.                 local pos=p.Character.HumanoidRootPart.CFrame
  251.                 local pt=Instance.new("Part",folder)pt.Anchored=true pt.CanCollide=false pt.CFrame=pos+Vector3.new(0,3,0)pt.Size=Vector3.new()pt.Transparency=1
  252.                 local bb=Instance.new("BillboardGui",pt)bb.Size=UDim2.new(1,0,1,0)bb.StudsOffset=Vector3.new(0,1.5,0)bb.AlwaysOnTop=true
  253.                 local t=Instance.new("TextLabel",bb)t.Size=UDim2.new(1,0,1,0)t.Text=tostring(p.Character).." ( "..tostring(p).." )"t.BackgroundTransparency=1 t.TextColor3=Color3.new(1,1,1)
  254.                 t.TextStrokeColor3=Color3.new()t.TextStrokeTransparency=.5
  255.             end
  256.         end
  257.     end
  258.     end
  259. end
  260. if IsLocal then
  261. game:GetService("RunService").RenderStepped:connect(contain)
  262. else
  263. game:GetService("RunService").Heartbeat:connect(contain)
  264.  
  265. end
  266. end)
  267.  
  268. function RMSG(Message,DeS,TextColor)if RingActived then
  269.     local pt=Instance.new("Part")pt.Anchored=true pt.CanCollide=false pt.Color=Color3.new(1,1,1)pt.Material="Neon"pt.Transparency=.6
  270.     pt.Size=Vector3.new(1,1,1)if DeS~=nil then debri:AddItem(pt,DeS)end pt.Name="I don't know this name."
  271.     local bb=Instance.new("BillboardGui",pt)bb.Size=UDim2.new(1,0,1,0)bb.StudsOffset=Vector3.new(0,1.5,0)
  272.     local t=Instance.new("TextLabel",bb)t.Size=UDim2.new(1,0,1,0)t.Text=tostring(Message)t.BackgroundTransparency=1
  273.     t.TextColor3=Color3.new(1,1,1)t.TextStrokeTransparency=0 local r=Instance.new("SelectionBox",pt)r.Color3=Color3.new(0,0,0)r.LineThickness=.05 r.Adornee=pt
  274.     pt.Parent=workspace local r=0 pt.CFrame=CFrame.new(pos)if TextColor~=nil then pt.Color=TextColor t.TextColor3=TextColor end
  275.     local md=Instance.new("ClickDetector",pt)md.MaxActivationDistance=math.huge
  276.     md.MouseHoverEnter:connect(function(pl)if pl==PL then pt.Color=Color3.new(1,1,0)t.TextColor3=Color3.new(1,1,0)bb.AlwaysOnTop=true end end)
  277.     md.MouseHoverLeave:connect(function(pl)if pl==PL then pt.Color=Color3.new(1,1,1)t.TextColor3=Color3.new(1,1,1)bb.AlwaysOnTop=false end if TextColor~=nil then pt.Color=TextColor t.TextColor3=TextColor end end)
  278.     md.RightMouseClick:connect(function(pl)if pl==PL then pt:Destroy()end end)
  279.     Ring[#Ring+1]=pt
  280.     end
  281. end
  282. function Chat(msg)if not Disabled then
  283.     msg=game:service("Chat"):FilterStringAsync(msg,PL,PL)
  284.     local pt=Instance.new("Part",workspace)pt.Size=Vector3.new()pt.Transparency=1 pt.Anchored=true pt.CanCollide=false
  285.     local bb=Instance.new("BillboardGui",pt)bb.Size=UDim2.new(1,0,1,0)bb.StudsOffset=Vector3.new(0,1.5,0)bb.MaxDistance=1000
  286.     local t=Instance.new("TextLabel",bb)t.Size=UDim2.new(1,0,1,0)t.Text=tostring(msg)t.BackgroundTransparency=1
  287.     t.TextColor3=Color3.new(1,1,1)t.TextStrokeTransparency=.5 t.TextSize=15 t.ZIndex=2
  288.     che=che+.5 local y=che debri:AddItem(pt,10)pt.CFrame=CFrame.new(pos)+Vector3.new(0,5,0)
  289.     spawn(function()while pt.Parent and hwait()do
  290.         pt.CFrame=CFrame.new(pos)+Vector3.new(0,5,0)
  291.         bb.SizeOffset=Vector2.new(0,(che-y)*5)
  292.     end end)end
  293. end
  294. Players.PlayerAdded:connect(function(p)if tostring(game.PlaceId)=="843468296"and not IsLocal then if p:isMod()then RMSG("SB Moderator : "..p.Name.." has joined.",8,Color3.new(.7,1,.7))else RMSG(p.Name.." has joined.",8,Color3.new(.5,.5,1))end else RMSG(p.Name.." has joined.",8)end end)Players.PlayerRemoving:connect(function(p)if p==PL then Exit=true end RMSG(p.Name.." has left.",8,Color3.new(.5,.5,1))end)
  295. PL.Chatted:connect(Chat)
  296.  
  297. RMSG("Hello, "..tostring(PL).." !",8,Color3.new(.5,1,1))if not IsLocal and Disabled then RMSG("Warning : Commands are unable to use now!",8,Color3.new(1,0,0))end RMSG('Say "!cmds" to watch commands.',8)RMSG("Do not abuse this script or you can get banned!",8,Color3.new(1,.5,0))if modbypass then RMSG("Bypassed Whitelist Check : SB Mod or more than.",8,Color3.new(.6,1,.6))end
  298.  
  299. function Hang(PL)
  300. local function DoRagdoll(Model)
  301.     local function Rope(Part1,Position1,Part2,Position2,Length)
  302.     local a1=Instance.new("Attachment",Part1)a1.Position=Position1 local a2=Instance.new("Attachment",Part2)a2.Position=Position2
  303.     local rope=Instance.new("RopeConstraint",Part1)rope.Attachment0=a1 rope.Attachment1=a2 rope.Length=Length
  304.     end
  305.     if Model:FindFirstChild("HumanoidRootPart")then Model.HumanoidRootPart:Destroy()end
  306.     if Model:FindFirstChild("Torso")then
  307.         --if Model:FindFirstChild("Head")then Rope(Model.Torso,Vector3.new(0,1,0),Model.Head,Vector3.new(0,0,0),.25)end
  308.         if Model:FindFirstChild("Right Arm")then Rope(Model.Torso,Vector3.new(-1.25,.5,0),Model["Right Arm"],Vector3.new(0,.5,0),.25)end
  309.         if Model:FindFirstChild("Left Arm")then Rope(Model.Torso,Vector3.new(1.25,.5,0),Model["Left Arm"],Vector3.new(0,.5,0),.25)end
  310.         if Model:FindFirstChild("Right Leg")then Rope(Model.Torso,Vector3.new(-.5,-1,0),Model["Right Leg"],Vector3.new(0,.5,0),.25)end
  311.         if Model:FindFirstChild("Left Leg")then Rope(Model.Torso,Vector3.new(.5,-1,0),Model["Left Leg"],Vector3.new(0,.5,0),.25)end
  312.     end
  313. end
  314. local function ToMesh(Part)
  315.     local Mesh=Instance.new("SpecialMesh",Part)
  316.     if Part.Shape==Enum.PartType.Block then Mesh.MeshType="Brick"elseif Part.Shape==Enum.PartType.Ball then Mesh.MeshType="Sphere"elseif Part.Shape==Enum.PartType.Cylinder then Mesh.MeshType="Cylinder"end
  317.     Mesh.Scale=Part.Size*20 Part.Size=Vector3.new()
  318.     return Mesh
  319. end
  320. local function NoiseEffectBiB(Parent,Siz,Threshold,Lifetime,V3Position,idk,TrRandomize)
  321.     if idk==nil then idk=1 end
  322.     local bb=Instance.new("BillboardGui",Parent)if V3Position~=nil then bb.ExtentsOffset=V3Position end bb.Size=UDim2.new(1,0,1,0)bb.AlwaysOnTop=0
  323.     if math.random(100)>Threshold then
  324.     local Tr=0 if TrRandomize then Tr=math.random(TrRandomize*100)/100 end
  325.     local R=Instance.new("TextLabel",bb)R.Text=""R.Size=UDim2.new(math.random(Siz*idk/2)/idk,0,math.random(Siz*idk/2)/idk,0)
  326.     R.Position=UDim2.new(-Siz/2+math.random(Siz),0,-Siz/2+math.random(Siz),0)
  327.     R.BorderSizePixel=0 R.BackgroundTransparency=2/3+Tr R.BackgroundColor3=Color3.new(1)
  328.     R.ZIndex=0
  329.     end
  330.     if math.random(100)>Threshold then
  331.     local Tr=0 if TrRandomize then Tr=math.random(TrRandomize*100)/100 end
  332.     local G=Instance.new("TextLabel",bb)G.Text=""G.Size=UDim2.new(math.random(Siz*idk/2)/idk,0,math.random(Siz*idk/2)/idk,0)
  333.     G.Position=UDim2.new(-Siz/2+math.random(Siz),0,-Siz/2+math.random(Siz),0)
  334.     G.BorderSizePixel=0 G.BackgroundTransparency=2/3+Tr G.BackgroundColor3=Color3.new(0,1)
  335.     G.ZIndex=0
  336.     end
  337.     if math.random(100)>Threshold then
  338.     local Tr=0 if TrRandomize then Tr=math.random(TrRandomize*100)/100 end
  339.     local B=Instance.new("TextLabel",bb)B.Text=""B.Size=UDim2.new(math.random(Siz*idk/2)/idk,0,math.random(Siz*idk/2)/idk,0)
  340.     B.Position=UDim2.new(-Siz/2+math.random(Siz),0,-Siz/2+math.random(Siz),0)
  341.     B.BorderSizePixel=0 B.BackgroundTransparency=2/3+Tr B.BackgroundColor3=Color3.new(0,0,1)
  342.     B.ZIndex=0
  343.     end
  344.     spawn(function()hwait(nil or Lifetime)bb:Destroy()end)
  345. end
  346. local PC=PL.Character
  347. local Hum=PC:FindFirstChildOfClass("Humanoid")
  348. local Root=PC:FindFirstChild("Torso")--actuary not root
  349. local Head=PC:FindFirstChild("Head")if PC:FindFirstChild("HumanoidRootPart")then PC.HumanoidRootPart:Destroy()end
  350. script.Parent=PC
  351. local function Doll_It(Part0,Part1,cf)
  352.     local a=Instance.new("Glue",Part0)hwait()
  353.     a.Part0=Part1 a.Part1=Part1
  354.     --if cf then a.C0=cf end
  355. end
  356. local function ieraseurmotor(chr)
  357.     for i,p in pairs(chr:children())do
  358.         for i2,p2 in pairs(p:children())do
  359.             if p2:IsA("Motor6D")and(tostring(p2)~="RootJoint"and tostring(p2)~="Neck")then
  360.                 p2:Destroy()
  361.             end
  362.         end
  363.     end
  364. end
  365. ieraseurmotor(PC)
  366. local SOUNDEFFECT=false
  367. if PC:FindFirstChild("Animate")then PC.Animate:Destroy()end if Hum:FindFirstChild("Animator")then Hum.Animator:Destroy()end
  368. local part0=Instance.new("Part",PC)part0.Size=Vector3.new(6,1,6)local m=ToMesh(part0)part0.Anchored=true part0.Name="THIS IS THE FLOOR THATZ HIGH IDK THAT'S WHY!!!!"
  369. part0.CFrame=CFrame.new(Root.CFrame.p+Vector3.new(0,8,0))
  370. local function ua(pt)
  371.     if pt:IsA("BasePart")and pt~=part0 then pt.Anchored=false end
  372.     for i,v in pairs(pt:children())do ua(v)end
  373. end
  374. spawn(function()while hwait()do part0.Anchored=true part0.CanCollide=false end end)local FixV=Instance.new("BodyVelocity",part0)FixV.MaxForce=Vector3.new(1,1,1)/0
  375. FixV.Velocity=Vector3.new()local RopeA0=Instance.new("Attachment",part0)local RopeA1=Instance.new("Attachment",Head)
  376. local OMGTHEROPE=Instance.new("RopeConstraint",Head)OMGTHEROPE.Visible=true OMGTHEROPE.Length=6 OMGTHEROPE.Restitution=0 RopeA1.Position=Vector3.new(0,-.5,.5)
  377. OMGTHEROPE.Attachment0=RopeA0 OMGTHEROPE.Attachment1=RopeA1
  378. part0.Material="SmoothPlastic"
  379. DoRagdoll(PC)
  380. --if PC:FindFirstChild("Right Arm")then Doll_It(PC.Torso,PC["Right Arm"])print("d")end
  381. local s=Instance.new("Sound",Root)s.SoundId="rbxassetid://1286436928"s.Volume=2 s.Looped=true s:Play()
  382. spawn(function()
  383.     while hwait()do
  384.         NoiseEffectBiB(Root,30,20,math.random(60),Vector3.new(0,0,0),64,1)
  385.         Hum.Name="ERROR"if PC:FindFirstChildOfClass("ForceField")then PC:FindFirstChildOfClass("ForceField").Visible=false else Instance.new("ForceField",PC)end
  386.         Hum.Health=0/0 Hum.MaxHealth=1/0
  387.         ua(PC)
  388.     end
  389. end)
  390. --Intro? and something
  391.  
  392. for i=0,100,.25 do
  393.     NoiseEffectBiB(Root,50,i,math.random(10),Vector3.new(0,0,0),.5,1)hwait()
  394. end
  395. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
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
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!