Misc. Scripts

Decal Brick Spam

local TextId = "rbxassetid://338700690" -- Decal ID Here
local DecalSpam = 1 -- Number of times you want decal ran
local Victim = game.Players.LocalPlayer.Name -- Who do you want the brick to spawn by; Change LocalPlayer to the name of the player you want it to spawn by!

nPart = Instance.new("Part",game.Workspace)
nPart.Name = "DecalPicture"
nPart.Size = Vector3.new(25,1,25)
nPart.Anchored = true
nPart.TopSurface = "Smooth"

nPart:MoveTo(game.Workspace.Victim.Torso.Position + Vector3.new(math.random(-10,10),0,math.random(-10,10)))

nIntV = Instance.new("IntValue",nPart)
nIntV.Name = "TestedValue"
nIntV.Value = 0

while nIntV.Value <= DecalSpam do

    nDecal = Instance.new("Decal",nPart)
    nDecal.Texture = TextId
    nDecal.Face = "Top"
    nIntV.Value = nIntV.Value + 1
    wait()

end

FFA Aimbot (Rocky2u)

loadstring(game:GetObjects('rbxassetid://340856112')[1].Source)()

wait()

_G.FREE_FOR_ALL = true

_G.BIND = 50 -- LEFT CTRL
_G.ESP_BIND = 48 -- LEFT ALT
_G.CHANGE_AIM = 'q'

Teams Aimbot (Rocky2u)

loadstring(game:GetObjects('rbxassetid://340856112')[1].Source)()

wait()

_G.FREE_FOR_ALL = false

_G.BIND = 50 -- LEFT CTRL
_G.ESP_BIND = 48 -- LEFT ALT
_G.CHANGE_AIM = 'q'


Filtering Enabled Check

print(game.Workspace.FilteringEnabled)

Find All GUI's

function recurse(x)
if x:isA("ScreenGui") then
print(x.ClassName.." : "..x:GetFullName())
else
for i,v in pairs(x:GetChildren()) do
recurse(v)
end
end
end
recurse(workspace)

Guest Chat

local player = game.Players.LocalPlayer
player.userId = 261
player.Name = '001'
player.Parent = nil
player.Parent = game.Players
-- CHATLOGS AS DEVCONSOLE --
for i,v in pairs(game.Players:children'') do
v.Chatted:connect(function(m)
print(v.Name..": "..m)
end)
end

game.Players.ChildAdded:connect(function(v)
v.Chatted:connect(function(m)
print(v.Name..": "..m)
end)
end)
-- CHATBAR SCRIPT --

local plrgui = player.PlayerGui
local mouse = player:GetMouse()
local sgui = Instance.new('ScreenGui',game.CoreGui)
sgui.Name = 'GuestChat'
local createChatBar = function()
    local chatbar = Instance.new('TextBox',sgui)
    chatbar.Name = 'Chatbar'
    chatbar.Size = UDim2.new(1,0,0.03,0)
    chatbar.Position = UDim2.new(0,0,0.97,0)
    chatbar.BackgroundColor3 = Color3.new(70/255,70/255,70/255)
    chatbar.BorderSizePixel = 0
    chatbar.TextXAlignment = 'Left'
    chatbar.TextColor3 = Color3.new(255/255,255/255,255/255)
    chatbar.Font = 'ArialBold'
    chatbar.FontSize = 'Size14'
    chatbar.Text = "Press 'E' to chat as a guest, press F9 to see chatlogs."
    return chatbar
end
local chatbar = createChatBar()
mouse.KeyDown:connect(function(key)
    if key:lower():byte() == 101 then
        chatbar:CaptureFocus()
    end
end)
chatbar.FocusLost:connect(function()
    if chatbar.Text ~= "Press 'E' to chat as a guest, press F9 to see chatlogs." or chatbar.Text ~= "" then
        game.Players:Chat(chatbar.Text)
        chatbar.Text = "Press 'E' to chat as a guest, press F9 to see chatlogs."
    end
end)

Map Copier

-- Made by 001 from v3rmillion.net.
-- Map Copy Script: Rewritten
Settings = {
Copy = true, -- Using this option might cause lag in game but it doesn't remove the game.
Creator = '001', -- Created by 001 from V3rmillion.net.
EverythingAnchored = false, -- Anchors every part.
CopyLightingProperties = true, -- Copy ambient, skybox, timeofday, globalshadows, etc properties from Lighting.
}


AllowedClassnames = {'Part','WedgePart','SpawnLocation','UnionOperation','Seat','VehicleSeat','TrussPart'}
source = ""
newline = [[

]]
tablecheck = function(t,value) -- Function: tablecheck, Description: checks a table for a value, Variables: table (table), value (string).
    for i,v in pairs(t) do
        if v==value then
            return true
        end
    end
    return nil
end
printFunction = function(str) -- Function: printFunction, Description: Custom print function, Variables: print (string).
    source=source..";"..str
end
copy = function(children) -- no time to document this,
    local PartClass = children.ClassName
    if tablecheck(AllowedClassnames, PartClass) then
        local PartName = "P"..math.random(100,999)
        printFunction(PartName.."=Instance.new('"..PartClass.."', Workspace)") -- Instance.new
        upc=tostring('false')
        if children:IsA'UnionOperation' then
            upc=tostring(children.UsePartColor)
        end
        shape='"N"'
        if children:IsA'Part' or children:IsA'SpawnLocation' or children:IsA'Seat' then
            shape=tostring(children.Shape)
        end
        formfactor='"N"'
        if children:IsA'Part' or children:IsA'WedgePart' or children:IsA'SpawnLocation' or children:IsA'Seat' then
            formfactor=tostring(children.FormFactor)
        end
        local Anchored = tostring(children.Anchored)
        local Locked = tostring(children.Locked)
        local Name = children.Name
        local Size = children.Size
        local CanCollide = tostring(children.CanCollide)
        local Archivable = tostring(children.Archivable)
        local CFrame = children.CFrame
        local Transparency = tonumber(children.Transparency)
        local Reflectance = tonumber(children.Reflectance)
        local Material = children.Material
        local BrickColor = children.BrickColor

        local fc = PartName..",'"..Name.."',"..tostring(Settings.EverythingAnchored)..","..shape..","..upc..","..CanCollide..","..Locked..","..Anchored..","..Archivable..","..formfactor..",{"..tostring(Size).."},{"..tostring(CFrame).."},'"..tostring(BrickColor).."',"..Transparency..","..tostring(Material)..","..Reflectance
        printFunction("c("..fc..")")
        printFunction("ss("..PartName..","..tostring(children.BackSurface)..","..tostring(children.BottomSurface)..","..tostring(children.FrontSurface)..","..tostring(children.LeftSurface)..","..tostring(children.RightSurface)..","..tostring(children.TopSurface)..")")
        for i,v in pairs(children:GetChildren()) do
            if v:IsA'Decal' then
                printFunction("d("..v.Name..","..tonumber(v.Transparency)..",'"..tostring(v.Texture).."',"..tostring(v.Face)..",'"..tostring(v.Name).."')") -- Decal
            elseif v:IsA'SpecialMesh' then
                -- For mesh (d): p=part,t=meshid,te=meshtexture,face=size,n=name,ff=meshtype
                printFunction("d("..PartName..",'"..tostring(v.MeshId).."','"..tostring(v.TextureId).."',{"..tostring(v.Scale).."},'"..tostring(v.Name).."',"..tostring(v.MeshType)..")") -- Mesh
            end
        end
    end
end
local decryptFunc = [[
        c=function(part,name,everythinganchored,shape,usepartcolor,cancollide,locked,anchored,archivable,formfactor,size,cframe,brickcolor,transparency,material,reflectance)
part.Name=name
function tabltostring(tabl)
    s=''
    for i,v in pairs(tabl) do
        s=s..v
    end
    return s
end
function n(nu)
    return tonumber(nu)
end
if part:IsA'Part' or part:IsA'SpawnLocation' or part:IsA'Seat' then
part.Shape=shape
end
if part:IsA'UnionOperation' then
part.UsePartColor=usepartcolor
end
part.CanCollide=cancollide
part.Locked=locked
if everythinganchored == true then
part.Anchored = true
else
part.Anchored = anchored
end
part.Archivable = archivable
if part:IsA'Part' or part:IsA'WedgePart' or part:IsA'SpawnLocation' or part:IsA'Seat' then
part.FormFactor=formfactor
end
part.Size = Vector3.new(n(size[1]),n(size[2]),n(size[3]))
part.CFrame = CFrame.new(n(cframe[1]),n(cframe[2]),n(cframe[3]),n(cframe[4]),n(cframe[5]),n(cframe[6]),n(cframe[7]),n(cframe[8]),n(cframe[9]),n(cframe[10]),n(cframe[11]),n(cframe[12]))
part.BrickColor = BrickColor.new(brickcolor)
part.Material = material
part.Transparency = transparency
part.Reflectance = reflectance
end
]]
local function magiclines( str )
    if str:sub(-1)~="\n" then str=str.."\n" end
        return str:gmatch("(.-)\n")
end
function findLoop(childre)
Instance.new('Model',game.Lighting).Name='Copy'
findLoop2 = function(children) -- Function: findLoop, Description: Just a find loop, Variables: children (Part).
    for i,v in pairs(children:GetChildren()) do
        if tablecheck(AllowedClassnames, v.ClassName) then
            if Settings.Copy == true then
                v:Clone().Parent = game.Lighting.Copy
            else
                v.Parent = game.Lighting.Copy
            end
        end
        if v:FindFirstChild'HumanoidRootPart' ~= true then -- Anti player copy.
        findLoop2(v)
        end
    end
end
findLoop2(childre)
wait(2)
for line in magiclines(decryptFunc) do
    printFunction(line)
    wait()
end
wait(4)
printFunction("d=function(p,t,te,face,n,ff)if type(ff)=='string' then me=Instance.new('SpecialMesh',p);me.MeshType=ff;me.MeshId=t;me.TextureId=te;me.Name=n;me.Scale=Vector3.new(face[1],face[2],face[3]); else xx=Instance.new('Decal',p);xx.Texture=te;xx.Transparency=t;xx.Face=face;xx.Name=n;end;end") -- Decal (d) function.
printFunction("ss=function(p,bs,bz,fs,ls,rs,ts)p.BackSurface=bs;p.BottomSurface=bz;p.FrontSurface=fs;p.LeftSurface=ls;p.RightSurface=rs;p.TopSurface=ts;end") -- SetSurface (ss) function.
if Settings.CopyLightingProperties == true then
    printFunction("game.Lighting.Ambient = Color3.new("..tostring(game.Lighting.Ambient)..")")
    printFunction("game.Lighting.TimeOfDay = '"..tostring(game.Lighting.TimeOfDay).."'")
    printFunction("game.Lighting.Brightness = "..tostring(game.Lighting.Brightness))
    printFunction("game.Lighting.ColorShift_Bottom = Color3.new("..tostring(game.Lighting.ColorShift_Bottom)..")")
    printFunction("game.Lighting.ColorShift_Top = Color3.new("..tostring(game.Lighting.ColorShift_Top)..")")
    printFunction("game.Lighting.GlobalShadows = "..tostring(game.Lighting.GlobalShadows))
    printFunction("game.Lighting.OutdoorAmbient = Color3.new("..tostring(game.Lighting.OutdoorAmbient)..")")
    printFunction("game.Lighting.ShadowColor = Color3.new("..tostring(game.Lighting.ShadowColor)..")")
    printFunction("game.Lighting.FogColor = Color3.new("..tostring(game.Lighting.FogColor)..")")
    printFunction("game.Lighting.FogEnd = "..tostring(game.Lighting.FogEnd))
    printFunction("game.Lighting.FogStart = "..tostring(game.Lighting.FogStart))
    printFunction("game.Lighting.GeographicLatitude = "..tostring(game.Lighting.GeographicLatitude))
    for i,v in pairs(game.Lighting:GetChildren()) do
        if v:IsA'Sky' then
            printFunction("a=Instance.new('Sky',game.Lighting)")
            printFunction("a.CelestialBodiesShown="..tostring(v.CelestialBodiesShown))
            printFunction("a.SkyboxBk='"..tostring(v.SkyboxBk).."'")
            printFunction("a.SkyboxDn='"..tostring(v.SkyboxDn).."'")
            printFunction("a.SkyboxFt='"..tostring(v.SkyboxFt).."'")
            printFunction("a.SkyboxLf='"..tostring(v.SkyboxLf).."'")
            printFunction("a.SkyboxRt='"..tostring(v.SkyboxRt).."'")
            printFunction("a.SkyboxUp='"..tostring(v.SkyboxUp).."'")
            printFunction("a.StarCount="..tostring(v.StarCount))
            printFunction("a.Name='"..tostring(v.Name).."'")
        end
    end
    wait(2)
end
for i,v in pairs(game.Lighting.Copy:GetChildren()) do
    copy(v)
end
Clipboard.set(source)
end

findLoop(game.Workspace) -- Start the script.

Place Teleport

local quickPlaceID = 339049565 -- Change this if you want to have your placeID ready in the textbox so you don't have to copy/paste and waste time.
local justGo = true -- Change this if you want to teleport people immediately when the GUI is inserted. Make sure you have a placeID set in quickPlaceID.

local whitelistPlayers = {} -- People who you don't want to teleport.


local GUI = game:GetObjects("rbxassetid://281287169")[1]:Clone()
GUI.Parent = game.Players.LocalPlayer.PlayerGui
script.Parent = GUI

local mainWindow = GUI:WaitForChild("Window")
local mainWindowContent = mainWindow:WaitForChild("Main")
local outputBase = mainWindowContent:WaitForChild("OutputText")
local outputBox = mainWindowContent:WaitForChild("Output")
local Settings = mainWindowContent:WaitForChild("Settings")
local ToId = mainWindowContent:WaitForChild("PlaceID")
local GoButton = mainWindowContent:WaitForChild("GOButton")
local AutoButton = Settings:WaitForChild("AutoSetting")

local PID = ""
local LocatedTeleporter = ""
local located = false
local foundTele = ""
local speedrun = false

ToId.Text = tostring(quickPlaceID)

function RecursiveSearch(obj, objname) -- Old ALX Function
    local foundObj = false
    for i,v in pairs(obj:GetChildren()) do
        if v.Name == objname then
            foundObj = v
        end
    end
    return foundObj
end

function FindTeleporter(root)
    for i,v in pairs(root:GetChildren()) do
        if RecursiveSearch(v,"TouchScript") and RecursiveSearch(v,"teleBeam1") then
            foundTele = v
            return
        end
        FindTeleporter(v)
    end
    if game.PlaceId == 183364845 then
        foundTele = workspace.TpToNextWorld
        speedrun = true
        return
    end
end

function printOutput(str)
    for i,v in pairs(outputBox:GetChildren()) do
        if v.Position.Y.Offset < 10 then
            v:Destroy()
        end
        v.Position = UDim2.new(0,0,0,v.Position.Y.Offset-20)
    end
    local newOutput = outputBase:Clone()
    newOutput.Position = UDim2.new(0,0,0,285)
    newOutput.Parent = outputBox
    newOutput.Text = str
    newOutput.Visible = true
end

function locateTeleporter()
    FindTeleporter(workspace)
    if foundTele == false then
        printOutput("Teleporter not found. Cannot continue.")
    else
        if RecursiveSearch(foundTele,"PlaceId") then
            printOutput("Teleporter found... Masking...")
            for i,v2 in pairs(foundTele:GetChildren()) do -- Masks your teleporter
                if v2:isA("BasePart") then
                    if RecursiveSearch(v2,"Decal") then
                        v2.Decal:Destroy()
                    end
                    v2.Transparency = 1
                    v2.Anchored = true
                    v2.CanCollide = false
                end
            end
            PID = foundTele.PlaceId
            print(PID)
            LocatedTeleporter = foundTele
            located = true
        elseif RecursiveSearch(foundTele.TouchScript.TeleportScript, "PlaceId") then
            printOutput("Teleporter found... Masking...")
            for i,v2 in pairs(foundTele:GetChildren()) do -- Masks your teleporter
                if v2:isA("BasePart") then
                    if RecursiveSearch(v2,"Decal") then
                        v2.Decal:Destroy()
                    end
                    v2.Transparency = 1
                    v2.Anchored = true
                    v2.CanCollide = false
                end
            end
            PID = foundTele.TouchScript.TeleportScript.PlaceId
            LocatedTeleporter = foundTele
            located = true
        else
            printOutput("Incompatible teleporter.")
        end
    end
end

function checkWhitelist(name)
    for i,v in pairs(whitelistPlayers) do
        if v == name then
            return false
        end
    end
    return true
end

function Place()
    local placeID = ToId.Text
    if #game.Players:GetChildren() - 1 - #whitelistPlayers == 0 then
        printOutput("No players to teleport.")
        return
    elseif placeID == "" or string.find(placeID,"%a") or string.len(placeID) > 9 then
        printOutput("Invalid ID")
        return
    end
    print("Teleportation process to "..placeID.." has started on "..#game.Players:GetChildren() - 1 - #whitelistPlayers)
    if located then
        print("--=Teleporter Found, starting teleport=--")
        PID.Value = placeID
        if speedrun then
            LocatedTeleporter.swagtp.Disabled = true
            wait()
            LocatedTeleporter.swagtp.Disabled = false
        end
        for i,v in pairs(game.Players:GetPlayers()) do
            if v.Name ~= game.Players.LocalPlayer.Name and checkWhitelist(v.Name) then
                if RecursiveSearch(game.Players,v.Name) and RecursiveSearch(game.Workspace,v.Name) then
                    printOutput("Attempting to teleport "..v.Name.." to "..placeID.."...")
                    local playerBase = game.Workspace:FindFirstChild(v.Name)
                    for i,v2 in pairs(playerBase:GetChildren()) do -- Masks the player
                        if v2:isA("BasePart") then
                            if RecursiveSearch(v2,"face") then
                                v2.face:Destroy()
                            end
                            v2.Transparency = 1
                        elseif v:isA("Hat") then
                            v2:Destroy()
                        end
                    end
                    spawn(function()
                        while wait() do
                            if not game.Players:FindFirstChild(v.Name) then return end
                            if game.Workspace:FindFirstChild(v.Name) then
                                playerBase = game.Workspace:FindFirstChild(v.Name)
                                if playerBase:FindFirstChild("Torso") and not speedrun then
                                    playerBase.HumanoidRootPart.CFrame = LocatedTeleporter.teleBeam1.CFrame
                                else
                                    playerBase.HumanoidRootPart.CFrame = LocatedTeleporter.CFrame
                                end
                            end
                        end
                        printOutput("Teleported "..v.Name.." to "..placeID.." successfully.")
                    end)
                end
            end
        end
    else
        printOutput("Teleporter Not Found")
    end
end

wait()
printOutput("-==== Limited Placing Gui by Raspberry Pi loaded ===-")
printOutput("Locating teleporter...")
wait(0.5)
locateTeleporter()
if located then
    printOutput('Ready. Paste in a PlaceId and click "GO" to start placing.')
    if justGo then
        Place()
    end
    GoButton.Active = true
    GoButton.TextColor3 = Color3.new(1,1,1)
    GoButton.MouseButton1Down:connect(function()
        if AutoButton.enabled.Visible then return end
        Place()
    end)
    AutoButton.MouseButton1Down:connect(function()
        if AutoButton.enabled.Visible == false then
            AutoButton.enabled.Visible = true
            printOutput("Auto On.")
        else
            AutoButton.enabled.Visible = false
            printOutput("Auto Off.")
        end
    end)
    spawn(function()
        while wait(1) do
            if AutoButton.enabled.Visible == true then
                GoButton.Active = false
                GoButton.TextColor3 = Color3.new(160/255, 160/255, 160/255)
                Place()
            else
                GoButton.Active = true
                GoButton.TextColor3 = Color3.new(1,1,1)
            end
        end
    end)
end

Rape Script

function fWeld(zName, zParent, zPart0, zPart1, zCoco, a, b, c, d, e, f)
local funcw = Instance.new("Weld")
funcw.Name = zName
funcw.Parent = zParent
funcw.Part0 = zPart0
funcw.Part1 = zPart1
if (zCoco == true) then
funcw.C0 = CFrame.new(a, b, c) * CFrame.fromEulerAnglesXYZ(d, e, f)
else
funcw.C1 = CFrame.new(a, b, c) * CFrame.fromEulerAnglesXYZ(d, e, f)
end
return funcw
end
function fun(n1, n2)
pcall(function()
t1 = game.Players[n1].Character.Torso
t2 = game.Players[n2].Character.Torso
t2.Parent.Humanoid.PlatformStand = true
t1["Left Shoulder"]:Remove()
ls1 = Instance.new("Weld")
ls1.Parent = t1
ls1.Part0 = t1
ls1.Part1 = t1.Parent["Left Arm"]
ls1.C0 = CFrame.new(-1.5,0,0)
ls1.Name = "Left Shoulder"
t1["Right Shoulder"]:Remove()
rs1 = Instance.new("Weld")
rs1.Parent = t1
rs1.Part0 = t1
rs1.Part1 = t1.Parent["Right Arm"]
rs1.C0 = CFrame.new(1.5,0,0)
rs1.Name = "Right Shoulder"
t2["Left Shoulder"]:Remove()
ls2 = Instance.new("Weld")
ls2.Parent = t2
ls2.Part0 = t2
ls2.Part1 = t2.Parent["Left Arm"]
ls2.C0 = CFrame.new(-1.5,0,0)
ls2.Name = "Left Shoulder"
t2["Right Shoulder"]:Remove()
rs2 = Instance.new("Weld")
rs2.Parent = t2
rs2.Part0 = t2
rs2.Part1 = t2.Parent["Right Arm"]
rs2.C0 = CFrame.new(1.5,0,0)
rs2.Name = "Right Shoulder"
t2["Left Hip"]:Remove()
lh2 = Instance.new("Weld")
lh2.Parent = t2
lh2.Part0 = t2
lh2.Part1 = t2.Parent["Left Leg"]
lh2.C0 = CFrame.new(-0.5,-2,0)
lh2.Name = "Left Hip"
t2["Right Hip"]:Remove()
rh2 = Instance.new("Weld")
rh2.Parent = t2
rh2.Part0 = t2
rh2.Part1 = t2.Parent["Right Leg"]
rh2.C0 = CFrame.new(0.5,-2,0)
rh2.Name = "Right Hip"
local d = Instance.new("Part")
d.TopSurface = 0
d.BottomSurface = 0
d.BrickColor = BrickColor.new("Medium stone grey")
d.Shape = "Ball"
d.Parent = t1
d.Size = Vector3.new(1,1,1)
local dm = Instance.new("SpecialMesh")
dm.MeshType = "Sphere"
dm.Parent = d
dm.Scale = Vector3.new(0.4,0.4,0.4)
fWeld("weld",t1,t1,d,true,-0.2,-1.3,-0.6,0,0,0)
d2 = d:Clone()
d2.Parent = t1
fWeld("weld",t1,t1,d2,true,0.2,-1.3,-0.6,0,0,0)
local c = Instance.new("Part")
c.TopSurface = 0
c.BottomSurface = 0
c.CanCollide = false
c.BrickColor = BrickColor.new("Pastel brown")
c.Parent = t1
c.formFactor = "Custom"
c.Size = Vector3.new(0.4,1.3,0.4)
cm = Instance.new("CylinderMesh")
cm.Parent = c
a = fWeld("weld",t1,t1,c,true,0,-1,-0.52+(-c.Size.y/2),math.rad(-80),0,0)
c2 = d:Clone()
c2.BrickColor = BrickColor.new("Medium stone grey")
c2.Mesh.Scale = Vector3.new(0.4,0.62,0.4)
c2.Parent = t1
fWeld("weld",c,c,c2,true,0,0+(c.Size.y/2),0,math.rad(-10),0,0)
local bl = Instance.new("Part")
bl.TopSurface = 0
bl.BottomSurface = 0
bl.CanCollide = false
bl.BrickColor = BrickColor.new("Pastel brown")
bl.Shape = "Ball"
bl.Parent = t2
bl.Size = Vector3.new(1,1,1)
local dm = Instance.new("SpecialMesh")
dm.MeshType = "Sphere"
dm.Parent = bl
dm.Scale = Vector3.new(1.2,1.2,1.2)
fWeld("weld",t2,t2,bl,true,-0.5,0.5,-0.6,0,0,0)
local br = Instance.new("Part")
br.TopSurface = 0
br.BottomSurface = 0
br.CanCollide = false
br.BrickColor = BrickColor.new("Pastel brown")
br.Shape = "Ball"
br.Parent = t2
br.Size = Vector3.new(1,1,1)
local dm = Instance.new("SpecialMesh")
dm.MeshType = "Sphere"
dm.Parent = br
dm.Scale = Vector3.new(1.2,1.2,1.2)
fWeld("weld",t2,t2,br,true,0.5,0.5,-0.6,0,0,0)
local bln = Instance.new("Part")
bln.TopSurface = 0
bln.BottomSurface = 0
bln.CanCollide = false
bln.Shape = "Ball"
bln.Parent = t2
bln.Size = Vector3.new(1,1,1)
local dm = Instance.new("SpecialMesh")
dm.MeshType = "Sphere"
dm.Parent = bln
dm.Scale = Vector3.new(0.2,0.2,0.2)
fWeld("weld",t2,t2,bln,true,-0.5,0.5,-1.2,0,0,0)
local brn = Instance.new("Part")
brn.TopSurface = 0
brn.BottomSurface = 0
brn.CanCollide = false
brn.Shape = "Ball"
brn.Parent = t2
brn.Size = Vector3.new(1,1,1)
local dm = Instance.new("SpecialMesh")
dm.MeshType = "Sphere"
dm.Parent = brn
dm.Scale = Vector3.new(0.2,0.2,0.2)
fWeld("weld",t2,t2,brn,true,0.5,0.5,-1.2,0,0,0)
lh2.C1 = CFrame.new(0,-1.5,-0.5) * CFrame.Angles(0.9,-0.4,0)
rh2.C1 = CFrame.new(0,-1.5,-0.5) * CFrame.Angles(0.9,0.4,0)
ls2.C1 = CFrame.new(-0.5,-1.3,-0.5) * CFrame.Angles(0.9,-0.4,0)
rs2.C1 = CFrame.new(0.5,-1.3,-0.5) * CFrame.Angles(0.9,0.4,0)
ls1.C1 = CFrame.new(-0.5,0.7,0) * CFrame.Angles(-0.9,-0.4,0)
rs1.C1 = CFrame.new(0.5,0.7,0) * CFrame.Angles(-0.9,0.4,0)
if t1:findFirstChild("weldx") ~= nil then
t1.weldx:Remove()
end
we = fWeld("weldx", t1, t1, t2, true, 0, -0.9, -1.3, math.rad(-90), 0, 0)
n = t2.Neck
n.C0 = CFrame.new(0, 1.5, 0) * CFrame.Angles(math.rad(-210), math.rad(180), 0)
end)
coroutine.resume(coroutine.create(function()
while wait() do
for i = 1,6 do
we.C1 = we.C1 * CFrame.new(0,-0.3,0)
wait()
end

for i = 1,6 do
we.C1 = we.C1 * CFrame.new(0,0.3,0)
wait()
end
end
end))
end
fun("PeIadophobian", "trinitytheauthor")
[/code]
Remote Events & Functions
[code]
function Search(obj)
if obj:isA("RemoteEvent") then
print(obj:GetFullName())
else
for i,v in pairs(obj:GetChildren()) do
Search(v)
end
end

end
Search(game)


Server Lock

while true do
for a, xb in pairs(game.Players:children()) do
if xb.Name~=game.Players.LocalPlayer.Name then xb:Destroy() end
end
wait(.69)
end

SkyBox Decal (change the ID)

s = Instance.new("Sky")
s.Name = "SKY"
s.SkyboxBk = "http://www.roblox.com/asset/?id=78391907"
s.SkyboxDn = "http://www.roblox.com/asset/?id=78391907"
s.SkyboxFt = "http://www.roblox.com/asset/?id=78391907"
s.SkyboxLf = "http://www.roblox.com/asset/?id=78391907"
s.SkyboxRt = "http://www.roblox.com/asset/?id=78391907"
s.SkyboxUp = "http://www.roblox.com/asset/?id=78391907"
s.Parent = game.Lighting