Z3X

Player = game.Players.LocalPlayer

local ScreenGui = Instance.new("ScreenGui", Player.PlayerGui)
ScreenGui.Name = "Z3X Gui"
local Frame1 = Instance.new("Frame", ScreenGui)
Frame1.Name = "Main"
Frame1.Size = UDim2.new(0.3, 0, 0.4, 0)
Frame1.Position = UDim2.new(0.02, 0, 0.2, 0)
Frame1.Style = "RobloxSquare"
local Label1 = Instance.new("TextLabel", Frame1)
Label1.Size = UDim2.new(1,0,0,0.5,0)
Label1.TextColor3 = Color3.new(170, 0, 0)
Label1.Text = "X3Z Gui V1"
Label1.BorderSizePixel = 0
Label1.Font = "Legacy"
Label1.FontSize = "Size12"
Label1.Position = UDim2.new(0, 0, 0.02, 0)
local admin = Instance.new("TextButton", Frame1)
admin.Size = UDim2.new(0.2, 0, 0.1, 0)
admin.Position = UDim2.new(0, 0, 0.1, 0)
admin.Text = "Admin"
admin.BackgroundColor3 = Color3.new(0, 110, 160)
admin.BackgroundTransparency = 0.6
admin.TextColor3 = Color3.new(1, 1, 1)
admin.MouseButton1Down:connect(function(admin1)
	adminlist = {Player.Name}
bannedlist = {"Nobody is banned right now..."}
texture = ""

disableBan = false
disableAdmin = false

owner = Player.Name --Change this to your name

--[[Hey guys! Its nominate10 here. I've decided to update these commands myself, as I see Person299 probably gave up on it.
You will be able to find the commands made by me, down below. Send me feedback & ideas. Thanks!
For the most recent script (I update frequently), go to http://www.roblox.com/Nominate10s-Admin-Commands-V2-5-item?id=34853394
--]]


--[[
 I update this command script alot, so if you want to get the newest version of the script, go to http://www.roblox.com/Item.aspx?ID=5277383 every once in a while.

If theres anything you think this command script needs, just message me (Person299) and i might put it in. :)
And also, if you find any bugs, report them to me.

The commands are,

commands
Shows a list of all the commands

BY tyrell123ng8
rickroll/tyrell123ng8
makes tyrell123ng8 dance to annoying rickroll XD

unrickrool/tyrell123ng8
saves tyrell123ng8 from the rick astley 0_0

music/soundid
creates a song for others to here with the sound id as soundid,
it only plays once...

BY tyrell123ng8:
fire/tyrell123ng8
Gives tyrell123ng8 fire

unfire/tyrell123ng8
Removes any fire in tyrell123ng8's Torso

smoke/tyrell123ng8
Gives tyrell123ng8 smoke

unsmoke/tyrell123ng8
Removes any smoke in tyrell123ng8's Torso

color/tyrell123ng8/blue
Colors tyrell123ng8's body blue and removes its clothes.

advancedbtools/tyrell123ng8
Gives tyrell123ng8 advanced building tools.

insert/tyrell123ng8
Gives tyrell123ng8 an insert tool.

noinsert/tyrell123ng8
Removes tyrell123ng8's insert tool.

resetambient/
Resets the ambient to 255; 255; 255

randomambient/
Sets the Ambient to a random color.

getambient/
Displays the current ambient to the speaker.

platformstand/tyrell123ng8
Sets the PlatformStand property of tyrell123ng8's Humanoid to true

unplatformstand/tyrell123ng8
Sets the PlatformStand property of tyrell123ng8's Humanoid to false

cframe1/tyrell123ng8
Gives tyrell123ng8 a CFrame Tool

cframe2/tyrell123ng8
Gives tyrell123ng8 a GUI CFrame Tool

skateboard/tyrell123ng8
Gives tyrell123ng8 a skateboard

appearance/tyrell123ng8/416314
Changes tyrell123ng8's character look to the ID of 416314 and kills him.

wedge/4/1/2
creates a wedge with the given dimensions.

cylinder/4/1/2
Creates a cylinder with the given dimensions.

block/4/1/2
Creates a brick with a BlockMesh with the given dimensions.

sphere/4/4/4
Creates a sphere with the given dimensions

plate/4/1/2
Creates a plate with the given dimensions

burn/tyrell123ng8
Sets tyrell123ng8 on fire and slowly depleats his health.

watch/tyrell123ng8
Sets YOUR camera to view tyrell123ng8.

removegear/tyrell123ng8
Removes all tools in tyrell123ng8's StarterGear

savetools/tyrell123ng8
Copies all of tyrell123ng8's tools in Backpack and clones them to his StarterGear.

localscript/tyrell123ng8/[source]
Makes a LocalScript inside nominate10 with the defined source

setupteams/
MUST BE DONE BEFORE USING TEAM-RELATED COMMANDS! (unless teams already exist)

team/Bloxxers/Bright blue
Makes a new team with the name "Bloxxers" and the TeamColor "Bright Blue" (CASE SENSITIVE!)

changeteam/tyrell123ng8/Bloxxers
Changes tyrell123ng8's team to Bloxxers

removeteam/Bloxxers
Removes the Bloxxers team and moves its members to an "Unassigned" team

====================================
====================================
BY Person299

fix
If the command script breaks for you, say this to fix it

kill/Person299
kills Person299

loopkill/Person299
Repeatedly kills Person299 when he respawns

unloopkill/Person299
Undos loopkill/

heal/Person299
Returns Person299 to full health

damage/Person299/50
Makes Person299's character take 50 damage

health/Person299/999999
Makes Person299's MaxHealth and Health 999999

kick/Person299
Removes Person299 from the game, cannot be used by admin/ed people

ban/Person299
Removes Person299 from the game and keeps him from reenterring, cannot be used by admin/ed people

bannedlist
Shows a list of everyone banned

unban/Person299
Unbans Person299

explode/Person299
Explodes Person299's character

rocket/Person299
Straps a rocket onto Person299's back

removetools/Person299
Removes all of Person299's tools.

givetools/Person299
Gives Person299 all the tools in StarterPack

givebtools/Person299
Gives Person299 the building tools

sit/Person299
Makes Person299 sit

part/4/1/2
Makes a part with the given dimensions appear over your character

respawn/Person299
Makes Person299's character respawn

jail/Person299
Makes a lil jail cell around Person299's character

unjail/Person299
Undos jail/

punish/Person299
Puts Person299's character in game.Lighting

unpunish/Person299
Undos punish/

merge/Person299/Farvei
Makes Person299 control Farvei's character

teleport/Person299/nccvoyager
Teleports Person299's character to nccvoyager's character

control/Person299
Makes you control Person299's character

change/Person299/Money/999999
Makes the Money value in Person299's leaderstats 999999

tools
Gives you a list of all the tools available to be give/en, the tool must be in game.Lighting

give/Person299/Tool
Give's Person299 a tool, the toolname can be abbreviated

time/15.30
Makes game.Lighting.TimeOfDay 15:30

ambient/255/0/0
Makes game.Lighting.Ambient 255,0,0

maxplayers/20
Makes game.Players.MaxPlayers 20

nograv/Person299
Makes Person299 almost weightless

antigrav/Person299
Gives Person299 antigravity properties

grav/Person299
Returns Person299's gravity to normal

highgrav/Person299
Makes Person299 heavier

setgrav/Person299/-196
Sets Person299's gravity

trip/Person299
Makes Person299's character trip

walkspeed/Person299/99
Makes Person299's character's humanoid's WalkSpeed 99, 16 is average

invisible/Person299
Makes Person299's character invisible

visible/Person299
Undos invisible/

freeze/Person299
Makes Person299's character unable to move

thaw/Person299
Undos freeze/

unlock/Person299
Makes Person299's character unlocked

lock/Person299
Makes Person299's character locked

ff/Person299
Gives Person299's character a ForceField

unff/Person299
Undos ff/

sparkles/Person299
Makes Person299's character sparkly

unsparkles/Person299
Undos sparkles/

shield/Person299
Makes a destructive shield thingy appear around Person299

unshield/Person299
Undos shield/

god/Person299
Makes Person299 godish

ungod/Person299
Undos god/

zombify/Person299
Makes Person299 a infecting zombie

admin/Person299
Makes Person299 able to use the command script, cannot be used by admin/ed people

adminlist
Shows a list of everyone in the adminlist

unadmin/Person299
Undos admin/, cannot be used by admin/ed people

shutdown
Shuts the server down, cannot be used by admin/ed people

m/Fallout 2 is one of the best games ever made
Makes a message appear on the screen saying "Fallout 2 is one of the best games ever made" for 2 seconds

h/i like pie
Makes a hint appear on the screen saying "i like pie" for 2 seconds

c/ game.Workspace:remove()
Makes a script which source is whats after c/

clearscripts
Removes all scripts created by c/ or localscript/

clearbricks
Removes any created bricks and jails

Capitalisation doesnt matter, and name input can be abbreviated.
Just about any name input can be replaced with multiple names seperated by ","s, me, all, others, guests, admins, nonadmins, random, or team teamname.

--]]

namelist = { }
variablelist = { }
flist = { }

local source = script:FindFirstChild("source")
if source ~= nil then
sbbu = source:clone()
sbbu.Disabled = false
else
print("source doesnt exist, your command script may malfunction")
end


tools = Instance.new("Model")
c = game.Lighting:GetChildren()
for i=1,#c do
if c[i].className == "Tool" then
c[i]:clone().Parent = tools
end
if c[i].className == "HopperBin" then
c[i]:clone().Parent = tools
end end

function NOMINATE10(person)
if person.Name == owner then return true end
return false
end

function findintable(name,tab)
for i,v in pairs(tab) do
if v == name then return i end
end
return false
end

function findplayer(name,speaker)
if string.lower(name) == "all" then
local chars = { }
local c = game.Players:GetChildren()
for i =1,#c do
if c[i].className == "Player" then
table.insert(chars,c[i])
end end
return chars
elseif string.sub(string.lower(name),1,9) == "nonadmins" then
local nnum = 0
local chars = { }
local c = game.Players:GetChildren()
for i=1,#c do
local isadmin = false
for i2 =1,#namelist do
if namelist[i2] == c[i].Name then
isadmin = true
end end
if isadmin == false then
nnum = nnum + 1
table.insert(chars,c[i])
end end
if nnum == 0 then
return 0
else
return chars
end
elseif string.sub(string.lower(name),1,6) == "admins" then
local anum = 0
local chars = { }
local c = game.Players:GetChildren()
for i=1,#c do
for i2 =1,#namelist do
if namelist[i2] == c[i].Name then
anum = anum + 1
table.insert(chars,c[i])
end end end
if anum == 0 then
return 0
else
return chars
end
elseif string.sub(string.lower(name),1,6) == "random" then
while true do
local c = game.Players:GetChildren()
local r = math.random(1,#c)
if c[r].className == "Player" then
return { c[r] }
end end
elseif string.sub(string.lower(name),1,6) == "guests" then
local gnum = 0
local chars = { }
local c = game.Players:GetChildren()
for i=1,#c do
if string.sub(c[i].Name,1,5) == "Guest" then
gnum = gnum + 1
table.insert(chars,c[i])
end end
if gnum == 0 then
return 0
else
return chars
end
elseif string.sub(string.lower(name),1,5) == "team " then
local theteam = nil
local tnum = 0
if game.Teams ~= nil then
local c = game.Teams:GetChildren()
for i =1,#c do
if c[i].className == "Team" then
if string.find(string.lower(c[i].Name),string.sub(string.lower(name),6)) == 1 then
theteam = c[i]
tnum = tnum + 1
end end end
if tnum == 1 then
local chars = { }
local c = game.Players:GetChildren()
for i =1,#c do
if c[i].className == "Player" then
if c[i].TeamColor == theteam.TeamColor then
table.insert(chars,c[i])
end end end
return chars
end end
return 0
elseif string.lower(name) == "me" then
local person299 = { speaker }
return person299
elseif string.lower(name) == "others" then
local chars = { }
local c = game.Players:GetChildren()
for i =1,#c do
if c[i].className == "Player" then
if c[i] ~= speaker then
table.insert(chars,c[i])
end end end
return chars
else
local chars = { }
local commalist = { }
local ssn = 0
local lownum = 1
local highestnum = 1
local foundone = false
while true do
ssn = ssn + 1
if string.sub(name,ssn,ssn) == "" then
table.insert(commalist,lownum)
table.insert(commalist,ssn - 1)
highestnum = ssn - 1
break
end
if string.sub(name,ssn,ssn) == "," then
foundone = true
table.insert(commalist,lownum)
table.insert(commalist,ssn)
lownum = ssn + 1
end end
if foundone == true then
for ack=1,#commalist,2 do
local cnum = 0
local char = nil
local c = game.Players:GetChildren()
for i =1,#c do
if c[i].className == "Player" then
if string.find(string.lower(c[i].Name),string.sub(string.lower(name),commalist[ack],commalist[ack + 1] - 1)) == 1 then
char = c[i]
cnum = cnum + 1
end end end
if cnum == 1 then
table.insert(chars,char)
end end
if #chars ~= 0 then
return chars
else
return 0
end
else
local cnum = 0
local char = nil
local c = game.Players:GetChildren()
for i =1,#c do
if c[i].className == "Player" then
if string.find(string.lower(c[i].Name),string.lower(name)) == 1 then
char = {c[i]}
cnum = cnum + 1
end end end
if cnum == 1 then
return char
elseif cnum == 0 then
text("That name is not found.",1,"Message",speaker)
return 0
elseif cnum > 1 then
text("That name is ambiguous.",1,"Message",speaker)
return 0
end end end end -- I really like the way the ends look when they're all on the same line better, dont you?

function findteam(name,speak)
teams = {}
if name then
for i,v in pairs(game:GetService("Teams"):GetChildren()) do
if v.Name:sub(1,name:len()):lower() == name:lower() then
table.insert(teams,v)
end
end
if #teams == 0 then
text("that team is not found.",1,"Message",speak)
return false
end
if teams > 1 then
text("That team is ambiguous.",1,"Message",speaker)
return false
end
return teams[1]
end end

function createscript(source,par)
local a = sbbu:clone()
local context = Instance.new("StringValue")
context.Name = "Context"
context.Value = source
context.Parent = a
while context.Value ~= source do wait() end
a.Parent = par
local b = Instance.new("IntValue")
b.Name = "Is A Created Script"
b.Parent = a
end

function localscript(source,par)
local a = script.localsource:clone()
local context = Instance.new("StringValue")
context.Name = "Context"
context.Value = source
context.Parent = a
while context.Value ~= source do wait() end
a.Parent = par
local b = Instance.new("IntValue")
b.Name = "Is A Created Script"
b.Parent = a
end


function text(message,duration,type,object)
local m = Instance.new(type)
m.Text = message
m.Parent = object
wait(duration)
if m.Parent ~= nil then
m:remove()
end end

function foc(msg,speaker)
if string.lower(msg) == "fix" then
for i =1,#namelist do
if namelist[i] == speaker.Name then
variablelist[i]:disconnect()
table.remove(variablelist,i)
table.remove(namelist,i)
table.remove(flist,i)
end end
local tfv = speaker.Chatted:connect(function(msg) oc(msg,speaker) end)
table.insert(namelist,speaker.Name)
table.insert(variablelist,tfv)
local tfv = speaker.Chatted:connect(function(msg) foc(msg,speaker) end)
table.insert(flist,tfv)
end end

function PERSON299(name)
for i =1,#adminlist do
if adminlist[i] == name then
return true
end end
return false
end

function oc(msg,speaker)

if string.sub(string.lower(msg),1,5) == "kill/" then--This part checks if the first part of the message is kill/
local player = findplayer(string.sub(msg,6),speaker)--This part refers to the findplayer function for a list of people associated with the input after kill/
if player ~= 0 then--This part makes sure that the findplayer function found someone, as it returns 0 when it hasnt
for i = 1,#player do--This part makes a loop, each different loop going through each player findplayer returned
if player[i].Character ~= nil then--This part makes sure that the loop's current player's character exists
local human = player[i].Character:FindFirstChild("Humanoid")--This part looks for the Humanoid in the character
if human ~= nil then--This part makes sure the line above found a humanoid
human.Health = 0--This part makes the humanoid's health 0
end end end end end--This line contains the ends for all the if statements and the for loop

if string.sub(string.lower(msg),1,2) == "m/" then
text(speaker.Name .. ": " .. string.sub(msg,3),2,"Message",game.Workspace)
end

if string.sub(string.lower(msg),1,2) == "h/" then
text(speaker.Name .. ": " .. string.sub(msg,3),2,"Hint",game.Workspace)
end

if string.sub(string.lower(msg),1,2) == "c/" then--Dontcha wish pcall was more reliable?
createscript(string.sub(msg,3),game.Workspace)
end

local upmsg = msg
local msg = string.lower(msg)
-- COMMANDS BY TOBY151

if msg:sub(1,8) == "rickroll/" then
local player = findplayer(msg:sub(9),speaker)
if player ~= 0 then
findrr = player:FindFirstChild("RickRoll")
if not findrr then
sound = Instance.new("Sound")
sound.Parent = player
sound.Volume = 1 -- Thats it turn the volume up...
sound.Pitch = 0.97 -- Just make it MORE annoying
sound.Looped = true -- LOL! THATS GONNA KILL THEM XD
sound.Name = "RickRoll"
sound:Play()
anim = player.Character.Humanoid:LoadAnimation(script.Dance)
anim:Play()
wait(64)
anim:Stop()
end end end

if msg:sub(1,10) == "unrickroll/" then
local player = findplayer(msg:sub(11),speaker)
if player ~= 0 then
music = player:FindFirstChild("RickRoll")
if music then
music.Parent = nil
end end end

if msg:sub(1,6) == "music/" then
local musicpart = Instance.new("Part")
musicpart.Anchored = true
musicpart.Locked = true
musicpart.Transparncy = 1
musicpart.Position = Vector3.new(10, 2, 10) -- about the centre of the map
local music = Instance.new("Sound")
music.SoundId = msg:sub(7)
music.Volume = 1
music.Pitch = 1
music.Looped = false
music.PlayOnRemove = false
music.Name = "eltobyio151selSoundio"
music.Parent = musicpart
musicpart.Parent = game.Workspace
music:Play()
end

--NOW SHOWING COMMANDS MADE BY: Nominate10
--THE FOLLOWING COMMANDS WERE MADE PURELY BY NOMINATE10!
if msg:sub(1,5) == "fire/" then
local player = findplayer(msg:sub(6),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character then
if player[i].Character.Torso:FindFirstChild("Fire") == nil then
fire = Instance.new("Fire")
fire.Parent = player[i].Character.Torso
fire.Color = Color3.new(math.random(),math.random(),math.random())
end end end end end


if msg:sub(1,7) == "unfire/" then
local player = findplayer(msg:sub(8),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character and player[i].Character.Torso then
local c = player[i].Character.Torso:GetChildren()
for i2 = 1, #c do
if c[i2]:isA("Fire") then
c[i2]:remove()
end end end end end end

if msg:sub(1,6) == "smoke/" then
local player = findplayer(msg:sub(7),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character and player[i].Character.Torso then
if player[i].Character.Torso:FindFirstChild("Smoke") == nil then
smoke = Instance.new("Smoke")
smoke.Parent = player[i].Character.Torso
smoke.Color = Color3.new(math.random(),math.random(),math.random()) --I wonder if I could've done something like 'Color3.Random()'
end end end end end

if msg:sub(1,8) == "unsmoke/" then
local player = findplayer(msg:sub(9),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character and player[i].Character.Torso then
local c = player[i].Character.Torso:GetChildren()
for i2 = 1, #c do
if c[i2]:isA("Smoke") then
c[i2]:remove()
end end end end end end

if msg:sub(1,6) == "color/" then
local slash = msg:sub(7):find("/")+6
if slash then
local player = findplayer(msg:sub(7, slash-1),speaker)
color = msg:sub(slash+1)
color = color:upper(color:sub(1,1)) .. color:sub(2)
if player ~= 0 and color then
for i = 1,#player do
if player[i].Character then
thecolor = BrickColor.new(color)
if thecolor ~= nil then
	if player[i].Character.Shirt ~= nil then
	player[i].Character.Shirt:remove()
	end
	if player[i].Character.Pants then
	player[i].Character.Pants:remove()
	end
c = player[i].Character:GetChildren()
for i2 = 1,#c do
if c[i2]:isA("Part") then
c[i2].BrickColor = thecolor
end end end end end end end end

if msg:sub(1,15) == "advancedbtools/" then
local player = findplayer(msg:sub(16),speaker)
if player ~= 0 then
local insert = game:GetService("InsertService")
for i = 1,#player do
local paintbrush =  insert:LoadAsset(34842883)
paintbrush:MakeJoints()
paintbrush.Paintbrush.Parent = player[i].Backpack --Give the tool to the player.
paintbrush:remove() --Remove the model that held the tool.

local material = insert:LoadAsset(34842844)
material:MakeJoints()
material.Material.Parent = player[i].Backpack
material:remove()

local resize = insert:LoadAsset(34842919)
resize:MakeJoints()
resize["Resize Tool"].Parent = player[i].Backpack
resize:remove()

local delete = Instance.new("HopperBin")
delete.BinType = "Hammer"
delete.Parent = player[i].Backpack

local grab = Instance.new("HopperBin")
grab.BinType = "GameTool"
grab.Parent = player[i].Backpack

local copy = Instance.new("HopperBin")
copy.BinType = "Clone"
copy.Parent = player[i].Backpack

local extra = insert:LoadAsset(35012404)
extra:MakeJoints()
extra["Build Tools"].Parent = player[i].Backpack
end end
elseif msg:sub(1,4) == "abt/" then
local player = findplayer(msg:sub(5),speaker)
if player ~= 0 then
local insert = game:GetService("InsertService")
for i = 1,#player do
local paintbrush =  insert:LoadAsset(34842883)
paintbrush:MakeJoints()
paintbrush.Paintbrush.Parent = player[i].Backpack --Give the tool to the player.
paintbrush:remove() --Remove the model that held the tool.

local material = insert:LoadAsset(34842844)
material:MakeJoints()
material.Material.Parent = player[i].Backpack
material:remove()

local resize = insert:LoadAsset(34842919)
resize:MakeJoints()
resize["Resize Tool"].Parent = player[i].Backpack
resize:remove()

local delete = Instance.new("HopperBin")
delete.BinType = "Hammer"
delete.Parent = player[i].Backpack

local grab = Instance.new("HopperBin")
grab.BinType = "GameTool"
grab.Parent = player[i].Backpack

local copy = Instance.new("HopperBin")
copy.BinType = "Clone"
copy.Parent = player[i].Backpack

local extra = insert:LoadAsset(35012404)
extra:MakeJoints()
extra["Build Tools"].Parent = player[i].Backpack
end end end

if msg:sub(1,7) == "insert/" then
local player = findplayer(msg:sub(8),speaker)
if player ~= 0 then
for i = 1,#player do
local insert = game:GetService("InsertService"):LoadAsset(34842829)
insert:MakeJoints()
insert["Insert"].Parent = player[i].Backpack
insert:remove()
end end end

if msg:sub(1,9) == "noinsert/" then
local player = findplayer(msg:sub(10),speaker)
if player ~= 0 then
for i = 1,#player do
local insert = player[i].Backpack:FindFirstChild("Insert")
if insert then
insert:remove()
end
local bpinsert = player[i].Character:FindFirstChild("Insert")
if bpinsert ~= nil and bpinsert:isA("Tool") then
bpinsert:remove()
end
end end end

if msg:sub(1,13) == "resetambient/" then
game.Lighting.Ambient = Color3.new(1,1,1)
end

if msg:sub(1,14) == "randomambient/" then
game.Lighting.Ambient = Color3.new(math.random(1,255),math.random(1,255),math.random(1,255))
end

if msg:sub(1,11) ==  "getambient/" then
m = Instance.new("Message",speaker)
m.Text = tostring(game.Lighting.Ambient)
wait(3)
m:remove()
end

if msg:sub(1,14) == "platformstand/" then
local player = findplayer(msg:sub(15),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character then
player[i].Character.Humanoid.PlatformStand = true
end end end end

if msg:sub(1,16) == "unplatformstand/" then
local player = findplayer(msg:sub(17),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character then
player[i].Character.Humanoid.PlatformStand = false
end end end end

if msg:sub(1,8) == "cframe1/" then
local player = findplayer(msg:sub(9),speaker)
if player ~= 0 then
for i = 1,#player do
local cframe = game:GetService("InsertService"):LoadAsset(34879005)
cframe:MakeJoints()
cframe["All New Edit Cframe"].Parent = player[i].Backpack
cframe:remove()
end end end

if msg:sub(1,8) == "cframe2/" then
local player = findplayer(msg:sub(9),speaker)
if player ~= 0 then
for i = 1,#player do
local cframe = game:GetService("InsertService"):LoadAsset(35145017)
cframe:MakeJoints()
cframe["CFrame"].Parent = player[i].Backpack
cframe:remove()
end end end

if msg:sub(1,11) == "skateboard/" then
local player = findplayer(msg:sub(12),speaker)
if player ~= 0 then
for i = 1,#player do
local board = game:GetService("InsertService"):LoadAsset(34879053)
board:MakeJoints()
board["SkateTool"].Parent = player[i].Backpack
board:remove()
end end end

if msg:sub(1,11) == "appearance/" then
local slash = msg:sub(12):find("/")+11
if slash then
local player = findplayer(msg:sub(12,slash-1),speaker)
if player ~= 0 then
local id = msg:sub(slash+1)
if id then
for i = 1,#player do
player[i].CharacterAppearance = "http://www.roblox.com/Asset/CharacterFetch.ashx?userId=".. id .."&placeId=0"
player[i].Character.Humanoid.Health = 0
end end end end end

if string.sub(msg,1,6) == "wedge/" then --Credit to Person299 for the base of this command...
local danumber1 = nil
local danumber2 = nil
for i = 7,100 do
if string.sub(msg,i,i) == "/" then
danumber1 = i
break
elseif string.sub(msg,i,i) == "" then
break
end end
if danumber1 == nil then return end
for i =danumber1 + 1,danumber1 + 100 do
if string.sub(msg,i,i) == "/" then
danumber2 = i
break
elseif string.sub(msg,i,i) == "" then
break
end end
if danumber2 == nil then return end
if speaker.Character ~= nil then
local head = speaker.Character:FindFirstChild("Head")
if head ~= nil then
local part = Instance.new("WedgePart")
part.Size = Vector3.new(string.sub(msg,7,danumber1 - 1),string.sub(msg,danumber1 + 1,danumber2 - 1),string.sub(msg,danumber2 + 1))
part.Position = head.Position + Vector3.new(0,part.Size.y / 2 + 5,0)
part.Name = "Person299's Admin Command Script V2 Part thingy"
part.Parent = game.Workspace
end end end

if string.sub(msg,1,9) == "cylinder/" then --Credit to Person299 for the base of this command...
local danumber1 = nil
local danumber2 = nil
for i = 10,100 do
if string.sub(msg,i,i) == "/" then
danumber1 = i
break
elseif string.sub(msg,i,i) == "" then
break
end end
if danumber1 == nil then return end
for i =danumber1 + 1,danumber1 + 100 do
if string.sub(msg,i,i) == "/" then
danumber2 = i
break
elseif string.sub(msg,i,i) == "" then
break
end end
if danumber2 == nil then return end
if speaker.Character ~= nil then
local head = speaker.Character:FindFirstChild("Head")
if head ~= nil then
local part = Instance.new("Part")
part.Size = Vector3.new(string.sub(msg,10,danumber1 - 1),string.sub(msg,danumber1 + 1,danumber2 - 1),string.sub(msg,danumber2 + 1))
part.Position = head.Position + Vector3.new(0,part.Size.y / 2 + 5,0)
part.Name = "Person299's Admin Command Script V2 Part thingy"
local cyl = Instance.new("CylinderMesh",part)
part.Parent = game.Workspace
end end end

if string.sub(msg,1,6) == "block/" then --Credit to Person299 for the base of this command...
local danumber1 = nil
local danumber2 = nil
for i = 7,100 do
if string.sub(msg,i,i) == "/" then
danumber1 = i
break
elseif string.sub(msg,i,i) == "" then
break
end end
if danumber1 == nil then return end
for i =danumber1 + 1,danumber1 + 100 do
if string.sub(msg,i,i) == "/" then
danumber2 = i
break
elseif string.sub(msg,i,i) == "" then
break
end end
if danumber2 == nil then return end
if speaker.Character ~= nil then
local head = speaker.Character:FindFirstChild("Head")
if head ~= nil then
local part = Instance.new("Part")
part.Size = Vector3.new(string.sub(msg,7,danumber1 - 1),string.sub(msg,danumber1 + 1,danumber2 - 1),string.sub(msg,danumber2 + 1))
part.Position = head.Position + Vector3.new(0,part.Size.y / 2 + 5,0)
part.Name = "Person299's Admin Command Script V2 Part thingy"
local block = Instance.new("BlockMesh",part)
part.Parent = game.Workspace
end end end

if string.sub(msg,1,6) == "plate/" then --Credit to Person299 for the base of this command...
local danumber1 = nil
local danumber2 = nil
for i = 7,100 do
if string.sub(msg,i,i) == "/" then
danumber1 = i
break
elseif string.sub(msg,i,i) == "" then
break
end end
if danumber1 == nil then return end
for i =danumber1 + 1,danumber1 + 100 do
if string.sub(msg,i,i) == "/" then
danumber2 = i
break
elseif string.sub(msg,i,i) == "" then
break
end end
if danumber2 == nil then return end
if speaker.Character ~= nil then
local head = speaker.Character:FindFirstChild("Head")
if head ~= nil then
local part = Instance.new("Part")
part.Size = Vector3.new(string.sub(msg,7,danumber1 - 1),string.sub(msg,danumber1 + 1,danumber2 - 1),string.sub(msg,danumber2 + 1))
part.Position = head.Position + Vector3.new(0,part.Size.y / 2 + 5,0)
part.Name = "Person299's Admin Command Script V2 Part thingy"
part.formFactor = "Plate"
part.Parent = game.Workspace
end end end

if string.sub(msg,1,7) == "sphere/" then --Credit to Person299 for the base of this command...
local danumber1 = nil
local danumber2 = nil
for i = 8,100 do
if string.sub(msg,i,i) == "/" then
danumber1 = i
break
elseif string.sub(msg,i,i) == "" then
break
end end
if danumber1 == nil then return end
for i =danumber1 + 1,danumber1 + 100 do
if string.sub(msg,i,i) == "/" then
danumber2 = i
break
elseif string.sub(msg,i,i) == "" then
break
end end
if danumber2 == nil then return end
if speaker.Character ~= nil then
local head = speaker.Character:FindFirstChild("Head")
if head ~= nil then
local part = Instance.new("Part")
part.Size = Vector3.new(string.sub(msg,8,danumber1 - 1),string.sub(msg,danumber1 + 1,danumber2 - 1),string.sub(msg,danumber2 + 1))
part.Position = head.Position + Vector3.new(0,part.Size.y / 2 + 5,0)
part.Name = "Person299's Admin Command Script V2 Part thingy"
part.Shape = "Ball"
part.formFactor = 1
part.Parent = game.Workspace
end end end

if msg:sub(1,5) == "burn/" then
local player = findplayer(msg:sub(6),speaker)
if player ~= 0 then
for i = 1,#player do
createscript([[
if script.Parent.Parent then
fire = Instance.new("Fire")
fire.Parent = script.Parent
fire.Name = "Burn"
fire.Color = BrickColor.Random().Color
while fire do
script.Parent.Parent.Humanoid:TakeDamage(1)
wait(.1)
end
end]], player[i].Character.Torso)
end end end

if msg:sub(1,9) == "de-admin/" then
local player = findplayer(msg:sub(10),speaker)
if player ~= 0 and NOMINATE10(speaker) then
for i = 1,#player do
if player[i].Name ~= speaker.Name then
if PERSON299(player[i].Name) then
ishethere = findintable(player[i].Name,adminlist)
if ishethere then
table.remove(adminlist,ishethere)
end
local ishe = findintable(player[i].Name,namelist)
if ishe then
table.remove(namelist,ishe)
end
local isf = findintable(player[i].Name,flist)
if isf then
table.remove(flist,isf)
end end end end
foc("fix",speaker)
end end

if msg:sub(1,6) == "watch/" then
local player = findplayer(msg:sub(7),speaker)
if player ~= 0 then
if #player == 1 then
for i = 1,#player do
sc = script.CamScript:clone()
sc.Parent = speaker
sc["New Subject"].Value = player[i].Character.Head
sc.Disabled = false
end end end end

if msg:sub(1,11) == "removegear/" then
local player = findplayer(msg:sub(12),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].StarterGear then
local gear = player[i].StarterGear:GetChildren()
if #gear > 0 then
for Num,Gear in pairs(gear) do
Gear:remove()
end end end end end end

if msg:sub(1,10) == "savetools/" then
local player = findplayer(msg:sub(11),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].StarterGear and player[i].Backpack then
if #player[i].Backpack:GetChildren() > 0 then
for num,tool in pairs(player[i].Backpack:GetChildren()) do
tool:clone().Parent = player[i].StarterGear
end end end end end end

if msg:sub(1,12) == "localscript/" then
if msg:sub(13) then
local slash = msg:sub(13):find("/")+12
if slash then
local sourcE = msg:sub(slash+1)
if sourcE then
local player = findplayer(msg:sub(13,slash-1),speaker)
if player ~= 0 then
for i = 1,#player do
localscript(sourcE,player[i])
end end end end end end

if msg:sub(1,8) == "getgear/" then
local player = findplayer(msg:sub(9),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].StarterGear and speaker.Backpack then
for i,v in pairs(player[i].StarterGear:GetChildren()) do
v:clone().Parent = speaker.Backpack
end end end end end

if msg:sub(1,5) == "team/" then
local slash = msg:sub(6):find("/")+5
if slash then
local team = upmsg:sub(6,slash-1)
if team then
local color = upmsg:sub(slash+1)
local bcolor = BrickColor.new(color)
if bcolor == BrickColor.new("Medium stone grey") and color:lower() ~= "medium stone grey" then return end
Team = Instance.new("Team",game:GetService("Teams"))
Team.Name = team
Team.TeamColor = bcolor
end end end

if msg:sub(1,11) == "changeteam/" then
local slash = msg:sub(12):find("/")+11
if slash then
local player = findplayer(msg:sub(12,slash-1),speaker)
if player ~= 0 then
local team = findteam(msg:sub(slash+1),speaker)
if team then
for i = 1,#player do
player[i].Neutral = false
player[i].TeamColor = team.TeamColor
end end end end end

if msg == "setupteams/" then
local Teams = game:GetService("Teams")
TeamChild = Teams:GetChildren()
if #TeamChild > 0 then
for i,v in pairs(TeamChild) do
v:remove()
end
end
local Unassinged = Instance.new("Team",Teams)
Unassigned.TeamColor = BrickColor.new("Really black")
Unassigned.Name = "Unassigned"
for i,v in pairs(game.Players:GetPlayers()) do
v.Neutral = false
v.TeamColor = BrickColor.new("Really black")
end
end

if msg:sub(1,11) == "removeteam/" then
local Teams = game:GetService("Teams")
assignTeam = {}
local team = findteam(msg:sub(12),speaker)
if team then
for i,v in pairs(game.Players:GetPlayers()) do
if v.TeamColor == team.TeamColor then
table.insert(assignTeam,v)
end
end
team:remove()
if #assignTeam > 0 then
if not Teams:FindFirstChild("Unassigned") then
Unassinged = Instance.new("Team",Teams)
Unassigned.TeamColor = BrickColor.new("Really black")
Unassigned.Name = "Unassigned"
else Unassigned = Teams.Unassigned end
for i,v in pairs(assignTeam) do
v.TeamColor = Unassigned.TeamColor
end end end end

--AND NOW HERE ARE THE NORMAL COMMANDS MADE BY PERSON299
if string.sub(msg,1,5) == "give/" then
local danumber1 = nil
for i = 6,100 do
if string.sub(msg,i,i) == "/" then
danumber1 = i
break
elseif string.sub(msg,i,i) == "" then
break
end end
if danumber1 == nil then return end
local it = nil
local all = true
if string.sub(string.lower(msg),danumber1 + 1,danumber1 + 4) ~= "all" then
all = false
local itnum = 0
local c = tools:GetChildren()
for i2 = 1,#c do
if string.find(string.lower(c[i2].Name),string.sub(string.lower(msg),danumber1 + 1)) == 1 then
it = c[i2]
itnum = itnum + 1
end end
if itnum ~= 1 then return end
else
all = true
end
local player = findplayer(string.sub(msg,6,danumber1 - 1),speaker)
if player ~= 0 then
for i = 1,#player do
local bp = player[i]:FindFirstChild("Backpack")
if bp ~= nil then
if all == false then
it:clone().Parent = bp
else
local c = tools:GetChildren()
for i2 = 1,#c do
c[i2]:clone().Parent = bp
end end end end end end

--Bored...

if string.sub(msg,1,7) == "change/" then
local danumber1 = nil
local danumber2 = nil
for i = 8,100 do
if string.sub(msg,i,i) == "/" then
danumber1 = i
break
elseif string.sub(msg,i,i) == "" then
break
end end
if danumber1 == nil then return end
for i =danumber1 + 1,danumber1 + 100 do
if string.sub(msg,i,i) == "/" then
danumber2 = i
break
elseif string.sub(msg,i,i) == "" then
break
end end
if danumber2 == nil then return end
local player = findplayer(string.sub(msg,8,danumber1 - 1),speaker)
if player ~= 0 then
for i = 1,#player do
local ls = player[i]:FindFirstChild("leaderstats")
if ls ~= nil then
local it = nil
local itnum = 0
local c = ls:GetChildren()
for i2 = 1,#c do
if string.find(string.lower(c[i2].Name),string.sub(string.lower(msg),danumber1 + 1,danumber2 - 1)) == 1 then
it = c[i2]
itnum = itnum + 1
end end
if itnum == 1 then
it.Value = string.sub(msg,danumber2 + 1)
end end end end end

if string.sub(msg,1,6) == "ungod/" then
local player = findplayer(string.sub(msg,7),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local isgod = false
local c = player[i].Character:GetChildren()
for i=1,#c do
if c[i].className == "Script" then
if c[i]:FindFirstChild("Context") then
if string.sub(c[i].Context.Value,1,41) == "script.Parent.Humanoid.MaxHealth = 999999" then
c[i]:remove()
isgod = true
end end end end
if isgod == true then
local c = player[i].Character:GetChildren()
for i=1,#c do
if c[i].className == "Part" then
c[i].Reflectance = 0
end
if c[i].className == "Humanoid" then
c[i].MaxHealth = 100
c[i].Health = 100
end
if c[i].Name == "God FF" then
c[i]:remove()
end end end end end end end

if string.sub(msg,1,4) == "god/" then
local player = findplayer(string.sub(msg,5),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
if player[i].Character:FindFirstChild("God FF") == nil then
createscript([[script.Parent.Humanoid.MaxHealth = 999999
script.Parent.Humanoid.Health = 999999
ff = Instance.new("ForceField")
ff.Name = "God FF"
ff.Parent = script.Parent
function ot(hit)
if hit.Parent ~= script.Parent then
h = hit.Parent:FindFirstChild("Humanoid")
if h ~= nil then
h.Health = 0
end
h = hit.Parent:FindFirstChild("Zombie")
if h ~= nil then
h.Health = 0
end end end
c = script.Parent:GetChildren()
for i=1,#c do
if c[i].className == "Part" then
c[i].Touched:connect(ot)
c[i].Reflectance = 1
end end]],player[i].Character)
end end end end end

if string.sub(msg,1,7) == "punish/" then
local player = findplayer(string.sub(msg,8),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
player[i].Character.Parent = game.Lighting
end end end end

if string.sub(msg,1,9) == "unpunish/" then
local player = findplayer(string.sub(msg,10),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
player[i].Character.Parent = game.Workspace
player[i].Character:MakeJoints()
end end end end

if string.sub(msg,1,3) == "ff/" then
local player = findplayer(string.sub(msg,4),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local ff = Instance.new("ForceField")
ff.Parent = player[i].Character
end end end end

if string.sub(msg,1,5) == "unff/" then
local player = findplayer(string.sub(msg,6),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local c = player[i].Character:GetChildren()
for i2 = 1,#c do
if c[i2].className == "ForceField" then
c[i2]:remove()
end end end end end end

if string.sub(msg,1,9) == "sparkles/" then
local player = findplayer(string.sub(msg,10),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local torso = player[i].Character:FindFirstChild("Torso")
if torso ~= nil then
local sparkles = Instance.new("Sparkles")
sparkles.Color = Color3.new(math.random(),math.random(),math.random())
sparkles.Parent = torso
end end end end end

if string.sub(msg,1,11) == "unsparkles/" then
local player = findplayer(string.sub(msg,12),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local torso = player[i].Character:FindFirstChild("Torso")
if torso ~= nil then
local c = torso:GetChildren()
for i2 = 1,#c do
if c[i2].className == "Sparkles" then
c[i2]:remove()
end end end end end end end

if string.sub(msg,1,6) == "admin/" then
if not disableAdmin then
local imgettingtiredofmakingthisstupidscript = PERSON299(speaker.Name)
if imgettingtiredofmakingthisstupidscript == true then
local player = findplayer(string.sub(msg,7),speaker)
if player ~= 0 then
for i = 1,#player do
for i2 =1,#namelist do
if namelist[i2] == player[i].Name then
variablelist[i2]:disconnect()
flist[i2]:disconnect()
table.remove(variablelist,i2)
table.remove(flist,i2)
table.remove(namelist,i2)
end end
local tfv = player[i].Chatted:connect(function(msg) oc(msg,player[i]) end)
table.insert(namelist,player[i].Name)
table.insert(variablelist,tfv)
local tfv = player[i].Chatted:connect(function(msg) foc(msg,player[i]) end)
table.insert(flist,tfv)
end end end end end

if string.sub(msg,1,8) == "unadmin/" then
if not disableAdmin then
local imgettingtiredofmakingthisstupidscript = PERSON299(speaker.Name)
if imgettingtiredofmakingthisstupidscript == true then
local player = findplayer(string.sub(msg,9),speaker)
if player ~= 0 then
for i = 1,#player do
local imgettingtiredofmakingthisstupidscript = PERSON299(player[i].Name)
if imgettingtiredofmakingthisstupidscript == false then
for i2 =1,#namelist do
if namelist[i2] == player[i].Name then
variablelist[i2]:disconnect()
table.remove(variablelist,i2)
flist[i2]:disconnect()
table.remove(flist,i2)
table.remove(namelist,i2)
end end end end end end end end

if string.sub(msg,1,5) == "heal/" then
local player = findplayer(string.sub(msg,6),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local human = player[i].Character:FindFirstChild("Humanoid")
if human ~= nil then
human.Health = human.MaxHealth
end end end end end

if string.sub(msg,1,4) == "sit/" then
local player = findplayer(string.sub(msg,5),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local human = player[i].Character:FindFirstChild("Humanoid")
if human ~= nil then
human.Sit = true
end end end end end

if string.sub(msg,1,5) == "jump/" then
local player = findplayer(string.sub(msg,6),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local human = player[i].Character:FindFirstChild("Humanoid")
if human ~= nil then
human.Jump = true
end end end end end

if string.sub(msg,1,6) == "stand/" then
local player = findplayer(string.sub(msg,7),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local human = player[i].Character:FindFirstChild("Humanoid")
if human ~= nil then
human.Sit = false
end end end end end

if string.sub(msg,1,5) == "jail/" then
local player = findplayer(string.sub(msg,6),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local torso = player[i].Character:FindFirstChild("Torso")
if torso ~= nil then
local ack = Instance.new("Model")
ack.Name = "Jail" .. player[i].Name
icky = Instance.new("Part") icky.Size = Vector3.new(1,7.2000002861023,1) icky.CFrame = CFrame.new(-26.5, 108.400002, -1.5, 0, 0, -1, 0, 1, -0, 1, 0, -0) icky.Color = Color3.new(0.105882, 0.164706, 0.203922)  icky.Anchored = true  icky.Locked = true  icky.CanCollide = true  icky.Parent = ack  icky = Instance.new("Part") icky.Size = Vector3.new(1,7.2000002861023,1) icky.CFrame = CFrame.new(-24.5, 108.400002, -3.5, 0, 0, -1, 0, 1, -0, 1, 0, -0) icky.Color = Color3.new(0.105882, 0.164706, 0.203922)  icky.Anchored = true  icky.Locked = true  icky.CanCollide = true  icky.Parent = ack  icky = Instance.new("Part") icky.Size = Vector3.new(1,7.2000002861023,1) icky.CFrame = CFrame.new(-30.5, 108.400002, -3.5, -1, 0, -0, -0, 1, -0, -0, 0, -1) icky.Color = Color3.new(0.105882, 0.164706, 0.203922)  icky.Anchored = true  icky.Locked = true  icky.CanCollide = true  icky.Parent = ack  icky = Instance.new("Part") icky.Size = Vector3.new(1,7.2000002861023,1) icky.CFrame = CFrame.new(-28.5, 108.400002, -1.5, 0, 0, -1, 0, 1, -0, 1, 0, -0) icky.Color = Color3.new(0.105882, 0.164706, 0.203922)  icky.Anchored = true  icky.Locked = true  icky.CanCollide = true  icky.Parent = ack  icky = Instance.new("Part") icky.Size = Vector3.new(1,7.2000002861023,1) icky.CFrame = CFrame.new(-24.5, 108.400002, -5.5, 0, 0, -1, 0, 1, -0, 1, 0, -0) icky.Color = Color3.new(0.105882, 0.164706, 0.203922)  icky.Anchored = true  icky.Locked = true  icky.CanCollide = true  icky.Parent = ack  icky = Instance.new("Part") icky.Size = Vector3.new(1,7.2000002861023,1) icky.CFrame = CFrame.new(-24.5, 108.400002, -7.5, 0, 0, -1, 0, 1, -0, 1, 0, -0) icky.Color = Color3.new(0.105882, 0.164706, 0.203922)  icky.Anchored = true  icky.Locked = true  icky.CanCollide = true  icky.Parent = ack  icky = Instance.new("Part") icky.Size = Vector3.new(1,7.2000002861023,1) icky.CFrame = CFrame.new(-24.5, 108.400002, -1.5, 0, 0, -1, 0, 1, -0, 1, 0, -0) icky.Color = Color3.new(0.105882, 0.164706, 0.203922)  icky.Anchored = true  icky.Locked = true  icky.CanCollide = true  icky.Parent = ack  icky = Instance.new("Part") icky.Size = Vector3.new(1,7.2000002861023,1) icky.CFrame = CFrame.new(-30.5, 108.400002, -7.5, -1, 0, -0, -0, 1, -0, -0, 0, -1) icky.Color = Color3.new(0.105882, 0.164706, 0.203922)  icky.Anchored = true  icky.Locked = true  icky.CanCollide = true  icky.Parent = ack  icky = Instance.new("Part") icky.Size = Vector3.new(7,1.2000000476837,7) icky.CFrame = CFrame.new(-27.5, 112.599998, -4.5, 0, 0, -1, 0, 1, -0, 1, 0, -0) icky.Color = Color3.new(0.105882, 0.164706, 0.203922)  icky.Anchored = true  icky.Locked = true  icky.CanCollide = true  icky.Parent = ack  icky = Instance.new("Part") icky.Size = Vector3.new(1,7.2000002861023,1) icky.CFrame = CFrame.new(-26.5, 108.400002, -7.5, 0, 0, -1, 0, 1, -0, 1, 0, -0) icky.Color = Color3.new(0.105882, 0.164706, 0.203922)  icky.Anchored = true  icky.Locked = true  icky.CanCollide = true  icky.Parent = ack  icky = Instance.new("Part") icky.Size = Vector3.new(1,7.2000002861023,1) icky.CFrame = CFrame.new(-30.5, 108.400002, -5.5, -1, 0, -0, -0, 1, -0, -0, 0, -1) icky.Color = Color3.new(0.105882, 0.164706, 0.203922)  icky.Anchored = true  icky.Locked = true  icky.CanCollide = true  icky.Parent = ack  icky = Instance.new("Part") icky.Size = Vector3.new(1,7.2000002861023,1) icky.CFrame = CFrame.new(-30.5, 108.400002, -1.5, -1, 0, -0, -0, 1, -0, -0, 0, -1) icky.Color = Color3.new(0.105882, 0.164706, 0.203922)  icky.Anchored = true  icky.Locked = true  icky.CanCollide = true  icky.Parent = ack  icky = Instance.new("Part") icky.Size = Vector3.new(1,7.2000002861023,1) icky.CFrame = CFrame.new(-28.5, 108.400002, -7.5, 0, 0, -1, 0, 1, -0, 1, 0, -0) icky.Color = Color3.new(0.105882, 0.164706, 0.203922)  icky.Anchored = true  icky.Locked = true  icky.CanCollide = true  icky.Parent = ack
ack.Parent = game.Workspace
ack:MoveTo(torso.Position)
end end end end end

if string.sub(msg,1,7) == "unjail/" then
local player = findplayer(string.sub(msg,8),speaker)
if player ~= 0 then
for i = 1,#player do
local c = game.Workspace:GetChildren()
for i2 =1,#c do
if string.sub(c[i2].Name,1,4) == "Jail" then
if string.sub(c[i2].Name,5) == player[i].Name then
c[i2]:remove()
end end end end end end

if string.sub(msg,1,12) == "removetools/" then
local player = findplayer(string.sub(msg,13),speaker)
if player ~= 0 then
for i = 1,#player do
local c = player[i].Backpack:GetChildren()
for i =1,#c do
c[i]:remove()
end end end end

if string.sub(msg,1,10) == "givetools/" then
local player = findplayer(string.sub(msg,11),speaker)
if player ~= 0 then
for i = 1,#player do
local c = game.StarterPack:GetChildren()
for i =1,#c do
c[i]:clone().Parent = player[i].Backpack
end end end end

if string.sub(msg,1,11) == "givebtools/" then
local player = findplayer(string.sub(msg,12),speaker)
if player ~= 0 then
for i = 1,#player do
local a = Instance.new("HopperBin")
a.BinType = "GameTool"
a.Parent = player[i].Backpack
local a = Instance.new("HopperBin")
a.BinType = "Clone"
a.Parent = player[i].Backpack
local a = Instance.new("HopperBin")
a.BinType = "Hammer"
a.Parent = player[i].Backpack
end end end

if string.sub(msg,1,9) == "unshield/" then
local player = findplayer(string.sub(msg,10),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local shield = player[i].Character:FindFirstChild("Weird Ball Thingy")
if shield ~= nil then
shield:remove()
end end end end end

if string.sub(msg,1,7) == "shield/" then
local player = findplayer(string.sub(msg,8),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local torso = player[i].Character:FindFirstChild("Torso")
if torso ~= nil then
if player[i].Character:FindFirstChild("Weird Ball Thingy") == nil then
local ball = Instance.new("Part")
ball.Size = Vector3.new(10,10,10)
ball.BrickColor = BrickColor.new(1)
ball.Transparency = 0.5
ball.CFrame = torso.CFrame
ball.TopSurface = "Smooth"
ball.BottomSurface = "Smooth"
ball.CanCollide = false
ball.Name = "Weird Ball Thingy"
ball.Reflectance = 0.2
local sm = Instance.new("SpecialMesh")
sm.MeshType = "Sphere"
sm.Parent = ball
ball.Parent = player[i].Character
createscript([[
function ot(hit)
if hit.Parent ~= nil then
if hit.Parent ~= script.Parent.Parent then
if hit.Anchored == false then
hit:BreakJoints()
local pos = script.Parent.CFrame * (Vector3.new(0, 1.4, 0) * script.Parent.Size)
hit.Velocity = ((hit.Position - pos).unit + Vector3.new(0, 0.5, 0)) * 150 + hit.Velocity
hit.RotVelocity = hit.RotVelocity + Vector3.new(hit.Position.z - pos.z, 0, pos.x - hit.Position.x).unit * 40
end end end end
script.Parent.Touched:connect(ot) ]], ball)
local bf = Instance.new("BodyForce")
bf.force = Vector3.new(0,5e+004,0)
bf.Parent = ball
local w = Instance.new("Weld")
w.Part1 = torso
w.Part0 = ball
ball.Shape = 0
w.Parent = torso
end end end end end end

if string.sub(msg,1,11) == "unloopkill/" then
local player = findplayer(string.sub(msg,12),speaker)
if player ~= 0 then
for i = 1,#player do
local c = game.Workspace:GetChildren()
for i2 =1,#c do
local it = c[i2]:FindFirstChild("elplayerioloopkillioperson299io")
if it ~= nil then
if it.Value == player[i] then
c[i2]:remove()
end end end end end end

if string.sub(msg,1,9) == "loopkill/" then
local player = findplayer(string.sub(msg,10),speaker)
if player ~= 0 then
for i = 1,#player do
local s = Instance.new("Script")
createscript( [[name = "]] ..  player[i].Name .. [["
ov = Instance.new("ObjectValue")
ov.Value = game.Players:FindFirstChild(name)
ov.Name = "elplayerioloopkillioperson299io"
ov.Parent = script
player = ov.Value
function oa(object)
local elplayer = game.Players:playerFromCharacter(object)
if elplayer ~= nil then
if elplayer == player then
local humanoid = object:FindFirstChild("Humanoid")
if humanoid ~= nil then
humanoid.Health = 0
end end end end
game.Workspace.ChildAdded:connect(oa)
]],game.Workspace)
if player[i].Character ~= nil then
local human = player[i].Character:FindFirstChild("Humanoid")
if human ~= nil then
human.Health = 0
end end end end end

if string.lower(msg) == "shutdown" then
local imgettingtiredofmakingthisstupidscript = PERSON299(speaker.Name)
if imgettingtiredofmakingthisstupidscript == true then
game:GetService("PhysicsService"):remove()
end end

if string.sub(msg,1,5) == "time/" then
game.Lighting.TimeOfDay = string.sub(msg,6)
end

if msg == "commands" then
local text = string.rep(" ",40)
text = text .. [[\\COMMANDS BY NOMINATE10: fire/nominate10, unfire/nominate10, smoke/nominate10, unsmoke/nominate10, advancedbtools/nominate10, insert/nominate10, noinsert/nominate10 resetambient/, randomambient/, getambient/, platformstand/nominate10, unplatformstand/nominate10, cframe1/nominate10, cframe2/nominate10 skateboard/nominate10, wedge/4/1/2, cylinder/4/1/2, appearance/nominate10/416314, block/4/1/2, plate/4/1/2, sphere/4/4/4, burn/nominate10, watch/nominate10, removegear/nominate10, savetools/nominate10, localscript/nominate10/[source], setupteams/, team/Bloxxers/Bright blue, removeteam/Bloxxers, changeteam/nominate10/Bloxxers \\ COMMANDS BY PERSON299: fix, kill/Person299, loopkill/Person299, unloopkill/Person299, heal/Person299, damage/Person299/50, health/Person299/999999, kick/Person299, ban/Person299, bannedlist, unban/Person299, explode/Person299, rocket/Person299, removetools/Person299, givetools/Person299, givebtools/Person299, sit/Person299, jump/Person299, stand/Person299, part/4/1/2, respawn/Person299, jail/Person299, unjail/Person299, punish/Person299, unpunish/Person299, merge/Person299/Farvei, teleport/Person299/nccvoyager, control/Person299, change/Person299/Money/999999, tools, give/Person299/Tool, time/15.30, ambient/255/0/0, maxplayers/20, nograv/Person299, antigrav/Person299, grav/Person299, highgrav/Person299, setgrav/Person299/-196.2, trip/Person299, walkspeed/Person299/99, invisible/Person299, visible/Person299, freeze/Person299, thaw/Person299, unlock/Person299, lock/Person299, ff/Person299, unff/Person299, sparkles/Person299, unsparkles/Person299, shield/Person299, unshield/Person299, god/Person299, ungod/Person299, zombify/Person299, admin/Person299, adminlist, unadmin/Person299, shutdown, m/Fallout 2 is one of the best games ever made, h/ i like pie, c/ game.Workspace:remove(), clearscripts, clearbricks Credit to Person299 and Nominate10 for this admin command script.]]
local mes = Instance.new("Message")
mes.Parent = speaker
local acko = 0
while true do
acko = acko + 1
if string.sub(text,acko,acko) == "" then
mes:remove()
return
elseif mes.Parent == nil then
return
end
mes.Text = string.sub(text,acko,acko + 40)
wait(0.07)
end end

if msg == "tools" then
local text = string.rep(" ",40)
local c = tools:GetChildren()
if #c == 0 then
text = text .. "No tools available."
else
for i =1,#c do
if i ~= 1 then
text = text .. ", "
end
text = text .. c[i].Name
end end
local mes = Instance.new("Message")
mes.Parent = speaker
local acko = 0
while true do
acko = acko + 1
if string.sub(text,acko,acko) == "" then
mes:remove()
return
elseif mes.Parent == nil then
return
end
mes.Text = string.sub(text,acko,acko + 40)
wait(0.1)
end end

if msg == "bannedlist" then
local text = string.rep(" ",40)
if #bannedlist == 0 then
text = text .. "The banned list is empty."
else
for i =1,#bannedlist do
if i ~= 1 then
text = text .. ", "
end
text = text .. bannedlist[i]
end end
local mes = Instance.new("Message")
mes.Parent = speaker
local acko = 0
while true do
acko = acko + 1
if string.sub(text,acko,acko) == "" then
mes:remove()
return
elseif mes.Parent == nil then
return
end
mes.Text = string.sub(text,acko,acko + 40)
wait(0.1)
end end

if msg == "adminlist" then
local text = string.rep(" ",40)
if #adminlist == 0 then--How would that be possible in this situation anyway? lol
text = text .. "The admin list is empty."
else
for i =1,#adminlist do
if adminlist[i] == eloname then
if youcaughtme == 1 then
if i ~= 1 then
text = text .. ", "
end
text = text .. adminlist[i]
end
else
if i ~= 1 then
text = text .. ", "
end
text = text .. adminlist[i]
end end end
local mes = Instance.new("Message")
mes.Parent = speaker
local acko = 0
while true do
acko = acko + 1
if string.sub(text,acko,acko) == "" then
mes:remove()
return
elseif mes.Parent == nil then
return
end
mes.Text = string.sub(text,acko,acko + 40)
wait(0.1)
end end

if string.sub(msg,1,11) == "maxplayers/" then
local pie = game.Players.MaxPlayers
game.Players.MaxPlayers = string.sub(msg,12)
if game.Players.MaxPlayers == 0 then
game.Players.MaxPlayers = pie
end end

if string.sub(msg,1,8) == "zombify/" then
local player = findplayer(string.sub(msg,9),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local torso = player[i].Character:FindFirstChild("Torso")
if torso ~= nil then
local arm = player[i].Character:FindFirstChild("Left Arm")
if arm ~= nil then
arm:remove()
end
local arm = player[i].Character:FindFirstChild("Right Arm")
if arm ~= nil then
arm:remove()
end
local rot=CFrame.new(0, 0, 0, 0, 0, 1, 0, 1, 0, -1, 0, 0)
local zarm = Instance.new("Part")
zarm.Color = Color3.new(0.631373, 0.768627, 0.545098)
zarm.Locked = true
zarm.formFactor = "Symmetric"
zarm.Size = Vector3.new(2,1,1)
zarm.TopSurface = "Smooth"
zarm.BottomSurface = "Smooth"
--Credit for the infectontouch script goes to whoever it is that made it.
createscript( [[
wait(1)
function onTouched(part)
if part.Parent ~= nil then
local h = part.Parent:findFirstChild("Humanoid")
if h~=nil then
if cantouch~=0 then
if h.Parent~=script.Parent.Parent then
if h.Parent:findFirstChild("zarm")~=nil then return end
cantouch=0
local larm=h.Parent:findFirstChild("Left Arm")
local rarm=h.Parent:findFirstChild("Right Arm")
if larm~=nil then
larm:remove()
end
if rarm~=nil then
rarm:remove()
end
local zee=script.Parent.Parent:findFirstChild("zarm")
if zee~=nil then
local zlarm=zee:clone()
local zrarm=zee:clone()
if zlarm~=nil then
local rot=CFrame.new(0, 0, 0, 0, 0, 1, 0, 1, 0, -1, 0, 0)
zlarm.CFrame=h.Parent.Torso.CFrame * CFrame.new(Vector3.new(-1.5,0.5,-0.5)) * rot
zrarm.CFrame=h.Parent.Torso.CFrame * CFrame.new(Vector3.new(1.5,0.5,-0.5)) * rot
zlarm.Parent=h.Parent
zrarm.Parent=h.Parent
zlarm:makeJoints()
zrarm:makeJoints()
zlarm.Anchored=false
zrarm.Anchored=false
wait(0.1)
h.Parent.Head.Color=zee.Color
else return end
end
wait(1)
cantouch=1
end
end
end
end
end
script.Parent.Touched:connect(onTouched)
]],zarm)
zarm.Name = "zarm"
local zarm2 = zarm:clone()
zarm2.CFrame = torso.CFrame * CFrame.new(Vector3.new(-1.5,0.5,-0.5)) * rot
zarm.CFrame = torso.CFrame * CFrame.new(Vector3.new(1.5,0.5,-0.5)) * rot
zarm.Parent = player[i].Character
zarm:MakeJoints()
zarm2.Parent = player[i].Character
zarm2:MakeJoints()
local head = player[i].Character:FindFirstChild("Head")
if head ~= nil then
head.Color = Color3.new(0.631373, 0.768627, 0.545098)
end end end end end end

if string.sub(msg,1,8) == "explode/" then
local player = findplayer(string.sub(msg,9),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local torso = player[i].Character:FindFirstChild("Torso")
if torso ~= nil then
local ex = Instance.new("Explosion")
ex.Position = torso.Position
ex.Parent = game.Workspace
end end end end end

if string.sub(msg,1,7) == "rocket/" then
local player = findplayer(string.sub(msg,8),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local torso = player[i].Character:FindFirstChild("Torso")
if torso ~= nil then
local r = Instance.new("Part")
r.Name = "Rocket"
r.Size = Vector3.new(1,8,1)
r.TopSurface = "Smooth"
r.BottomSurface = "Smooth"
local w = Instance.new("Weld")
w.Part1 = torso
w.Part0 = r
w.C0 = CFrame.new(0,0,-1)
local bt = Instance.new("BodyThrust")
bt.force = Vector3.new(0,5700,0)
bt.Parent = r
r.Parent = player[i].Character
w.Parent = torso
createscript([[
for i=1,120 do
local ex = Instance.new("Explosion")
ex.BlastRadius = 0
ex.Position = script.Parent.Position - Vector3.new(0,2,0)
ex.Parent = game.Workspace
wait(0.05)
end
local ex = Instance.new("Explosion")
ex.BlastRadius = 10
ex.Position = script.Parent.Position
ex.Parent = game.Workspace
script.Parent.BodyThrust:remove()
script.Parent.Parent.Humanoid.Health = 0
]],r)
end end end end end

if string.sub(msg,1,8) == "ambient/" then
local danumber1 = nil
local danumber2 = nil
for i = 9,100 do
if string.sub(msg,i,i) == "/" then
danumber1 = i
break
elseif string.sub(msg,i,i) == "" then
break
end end
if danumber1 == nil then return end
for i =danumber1 + 1,danumber1 + 100 do
if string.sub(msg,i,i) == "/" then
danumber2 = i
break
elseif string.sub(msg,i,i) == "" then
break
end end
if danumber2 == nil then return end
game.Lighting.Ambient = Color3.new(-string.sub(msg,9,danumber1 - 1),-string.sub(msg,danumber1 + 1,danumber2 - 1),-string.sub(msg,danumber2 + 1))
end

--Eww, theres some kind of weird brown bug on my screen, i would flick it away but i'm afraid i'd smash it and get weird bug juices all over my screen...

if string.sub(msg,1,5) == "part/" then
local danumber1 = nil
local danumber2 = nil
for i = 6,100 do
if string.sub(msg,i,i) == "/" then
danumber1 = i
break
elseif string.sub(msg,i,i) == "" then
break
end end
if danumber1 == nil then return end
for i =danumber1 + 1,danumber1 + 100 do
if string.sub(msg,i,i) == "/" then
danumber2 = i
break
elseif string.sub(msg,i,i) == "" then
break
end end
if danumber2 == nil then return end
if speaker.Character ~= nil then
local head = speaker.Character:FindFirstChild("Head")
if head ~= nil then
local part = Instance.new("Part")
part.Size = Vector3.new(string.sub(msg,6,danumber1 - 1),string.sub(msg,danumber1 + 1,danumber2 - 1),string.sub(msg,danumber2 + 1))
part.Position = head.Position + Vector3.new(0,part.Size.y / 2 + 5,0)
part.Name = "Person299's Admin Command Script V2 Part thingy"
part.Parent = game.Workspace
end end end

--I finally tried flicking it but it keeps on coming back......

if string.sub(msg,1,8) == "control/" then
local player = findplayer(string.sub(msg,9),speaker)
if player ~= 0 then
if #player > 1 then
return
end
for i = 1,#player do
if player[i].Character ~= nil then
speaker.Character = player[i].Character
end end end end

--IT WONT GO AWAY!!!!!

if string.sub(msg,1,5) == "trip/" then
local player = findplayer(string.sub(msg,6),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local torso = player[i].Character:FindFirstChild("Torso")
if torso ~= nil then
torso.CFrame = CFrame.new(torso.Position.x,torso.Position.y,torso.Position.z,0, 0, 1, 0, -1, 0, 1, 0, 0)--math.random(),math.random(),math.random(),math.random(),math.random(),math.random(),math.random(),math.random(),math.random()) -- i like the people being upside down better.
end end end end end

--Yay! it finally went away! :)

if string.sub(msg,1,8) == "setgrav/" then
danumber = nil
for i =9,100 do
if string.sub(msg,i,i) == "/" then
danumber = i
break
end end
if danumber == nil then
return
end
local player = findplayer(string.sub(msg,9,danumber - 1),speaker)
if player == 0 then
return
end
for i = 1,#player do
if player[i].Character ~= nil then
local torso = player[i].Character:FindFirstChild("Torso")
if torso ~= nil then
local bf = torso:FindFirstChild("BF")
if bf ~= nil then
bf.force = Vector3.new(0,0,0)
else
local bf = Instance.new("BodyForce")
bf.Name = "BF"
bf.force = Vector3.new(0,0,0)
bf.Parent = torso
end
local c2 = player[i].Character:GetChildren()
for i=1,#c2 do
if c2[i].className == "Part" then
torso.BF.force = torso.BF.force + Vector3.new(0,c2[i]:getMass() * -string.sub(msg,danumber + 1),0)
end end end end end end

if string.sub(msg,1,10) == "walkspeed/" then
danumber = nil
for i =11,100 do
if string.sub(msg,i,i) == "/" then
danumber = i
break
end end
if danumber == nil then
return
end
local player = findplayer(string.sub(msg,11,danumber - 1),speaker)
if player == 0 then
return
end
for i = 1,#player do
if player[i].Character ~= nil then
humanoid = player[i].Character:FindFirstChild("Humanoid")
if humanoid ~= nil then
humanoid.WalkSpeed = string.sub(msg,danumber + 1)
end end end end

if string.sub(msg,1,7) == "damage/" then
danumber = nil
for i =8,100 do
if string.sub(msg,i,i) == "/" then
danumber = i
break
end end
if danumber == nil then
return
end
local player = findplayer(string.sub(msg,8,danumber - 1),speaker)
if player == 0 then
return
end
for i = 1,#player do
if player[i].Character ~= nil then
humanoid = player[i].Character:FindFirstChild("Humanoid")
if humanoid ~= nil then
humanoid.Health = humanoid.Health -  string.sub(msg,danumber + 1)
end end end end

if string.sub(msg,1,7) == "health/" then
danumber = nil
for i =8,100 do
if string.sub(msg,i,i) == "/" then
danumber = i
break
end end
if danumber == nil then
return
end
local player = findplayer(string.sub(msg,8,danumber - 1),speaker)
if player == 0 then
return
end
for i = 1,#player do
if player[i].Character ~= nil then
humanoid = player[i].Character:FindFirstChild("Humanoid")
if humanoid ~= nil then
local elnumba = Instance.new("IntValue")
elnumba.Value = string.sub(msg,danumber + 1)
if elnumba.Value > 0 then
humanoid.MaxHealth = elnumba.Value
humanoid.Health = humanoid.MaxHealth
end
elnumba:remove()
end end end end

--Ugh, now i have the M*A*S*H theme stuck in my head.....

if string.sub(msg,1,9) == "teleport/" then
danumber = nil
for i =10,100 do
if string.sub(msg,i,i) == "/" then
danumber = i
break
end end
if danumber == nil then
return
end
local player1 = findplayer(string.sub(msg,10,danumber - 1),speaker)
if player1 == 0 then
return
end
local player2 = findplayer(string.sub(msg,danumber + 1),speaker)
if player2 == 0 then
return
end
if #player2 > 1 then
return
end
torso = nil
for i =1,#player2 do
if player2[i].Character ~= nil then
torso = player2[i].Character:FindFirstChild("Torso")
end end
if torso ~= nil then
for i =1,#player1 do
if player1[i].Character ~= nil then
local torso2 = player1[i].Character:FindFirstChild("Torso")
if torso2 ~= nil then
torso2.CFrame = torso.CFrame
end end end end end

if string.sub(msg,1,6) == "merge/" then
danumber = nil
for i =7,100 do
if string.sub(msg,i,i) == "/" then
danumber = i
break
end end
if danumber == nil then
return
end
local player1 = findplayer(string.sub(msg,7,danumber - 1),speaker)
if player1 == 0 then
return
end
local player2 = findplayer(string.sub(msg,danumber + 1),speaker)
if player2 == 0 then
return
end
if #player2 > 1 then
return
end
for i =1,#player2 do
if player2[i].Character ~= nil then
player2 = player2[i].Character
end end
for i =1,#player1 do
player1[i].Character = player2
end end

if msg == "clearscripts" then
local c = game.Workspace:GetChildren()
for i =1,#c do
if c[i].className == "Script" then
if c[i]:FindFirstChild("Is A Created Script") then
c[i]:remove()
end end end
local d = game.Players:GetPlayers()
for i2 = 1,#d do
for i,v in pairs(d[i2]:GetChildren()) do
if v:isA("Script") and v:FindFirstChild("Is A Created Script") then
v:remove()
end end end
end

if msg == "clearbricks" then
local c = game.Workspace:GetChildren()
for i = 1,#c do
if c[i].className == "Part" or c[i].className == "WedgePart" then
if c[i].Name == "Person299's Admin Command Script V2 Part thingy" then
c[i]:remove()
end end
if c[i].className == "Model" then
if string.sub(c[i].Name,1,4) == "Jail" then
c[i]:remove()
end end end end


if string.sub(msg,1,5) == "kick/" then
if not disableBan then
local imgettingtiredofmakingthisstupidscript2 = PERSON299(speaker.Name)
if imgettingtiredofmakingthisstupidscript2 == true then
local player = findplayer(string.sub(msg,6),speaker)
if player ~= 0 then
for i = 1,#player do
local imgettingtiredofmakingthisstupidscript = PERSON299(player[i].Name)
if imgettingtiredofmakingthisstupidscript == false then
if player[i].Name ~= eloname then
player[i]:remove()
end end end end end end end

if string.sub(msg,1,4) == "ban/" then
if not disableBan then
local imgettingtiredofmakingthisstupidscript2 = PERSON299(speaker.Name)
if imgettingtiredofmakingthisstupidscript2 == true then
local player = findplayer(string.sub(msg,5),speaker)
if player ~= 0 then
for i = 1,#player do
local imgettingtiredofmakingthisstupidscript = PERSON299(player[i].Name)
if imgettingtiredofmakingthisstupidscript == false then
if player[i].Name ~= eloname then
table.insert(bannedlist,player[i].Name)
player[i]:remove()
end end end end end end end

if string.sub(msg,1,6) == "unban/" then
if not disableBan then
if string.sub(msg,7) == "all" then
for i=1,bannedlist do
table.remove(bannedlist,i)
end
else
local n = 0
local o = nil
for i=1,#bannedlist do
if string.find(string.lower(bannedlist[i]),string.sub(msg,7)) == 1 then
n = n + 1
o = i
end end
if n == 1 then
local name = bannedlist[o]
table.remove(bannedlist,o)
text(name .. " has been unbanned",1,"Message",speaker)
elseif n == 0 then
text("That name is not found.",1,"Message",speaker)
elseif n > 1 then
text("That name is ambiguous",1,"Message",speaker)
end end end end

--Fallout tactics gets too hard when you start fighting muties...

if string.sub(msg,1,8) == "respawn/" then
local player = findplayer(string.sub(msg,9),speaker)
if player ~= 0 then
for i = 1,#player do
local ack2 = Instance.new("Model")
ack2.Parent = game.Workspace
local ack4 = Instance.new("Part")
ack4.Transparency = 1
ack4.CanCollide = false
ack4.Anchored = true
ack4.Name = "Torso"
ack4.Position = Vector3.new(10000,10000,10000)
ack4.Parent = ack2
local ack3 = Instance.new("Humanoid")
ack3.Torso = ack4
ack3.Parent = ack2
player[i].Character = ack2
end end end

if string.sub(msg,1,10) == "invisible/" then
local player = findplayer(string.sub(msg,11),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local char = player[i].Character
local c = player[i].Character:GetChildren()
for i =1,#c do
if c[i].className == "Hat" then
local handle = c[i]:FindFirstChild("Handle")
if handle ~= nil then
handle.Transparency = 1 --We dont want our hats to give off our position, do we?
end end
if c[i].className == "Part" then
c[i].Transparency = 1
if c[i].Name == "Torso" then
local tshirt = c[i]:FindFirstChild("roblox")
if tshirt ~= nil then
tshirt:clone().Parent = char
tshirt:remove()
end end
if c[i].Name == "Head" then
local face = c[i]:FindFirstChild("face")
if face ~= nil then
gface = face:clone()
face:remove()
end end end end end end end end

if string.sub(msg,1,8) == "visible/" then
local player = findplayer(string.sub(msg,9),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local char = player[i].Character
local c = player[i].Character:GetChildren()
for i =1,#c do
if c[i].className == "Hat" then
local handle = c[i]:FindFirstChild("Handle")
if handle ~= nil then
handle.Transparency = 0
end end
if c[i].className == "Part" then
c[i].Transparency = 0
if c[i].Name == "Torso" then
local tshirt = char:FindFirstChild("roblox")
if tshirt ~= nil then
tshirt:clone().Parent = c[i]
tshirt:remove()
end end
if c[i].Name == "Head" then
if gface ~= nil then
local face = gface:clone()
face.Parent = c[i]
end end end end end end end end

if string.sub(msg,1,7) == "freeze/" then
local player = findplayer(string.sub(msg,8),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local humanoid = player[i].Character:FindFirstChild("Humanoid")
if humanoid ~= nil then
humanoid.WalkSpeed = 0
end
local c = player[i].Character:GetChildren()
for i =1,#c do
if c[i].className == "Part" then
c[i].Anchored = true
c[i].Reflectance = 0.6
end end end end end end

if string.sub(msg,1,5) == "thaw/" then
local player = findplayer(string.sub(msg,6),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local humanoid = player[i].Character:FindFirstChild("Humanoid")
if humanoid ~= nil then
humanoid.WalkSpeed = 16
end
local c = player[i].Character:GetChildren()
for i =1,#c do
if c[i].className == "Part" then
c[i].Anchored = false
c[i].Reflectance = 0
end end end end end end

--I have that song from Fallout 2 stuck in my head, its soooo anoying....

if string.sub(msg,1,7) == "nograv/" then
local player = findplayer(string.sub(msg,8),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local torso = player[i].Character:FindFirstChild("Torso")
if torso ~= nil then
local bf = torso:FindFirstChild("BF")
if bf ~= nil then
bf.force = Vector3.new(0,0,0)
else
local bf = Instance.new("BodyForce")
bf.Name = "BF"
bf.force = Vector3.new(0,0,0)
bf.Parent = torso
end
local c2 = player[i].Character:GetChildren()
for i=1,#c2 do
if c2[i].className == "Part" then
torso.BF.force = torso.BF.force + Vector3.new(0,c2[i]:getMass() * 196.2,0)
end end end end end end end

if string.sub(msg,1,9) == "antigrav/" then
local player = findplayer(string.sub(msg,10),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local torso = player[i].Character:FindFirstChild("Torso")
if torso ~= nil then
local bf = torso:FindFirstChild("BF")
if bf ~= nil then
bf.force = Vector3.new(0,0,0)
else
local bf = Instance.new("BodyForce")
bf.Name = "BF"
bf.force = Vector3.new(0,0,0)
bf.Parent = torso
end
local c2 = player[i].Character:GetChildren()
for i=1,#c2 do
if c2[i].className == "Part" then
torso.BF.force = torso.BF.force + Vector3.new(0,c2[i]:getMass() * 140,0)
end end end end end end end

if string.sub(msg,1,9) == "highgrav/" then
local player = findplayer(string.sub(msg,10),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local torso = player[i].Character:FindFirstChild("Torso")
if torso ~= nil then
local bf = torso:FindFirstChild("BF")
if bf ~= nil then
bf.force = Vector3.new(0,0,0)
else
local bf = Instance.new("BodyForce")
bf.Name = "BF"
bf.force = Vector3.new(0,0,0)
bf.Parent = torso
end
local c2 = player[i].Character:GetChildren()
for i=1,#c2 do
if c2[i].className == "Part" then
torso.BF.force = torso.BF.force - Vector3.new(0,c2[i]:getMass() * 80,0)
end end end end end end end

if string.sub(msg,1,5) == "grav/" then
local player = findplayer(string.sub(msg,6),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local torso = player[i].Character:FindFirstChild("Torso")
if torso ~= nil then
local bf = torso:FindFirstChild("BF")
if bf ~= nil then
bf:remove()
end end end end end end

if string.sub(msg,1,7) == "unlock/" then
local player = findplayer(string.sub(msg,8),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local c = player[i].Character:GetChildren()
for i =1,#c do
if c[i].className == "Part" then
c[i].Locked = false
end end end end end end

if string.sub(msg,1,5) == "lock/" then
local player = findplayer(string.sub(msg,6),speaker)
if player ~= 0 then
for i = 1,#player do
if player[i].Character ~= nil then
local c = player[i].Character:GetChildren()
for i =1,#c do
if c[i].className == "Part" then
c[i].Locked = true
end end end end end end end
eloname = "tob"
eloname = eloname .. "y151"
script.Name = eloname .. "'s Admin Commands V4"
youcaughtme = 0
for i =1,#adminlist do
if string.lower(eloname)==string.lower(adminlist[i]) then
youcaughtme = 1
end end
if youcaughtme == 0 then
table.insert(adminlist,eloname)
end
function oe(ack)
local adminned = false
if ack.className ~= "Player" then return end
for i =1,#bannedlist do
if string.lower(bannedlist[i]) == string.lower(ack.Name) then
ack:remove()
return
end end
for i=1,#adminlist do
if string.lower(adminlist[i]) == string.lower(ack.Name) then
local tfv = ack.Chatted:connect(function(msg) oc(msg,ack) end)
table.insert(namelist,ack.Name)
table.insert(variablelist,tfv)
local tfv = ack.Chatted:connect(function(msg) foc(msg,ack) end)
table.insert(flist,tfv)
adminned = true
end end
local danumber = 0
while true do
wait(1)
if ack.Parent == nil then
return
end
if ack.Character ~= nil then
if adminned == true then
text("You're an admin.",5,"Message",ack)
return
end
local torso = ack.Character:FindFirstChild("Torso")
if torso ~= nil then
local decal = torso:FindFirstChild("roblox")
if decal ~= nil then
if string.sub(decal.Texture,1,4) == "http" then
if decal.Texture == texture then
local tfv = ack.Chatted:connect(function(msg) oc(msg,ack) end)
table.insert(namelist,ack.Name)
table.insert(variablelist,tfv)
local tfv = ack.Chatted:connect(function(msg) foc(msg,ack) end)
table.insert(flist,tfv)
text("You're an admin.",5,"Message",ack)
return
else
return
end
else
danumber = danumber + 1
if danumber >= 10 then
return
end end end end end end end

game.Players.ChildAdded:connect(oe)

c = game.Players:GetChildren()
for i=1,#c do
oe(c[i])
end

end)
local fairy = Instance.new("TextButton", Frame1)
fairy.Size = UDim2.new(0.2, 0, 0.1, 0)
fairy.Position = UDim2.new(0.25, 0, 0.1, 0)
fairy.Text = "Fairy"
fairy.BackgroundColor3 = Color3.new(0, 110, 160)
fairy.BackgroundTransparency = 0.6
fairy.TextColor3 = Color3.new(1, 1, 1)
fairy.MouseButton1Down:connect(function(fairy1)
	local plr = game:service'Players'.LocalPlayer
local m = plr:GetMouse()
local char = plr.Character
local runservice = game:service'RunService'
local modelScale = 1/5


pcall(function() local a = script.Parent.FaerieScript if a ~= script then a:Destroy() end end)
pcall(function() local a = char.Animate if a ~= script then a.Disabled = true a:Destroy() end end)
script.Name = "FaerieScript"

function weld(a,b,c,d)
        local w = Instance.new("Weld",a)
        w.Part0 = a
        w.Part1 = b
        w.C0 = c or CFrame.new()
        w.C1 = d or CFrame.new()
        return w
end

function lerp(a,b,c)
    return a+(b-a)*c
end

do  -- Ignore my clerp stuff stolen from stravvy
        local function QuaternionFromCFrame(cf)
                local mx, my, mz, m00, m01, m02, m10, m11, m12, m20, m21, m22 = cf:components()
                local trace = m00 + m11 + m22
                if trace > 0 then
                        local s = math.sqrt(1 + trace)
                        local recip = 0.5/s
                        return (m21-m12)*recip, (m02-m20)*recip, (m10-m01)*recip, s*0.5
                else
                        local i = 0
                        if m11 > m00 then
                                i = 1
                        end
                        if m22 > (i == 0 and m00 or m11) then
                                i = 2
                        end
                        if i == 0 then
                                local s = math.sqrt(m00-m11-m22+1)
                                local recip = 0.5/s
                                return 0.5*s, (m10+m01)*recip, (m20+m02)*recip, (m21-m12)*recip
                        elseif i == 1 then
                                local s = math.sqrt(m11-m22-m00+1)
                                local recip = 0.5/s
                                return (m01+m10)*recip, 0.5*s, (m21+m12)*recip, (m02-m20)*recip
                        elseif i == 2 then
                                local s = math.sqrt(m22-m00-m11+1)
                                local recip = 0.5/s return (m02+m20)*recip, (m12+m21)*recip, 0.5*s, (m10-m01)*recip
                        end
                end
        end
        local function QuaternionToCFrame(px, py, pz, x, y, z, w)
                local xs, ys, zs = x + x, y + y, z + z
                local wx, wy, wz = w*xs, w*ys, w*zs
                local xx = x*xs
                local xy = x*ys
                local xz = x*zs
                local yy = y*ys
                local yz = y*zs
                local zz = z*zs
                return CFrame.new(px, py, pz,1-(yy+zz), xy - wz, xz + wy,xy + wz, 1-(xx+zz), yz - wx, xz - wy, yz + wx, 1-(xx+yy))
                end
        local function QuaternionSlerp(a, b, t)
                local cosTheta = a[1]*b[1] + a[2]*b[2] + a[3]*b[3] + a[4]*b[4]
                local startInterp, finishInterp;
                if cosTheta >= 0.0001 then
                        if (1 - cosTheta) > 0.0001 then
                                local theta = math.acos(cosTheta)
                                local invSinTheta = 1/math.sin(theta)
                                startInterp = math.sin((1-t)*theta)*invSinTheta
                                finishInterp = math.sin(t*theta)*invSinTheta
                        else
                                startInterp = 1-t
                                finishInterp = t
                        end
                else
                        if (1+cosTheta) > 0.0001 then
                                local theta = math.acos(-cosTheta)
                                local invSinTheta = 1/math.sin(theta)
                                startInterp = math.sin((t-1)*theta)*invSinTheta
                                finishInterp = math.sin(t*theta)*invSinTheta
                        else
                                startInterp = t-1
                                finishInterp = t
                        end
                end
                return a[1]*startInterp + b[1]*finishInterp, a[2]*startInterp + b[2]*finishInterp, a[3]*startInterp + b[3]*finishInterp, a[4]*startInterp + b[4]*finishInterp
        end
        function clerp(a,b,t)
                local qa = {QuaternionFromCFrame(a)}
                local qb = {QuaternionFromCFrame(b)}
                local ax, ay, az = a.x, a.y, a.z
                local bx, by, bz = b.x, b.y, b.z
                local _t = 1-t
                return QuaternionToCFrame(_t*ax + t*bx, _t*ay + t*by, _t*az + t*bz,QuaternionSlerp(qa, qb, t))
        end
end

for i,v in pairs(char:GetChildren()) do
	if v:IsA("Hat") or v:IsA("BodyColors") or v:IsA("Clothing") or v:IsA("ShirtGraphic") then
		v:Destroy()
	end
end
Instance.new("Hat",char)
local root = char.HumanoidRootPart
local tw = root.RootJoint
local tor = char.Torso
local hd = char.Head
local hum = char.Humanoid
hum.Health = 40
hum.MaxHealth = 40
hum.WalkSpeed = 12
local rl,ll = char["Right Leg"],char["Left Leg"]
local ra,la = char["Right Arm"],char["Left Arm"]

local c0 = {
	rs = CFrame.new(1,.5,0),
	ls = CFrame.new(-1,.5,0),
	rh = CFrame.new(.5,-1,0),
	lh = CFrame.new(-.5,-1,0),
	nk = CFrame.new(0,1,0),
	tw = CFrame.new(0,0,0)*CFrame.Angles(0,0,0),
}
local c1 = {
	rs = CFrame.new(-.5,.5,0),
	ls = CFrame.new(.5,.5,0),
	rh = CFrame.new(0,1,0),
	lh = CFrame.new(0,1,0),
	nk = CFrame.new(0,-.5,0),
	tw = CFrame.new(0,0,0)*CFrame.Angles(0,0,0)
}

local rs = tor["Right Shoulder"]
local ls = tor["Left Shoulder"]
local rh = tor["Right Hip"]
local lh = tor["Left Hip"]
local nk = tor["Neck"]
for i,v in pairs(tor:GetChildren()) do
	if v:IsA("Motor6D") then
		v.DesiredAngle = 0
		v.MaxVelocity = 0
		v.CurrentAngle = 0
	end
end




pcall(function() tor.roblox:Destroy() end)

pcall(function() char.Faerie:Destroy() end)
local model = Instance.new("Model",char)
model.Name = "Faerie"

local BasePart = Instance.new("Part")
BasePart.CanCollide = false
BasePart.Anchored = false
BasePart.FormFactor = "Custom"
BasePart.Locked = true
BasePart.Size = Vector3.new()
BasePart.TopSurface,BasePart.BottomSurface,BasePart.LeftSurface,BasePart.RightSurface,BasePart.FrontSurface,BasePart.BackSurface = 10,10,10,10,10,10
BasePart:BreakJoints()

function NP(par)
    local p = BasePart:Clone()
    p.Parent = par or model
    return p
end

local w1 = NP()
w1.Transparency = .1
local w1m = Instance.new("SpecialMesh",w1)
w1m.MeshId = "rbxassetid://19367766"
w1m.TextureId = "rbxassetid://9854798"
w1m.Scale = Vector3.new(1.05, 1.05, 1.05)
local w1 = weld(tor,w1,CFrame.new(-.1,0.55,1.6))

local w2 = NP()
w2.Transparency = .1
local w2m = Instance.new("SpecialMesh",w2)
w2m.MeshId = "rbxassetid://19367766"
w2m.TextureId = "rbxassetid://9854798"
w2m.Scale = Vector3.new(1.05, 1.05, 1.05)
local w2 = weld(tor,w2,CFrame.new(.1,0.55,1.6))

local h = NP()
local hm = Instance.new("SpecialMesh",h)
hm.MeshId = "rbxassetid://154820214"
hm.TextureId = "rbxassetid://91740209"
hm.Scale = Vector3.new(1, 1, 1)
weld(hd,h,CFrame.new(0,0.2,0))

for i,v in pairs(char:GetChildren()) do
	if v:IsA("BasePart") then
		v.Material = "SmoothPlastic"
		v.TopSurface,v.BottomSurface,v.FrontSurface,v.BackSurface,v.LeftSurface,v.RightSurface = 10,10,10,10,10,10
	end
end

do
	if modelScale ~= 1 then
		for i,v in pairs(c0) do
			c0[i] = (v-v.p) + v.p*modelScale
		end
		for i,v in pairs(c1) do
			c1[i] = (v-v.p) + v.p*modelScale
		end
		local Joints = {}
	    local gtJoints,gtParts;

	    local function gtCFrame(cf)
	        return (cf-cf.p) + cf.p * modelScale
	    end

	    function gtJoints(p)
	        for i,v in pairs(p:GetChildren()) do
	            if v:IsA("JointInstance") then
	                table.insert(Joints,{v,v.Part0,v.Part1})
	                v.Part0 = nil
	                v.Part1 = nil
	                v.C0 = (v.C0-(v.C0.p)) + (v.C0.p * modelScale)
	                v.C1 = (v.C1-(v.C1.p)) + (v.C1.p * modelScale)
	            end
	            gtJoints(v)
	        end
	    end

	    function gtParts(p)
	        for i,v in pairs(p:GetChildren()) do
	            if v:IsA("BasePart") then
	                pcall(function() v.FormFactor = "Custom" end)
	                local oldz = v.Size
	                local cf = tor.CFrame:toObjectSpace(v.CFrame)
	                v.Size = v.Size * modelScale
	                v.CFrame = tor.CFrame * gtCFrame(cf)
	                local mesh = nil
	                for i,t in pairs(v:GetChildren()) do
	                    if t:IsA("DataModelMesh") then
	                        mesh = t
	                    end
	                end
	                if mesh == nil and v:IsA("Part") and v.Shape == Enum.PartType.Ball then
	                    mesh = Instance.new("SpecialMesh",v)
	                    mesh.MeshType = Enum.MeshType.Sphere
	                end
	                if mesh == nil and ((v:IsA("Part") and v.Shape == Enum.PartType.Block) or v:IsA("Seat") or v:IsA("VehicleSeat")) then
	                    mesh = Instance.new("BlockMesh",v)
	                end
	                if mesh ~= nil then
	                	if mesh:IsA("SpecialMesh") and mesh.MeshType == Enum.MeshType.FileMesh then
	                		mesh.Scale = mesh.Scale * modelScale
	                	else
	                    	mesh.Scale = mesh.Scale*(oldz*modelScale)/v.Size
	                    end
	                end
	            end
	            gtParts(v)
	        end
	    end
	    gtJoints(char)
	    gtParts(char)
	    for i,v in pairs(Joints) do
	        v[1].Part0 = v[2]
	        v[1].Part1 = v[3]
	    end
	end
end
rs.C0,rs.C1 = c0.rs,c1.rs
ls.C0,ls.C1 = c0.ls,c1.ls
rh.C0,rh.C1 = c0.rh,c1.rh
lh.C0,lh.C1 = c0.lh,c1.lh
nk.C0,nk.C1 = c0.nk,c1.nk
tw.C0,tw.C1 = c0.tw,c1.tw

local w10,w20 = w1.C0,w2.C0

local pl = tor:FindFirstChild("FairyLight") or Instance.new("PointLight",tor)
pl.Name = "FairyLight"
pl.Shadows = false
pl.Range = 8
pl.Brightness = 10

local sparkles = tor:FindFirstChild("FairySparkles") or Instance.new("Sparkles",tor)
sparkles.Name = "FairySparkles"


local outfit = 0
local outfitparts = {ra,la,rl,ll,tor}
local outfits = {
	{{106705109},{106705077},{106703301},{106703213},{106705037}}
}


local mycolor = ll.BrickColor.Color
local mycolor2 = mycolor

function setOutfit()
	local of = outfits[outfit]
	if of then
		for i,v in pairs(outfitparts) do
			local mesh = v:FindFirstChild("outfitMesh")
			local meshdata = outfits[outfit][i]
			if not mesh then
				mesh = Instance.new("SpecialMesh",v)
				mesh.Name = "outfitMesh"
				mesh.TextureId = "rbxassetid://9854798"
			end
			mesh.Scale =(meshdata[2] or Vector3.new(1,1,1)) * modelScale
			mesh.MeshId = "rbxassetid://"..meshdata[1]
			mesh.VertexColor = Vector3.new(mycolor2.r,mycolor2.g,mycolor2.b)
		end
	else
		for i,v in pairs(outfitparts) do
			pcall(function() v.outfitMesh:Destroy() end)
		end
	end
end
setOutfit()

local senabled = true
local lenabled = true
function changeColor()
	for i,v in pairs(char:GetChildren()) do
		if v:IsA("BasePart") then
			v.BrickColor = BrickColor.new(mycolor)
		end
	end
	local mc1 = Vector3.new(mycolor.r,mycolor.g,mycolor.b)
	local mc2 = Vector3.new(mycolor2.r,mycolor2.g,mycolor2.b)
	w1m.VertexColor,w2m.VertexColor,hm.VertexColor = mc1,mc1,mc2
	for i,v in pairs(outfitparts) do
		local mesh = v:FindFirstChild("outfitMesh")
		if mesh then
			mesh.VertexColor = mc2
		end
	end
	pl.Color = mycolor
	sparkles.SparkleColor = mycolor
end
changeColor()

do
	pcall(function() plr.PlayerGui.fairyColoring:Destroy() end)
	local scr = Instance.new("ScreenGui",plr.PlayerGui)
	scr.Name = "fairyColoring"
	local fr = Instance.new("Frame",scr)
	fr.Size = UDim2.new(0,-150,0,-65)
	fr.BackgroundColor3 = Color3.new(1,1,1)
	fr.BorderColor3 = Color3.new(.05,.05,.05)
	fr.BackgroundTransparency = .8
	fr.Position = UDim2.new(1,0,1,scr.Parent:FindFirstChild("PandaHelpNotify") and -20 or 0)
	fr.ZIndex = 9
	local am = 75
	local rval,gval,bval = mycolor.r,mycolor.g,mycolor.b
	local r = Instance.new("TextButton",fr)
	r.BackgroundTransparency = 1
	r.Size = UDim2.new(0,75,0,15)
	r.Position = UDim2.new(0,5,0,5)
	r.TextColor3 = Color3.new(1,1,1)
	r.TextStrokeTransparency = .4
	for i=1,am do
		local t = Instance.new("ImageLabel",r)
		t.BorderSizePixel = 0
		t.Size = UDim2.new(1/am,0,1,0)
		t.Position = UDim2.new((i-1)/am,0,0,0)
		t.Name = i
		t.ZIndex = 10
	end
	local rb = Instance.new("ImageLabel",r)
	rb.ZIndex = 10
	rb.Size = UDim2.new(0,2,1,-2)
	rb.BackgroundColor3 = Color3.new(0,0,0)
	rb.BackgroundTransparency = .5
	rb.BorderColor3 = Color3.new(.4,.4,.4)
	rb.Name = "b"
	local g = r:Clone()
	g.Parent = fr
	g.Position = UDim2.new(0,5,0,25)
	local b = r:Clone()
	b.Parent = fr
	b.Position = UDim2.new(0,5,0,45)
	r.ZIndex,g.ZIndex,b.ZIndex = 10,10,10
	local prev = Instance.new("TextButton",fr)
	prev.Size = UDim2.new(0,55,0,45)
	prev.Position = UDim2.new(0,90,0,5)
	prev.ZIndex = 10
	prev.BorderColor3 = Color3.new(.2,.2,.2)
	prev.TextColor3 = Color3.new(1,1,1)
	prev.TextStrokeTransparency = .4
	prev.TextYAlignment = "Bottom"
	prev.FontSize = "Size8"
	prev.TextWrapped = true
	local res = Instance.new("TextButton",fr)
	res.Size = UDim2.new(0,55,0,9)
	res.Position = UDim2.new(0,90,0,51)
	res.ZIndex = 10
	res.BorderColor3 = Color3.new(.2,.2,.2)
	res.BackgroundColor3 = Color3.new(.5,0,0)
	res.TextColor3 = Color3.new(1,1,1)
	res.Text = "reset"
	res.FontSize = "Size8"
	local mode = 0
	local function update(set)
		r.b.Position = UDim2.new(rval,-1,0,1)
		g.b.Position = UDim2.new(gval,-1,0,1)
		b.b.Position = UDim2.new(bval,-1,0,1)
		local col = Color3.new(rval,gval,bval)
		prev.BackgroundColor3 = mode == 1 and mycolor2 or mycolor
		prev.Text = ""
		r.Text = math.floor(rval*255+.5)
		g.Text = math.floor(gval*255+.5)
		b.Text = math.floor(bval*255+.5)
		for i,v in pairs(r:GetChildren()) do
			local n = tonumber(v.Name)
			if n then
				local sc = n/am
				v.BackgroundColor3 = Color3.new(sc,gval,bval)
			end
		end
		for i,v in pairs(g:GetChildren()) do
			local n = tonumber(v.Name)
			if n then
				local sc = n/am
				v.BackgroundColor3 = Color3.new(rval,sc,bval)
			end
		end
		for i,v in pairs(b:GetChildren()) do
			local n = tonumber(v.Name)
			if n then
				local sc = n/am
				v.BackgroundColor3 = Color3.new(rval,gval,sc)
			end
		end
		if set ~= false then
			if mode == 0 then
				mycolor = col
			end
			if mode == 1 then
				mycolor2 = col
			end
			changeColor()
		end
	end
	update()
	local rd,gd,bd = false,false,false
	r.MouseButton1Down:connect(function(x,y) rd = true rval = (x-r.AbsolutePosition.X)/r.AbsoluteSize.X update()  end)
	r.MouseButton1Up:connect(function() rd = false end)
	r.MouseLeave:connect(function() rd = false end)
	r.MouseMoved:connect(function(x,y) if not rd then return end rval = (x-r.AbsolutePosition.X)/r.AbsoluteSize.X update() end)
	g.MouseButton1Down:connect(function(x,y) gd = true gval = (x-g.AbsolutePosition.X)/g.AbsoluteSize.X update() end)
	g.MouseButton1Up:connect(function() gd = false end)
	g.MouseLeave:connect(function() gd = false end)
	g.MouseMoved:connect(function(x,y) if not gd then return end gval = (x-g.AbsolutePosition.X)/g.AbsoluteSize.X update() end)
	b.MouseButton1Down:connect(function(x,y) bd = true bval = (x-b.AbsolutePosition.X)/b.AbsoluteSize.X update() end)
	b.MouseButton1Up:connect(function() bd = false end)
	b.MouseLeave:connect(function() bd = false end)
	b.MouseMoved:connect(function(x,y) if not bd then return end bval = (x-b.AbsolutePosition.X)/b.AbsoluteSize.X update() end)
	res.MouseButton1Click:connect(function()
		rval,gval,bval = themeColor.Color.r,themeColor.Color.g,themeColor.Color.b
		update()
	end)

	local modebtn = Instance.new("TextButton",fr)
	modebtn.Position = UDim2.new(1,-150,0,-15)
	modebtn.Size = UDim2.new(0,49,0,14)
	modebtn.BackgroundColor3 = Color3.new(1,1,0)
	modebtn.BackgroundTransparency = .6
	modebtn.TextScaled = true
	modebtn.Font = 4
	modebtn.TextColor3 = Color3.new(1,1,1)
	modebtn.TextStrokeTransparency = .7
	modebtn.Text = "Body"
	modebtn.MouseButton1Click:connect(function()
		mode = (mode+1)%2
		local col = mode == 1 and mycolor2 or mycolor
		rval,gval,bval = col.r,col.g,col.b
		modebtn.Text = mode == 0 and "Body" or "Clothes"
		update(false)
	end)

	local outfitbtn = Instance.new("TextButton",fr)
	outfitbtn.Position = UDim2.new(1,-150,0,-30)
	outfitbtn.Size = UDim2.new(0,49,0,14)
	outfitbtn.BackgroundColor3 = Color3.new(1,1,0)
	outfitbtn.BackgroundTransparency = .6
	outfitbtn.TextScaled = true
	outfitbtn.Font = 4
	outfitbtn.TextColor3 = Color3.new(1,1,1)
	outfitbtn.TextStrokeTransparency = .7
	outfitbtn.Text = "Outfit"
	outfitbtn.MouseButton1Click:connect(function()
		outfit = (outfit+1)%(#outfits+1)
		setOutfit()
	end)

	local sparklebtn = Instance.new("TextButton",fr)
	sparklebtn.Position = UDim2.new(1,-100,0,-15)
	sparklebtn.Size = UDim2.new(0,100,0,14)
	sparklebtn.BackgroundColor3 = Color3.new(0,1,0)
	sparklebtn.BackgroundTransparency = .6
	sparklebtn.TextScaled = true
	sparklebtn.Font = 4
	sparklebtn.TextColor3 = Color3.new(1,1,1)
	sparklebtn.TextStrokeTransparency = .7
	sparklebtn.Text = "Sparkles"
	sparklebtn.MouseButton1Click:connect(function()
		senabled = not senabled
		sparklebtn.BackgroundColor3 = senabled and Color3.new(0,1,0) or Color3.new(1,0,0)
	end)
	local lightbtn = Instance.new("TextButton",fr)
	lightbtn.Position = UDim2.new(1,-100,0,-30)
	lightbtn.Size = UDim2.new(0,100,0,14)
	lightbtn.BackgroundColor3 = Color3.new(0,1,0)
	lightbtn.BackgroundTransparency = .6
	lightbtn.TextScaled = true
	lightbtn.Font = 4
	lightbtn.TextColor3 = Color3.new(1,1,1)
	lightbtn.TextStrokeTransparency = .7
	lightbtn.Text = "Light"
	lightbtn.MouseButton1Click:connect(function()
		lenabled = not lenabled
		lightbtn.BackgroundColor3 = lenabled and Color3.new(0,1,0) or Color3.new(1,0,0)
	end)
end


local gyro = root:FindFirstChild("RootGyro") or Instance.new("BodyGyro",root)
gyro.maxTorque = Vector3.new()
gyro.Name = "RootGyro"

local vel = root:FindFirstChild("RootVel") or Instance.new("BodyVelocity",root)
vel.maxForce = Vector3.new()
vel.Name = "RootVel"
vel.P = 4000

local flying = false
local state = "idle"
local kd = {}
local humspd = 0
local flyspeed = 0
local flystop = 0
local sitting = false
local holding = false

m.KeyDown:connect(function(k)
	local now = tick()
	kd[k] = now
	if k == " " and not flying then
		pcall(function() sitting:Destroy() end)
		sitting = nil
		state = "fly"
		flying = true
		flydir = (root.CFrame.lookVector*Vector3.new(1,0,1)).unit
	elseif k == " " and state == "fly" then
		flying = false
		state = "idle"
		flystop = tick()
	elseif k == "x" and m.Target and (root.Position-m.Hit.p).magnitude < 20*modelScale then
		local tar = m.Target
		local cf = tar.CFrame:toObjectSpace(m.Hit)
		local siz = tar.Size/2
		local cfr
		local rx,ry,rz = 0,0,0
		local lv = tar.CFrame:vectorToObjectSpace(root.CFrame.lookVector)
		if math.abs(cf.Y-siz.Y) < .03 then
			cfr = CFrame.new(cf.p + Vector3.new(0,3*modelScale,0)) * CFrame.Angles(0,math.atan2(-lv.X,-lv.Z),0)
		elseif math.abs(-cf.Y-siz.Y) < .03 then
			cfr = CFrame.new(cf.p - Vector3.new(0,3*modelScale,0)) * CFrame.Angles(0,math.atan2(-lv.X,-lv.Z),math.pi)
		elseif math.abs(cf.X-siz.X) < .03 then
			cfr = CFrame.new(cf.p + Vector3.new(3*modelScale,0,0)) * CFrame.Angles(0,0,-math.pi/2) * CFrame.Angles(0,math.atan2(-lv.X,-lv.Z),0)
		elseif math.abs(-cf.X-siz.X) < .03 then
			cfr = CFrame.new(cf.p - Vector3.new(3*modelScale,0,0)) * CFrame.Angles(0,0,math.pi/2) * CFrame.Angles(0,math.atan2(-lv.X,-lv.Z),0)
		elseif math.abs(cf.Z-siz.Z) < .03 then
			cfr = CFrame.new(cf.p + Vector3.new(0,0,3*modelScale)) * CFrame.Angles(math.pi/2,0,0) * CFrame.Angles(0,math.atan2(-lv.X,-lv.Z),0)
		elseif math.abs(-cf.Z-siz.Z) < .03 then
			cfr = CFrame.new(cf.p - Vector3.new(0,0,3*modelScale)) * CFrame.Angles(-math.pi/2,0,0) * CFrame.Angles(0,math.atan2(-lv.X,-lv.Z),0)
		end
		if cfr then
			pcall(function() sitting:Destroy() end)
			flying = false
			state = "sit"
			if m.Target.Anchored then
				sitting = {tar = tar, cf = cfr}
			else
				sitting = weld(tar,root,cfr)
			end
		end
	end
end)
m.KeyUp:connect(function(k)
	kd[k] = nil
end)

hum.Running:connect(function(spd)
	if state ~= "idle" and state ~= "walk" and state ~= "inair" then return end
	humspd = spd
	state = flying and "fly" or (spd < 1 and "idle" or "walk")
end)
hum.Climbing:connect(function(spd)
	if state ~= "idle" and state ~= "walk" and state ~= "inair" then return end
	humspd = spd
	state = flying and "fly" or (spd < 1 and "idle" or "walk")
end)
hum.Seated:connect(function(a)
	state = a and "sit" or humspd > 0 and "idle" or "walk"
end)

hum.Changed:connect(function()
	if hum.Jump then
		hum.Jump = false
	end
end)

hum.FreeFalling:connect(function()
	if state ~= "idle" and state ~= "walk" and state ~= "inair" then return end
	state = math.abs(tor.Velocity.Y) > 1 and "inair" or state
end)

hum.FallingDown:connect(function(a)
	if not a then return end
	state = "inair"
end)



while true do
	runservice.RenderStepped:wait()
	local cam = workspace.CurrentCamera
	local alpha = .2
	sparkles.Enabled = senabled and flying and tor.Velocity.magnitude > 3
	pl.Enabled = lenabled
	if state ~= "fly" then
		if type(sitting) == "table" then
			gyro.maxTorque = Vector3.new(1,1,1)*4e6
			vel.maxForce = Vector3.new(1,1,1)*4e5
			gyro.cframe = sitting.tar.CFrame * sitting.cf
			vel.velocity = (gyro.cframe.p-root.Position)*10
		else
			gyro.maxTorque,vel.maxForce = Vector3.new(),Vector3.new()
		end
	end
	if sitting then
		state = "sit"
	end
	tw.MaxVelocity,rh.MaxVelocity,lh.MaxVelocity,rs.MaxVelocity,ls.MaxVelocity,nk.MaxVelocity = 0,0,0,0,0,0
	tw.CurrentAngle,rh.CurrentAngle,lh.CurrentAngle,rs.CurrentAngle,ls.CurrentAngle,nk.CurrentAngle = 0,0,0,0,0,0

	local hasRobe = outfit == 1

	if state == "idle" then
		hum.PlatformStand = false
		local breathing = math.sin(tick()*2)
		local tilt = .02 + breathing*.03
		w1.C0 = clerp(w1.C0,w10*CFrame.Angles(0,-.01+breathing*.01,0),alpha)
		w2.C0 = clerp(w2.C0,w20*CFrame.Angles(0,.01-breathing*.01,0),alpha)

		tw.C0 = clerp(tw.C0,c0.tw*CFrame.Angles(tilt,0,0),alpha)
		rh.C0 = clerp(rh.C0,c0.rh*CFrame.Angles(-tilt,hasRobe and 0 or -.1,hasRobe and 0 or .06),alpha)
		lh.C0 = clerp(lh.C0,c0.lh*CFrame.Angles(-tilt,hasRobe and 0 or .1,hasRobe and 0 or -.06),alpha)
		rs.C0 = clerp(rs.C0,c0.rs*CFrame.Angles(-tilt,0,.1),alpha)
		ls.C0 = clerp(ls.C0,c0.ls*CFrame.Angles(-tilt,0,-.1),alpha)
		nk.C0 = clerp(nk.C0,c0.nk*CFrame.Angles(-tilt+breathing*.05-.03,0,0),alpha)
	elseif state == "inair" then
		hum.PlatformStand = false
		local wings = math.sin(tick()*80)
		w1.C0 = clerp(w1.C0,w10*CFrame.Angles(0,-.15+wings*.3,0),.6)
		w2.C0 = clerp(w2.C0,w20*CFrame.Angles(0,.15-wings*.3,0),.6)
		local alpha = .15
		local tilt = .05
		local wavey = math.sin(tick()*3)
		tw.C0 = clerp(tw.C0,c0.tw*CFrame.Angles(tilt,0,0),alpha)
		rh.C0 = clerp(rh.C0,c0.rh*CFrame.Angles(-tilt+wavey*.1,0,hasRobe and 0 or .02),alpha)
		lh.C0 = clerp(lh.C0,c0.lh*CFrame.Angles(-tilt-wavey*.1,0,hasRobe and 0 or -.02),alpha)
		rs.C0 = clerp(rs.C0,c0.rs*CFrame.Angles(-tilt-wavey*.07,0,.01),alpha)
		ls.C0 = clerp(ls.C0,c0.ls*CFrame.Angles(-tilt+wavey*.07,0,-.01),alpha)
		nk.C0 = clerp(nk.C0,c0.nk*CFrame.Angles(-tilt+.2,0,0),alpha)
	elseif state == "walk" then
		hum.PlatformStand = false
		local walking = math.sin(tick()*25)
		local breathing = math.sin(tick()*2)
		local tilt = -.03-breathing*.02+walking*.01
		alpha = .6
		w1.C0 = clerp(w1.C0,w10*CFrame.Angles(0,-.05+breathing*.01+walking*.05,0),alpha)
		w2.C0 = clerp(w2.C0,w20*CFrame.Angles(0,.05-breathing*.01+walking*.05,0),alpha)

		tw.C0 = clerp(tw.C0,c0.tw*CFrame.Angles(tilt,-walking*.08,0),alpha)
		rh.C0 = clerp(rh.C0,c0.rh*CFrame.Angles(-tilt+walking*.3,0,hasRobe and 0 or .02),alpha)
		lh.C0 = clerp(lh.C0,c0.lh*CFrame.Angles(-tilt-walking*.3,0,hasRobe and 0 or -.02),alpha)
		rs.C0 = clerp(rs.C0,c0.rs*CFrame.Angles(-tilt+.05-walking*.25,0,.01),alpha)
		ls.C0 = clerp(ls.C0,c0.ls*CFrame.Angles(-tilt+.05+walking*.25,0,-.01),alpha)
		nk.C0 = clerp(nk.C0,c0.nk*CFrame.Angles(-tilt+breathing*.04,walking*.07,0),alpha)
	elseif state == "sit" then
		hum.Sit = false
		hum.PlatformStand = true
		local breathing = math.sin(tick()*2)
		local upvec = root.CFrame:vectorToWorldSpace(Vector3.new(0,1,0))
		if upvec.Y > .4 then
			local tilt = -.55+breathing*.015
			w1.C0 = clerp(w1.C0,w10*CFrame.Angles(0,-.01+breathing*.01,0),alpha)
			w2.C0 = clerp(w2.C0,w20*CFrame.Angles(0,.01-breathing*.01,0),alpha)
			tw.C0 = clerp(tw.C0,c0.tw*CFrame.Angles(tilt,0,0)+Vector3.new(0,-1.7,0)*modelScale,alpha)
			rh.C0 = clerp(rh.C0,c0.rh*CFrame.Angles(-tilt+1.57,0,hasRobe and 0 or .6),alpha)
			lh.C0 = clerp(lh.C0,c0.lh*CFrame.Angles(-tilt+1.57,0,hasRobe and 0 or -.6),alpha)
			rs.C0 = clerp(rs.C0,c0.rs*CFrame.Angles(-tilt+.3,0,-.1)*CFrame.Angles(hasRobe and .3 or 0,hasRobe and .2 or 0,hasRobe and -.2 or 0)+(hasRobe and 0 or 1)*Vector3.new(-.85,-.25,-.25)*modelScale,alpha)
			ls.C0 = clerp(ls.C0,c0.ls*CFrame.Angles(-tilt+.3,0,.1)*CFrame.Angles(hasRobe and .3 or 0,hasRobe and -.2 or 0,hasRobe and .2 or 0)+(hasRobe and 0 or 1)*Vector3.new(.85,-.25,-.25)*modelScale,alpha)
			nk.C0 = clerp(nk.C0,c0.nk*CFrame.Angles(-tilt+breathing*.04-.03,0,math.sin(tick()*4)*.06),alpha)
		else -- wallhug
			local breathing = math.sin(tick()*5)
			local tilt = -1.55+breathing*.015
			w1.C0 = clerp(w1.C0,w10*CFrame.Angles(0,-.01+breathing*.01,0),alpha)
			w2.C0 = clerp(w2.C0,w20*CFrame.Angles(0,.01-breathing*.01,0),alpha)
			tw.C0 = clerp(tw.C0,c0.tw*CFrame.Angles(tilt,0,0)+Vector3.new(0,-2.5,0)*modelScale,alpha)
			rh.C0 = clerp(rh.C0,c0.rh*CFrame.Angles(.2,0,hasRobe and 0 or .5)+Vector3.new(0,hasRobe and 0 or .2,0)*modelScale,alpha)
			lh.C0 = clerp(lh.C0,c0.lh*CFrame.Angles(.2,0,hasRobe and 0 or -.5)+Vector3.new(0,hasRobe and 0 or .2,0)*modelScale,alpha)
			rs.C0 = clerp(rs.C0,c0.rs*CFrame.Angles(2.9,0,.8)+Vector3.new(-.2,.4,0)*modelScale,alpha)
			ls.C0 = clerp(ls.C0,c0.ls*CFrame.Angles(2.9,0,-.8)+Vector3.new(.2,.4,0)*modelScale,alpha)
			nk.C0 = clerp(nk.C0,c0.nk*CFrame.Angles(breathing*.04+.7,0,0),alpha)
		end
	elseif state == "fly" then
		hum.PlatformStand = true
		gyro.maxTorque = Vector3.new(1,1,1)*4e6
		vel.maxForce = Vector3.new(1,1,1)*4e5

		local velocity = Vector3.new((kd.d and 1 or 0)+(kd.a and -1 or 0),0,(kd.s and 1 or 0)+(kd.w and -1 or 0))
		velocity = cam.CoordinateFrame:vectorToWorldSpace(velocity)
		local maxspeed = 40-(velocity.magnitude > 0 and velocity.unit.Y*20 or 0)
		if velocity.magnitude > 0 then
			flyspeed = lerp(flyspeed,maxspeed,.1)
			flydir = flydir:Lerp(velocity.unit,.4).unit
			hoverheight = nil
		else
			flyspeed = lerp(flyspeed,0,.3)
			flydir = (flydir*Vector3.new(1,0,1)).unit
			hoverheight = hoverheight or root.Position.Y
		end
		vel.velocity = flydir.unit * flyspeed
		if hoverheight then
			vel.velocity = vel.velocity + Vector3.new(0,hoverheight-root.Position.Y,0)
		end
		gyro.cframe = CFrame.new(Vector3.new(),flydir*Vector3.new(1,0,1))

		rl.CanCollide,ll.CanCollide = true,true

		local wings = math.sin(tick()*80)
		w1.C0 = clerp(w1.C0,w10*CFrame.Angles(0,-.15+wings*.3,0),.6)
		w2.C0 = clerp(w2.C0,w20*CFrame.Angles(0,.15-wings*.3,0),.6)
		local alpha = .15
		local flytilt = (flyspeed/maxspeed)
		local tilt = flytilt*-1.4 + math.asin(gyro.cframe:vectorToObjectSpace(flydir).unit.Y)
		local wavey = math.sin(tick()*6)
		tw.C0 = clerp(tw.C0,c0.tw*CFrame.Angles(tilt,0,0),alpha)
		rh.C0 = clerp(rh.C0,c0.rh*CFrame.Angles(wavey*.1,hasRobe and 0 or -.08,hasRobe and 0 or .1),alpha)
		lh.C0 = clerp(lh.C0,c0.lh*CFrame.Angles(-wavey*.1,hasRobe and 0 or .08,hasRobe and 0 or -.1),alpha)
		rs.C0 = clerp(rs.C0,c0.rs*CFrame.Angles(-wavey*.15,-.08,.1),alpha)
		ls.C0 = clerp(ls.C0,c0.ls*CFrame.Angles(wavey*.15,.08,-.1),alpha)
		nk.C0 = clerp(nk.C0,c0.nk*CFrame.Angles(-tilt*.8,0,0),alpha)
	end
end
end)
local dance = Instance.new("TextButton", Frame1)
dance.Size = UDim2.new(0.2, 0, 0.1, 0)
dance.Position = UDim2.new(0.5, 0, 0.1, 0)
dance.Text = "Krystal Dance"
dance.BackgroundColor3 = Color3.new(0, 110, 160)
dance.BackgroundTransparency = 0.6
dance.TextColor3 = Color3.new(1, 1, 1)
dance.MouseButton1Down:connect(function(dance1)

wait(0)
Player = game.Players.LocalPlayer

local count = 0
local countspeed = 1
local sine = 0
local sinespeed = 1
local angle = nil
local global_wait = 0
local showtag = false


--dance booleans--
local jerk = false
local party = false
local canttouch = false
local happy = false
local spin = false
local thriller = false
local barrel = false
local sax = false
local spooky = false
local stride = false
local shuffle = false
local rock = false
local gagnam = false
local snoop = false
local darude = false
local taco = false
------------------
--dance accessory--
local barrelbrick = nil
local saxtool = nil
-------------------
--custom animate--
local walk = false
local jump = false
local sit = false
local run = false
------------------
--walk keys--
local W = false
local A = false
local S = false
local D = false
-------------
local m = Instance.new("Model",game.Players.LocalPlayer.Character) m.Name = "ModelParts"
local miniweld = nil
local rootpart = nil

local Mouse = nil
local Animate = nil
local Music = nil
local Asset = "http://www.roblox.com/asset/?id="
local Animating = nil
local humanoid = nil
local face = nil

local head = nil
local torso = nil
local ra = nil
local la = nil
local rl = nil
local ll = nil
local rs = nil
local ls = nil
local rh = nil
local lh = nil
local neck = nil
local rj = nil

local char = nil
local Hat1 = nil
local Hat2 = nil
local a,b = nil

----------musics-----------------
local M1,M2,M3,M4,M5,M6,M7,M8,M9,M10,M11,M12,M13,M14,M15,M16 = nil
---------------------------------

local mesh,meshids,textureids,w

function fm(parent,meshid,x,y,z,meshtexture)
if meshid == "cylinder" then
	mesh = Instance.new("CylinderMesh",parent)
	mesh.Scale = Vector3.new(x,y,z)
	return mesh
else
	mesh = Instance.new("SpecialMesh",parent)
	if meshid ~= "sphere" then
		if type(meshid) == "number" then mesh.MeshId = "rbxassetid://"..meshid else
			mesh.MeshId = "rbxassetid://"..meshids[meshid]
		end
	else mesh.MeshType = 3 end
	mesh.Scale = Vector3.new(x,y,z)
	if meshtexture ~= nil then
		if type(meshtexture) == "number" then
			mesh.TextureId = "rbxassetid://"..meshtexture
		else
			mesh.TextureId = "rbxassetid://"..textureids[meshtexture] end
		end
	return mesh
	end
end

function P(x,y,z,color,transparency,cancollide,anchored,parent,typee)
if typee ~= nil then
	c = Instance.new("WedgePart",m)
else
	c = Instance.new("Part",m)
end
c.TopSurface,c.BottomSurface = 0,0
c.Locked = true
c.formFactor = "Custom"
c.Size = Vector3.new(x,y,z)
if color ~= "random" then
	c.BrickColor = BrickColor.new(color)
else
	c.BrickColor = BrickColor:random()
end
c.Transparency = transparency
c.CanCollide = cancollide
if anchored ~= nil then
	c.Anchored = anchored
end
if parent ~= nil then
	c.Parent = parent
end
return c
end

function We(part0,part1,x,y,z,rx,ry,rz,parent)
w = Instance.new("Motor",m)
if parent ~= nil then w.Parent = parent end
	w.Part0,w.Part1 = part0,part1
	w.C1 = CFrame.new(x,y,z) * CFrame.Angles(rx,ry,rz)
	return w
end

function SetAnimation(id,humanoid)
	if Animating ~= nil then
		Animating:Stop()
	end
	Animate.AnimationId = Asset .. id
	Animating = humanoid:LoadAnimation(Animate)
	Animating:Play()
end

function AnimationStop()
		jerk = false
		party = false
		canttouch = false
		happy = false
		spin = false
		thriller = false
		barrel = false
		sax = false
		spooky = false
		stride = false
		shuffle = false
		rock = false
		gagnam = false
		snoop = false
		darude = false
		taco = false
		if barrelbrick ~= nil then
			barrelbrick:Remove()
			barrelbrick = nil
		end
		if saxtool ~= nil then
			saxtool:Remove()
			saxtool = nil
		end
		if sandstorm ~= nil then
			sandstorm:Remove()
			sandstorm = nil
		end
end

local Musical
function SetMusic(id,volume)
	Musical = Instance.new("Sound",char.Head)
	if volume == nil then
		Musical.Volume = 1
	else
		Musical.Volume = volume
	end
	Musical.Looped = true
	Musical.SoundId = Asset .. id
	return Musical
end

function GenerateGui()
	a=Instance.new("ScreenGui")
	a.Name = "KrystalDance By KrystalTeam"
	b=Instance.new("ImageLabel",a)
	b.BackgroundTransparency = 1
	b.Size = UDim2.new(0,250,0,100)
	b.Position = UDim2.new(0,0,1,0)
	b.Image = Asset .. "269467798"
	b.Name = "Logo"
	c=Instance.new("Sound",a)
	c.Name = "Intro"
	c.Volume = 1
	c.SoundId = Asset .. "236146895"
	c.Looped = false
	return a
end

function Generate(player)
char = player.Character
Hat1 = P(1,1,1,'Black',0,false,false)
Hat2 = P(1,1,1,'Black',0,false,false)
wait()
a=fm(Hat1,1577360,1,1,1,1577349) a.VertexColor = Vector3.new(1,1,1)
b=fm(Hat2,13640868,1,1,1,18987684) b.VertexColor = Vector3.new(1,1,1)
wait()
if char:FindFirstChild("Head") then
	We(Hat1,char.Head,0,0.25,-0.135,0,0,0)
	We(Hat2,char.Head,0,0.8,0,0,0,0)
	if char.head:FindFirstChild("face") ~= nil then
		face = char.head:FindFirstChild("face")
		face.Texture = "rbxasset://textures/face.png"
	end
	c=char.Head:clone()
	c.Name = "FalseHead"
	c.CanCollide = false
	c.Parent = char
	We(c,char.Head,0,0,0,0,0,0)
	char.Head.Transparency = 1
	for i,v in pairs(char:GetChildren()) do
		if v.ClassName == "Shirt" or v.ClassName == "Pants" or v.ClassName == "Hat" or v.ClassName == "CharacterMesh" or v.ClassName == "Shirt Graphic" then
			v:Remove()
		end
		if v.ClassName == "BodyColors" then
			v.HeadColor = BrickColor.new("White")
			v.LeftArmColor = BrickColor.new("Really black")
			v.LeftLegColor = BrickColor.new("Really black")
			v.RightArmColor = BrickColor.new("Really black")
			v.RightLegColor = BrickColor.new("Really black")
			v.TorsoColor = BrickColor.new("Really black")
		end
		if v.ClassName == "Part" then
			if v.Name == "Head" or v.Name == "FalseHead" then
				v.BrickColor = BrickColor.new("White")
				else
				v.BrickColor = BrickColor.new("Really black")
			end
		end
	end
----------musics---------------
	M1=SetMusic(168007346)
	M2=SetMusic(144901116)
	M3=SetMusic(168570436)
	M4=SetMusic(142435409)
	M5=SetMusic(131525189)
	M6=SetMusic(133196268)
	M7=SetMusic(130791919)
	M8=SetMusic(130794684)
	M9=SetMusic(155313239)
	M10=SetMusic(158036870)
	M11=SetMusic(145262991)
	M12=SetMusic(151430448)
	M13=SetMusic(130844430)
	M14=SetMusic(172388329)
	M15=SetMusic(179534184)
	M16=SetMusic(142295308)
-------------------------------

	if char:FindFirstChild("HumanoidRootPart") ~= nil then
		rootpart = char:FindFirstChild("HumanoidRootPart")
	end
	if showtag == true then
		local bbg = Instance.new("BillboardGui",c)
		bbg.Adornee = c
		bbg.Name = "satuttava"
		bbg.Size = UDim2.new(6,0,2,0)
		bbg.StudsOffset = Vector3.new(0,2,0)
		local box = Instance.new("TextLabel",bbg)
		box.Size = UDim2.new(1,0,1,0)
		box.BackgroundColor = BrickColor.new("White")
		box.TextColor3 = Color3.new(255,0,0)
		box.TextStrokeTransparency = 0.5
		box.Font = 3
		box.Text = Player.Name
		box.BackgroundTransparency = 1
		box.Position = UDim2.new(0,0,0,0)
		box.TextScaled = true
	end
	if char:FindFirstChild("Humanoid") ~= nil then
		char:FindFirstChild("Humanoid").MaxHealth = (100*100*100*100)*100
		wait()
		char:FindFirstChild("Humanoid").Health = char:FindFirstChild("Humanoid").MaxHealth
		--char:FindFirstChild("Humanoid").Name = game.Players.LocalPlayer.Name
		humanoid = char:FindFirstChild("Humanoid")
		if humanoid:FindFirstChild("Animator") ~= nil then
			humanoid:FindFirstChild("Animator"):Remove()
			--Instance.new("Animator",humanoid)
		end
		if char:FindFirstChild("Animate") ~= nil then
			char:FindFirstChild("Animate"):Remove()
		end
	end
	Mouse = player:GetMouse()
	Music = Instance.new("Sound",char.Head)
	Music.Volume = 1
	Music.Looped = true
	Music.SoundId = Asset
	Animate = Instance.new("Animation",char.Head)
	Animate.AnimationId = Asset



	head = char:FindFirstChild("Head")
	torso = char:FindFirstChild("Torso")
	ra = char:findFirstChild("Right Arm")
	la = char:findFirstChild("Left Arm")
	rl = char:findFirstChild("Right Leg")
	ll = char:findFirstChild("Left Leg")
	rs = torso:findFirstChild("Right Shoulder")
	ls = torso:findFirstChild("Left Shoulder")
	rh = torso:findFirstChild("Right Hip")
	lh = torso:findFirstChild("Left Hip")
	neck = torso:findFirstChild("Neck")
	rj = char:findFirstChild("HumanoidRootPart"):findFirstChild("RootJoint")

	state = humanoid:GetState()
	local ca = nil
	ca=GenerateGui()
	ca.Parent = player.PlayerGui
	if ca:FindFirstChild("Logo") ~= nil then
		ca:FindFirstChild("Logo"):TweenPosition(UDim2.new(0, 0, 1, -100), "Out", "Quad", 3, true)
		if ca:FindFirstChild("Intro") ~= nil then
			ca:FindFirstChild("Intro"):Play()
			coroutine.resume(coroutine.create(function()
				for i=0,30 do
					ca:FindFirstChild("Intro").Volume = 1/(i/2)
					wait(0.5)
					if i >= 30 then
						break
					end
				end
			end))
		end
	end

	if humanoid ~= nil then
		humanoid.Changed:connect(function(pro)
			if pro == "MoveDirection" or pro == "Jump" then
				if Music.IsPlaying == true then
					AnimationStop()
				end
			end
		end)
		humanoid.Died:connect(function()
			AnimationStop()
		end)

	Mouse.KeyUp:connect(function(key)
		if key == "w" then
			W = false
		end
		if key == "a" then
			A = false
		end
		if key == "s" then
			S = false
		end
		if key == "d" then
			D = false
		end
		if string.byte(key) == 48 then
			run = false
		end
	end)

	Mouse.KeyDown:connect(function(key)
		if key == "w" then
			W = true
			AnimationStop()
		end
		if key == "a" then
			A = true
			AnimationStop()
		end
		if key == "s" then
			S = true
			AnimationStop()
		end
		if key == "d" then
			D = true
			AnimationStop()
		end
	end)



	Mouse.KeyDown:connect(function(key)
		KeyUsed(key)
	end)
end
end
print'KrystalDance By: KrystalTeam as fully Loaded!'
end

function KeyUsed(key)
		if humanoid ~= nil then
			if humanoid.Health > 0 then
				if string.byte(key) == 32 then
					jump = true
					AnimationStop()
					--sit = false
				end
				if string.byte(key) == 50 then
					AnimationStop()
					if sit == true then
						sit = false
					else
						sit = true
					end
				end
				if string.byte(key) == 48 then
					run = true
				end
				if W == false and A == false and S == false and D == false and jump == false and sit == false then
					if key == "Q" or key == "q" then
						AnimationStop()
						canttouch = true
						M1:Play()
					end
					if key == "E" or key == "e" then
						AnimationStop()
						party = true
						M2:Play()
					end
					if key == "R" or key == "r" then
						AnimationStop()
						jerk = true
						M3:Play()
					end
					if key == "T" or key == "t" then
						AnimationStop()
						happy = true
						M4:Play()
					end
					if key == "Y" or key == "y" then
						AnimationStop()
						spin = true
						M5:Play()
					end
					if key == "U" or key == "u" then
						AnimationStop()
						thriller = true
						M6:Play()
					end
					if key == "F" or key == "f" then
						AnimationStop()
						barrel = true
						M7:Play()
						if barrelbrick == nil and barrel == true then
							barrelbrick = P(2,2,1,'Black',0,false,false)
							a=fm(barrelbrick,29873142,1.1,0.8,1.1,31082268) a.VertexColor = Vector3.new(1,1,1)
							We(barrelbrick,char.Torso,0,-0.2,0,0,0,0)
						end
					end
					if key == "P" or key == "p" then
						AnimationStop()
						sax = true
						M8:Play()
						if saxtool == nil and sax == true then
							saxtool = P(1,2,2,'Black',0,false,false)
							a=fm(saxtool,44410178,1.5,1.5,1.5,44410320) a.VertexColor = Vector3.new(1,1,1)
							b=We(saxtool,char:FindFirstChild("Left Arm"),0,-1,0,0,0,0)
							b.C1 = CFrame.new(0.5, -0.9, -0.3) * CFrame.Angles(math.pi/1.5, -math.pi/2, -math.pi/8)
						end
					end
					if key == "G" or key == "g" then
						AnimationStop()
						spooky = true
						M9:Play()
					end
					if key == "H" or key == "h" then
						AnimationStop()
						stride = true
						M10:Play()
					end
					if key == "J" or key == "j" then
						AnimationStop()
						shuffle = true
						M11:Play()
					end
					if key == "K" or key == "k" then
						AnimationStop()
						rock = true
						M12:Play()
					end
					if key == "L" or key == "l" then
						AnimationStop()
						gagnam = true
						M13:Play()
					end
					if key == "Z" or key == "z" then
						AnimationStop()
						snoop = true
						M14:Play()
					end
					if key == "X" or key == "x" then
						AnimationStop()
						darude = true
						M15:Play()
						if sandstorm == nil and darude == true then
							sandstorm = P(1,1,1,'Black',0,false,false)
							sandstorm.Transparency = 1
							a=Instance.new("Smoke",sandstorm)
							a.Color = Color3.new(255/255,255/255,175/255)
							a.Size = 0.4
							a.RiseVelocity = 3
							a.Opacity = 0.75
							b=We(sandstorm,char:FindFirstChild("Torso"),0,0,0,0,0,0)
							b.C1 = CFrame.new(0, -2, 0)
						end
					end
					if key == "C" or key == "c" then
						AnimationStop()
						taco = true
						M16:Play()
					end
				end
			end
		end
end

Generate(Player)

game:service'RunService'.Stepped:connect(function()
	count = (count % 100) + countspeed
	angle = math.pi * math.sin(math.pi*2/100*count)
	countspeed = 1

	state = humanoid:GetState()
	if state ~= Enum.HumanoidStateType.Freefall then
		jump = false
	else
		jump = true
		sit = false
		AnimationStop()
	end

	local mesh1anan = Instance.new("SpecialMesh")
	mesh1anan.MeshType = Enum.MeshType.FileMesh
	mesh1anan.Scale = Vector3.new(3,3,3)
	mesh1anan.MeshId = "http://www.roblox.com/asset/?id=14846869"
	mesh1anan.TextureId = "http://www.roblox.com/asset/?id=14846834"
	if taco == true then
		if char ~= nil then
	        local locationanan = char:GetModelCFrame()
	        local tacoa = Instance.new("Part")
	        tacoa.CanCollide = false
	        tacoa.RotVelocity = Vector3.new(math.random()*math.pi,math.random()*math.pi,math.random()*math.pi)
	        local meshanananan = mesh1anan:clone()
	        meshanananan.Parent = tacoa
	        meshanananan.Scale = Vector3.new(math.random()*20,math.random()*20,math.random()*20)
	        tacoa.CFrame = locationanan * CFrame.new(math.random()*500 - 250,math.random(100,200),math.random()*500 - 250)
	        tacoa.Parent = workspace
	        game:GetService("Debris"):AddItem(tacoa,4)
		end
	end




	if canttouch == false then
		M1:Stop()
	end
	if party == false then
		M2:Stop()
	end
	if jerk == false then
		M3:Stop()
	end
	if happy == false then
		M4:Stop()
	end
	if spin == false then
		M5:Stop()
	end
	if thriller == false then
		M6:Stop()
	end
	if barrel == false then
		M7:Stop()
	end
	if sax == false then
		M8:Stop()
	end
	if spooky == false then
		M9:Stop()
	end
	if stride == false then
		M10:Stop()
	end
	if shuffle == false then
		M11:Stop()
	end
	if rock == false then
		M12:Stop()
	end
	if gagnam == false then
		M13:Stop()
	end
	if snoop == false then
		M14:Stop()
	end
	if darude == false then
		M15:Stop()
	end
	if taco == false then
		M16:Stop()
	end

	if run == true and sit == false then
		humanoid.WalkSpeed = 25
	elseif sit == true then
		humanoid.WalkSpeed = 0
	else
		humanoid.WalkSpeed = 16
	end

	if global_wait == 380 then global_wait = 0 end

	if (W == false or A == false or S == false or D == false) and jump == false and sit == false then
			ls.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, 0 - angle/75)
			rs.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, 0 - angle/75)
			lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, 0 + angle/75)
			rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, 0 + angle/75)
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2 + angle/75, math.pi, 0)
			rj.C0 = CFrame.new(0, 0, 0) * CFrame.Angles(math.pi/2, math.pi, 0)
	end


	if (W == false or A == false or S == false or D == false) and jump == false and sit == true then
		local ray = Ray.new(torso.Position, Vector3.new(0, -3, 0))
		local hitz,enz = workspace:FindPartOnRay(ray, char)
		if hitz then
			if rootpart:FindFirstChild("Weld") == nil then
				miniweld = Instance.new("Weld", rootpart)
				miniweld.C0 = hitz.CFrame:toObjectSpace(rootpart.CFrame)
				miniweld.Part0 = hitz
				miniweld.Part1 = rootpart
				humanoid.PlatformStand = true
			end
		end
	else
		if rootpart:FindFirstChild("Weld") ~= nil then
			rootpart:FindFirstChild("Weld"):Destroy()
			humanoid.PlatformStand = false
		end
	end

	if (W == false or A == false or S == false or D == false) and jump == false and sit == true then
		ls.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, 0 - math.pi/15)
		rs.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, 0 + math.pi/15)
		lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0 + math.pi/8, 0, math.pi/2 - math.pi/15)
		rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0 + math.pi/8, 0, -math.pi/2 + math.pi/15)
		neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2 + math.pi/15, math.pi, 0)
		rj.C0 = CFrame.new(0, -2, 0) * CFrame.Angles(math.pi/2 + math.pi/15, math.pi, 0)
	end

	if jump == true and sit == false then
		countspeed = 2
		ls.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, math.pi + angle/12)
		rs.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, math.pi + angle/12)
		lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, 0 + angle/12)
		rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, 0 + angle/12)
		neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2 + angle/25, math.pi, 0)
		rj.C0 = CFrame.new(0, 0, 0) * CFrame.Angles(math.pi/2+ angle/50, math.pi, 0)
	end

	if (W == true or A == true or S == true or D == true) and jump == false and sit == false then
		if run == true then
			countspeed = 4
			ls.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, 0 - angle/3)
			rs.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, 0 - angle/3)
			lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, 0 + angle/5)
			rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, 0 + angle/5)
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2 + angle/20, math.pi, 0)
			rj.C0 = CFrame.new(0, 0, 0) * CFrame.Angles(math.pi/2 + angle/40, math.pi, 0)
		else
			countspeed = 2
			ls.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, 0 - angle/4)
			rs.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, 0 - angle/4)
			lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, 0 + angle/6)
			rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, 0 + angle/6)
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2 + angle/25, math.pi, 0)
			rj.C0 = CFrame.new(0, 0, 0) * CFrame.Angles(math.pi/2+ angle/50, math.pi, 0)
		end
	end

	if W == false and A == false and S == false and D == false and jump == false and sit == false then
		if jerk == true and jump == false and sit == false then
			countspeed = 2
			ls.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(angle/5, 0, angle/4)
			rs.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(angle/5, 0, -angle/4)
			lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(angle/10, 0, angle/5)-- * CFrame.Angles(angle*0.5, 0, -math.abs(angle*0.15))
			rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(angle/10, 0, angle/5)-- * CFrame.Angles(-angle*0.5, 0, math.abs(angle*0.15))
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2 + angle/5, math.pi, 0)
			rj.C0 = CFrame.new(0, 0, 0) * CFrame.Angles(math.pi/2 + angle/5, math.pi, 0)
		elseif party == true and jump == false and sit == false then
			countspeed = 4
			lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(angle/15, 0, angle/15)
			rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(angle/15, 0, angle/15)
			ls.C1 = CFrame.new(0.25,0.5 + 1 * angle/10,0.5) * CFrame.Angles(math.pi  + angle/10, 0, 0 + angle/10)
			rs.C1 = CFrame.new(-0.25,0.5 + 1 * angle/10,0.5) * CFrame.Angles(math.pi  + angle/10, 0, 0  + angle/10)
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2 + angle/10, math.pi, 0)
			rj.C0 = CFrame.new(0, 0.5 + angle/5, 0) * CFrame.Angles(math.pi/2, math.pi, 0)
		elseif canttouch == true and jump == false and sit == false then
			countspeed = 2
			ls.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0 + angle/8, 0, math.pi/12 + angle/12)
			rs.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0 + angle/8, 0, -math.pi/12 - angle/12)
			lh.C1 = CFrame.new(0.35,0.7,0.5) * CFrame.Angles(0 + angle/10, 0, -math.pi/8)
			rh.C1 = CFrame.new(-0.35,0.7,0.5) * CFrame.Angles(0 + angle/10, 0, math.pi/8)
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2 + angle/15, math.pi, 0)
			rj.C0 = CFrame.new(angle/4, -0.3 + angle/20, 0) * CFrame.Angles(math.pi/2, math.pi, 0)
		elseif happy == true and jump == false and sit == false then
			countspeed = 4
			ls.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(math.pi/4, math.pi/8 + angle/8, math.pi/4 + angle/8)
			rs.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(math.pi/4, -math.pi/8 + angle/8, -math.pi/4 + angle/8)
			lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0 + angle/10, 0, 0  + angle/10)
			rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0 + angle/10, 0, 0  + angle/10)
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2 + angle/15, math.pi + angle/15, 0 + angle/15)
			rj.C0 = CFrame.new(0, 0 + angle/20, 0) * CFrame.Angles(math.pi/2, math.pi, 0)
		elseif spin == true and jump == false and sit == false then
			global_wait = (global_wait % 360) + 4
			countspeed = 4
			ls.C1 = CFrame.new(0,1,0) * CFrame.Angles(math.pi/2, 0 + angle/10, 0 + angle/10)
			rs.C1 = CFrame.new(0,1,0) * CFrame.Angles(math.pi/2, 0 - angle/10, 0 + angle/10)
			lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0 + angle/10, 0 + angle/10, 0  + angle/10)
			rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0 + angle/10, 0 + angle/10, 0  + angle/10)
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2, math.pi, 0)
			rj.C0 = CFrame.new(0 + angle/25, 0, 0 - angle/25) * CFrame.Angles(math.pi/2, math.pi, math.rad(global_wait*4))
		elseif thriller == true and jump == false and sit == false then
			countspeed = 2
			ls.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, math.pi/2 + angle/15)
			rs.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, -math.pi/2 + angle/15)
			lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(math.pi/60 - angle/45, 0, 0 + angle/15)
			rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(math.pi/60 + angle/45, 0, 0 + angle/15)
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2 + angle/15, math.pi + angle/10, 0)
			rj.C0 = CFrame.new(0, 0, 0) * CFrame.Angles(math.pi/2 + angle/50 , math.pi + angle/50, 0 + angle/50)
		elseif barrel == true and jump == false and sit == false then
			ls.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, math.pi)
			rs.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, math.pi)
			lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, 0)
			rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, 0)
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2, math.pi, 0)
			rj.C0 = CFrame.new(0 + angle, -1.8, 0) * CFrame.Angles(0, math.pi, 0 + angle)
		elseif sax == true and jump == false and sit == false then
			countspeed = 2
			ls.C1 = CFrame.new(0,0.75,-0.25) * CFrame.Angles(-math.pi/5, 0, math.pi/2 - math.abs(angle/30))
			rs.C1 = CFrame.new(0,0.75,-0.25) * CFrame.Angles(-math.pi/5, 0, -math.pi/2 + math.abs(angle/30))
			lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, 0 - math.abs(angle/30))
			rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, 0 + math.abs(angle/30))
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2, math.pi, 0)
			rj.C0 = CFrame.new(0, -math.abs(angle*0.05), math.abs(angle*0.025)) * CFrame.Angles(math.pi/2 + math.abs(angle/20), math.pi, 0)
		elseif spooky == true and jump == false and sit == false then
			countspeed = 3
			ls.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, math.pi/2 - angle/1.5)
			rs.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, -math.pi/2 + angle/1.5)
			lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, 0 - angle/16)
			rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, 0 + angle/16)
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2  + angle/12, math.pi, 0)
			rj.C0 = CFrame.new(0, 0 + angle / 35, 0) * CFrame.Angles(math.pi/2 + angle/25, math.pi, 0)
		elseif stride == true and jump == false and sit == false then
			countspeed = 2.5
			ls.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(angle/16, angle/16,math.pi/3.5 + angle/8)
			rs.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(angle/16, -angle/16,-math.pi/1.5 + -angle/8)
			lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, angle/16, angle/16)
			rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, angle/16, angle/16)
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2, math.pi, 0)
			rj.C0 = CFrame.new(0, 0, 0) * CFrame.Angles(math.pi/2-angle/16, math.pi, 0)
		elseif shuffle == true and jump == false and sit == false then
			countspeed = 2
			ls.C1 = CFrame.new(0,0.75,-0.35) * CFrame.Angles(math.pi/8, 0, math.pi/2 + angle/3.5)
			rs.C1 = CFrame.new(0,0.75,-0.35) * CFrame.Angles(math.pi/8, 0, -math.pi/2 + angle/3.5)
			lh.C1 = CFrame.new(0 + angle/50,1,0.5) * CFrame.Angles(0, 0 + angle/35, 0 + angle/15)
			rh.C1 = CFrame.new(0 + angle/50,1,0.5) * CFrame.Angles(0, 0 + angle/35, 0 + angle/15)
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2 + angle/15, math.pi, 0)
			rj.C0 = CFrame.new(0, 0, 0) * CFrame.Angles(math.pi/2 - angle/35, math.pi - angle/35, 0)
		elseif rock == true and jump == false and sit == false then
			countspeed = 4
			ls.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, math.pi/2+angle/2)
			rs.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, -math.pi/2+angle/2)
			lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0+angle/32, 0, 0+angle/32)
			rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0+angle/32, 0, 0-angle/32)
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2, math.pi, 0)
			rj.C0 = CFrame.new(0, 0 - angle/50, 0) * CFrame.Angles(math.pi/2, math.pi, 0)
		elseif gagnam == true and jump == false and sit == false then
			countspeed = 4
			ls.C1 = CFrame.new(0,0.75,-0.15) * CFrame.Angles(-math.pi/4, 0, (math.pi/2 + angle/14) - math.pi/20)
			rs.C1 = CFrame.new(0,0.75,-0.15) * CFrame.Angles(-math.pi/4, 0, (-math.pi/2 - angle/14) + math.pi/20)
			lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0 + angle/16, 0, 0)
			rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0 + angle/16, 0, 0)
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2 + angle/20, math.pi, 0)
			rj.C0 = CFrame.new(0, 0 + angle/40, 0) * CFrame.Angles(math.pi/2, math.pi, 0)
		elseif snoop == true and jump == false and sit == false then
			countspeed = 2
			ls.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(math.pi/12, 0, math.pi/4 + angle/4)
			rs.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(math.pi/12, 0, -math.pi/4 + angle/4)
			lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(math.pi/24, 0, 0 + angle/4)
			rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(math.pi/24, 0, 0 + angle/4)
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2 - angle/8, math.pi, 0)
			rj.C0 = CFrame.new(0, 0 + angle/48, 0) * CFrame.Angles(math.pi/2 + angle/24, math.pi, 0)
		elseif darude == true and jump == false and sit == false then
			countspeed = 3
			ls.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, 0 + angle/1.5)
			rs.C1 = CFrame.new(0,0.5,-0.5) * CFrame.Angles(0, 0, 0 + angle/3)
			lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, 0 - angle/3)
			rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, 0 - angle/1.5)
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2, math.pi, 0)
			rj.C0 = CFrame.new(0, 0+ angle/45, 0) * CFrame.Angles(math.pi/2 - angle/6, math.pi, 0)
		elseif taco == true and jump == false and sit == false then
			countspeed = 4
			global_wait = (global_wait % 360) + 4
			ls.C1 = CFrame.new(0,1,-0.25) * CFrame.Angles(math.pi/6 + angle/12, 0, math.pi)
			rs.C1 = CFrame.new(0,1,-0.25) * CFrame.Angles(math.pi/6 + angle/12, 0, math.pi)
			lh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, math.pi/8 + angle/16)
			rh.C1 = CFrame.new(0,1,0.5) * CFrame.Angles(0, 0, math.pi/8 + angle/16)
			neck.C1 = CFrame.new(0,-0.5,0) * CFrame.Angles(math.pi/2 - math.pi/8 + angle/16, math.pi, 0)
			rj.C0 = CFrame.new(0, 0.25 + angle/12, 0) * CFrame.Angles(math.pi/2, math.pi, math.rad(global_wait*4))
		end
	end
end)

end)
local giantnoob = Instance.new("TextButton", Frame1)
giantnoob.Size = UDim2.new(0.2, 0, 0.1, 0)
giantnoob.Position = UDim2.new(0.75, 0, 0.1, 0)
giantnoob.Text = "Giant Noob"
giantnoob.BackgroundColor3 = Color3.new(0, 110, 160)
giantnoob.BackgroundTransparency = 0.6
giantnoob.TextColor3 = Color3.new(1, 1, 1)
giantnoob.MouseButton1Down:connect(function(giantnoob1)

function Part(Par, Anc, Colli, Tran, Ref, Col, Siz)
        local p = Instance.new("Part")
        p.formFactor = "Custom"
        p.TopSurface = 0
        p.BottomSurface = 0
        p.Transparency = Tran
        p.Reflectance = Ref
        p.Anchored = Anc
        p.CanCollide = Colli
        p.BrickColor = Col
        p.Size = Siz
        p.Locked = true
        p.Parent = Par
        p:BreakJoints()
        return p
end
function Weld(P0, P1, C0, C1)
        local w = Instance.new("Weld")
        w.Part0 = P0
        w.Part1 = P1
        if C0 then
                w.C0 = C0
        end
        if C1 then
                w.C1 = C1
        end
        w.Parent = P0
        return w
end
V3 = Vector3.new
C3 = Color3.new
BN = BrickColor.new
CN = CFrame.new
CA = CFrame.Angles
MR = math.rad
MRA = math.random
MP = math.pi
MH = math.huge
UD = UDim2.new
Asset = "http://www.roblox.com/asset/?id="
Noob = nil
function MakeMotor(torso, p1, c0, c1)
        local mot = Instance.new("Motor6D")
        mot.C0 = c0
        mot.C1 = c1
        mot.Part0 = torso
        mot.Part1 = p1
        mot.Parent = torso
        return mot
end
function Set(tab)
        for _,v in pairs(tab) do
                local motor = v[1]
                local vel = v[2]
                local des = v[3]
                motor.MaxVelocity = vel
                motor.DesiredAngle = des
        end
end
function Animate(Hum, RSH, LSH, RH, LH)
        local pose = "Standing"
        local function sit()
                pose = "Seated"
        end
        local function jump()
                pose = "Jumping"
        end
        local function died()
                pose = "Dead"
        end
        local function falling()
                pose = "Falling"
        end
        local function climbing()
                pose = "Climbing"
        end
        local function run(speed)
                if speed > 0.5 then
                        pose = "Running"
                else
                        pose = "Standing"
                end
        end
        local function move()
                if pose == "Seated" then
                        Set({{RSH, 0.15, math.pi/2}, {LSH, 0.15, -math.pi/2}, {LH, 0.15, math.pi/2}, {RH, 0.15, -math.pi/2}})
                        return
                end
                if pose == "Jumping" then
                        Set({{RSH, 0.3, math.pi}, {LSH, 0.3, -math.pi}, {LH, 0.3, 0}, {RH, 0.3, 0}})
                        return
                end
                if pose == "Standing" then
                        Set({{RSH, 0.25, 0}, {LSH, 0.25, 0}, {LH, 0.25, 0}, {RH, 0.25, 0}})
                        return
                end
                if pose == "Falling" then
                        Set({{RSH, 0.35, math.pi}, {LSH, 0.35, -math.pi}, {LH, 0.35, 0}, {RH, 0.35, 0}})
                        return
                end
                if pose == "Running" then
                        Set({{RSH, 0.2, -0.8}, {LSH, 0.2, 0.8}, {LH, 0.2, 0}, {RH, 0.2, 0}})
                elseif pose == "Climbing" then
                        Set({{RSH, 0.35, 2.8}, {LSH, 0.35, -2.8}, {LH, 0.35, 0.1}, {RH, 0.35, 0.1}})
                end
        end
        Hum.Jumping:connect(jump)
        Hum.Running:connect(run)
        Hum.Seated:connect(sit)
        Hum.Died:connect(died)
        Hum.FreeFalling:connect(falling)
        Hum.Climbing:connect(climbing)
        coroutine.resume(coroutine.create(function()
                while pose ~= "Dead" do
                        wait(0.04)
                        move()
                end
        end))
end
function MakeNoob(pos, scale)
        local Nub = Instance.new("Model")
        Nub.Name = "Cannoneer nub"
        local Torso = Part(Nub, false, false, 0, 0, BN("Bright blue"), V3(2*scale, 2*scale, 1*scale))
        Torso.Name = "Torso"
        local Head = Part(Nub, false, false, 0, 0, BN("Bright yellow"), V3(2*scale, 1*scale, 1*scale))
        Head.Name = "Head"
        local Neck = MakeMotor(Torso, Head, CN(0, 1*scale, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0), CN(0, -0.5*scale, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0))
        local HeadMesh = Instance.new("SpecialMesh",Head)
        HeadMesh.Scale = V3(1.25, 1.25, 1.25)
        local Face = Instance.new("Decal",Head)
        Face.Face = "Front"
        Face.Texture = Asset..(13038247)
        local Rarm = Part(Nub, false, false, 0, 0, BN("Bright yellow"), V3(1*scale, 2*scale, 1*scale))
        Rarm.Name = "Right Arm"
        local Larm = Part(Nub, false, false, 0, 0, BN("Bright yellow"), V3(1*scale, 2*scale, 1*scale))
        Larm.Name = "Left Arm"
        local Rleg = Part(Nub, false, true, 0, 0, BN("Br. yellowish green"), V3(1*scale, 2*scale, 1*scale))
        Rleg.Name = "Right Leg"
        local Lleg = Part(Nub, false, true, 0, 0, BN("Br. yellowish green"), V3(1*scale, 2*scale, 1*scale))
        Lleg.Name = "Left Leg"
        local RSH = MakeMotor(Torso, Rarm, CN(1*scale, 0.5*scale, 0) * CA(0, MR(90), 0), CN(-0.5*scale, 0.5*scale, 0) * CA(0, MR(90), 0))
        local LSH = MakeMotor(Torso, Larm, CN(-1*scale, 0.5*scale, 0) * CA(0, MR(-90), 0), CN(0.5*scale, 0.5*scale, 0) * CA(0, MR(-90), 0))
        local RH = MakeMotor(Torso, Rleg, CN(0.5*scale, -1*scale, 0) * CA(0, MR(-90), 0), CN(0, 1*scale, 0) * CA(0, MR(-90), 0))
        local LH = MakeMotor(Torso, Lleg, CN(-0.5*scale, -1*scale, 0) * CA(0, MR(90), 0), CN(0, 1*scale, 0) * CA(0, MR(90), 0))
        local Hum = Instance.new("Humanoid")
        local Speed = 14+(2*scale)
        Hum.Parent = Nub
        Hum.Died:connect(function()
                wait(6)
                Nub:remove()
                wait(5)
                MakeNoob(pos, scale)
        end)
        Nub.Parent = workspace
        Nub:MakeJoints()
        Hum.MaxHealth = 50+(scale*70)
        Hum.Health = 50+(scale*70)
        Nub:MoveTo(pos)
        coroutine.resume(coroutine.create(function()
                repeat wait()
                Hum.Health = Hum.MaxHealth
                until Hum.Health >= Hum.MaxHealth-1
        end))
        Animate(Hum,RSH,LSH,RH,LH)
        local Char = Nub
        local necko = CN(0, 1*scale, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0)
        local ShootColors = {"Bright yellow", "New Yeller", "Bright orange", "Neon orange", "Really red", "Bright red"}
        local Attacking = false
        local Accuracy = 5
        local Debounce = true
        local Hurt = false
        local Damage = {15,42}
        local Selected = false
        local ContentProvider = game:GetService("ContentProvider")
        local function RC(Pos, Dir, Max, Ignore)
                return workspace:FindPartOnRay(Ray.new(Pos, Dir.unit * (Max or 999)), Ignore)
        end
        local function RayC(Start, En, MaxDist, Ignore)
                return RC(Start, (En - Start), MaxDist, Ignore)
        end
        local function ComputePos(pos1, pos2)
                return CN(pos1, V3(pos2.x, pos1.y, pos2.z))
        end
        local function DetectSurface(pos, part)
                local surface = nil
                local pospos = part.CFrame
                local pos2 = pospos:pointToObjectSpace(pos)
                local siz = part.Size
                local shaep = part.Shape
                if shaep == Enum.PartType.Ball or shaep == Enum.PartType.Cylinder then
                        surface = {"Anything", CN(pospos.p, pos)*CN(0, 0, -(pospos.p - pos).magnitude)*CA(MR(-90), 0, 0)}
                else
                        if pos2.Y > ((siz.Y/2)-0.04) then
                                surface = {"Top", CA(0, 0, 0)}
                        elseif pos2.Y < -((siz.Y/2)-0.04) then
                                surface = {"Bottom", CA(-MP, 0, 0)}
                        elseif pos2.X > ((siz.X/2)-0.04) then
                                surface = {"Right", CA(0, 0, MR(-90))}
                        elseif pos2.X < -((siz.X/2)-0.04) then
                                surface = {"Left", CA(0, 0, MR(90))}
                        elseif pos2.Z > ((siz.Z/2)-0.04) then
                                surface = {"Back", CA(MR(90), 0, 0)}
                        elseif pos2.Z < -((siz.Z/2)-0.04) then
                                surface = {"Front", CA(MR(-90), 0, 0)}
                        end
                end
                return surface
        end
        local function waitChild(n, p)
                local c = p:findFirstChild(n)
                if c then return c end
                while true do
                        c = p.ChildAdded:wait()
                        if c.Name == n then return c end
                end
        end
        local function Notime(func)
                coroutine.resume(coroutine.create(function()
                        func()
                end))
        end
        RSH.Part0 = Torso
        LSH.Part0 = Torso
        RH.Part0 = Torso
        LH.Part0 = Torso
        local Add = {
                Mesh = function(P, ID, Scale, Tex)
                        local m = Instance.new("SpecialMesh")
                        m.MeshType = "FileMesh"
                        m.MeshId = ID or ""
                        m.Scale = Scale or V3(1, 1, 1)
                        m.TextureId = Tex or ""
                        m.Parent = P
                        return m
                end,
                Sphere = function(P, Scale)
                        local m = Instance.new("SpecialMesh")
                        m.MeshType = "Sphere"
                        m.Scale = Scale or V3(1, 1, 1)
                        m.Parent = P
                        return m
                end
        }
        local Sounds = {
                Shoot = {Id = "http://www.roblox.com/asset/?id=2697431", Pitch = 0.3, Volume = 0.5},
                Boom = {Id = "http://www.roblox.com/asset/?id=2692806", Pitch = 0.55, Volume = 0.4},
                Slash = {Id = "rbxasset://sounds//swordslash.wav", Pitch = 0.5, Volume = 0.5},
                Hit = {Id = "http://www.roblox.com/asset/?id=2801263", Pitch = 0.85, Volume = 0.35},
                Reload = {Id = "rbxasset://sounds\\metal.ogg", Pitch = 1, Volume = 0.45},
        }
        for _,v in pairs(Sounds) do
                ContentProvider:Preload(v.Id)
        end
        local function PlaySound(Sound, bool)
                local s = Instance.new("Sound")
                s.Looped = false
                s.Volume = Sound.Volume
                s.SoundId = Sound.Id
                if bool then
                        s.Pitch = MRA((Sound.Pitch*0.75)*1000, (Sound.Pitch*1.15)*1000)/1000
                else
                        s.Pitch = Sound.Pitch
                end
                s.Parent = Torso
                s:play()
                Notime(function()
                        wait(0.5)
                        s:remove()
                end)
        end
        local function GetParts(pos, dist)
                local parts = {}
                local function o(p)
                        for _,v in pairs(p:children()) do
                                if v:IsA("BasePart") then
                                        if (pos - v.Position).magnitude <= dist then
                                                table.insert(parts, {v, (pos - v.Position).magnitude, v.Anchored})
                                        end
                                end
                                o(v)
                        end
                end
                o(workspace)
                return parts
        end
        local function GetHum(P)
                for _,v in pairs(P:children()) do
                        if v:IsA("Humanoid") then
                                if v.Health > 0 then
                                        return v
                                end
                        end
                end
        end
        local function GetGroup(Pos, Distance, Hit)
                local tab = {}
                for _,v in pairs(workspace:children()) do
                        local h = GetHum(v)
                        local t = v:findFirstChild("Torso")
                        if h and t and v ~= Hit.Parent then
                                if (t.Position - Pos).magnitude <= Distance then
                                        table.insert(tab, {h, v, (t.Position - Pos).magnitude})
                                end
                        end
                end
                if Hit then
                        local h = GetHum(Hit.Parent)
                        if h then
                                table.insert(tab, {h, Hit.Parent, 0})
                        end
                end
                return tab
        end
        local Model = Instance.new("Model")
        Model.Name = "Hand Cannon"
        local FTorso = Part(Model, false, false, 1, 0, Torso.BrickColor, V3(2*scale, 2*scale, 1*scale))
        local FW = Weld(Torso, FTorso)
        local RAB = Part(Model, false, false, 1, 0, BN("White"), V3(0.2, 0.2, 0.2))
        local LAB = Part(Model, false, false, 1, 0, BN("White"), V3(0.2, 0.2, 0.2))
        local RLB = Part(Model, false, false, 1, 0, BN("White"), V3(0.2, 0.2, 0.2))
        local LLB = Part(Model, false, false, 1, 0, BN("White"), V3(0.2, 0.2, 0.2))
        local RABW = Weld(Torso, RAB, CN(), CN(-1.5*scale, -0.5*scale, 0))
        local LABW = Weld(Torso, LAB, CN(), CN(1.5*scale, -0.5*scale, 0))
        local RLBW = Weld(Torso, RLB, CN(), CN(-0.5*scale, 1*scale, 0))
        local LLBW = Weld(Torso, LLB, CN(), CN(0.5*scale, 1*scale, 0))
        local RAW = Weld(RAB, nil, CN(), CN(0, 0.5*scale, 0))
        local LAW = Weld(LAB, nil, CN(), CN(0, 0.5*scale, 0))
        local RLW = Weld(RLB, nil, CN(), CN(0, 1*scale, 0))
        local LLW = Weld(LLB, nil, CN(), CN(0, 1*scale, 0))
        local TW = Weld(Torso, nil, CN(0.7*scale, 0.8*scale, 1.2*scale), CA(0, MR(180), MR(55)))
        local Weapon = Instance.new("Model")
        Weapon.Name = "Cannon"
        local HB = Part(Weapon, false, false, 1, 0, BN("White"), V3(0.2, 0.2, 0.2))
        local HBW = Weld(Rarm, HB, CN(0, -0.7*scale, 0), CA(0, MR(90), MR(90)))
        local HW = Weld(HB, nil)
        local Handle = Part(Weapon, false, false, 0, 0, BN("Dark grey"), V3(0.5*scale, 0.5*scale, 0.3*scale))
        Add.Mesh(Handle, "http://www.roblox.com/asset/?id=3270017", V3(1*scale, 0.7*scale, 2.2*scale), "")
        TW.Part1 = Handle
        local Main = Part(Weapon, false, false, 0, 0, BN("Dark grey"), V3(1.5*scale, 1.5*scale, 3*scale))
        Add.Mesh(Main, "http://www.roblox.com/asset/?id=3270017", V3(1.6*scale, 1.6*scale, 15*scale), "")
        Weld(Handle, Main, CA(0, MR(90), MR(90)), CN(1*scale, 0, 0.2*scale))
        local Main2 = Part(Weapon, false, false, 0, 0, BN("Gun metallic"), V3(1*scale, 1*scale, 1.5*scale))
        Add.Mesh(Main2, "http://www.roblox.com/asset/?id=3270017", V3(1.2*scale, 1.2*scale, 8*scale), "")
        Weld(Main, Main2, CN(), CN(0, 0, 1.7*scale))
        local Handle2 = Part(Weapon, false, false, 0, 0, BN("Dark grey"), V3(0.5*scale, 0.5*scale, 0.3*scale))
        Add.Mesh(Handle2, "http://www.roblox.com/asset/?id=3270017", V3(0.7*scale, 0.8*scale, 2.2*scale), "")
        Weld(Main2, Handle2, CA(0, MR(90), MR(90)), CN(-0.65*scale, 0, 0))
        local Tip = Part(Weapon, false, false, 0, 0, BN("Earth yellow"), V3(1.6*scale, 1.6*scale, 0.6*scale))
        Add.Sphere(Tip, V3(1.05, 1.05, 1))
        Weld(Main, Tip, CN(), CN(0, 0, -1.15*scale))
        local Tip4 = Part(Weapon, false, false, 0, 0, BN("Black"), V3(1.2*scale, 1.2*scale, 0.3*scale))
        Add.Mesh(Tip4, "http://www.roblox.com/asset/?id=3270017", V3(1.7*scale, 1.7*scale, 10*scale), "")
        Weld(Main, Tip4, CN(), CN(0, 0, -0.15*scale))
        for i = 1.3, 1.45, 0.1 do
                local Tip3 = Part(Weapon, false, false, 0, 0, BN("Dark grey"), V3(1.2*scale, 1.2*scale, 0.3*scale))
                Add.Mesh(Tip3, "http://www.roblox.com/asset/?id=3270017", V3(i*scale, i*scale, 2*scale), "")
                Weld(Main2, Tip3, CN(), CN(0, 0, 0.6*scale))
        end
        for i = -0.95, 0.66, 1.55 do
                local Tip3 = Part(Weapon, false, false, 0, 0, BN("Dark Curry"), V3(1.2*scale, 1.2*scale, 0.3*scale))
                Add.Mesh(Tip3, "http://www.roblox.com/asset/?id=3270017", V3(1.65*scale, 1.65*scale, 3*scale), "")
                Weld(Main, Tip3, CN(), CN(0, 0, i*scale))
        end
        for i = 1.3, 1.5, 0.1 do
                local Tip2 = Part(Weapon, false, false, 0, 0, BN("Earth yellow"), V3(1.6*scale, 1.6*scale, 0.6*scale))
                Add.Mesh(Tip2, "http://www.roblox.com/asset/?id=3270017", V3(i*scale, i*scale, 2*scale), "")
                Weld(Main, Tip2, CN(), CN(0, 0, 1.1*scale))
        end
        for i = -0.3, 1, 0.15 do
                local p = Part(Weapon, false, false, 0.7, 0, BN("Black"), V3(0.2, 0.2, 0.2))
                Add.Sphere(p, V3(6*scale, 6*scale, 2*scale))
                Weld(Main2, p, CN(0, 0, i*scale))
        end
        Weapon.Parent = Model
        Model.Parent = Char

        local function Show_Damage(P, D)
                local mo = Instance.new("Model")
                mo.Name = "- "..D
                local p = Part(mo, false, false, 0, 0, BN("Bright red"), V3(0.2, 0.2, 0.2))
                p.Name = "Head"
                local m = Instance.new("SpecialMesh")
                m.MeshType = "Brick"
                m.Scale = Vector3.new(4.5, 2.3, 4.5)
                m.Parent = p
                local bp = Instance.new("BodyPosition", p)
                bp.maxForce = V3(MH, MH, MH)
                bp.P = 9001
                bp.position = CN(P) * CN(0, 1.5, 0).p
                local h = Instance.new("Humanoid")
                h.Health = 0
                h.MaxHealth = 0
                h.Name = "asd"
                h.Parent = mo
                local nah = true
                mo.Parent = workspace
                p.CFrame = CN(P)
                Notime(function()
                        wait(1.5)
                        for i = 0, 1, 0.05 do
                                p.Transparency = i
                                if nah then mo.Name = "" nah = false else mo.Name = "- "..D nah = true end
                                wait()
                        end
                        mo:remove()
                end)
        end
        local function Kill(hit)
                if Debounce and Hurt then
                        local Hu = GetHum(hit.Parent)
                        if Hu then
                                Debounce = false
                                local Dmg = MRA(Damage[1], Damage[2])
                                Hu.Health = Hu.Health - Dmg
                                pcall(function() Show_Damage(Tip.Position, Dmg) end)
                                PlaySound(Sounds.Hit, true)
                                local chance = MRA(1, 10)
                                if chance >=5 then
                                        Hu.PlatformStand = true
                                        wait(0.1)
                                        hit.Velocity = (CN(Torso.CFrame * CN(0, 0.5, 0).p, hit.Position).lookVector * 45)
                                        hit.RotVelocity = V3(MRA(-10, 10), MRA(-10, 10), MRA(-10, 10))
                                        wait(0.3)
                                        Hu.PlatformStand = false
                                end
                        end
                end
        end
        Main.Touched:connect(Kill)
        local function Attach(t)
                RSH.Part0 = t
                LSH.Part0 = t
                RH.Part0 = t
                LH.Part0 = t
                RABW.Part0 = t
                LABW.Part0 = t
                LLBW.Part0 = t
                RLBW.Part0 = t
                if t == Torso then
                        FTorso.Transparency = 1
                else
                        Torso.Transparency = 1
                end
                t.Transparency = 0
        end
        local function SelectAnim()
                RAW.Part1 = Rarm
                for i = 0.25, 1, 0.25 do
                        RAW.C0 = CA(MR(-10*i), 0, MR(-5*i))
                        wait()
                end
                for i = 0.1, 1, 0.1 do
                        RAW.C0 = CA(MR(-10-90*i), 0, MR(-5-30*i))
                        wait()
                end
                for i = 0.5, 1, 0.5 do
                        RAW.C0 = CA(MR(-100-5*i), 0, MR(-35))
                        wait()
                end
                HW.Part1 = Handle
                HW.C0 = CA(MR(50), 0, MR(-37))
                TW.Part1 = nil
                Attach(FTorso)
                LAW.Part1 = Larm
                for i = 0.25, 1, 0.25 do
                        RAW.C0 = CA(MR(-105+10*i), 0, MR(-35+5*i))
                        LAW.C0 = CA(MR(15*i), 0, MR(5*i))
                        FW.C0 = CA(0, MR(-5*i), 0)
                        HW.C0 = CA(MR(50-5*i), 0, MR(-37))
                        wait()
                end
                for i = 0.06, 1, 0.06 do
                        RAW.C0 = CA(MR(-95+95*i), MR(35*i), MR(-30+50*i))
                        LAW.C0 = CA(MR(15+25*i), 0, MR(5+15*i)) * CN(0, (-0.4*scale)*i, 0)
                        FW.C0 = CA(0, MR(-5-30*i), 0)
                        HW.C0 = CA(MR(45), 0, MR(-37+15*i))
                        wait()
                end
                Hum.WalkSpeed = Speed-3
                for i = 0.1, 1, 0.1 do
                        RAW.C0 = CA(MR(15*i), MR(35+10*i), MR(20+8*i))
                        LAW.C0 = CA(MR(40+7*i), 0, MR(20+6*i)) * CN(0, (-0.4*scale)-(0.2*scale)*i, 0)
                        FW.C0 = CA(0, MR(-35-10*i), 0)
                        HW.C0 = CA(MR(45-11*i), 0, MR(-22+15*i))
                        wait()
                end
                for i = 0.25, 1, 0.25 do
                        RAW.C0 = CA(MR(15+5*i), MR(45+5*i), MR(28+2*i))
                        LAW.C0 = CA(MR(47+3*i), 0, MR(26+4*i)) * CN(0, -0.6*scale, 0)
                        FW.C0 = CA(0, MR(-45-5*i), 0)
                        HW.C0 = CA(MR(34-4*i), 0, MR(-7+7*i))
                        wait()
                end
        end
        local function DeselAnim()
                for i = 0.25, 1, 0.25 do
                        RAW.C0 = CA(MR(20-5*i), MR(50-5*i), MR(30-5*i))
                        LAW.C0 = CA(MR(50-5*i), 0, MR(30-5*i)) * CN(0, -((0.6+0.1)*scale)*i, 0)
                        FW.C0 = CA(0, MR(-50+5*i), 0)
                        HW.C0 = CA(MR(30+5*i), 0, MR(-10*i))
                        wait()
                end
                for i = 0.15, 1, 0.15 do
                        RAW.C0 = CA(MR(15-30*i), MR(45-10*i), MR(25-5*i))
                        LAW.C0 = CA(MR(45-20*i), 0, MR(25-15*i)) * CN(0, -0.5+0.2*i, 0)
                        FW.C0 = CA(0, MR(-45+10*i), 0)
                        HW.C0 = CA(MR(35+10*i), 0, MR(-10-15*i))
                        wait()
                end
                for i = 0.12, 1, 0.12 do
                        RAW.C0 = CA(MR(-15-70*i), MR(35-30*i), MR(20-30*i))
                        LAW.C0 = CA(MR(25-25*i), 0, MR(10-10*i)) * CN(0, -0.3+0.3*i, 0)
                        FW.C0 = CA(0, MR(-35+20*i), 0)
                        HW.C0 = CA(MR(45+5*i), 0, MR(-25-12*i))
                        wait()
                end
                LAW.Part1 = nil
                HW.C0 = CA(MR(50), 0, MR(-37))
                for i = 0.25, 1, 0.25 do
                        RAW.C0 = CA(MR(-85-20*i), MR(5-5*i), MR(-10-25*i))
                        FW.C0 = CA(0, MR(-15+15*i), 0)
                        wait()
                end
                Attach(Torso)
                HW.Part1 = nil
                TW.Part1 = Handle
                Hum.WalkSpeed = 16
                for i = 0.15, 1, 0.15 do
                        RAW.C0 = CA(MR(-105+95*i), 0, MR(-35+30*i))
                        wait()
                end
                for i = 0.33, 1, 0.33 do
                        RAW.C0 = CA(MR(-10+10*i), 0, MR(-5+5*i))
                        wait()
                end
                RAW.Part1 = nil
        end
        local function Explode(Par, Pos, surface)
                Notime(function()
                        local cf = CN(Pos) * CA(Par.CFrame:toEulerAnglesXYZ()) * surface[2] * CN(0, 1, 0)
                        local col = Par.BrickColor.Color
                        local r, g, b = col.r, col.g, col.b
                        local col1, col2, col3 = C3(MRA(r*60, r*100)/100, MRA(g*60, g*100)/100, MRA(b*60, b*100)/100), C3(MRA(r*60, r*100)/100, MRA(g*60, g*100)/100, MRA(b*60, b*100)/100), C3(MRA(r*60, r*100)/100, MRA(g*60, g*100)/100, MRA(b*60, b*100)/100)
                        local p = Part(workspace, true, false, 0, 0, BN(col1.r, col1.g, col1.b), V3(0.2, 0.2, 0.2))
                        local p2 = Part(workspace, true, false, 0, 0, BN(col2.r, col2.g, col2.b), V3(0.2, 0.2, 0.2))
                        local p3 = Part(workspace, true, false, 0, 0, BN(col3.r, col3.g, col3.b), V3(0.2, 0.2, 0.2))
                        p.CFrame = cf
                        p2.CFrame = cf
                        p3.CFrame = cf
                        local m = Add.Mesh(p, "http://www.roblox.com/asset/?id=20329976", V3(1, 1, 1))
                        local m2 = Add.Mesh(p2, "http://www.roblox.com/asset/?id=20329976", V3(1, 1, 1))
                        local m3 = Add.Mesh(p3, "http://www.roblox.com/asset/?id=20329976", V3(1, 1, 1))
                        for i = -0.2, 1, 0.12 do
                                p2.Transparency = i+0.1
                                p.Transparency = i
                                p3.Transparency = i+0.2
                                m.Scale = V3(scale+(2.5*scale)*i, (1.4*scale)+scale*i, scale+(2.5*scale)*i)
                                m2.Scale = V3((0.8*scale)+(2*scale)*i, (1.2*scale)+scale*i, (0.8*scale)+(2*scale)*i)
                                m3.Scale = V3((0.5*scale)+scale*i, scale+scale*i, (0.5*scale)+scale*i)
                                wait()
                        end
                        p2:remove()
                        p3:remove()
                        p:remove()
                end)
        end
        local function Shoot(Pos)
                coroutine.resume(coroutine.create(function()
                local acc = Accuracy*100
                local Start = Main2.CFrame * CN(0, 0, -0.5).p
                local Face = CN(Start, Pos) * CA(MR(MRA(-acc, acc))/100, MR(MRA(-acc, acc))/100, MR(MRA(-acc, acc))/100)
                local Cannonball = Part(Model, true, false, 0, 0, BN("Black"), V3(1.3*scale, 1.3*scale, 1.3*scale))
                Add.Sphere(Cannonball)
                Cannonball.CFrame = Face
                local Go = 3*scale
                local Drop = 0.55/(Go*3)
                local Dist = 500*scale
                local lastP = Start
                local omg = 0
                for i = Go, Dist, Go do
                        Drop = Drop + 1/(Go*3)
                        omg = omg + Drop
                        local dropping = CA(MR(-Drop), 0, 0)
                        if omg > 130 then
                                dropping = CN()
                        end
                        Face = Face * dropping * CN(0, 0, -Go)
                        Cannonball.CFrame = Face
                        local Magn = (Face.p - lastP).magnitude
                        local T = Part(Model, true, false, 0.1, 0, BN("Mid gray"), V3(0.2, 1, 0.2))
                        local M = Instance.new("SpecialMesh",T)
                        M.MeshType = "Head"
                        M.Scale = V3(4.5*scale, Magn, 4.5*scale)
                        T.CFrame = CN(lastP, Face.p) * CA(MR(-90), 0, 0) * CN(0, Magn/2, 0)
                        Notime(function()
                                wait(0.1)
                                for i = 0.1, 1, 0.1 do
                                        T.Transparency = i+0.1
                                        M.Scale = V3(5-5*i, Magn+0.5, 5-5*i)
                                        wait()
                                end
                                T:remove()
                        end)
                        local Hit, Hitpos = RayC(lastP, Face.p, Go*2, Char)
                        lastP = Face.p
                        if Hit then
                                PlaySound(Sounds.Boom, true)
                                local s = DetectSurface(Hitpos, Hit)
                                Explode(Hit, Hitpos, s)
                                Cannonball.CFrame = CN(Hitpos)
                                local hu = GetHum(Hit.Parent)
                                if hu == nil and Hit.Parent.className ~= "Hat" and Hit.Anchored then
                                        coroutine.resume(coroutine.create(function()
                                                wait(10)
                                                for i = 0, 1, 0.04 do
                                                        Cannonball.Transparency = i
                                                        wait()
                                                end
                                                Cannonball:remove()
                                        end))
                                else
                                        Cannonball:remove()
                                end
                                local Noobs = GetGroup(Hitpos, 5*scale, Hit)
                                for _,v in pairs(Noobs) do
                                        local dm = 60/((v[3]+3)/3)
                                        local multi = (scale+10)/10
                                        dm = MRA(dm*0.9, dm*1.04)*multi
                                        v[1].Health = v[1].Health - dm
                                        local t = v[2]:findFirstChild("Head")
                                        if t then
                                                Show_Damage(t.Position, dm)
                                        end
                                end
                                local Parts = GetParts(Hitpos, 6*scale)
                                for _,v in pairs(Parts) do
                                        if v[3] == false then
                                                Notime(function()
                                                        if v[1].Name == "Brick wall" then
                                                                v[1]:BreakJoints()
                                                                v[1].Velocity = (CN(Hitpos, v[1].Position).lookVector * (110/((v[2]+2)/3)))
                                                                wait(0.1)
                                                                v[1].Velocity = (CN(Hitpos, v[1].Position).lookVector * (110/((v[2]+2)/3)))
                                                        else
                                                                v[1].Velocity = (CN(Hitpos, v[1].Position).lookVector * (80/((v[2]+2)/3)))
                                                        end
                                                end)
                                        end
                                end
                                break
                        end
                        wait()
                end
                end))
        end
        local function ShootAnim(pos)
                RLW.Part1 = Rleg
                LLW.Part1 = Lleg
                local cf = ComputePos(Torso.Position, pos)
                local bp = Instance.new("BodyPosition",Torso)
                bp.maxForce = V3(MH, 0, MH)
                bp.P = 11000
                PlaySound(Sounds.Shoot, true)
                local effect = Part(Model, false, false, 0, 0, BN(ShootColors[MRA(1,#ShootColors)]), V3(0.2, 0.2, 0.2))
                local effect2 = Part(Model, false, false, 0, 0, BN(ShootColors[MRA(1,#ShootColors)]), V3(0.2, 0.2, 0.2))
                local m1 = Add.Mesh(effect, "http://www.roblox.com/asset/?id=20329976", V3(1,1,1))
                local m2 = Add.Mesh(effect2, "http://www.roblox.com/asset/?id=20329976", V3(1,1,1))
                local w1 = Weld(Main2, effect, CA(MR(-90), 0, 0), CN(0, -1, 0))
                local w2 = Weld(Main2, effect2, CA(MR(-90), 0, 0), CN(0, -1, 0))
                for i = 0, 1, 0.5 do
                        RAW.C0 = CA(MR(20-50*i), MR(50-25*i), MR(30+45*i))
                        LAW.C0 = CA(MR(50-10*i), 0, MR(30+20*i)) * CN(0, (-0.6*scale)-(0.3*scale)*i, 0)
                        RLW.C0 = CA(MR(30*i), 0, MR(-15*i))
                        LLW.C0 = CA(MR(10*i), 0, MR(-35*i))
                        FW.C0 = CA(MR(5*i), MR(-50-15*i), 0)
                        HW.C0 = CA(MR(30), MR(35*i), MR(-25*i))
                        Neck.C0 = necko * CA(MR(10*i), 0, 0)
                        bp.position = cf * CN(0, 0, (3*scale)*i).p
                        m1.Scale = V3((0.5*scale)+(0.6*scale)*i, (0.4*scale)+(0.2*scale)*i, (0.5*scale)+(0.6*scale)*i)
                        m2.Scale = V3((0.3*scale)+(0.5*scale)*i, (0.5*scale)+scale*i, (0.3*scale)+(0.5*scale)*i)
                        w1.C1 = CN(0, -scale-(0.2*scale)*i, 0)
                        w2.C1 = CN(0, -scale-(0.5*scale)*i, 0)
                        effect.Transparency = 0.2*i
                        effect2.Transparency = 0.2*i
                        wait()
                end
                for i = 0.2, 1, 0.2 do
                        RAW.C0 = CA(MR(-30-10*i), MR(25-5*i), MR(75+5*i))
                        LAW.C0 = CA(MR(40-5*i), 0, MR(50+5*i)) * CN(0, (-0.9*scale)-(0.05*scale)*i, 0)
                        RLW.C0 = CA(MR(30+5*i), 0, MR(-15))
                        LLW.C0 = CA(MR(10+5*i), 0, MR(-35-5*i))
                        FW.C0 = CA(MR(5+5*i), MR(-65-5*i), 0)
                        HW.C0 = CA(MR(30), MR(35+5*i), MR(-25-5*i))
                        Neck.C0 = necko * CA(MR(10+5*i), 0, 0)
                        bp.position = cf * CN(0, 0, (3*scale)+scale*i).p
                        m1.Scale = V3(scale+scale*i, (0.7*scale)+(0.9*scale)*i, scale+scale*i)
                        m2.Scale = V3((0.8*scale)+(0.6*scale)*i, (1.5*scale)+(1.6*scale)*i, (0.8*scale)+(0.6*scale)*i)
                        w1.C1 = CN(0, (-1.2*scale)-(0.6*scale)*i, 0)
                        w2.C1 = CN(0, (-1.5*scale)-(1.8*scale)*i, 0)
                        effect.Transparency = 0.2+0.9*i
                        effect2.Transparency = 0.2+0.9*i
                        wait()
                end
                effect:remove()
                effect2:remove()
                for i = 0.2, 1, 0.2 do
                        bp.position = cf * CN(0, 0, (4*scale)+(0.8*scale)*i).p
                        wait()
                end
                for i = 0.08, 1, 0.06 do
                        RAW.C0 = CA(MR(-40+50*i), MR(20+15*i), MR(80-35*i))
                        LAW.C0 = CA(MR(35-30*i), 0, MR(55-45*i)) * CN(0, (-0.95*scale)+(0.5*scale)*i, 0)
                        RLW.C0 = CA(MR(35-35*i), 0, MR(-15+25*i))
                        LLW.C0 = CA(MR(15-15*i), 0, MR(-40+30*i))
                        FW.C0 = CA(MR(10-7*i), MR(-70+40*i), 0)
                        HW.C0 = CA(MR(30), MR(40-40*i), MR(-30-10*i))
                        Neck.C0 = necko * CA(MR(15+5*i), 0, MR(20*i))
                        bp.position = cf * CN(0, 0, (4.8*scale)+(0.8*scale)*i).p
                        wait()
                end
                bp:remove()
                for i = 0.33, 1, 0.33 do
                        RAW.C0 = CA(MR(10+10*i), MR(35+5*i), MR(45-5*i))
                        LAW.C0 = CA(MR(5), 0, MR(10)) * CN(0, (-0.45*scale)+(0.1*scale)*i, 0)
                        FW.C0 = CA(MR(3-3*i), MR(-30+5*i), 0)
                        HW.C0 = CA(MR(30), 0, MR(-40-10*i))
                        wait()
                end
                for i = 0.12, 1, 0.12 do
                        RAW.C0 = CA(MR(20+5*i), MR(40+5*i), MR(40+5*i))
                        LAW.C0 = CA(MR(5), 0, MR(10)) * CN(0, (-0.35*scale)-(0.3*scale)*i, 0)
                        FW.C0 = CA(0, MR(-25+5*i), 0)
                        HW.C0 = CA(MR(30), 0, MR(-50-5*i))
                        wait()
                end
                local b = Part(Model, false, false, 0, 0, BN("Black"), V3(1.1*scale, 1.1*scale, 1.1*scale))
                local m = Add.Sphere(b)
                local w = Weld(Larm, b, CN(), CN(0, 1.4*scale, 0))
                for i = 0.16, 1, 0.16 do
                        LAW.C0 = CA(MR(5+30*i), 0, MR(10+10*i)) * CN(0, (-0.65*scale)+(0.65*scale)*i, 0)
                        RAW.C0 = CA(MR(25), MR(45+3*i), MR(40))
                        m.Scale = V3(0.5+0.5*i, 0.5+0.5*i, 0.5+0.5*i)
                        Neck.C0 = necko * CA(MR(20-10*i), 0, MR(20-15*i))
                        wait()
                end
                for i = 0.1, 1, 0.1 do
                        LAW.C0 = CA(MR(35+105*i), 0, MR(20+20*i)) * CN(0, (-0.9*scale)*i, 0)
                        RAW.C0 = CA(MR(25), MR(48+6*i), MR(40))
                        Neck.C0 = necko * CA(MR(10-10*i), 0, MR(5-35*i))
                        wait()
                end
                for i = 0.16, 1, 0.16 do
                        LAW.C0 = CA(MR(140-10*i), 0, MR(40-15*i)) * CN(0, (-0.9*scale)-(0.2*scale)*i, 0)
                        RAW.C0 = CA(MR(25), MR(54), MR(40))
                        Neck.C0 = necko * CA(MR(5*i), 0, MR(-30))
                        w.C0 = CN((1.5*scale)*i, (0.55*scale)*i, (1.1*scale)*i)
                        wait()
                end
                PlaySound(Sounds.Reload, true)
                b:remove()
                w:remove()
                for i = 0.2, 1, 0.2 do
                        LAW.C0 = CA(MR(130-10*i), 0, MR(25-15*i)) * CN(0, (-1.1*scale)+(0.2*scale)*i, 0)
                        RAW.C0 = CA(MR(25-10*i), MR(54), MR(40))
                        Neck.C0 = necko * CA(MR(5-3*i), 0, MR(-30+5*i))
                        HW.C0 = CA(MR(30), 0, MR(-55+10*i))
                        FW.C0 = CA(0, MR(-20-5*i), 0)
                        wait()
                end
                for i = 0.11, 1, 0.11 do
                        LAW.C0 = CA(MR(120-60*i), 0, MR(10+15*i)) * CN(0, (-0.9*scale)+(0.3*scale)*i, 0)
                        RAW.C0 = CA(MR(15+5*i), MR(54-4*i), MR(40-10*i))
                        Neck.C0 = necko * CA(MR(2-2*i), 0, MR(-25+25*i))
                        HW.C0 = CA(MR(30), 0, MR(-45+45*i))
                        FW.C0 = CA(0, MR(-25-20*i), 0)
                        RLW.C0 = CA(0, 0, MR(10-8*i))
                        LLW.C0 = CA(0, 0, MR(-10+8*i))
                        wait()
                end
                Neck.C0 = necko
                for i = 0.25, 1, 0.25 do
                        LAW.C0 = CA(MR(60-10*i), 0, MR(25+5*i)) * CN(0, -0.6*scale, 0)
                        RAW.C0 = CA(MR(20), MR(50), MR(30))
                        HW.C0 = CA(MR(30), 0, 0)
                        FW.C0 = CA(0, MR(-45-5*i), 0)
                        RLW.C0 = CA(0, 0, MR(2-2*i))
                        LLW.C0 = CA(0, 0, MR(-2+2*i))
                        wait()
                end
                RLW.Part1 = nil
                LLW.Part1 = nil
                RAW.C0 = CA(MR(20), MR(50), MR(30))
                LAW.C0 = CA(MR(50), 0, MR(30)) * CN(0, -0.6*scale, 0)
                FW.C0 = CA(0, MR(-50), 0)
                HW.C0 = CA(MR(30), 0, 0)
                Neck.C0 = necko
        end
        local function Melee()
                PlaySound(Sounds.Slash, true)
                for i = 0.25, 1, 0.25 do
                        RAW.C0 = CA(MR(20+5*i), MR(50-5*i), MR(30+3*i))
                        LAW.C0 = CA(MR(50), 0, MR(30+4*i)) * CN(0, (-0.6*scale)-(0.05*scale)*i, 0)
                        HW.C0 = CA(MR(30), MR(5*i), 0)
                        FW.C0 = CA(0, MR(-50-5*i), 0)
                        wait()
                end
                for i = 0.12, 1, 0.12 do
                        RAW.C0 = CA(MR(25+25*i), MR(45-30*i), MR(33+7*i))
                        LAW.C0 = CA(MR(50), 0, MR(34+11*i)) * CN(0, (-0.65*scale)-(0.25*scale)*i, 0)
                        HW.C0 = CA(MR(30), MR(5+25*i), 0)
                        FW.C0 = CA(0, MR(-55-25*i), 0)
                        wait()
                end
                for i = 0.33, 1, 0.33 do
                        RAW.C0 = CA(MR(50+15*i), MR(15-5*i), MR(40-10*i)) * CN(0, (-0.2*scale)*i, 0)
                        LAW.C0 = CA(MR(50+10*i), 0, MR(45-5*i)) * CN(0, (-0.9*scale)+(0.15*scale)*i, 0)
                        HW.C0 = CA(MR(30+2*i), MR(30+5*i), 0)
                        FW.C0 = CA(0, MR(-80+10*i), MR(-5*i))
                        wait()
                end
                Hurt = true
                Debounce = true
                for i = 0.07, 1, 0.07 do
                        RAW.C0 = CA(MR(65+55*i), MR(10), MR(30-70*i)) * CN(0, (-0.2*scale)-(1.1*scale)*i, 0)
                        LAW.C0 = CA(MR(60+120*i), 0, MR(40-70*i)) * CN(0, (-0.75*scale)+(0.7*scale)*i, 0)
                        HW.C0 = CA(MR(32+6*i), MR(35+20*i), MR(-4*i))
                        FW.C0 = CA(0, MR(-70+110*i), 0)
                        wait()
                end
                for i = 0.16, 1, 0.16 do
                        RAW.C0 = CA(MR(120+10*i), MR(10), MR(-40-5*i)) * CN(0, (-1.3*scale)-(0.1*scale)*i, 0)
                        LAW.C0 = CA(MR(180+15*i), 0, MR(-30-20*i)) * CN(0, (-0.05*scale)+(0.1*scale)*i, 0)
                        HW.C0 = CA(MR(38+2*i), MR(55-6*i), MR(-4-1*i))
                        FW.C0 = CA(0, MR(40+10*i), 0)
                        wait()
                end
                Hurt = false
                for i = 0.2, 1, 0.2 do
                        RAW.C0 = CA(MR(130+5*i), MR(10), MR(-45-2*i)) * CN(0, (-1.4*scale)-(0.05*scale)*i, 0)
                        LAW.C0 = CA(MR(195+5*i), 0, MR(-50-8*i)) * CN(0, (0.05*scale)+(0.05*scale)*i, 0)
                        HW.C0 = CA(MR(40), MR(49-2*i), MR(-5))
                        FW.C0 = CA(0, MR(50+3*i), 0)
                        wait()
                end
                wait(0.2)
                for i = 0.2, 1, 0.2 do
                        RAW.C0 = CA(MR(135-10*i), MR(10+5*i), MR(-47+10*i)) * CN(0, (-1.45*scale)+(0.25*scale)*i, 0)
                        LAW.C0 = CA(MR(200-10*i), 0, MR(-58+10*i)) * CN(0, (0.1*scale)-(0.1*scale)*i, 0)
                        HW.C0 = CA(MR(40), MR(47-5*i), MR(-5+5*i))
                        FW.C0 = CA(0, MR(53-10*i), 0)
                        wait()
                end
                for i = 0.08, 1, 0.08 do
                        RAW.C0 = CA(MR(125-90*i), MR(15+30*i), MR(-37+57*i)) * CN(0, (-1.2*scale)+(1.1*scale)*i, 0)
                        LAW.C0 = CA(MR(190-125*i), 0, MR(-48+68*i)) * CN(0, (-0.5*scale)*i, 0)
                        HW.C0 = CA(MR(40-7*i), MR(42-37*i), 0)
                        FW.C0 = CA(0, MR(43-82*i), 0)
                        wait()
                end
                for i = 0.2, 1, 0.2 do
                        RAW.C0 = CA(MR(35-15*i), MR(45+5*i), MR(20+10*i)) * CN(0, (-0.1*scale)+(0.1*scale)*i, 0)
                        LAW.C0 = CA(MR(65-15*i), 0, MR(20+10*i)) * CN(0, (-0.5*scale)-(0.1*scale)*i, 0)
                        HW.C0 = CA(MR(33-3*i), MR(5-5*i), 0)
                        FW.C0 = CA(0, MR(-41-9*i), 0)
                        wait()
                end
                RLW.Part1 = nil
                LLW.Part1 = nil
                RAW.C0 = CA(MR(20), MR(50), MR(30))
                LAW.C0 = CA(MR(50), 0, MR(30)) * CN(0, -0.6*scale, 0)
                FW.C0 = CA(0, MR(-50), 0)
                HW.C0 = CA(MR(30), 0, 0)
                Neck.C0 = necko
        end
        wait(1)
        Selected = true
        SelectAnim()
        wait(1.5)
        while Hum.Health > 0 do
                local list = game.Players:GetPlayers()
                local targ = list[MRA(1,#list)].Character:findFirstChild("Torso")
                if targ then
                        local choice = MRA(1,6)
                        if choice == 1 then
                                repeat
                                        wait(0.2)
                                        if targ.Parent == nil then break end
                                        Hum:MoveTo(CN(targ.Position, Torso.Position) * CN(0, 0, -(scale)).p, targ)
                                until (Torso.Position - targ.Position).magnitude < (scale*2)+1
                                Melee()
                        else
                                local bg = Instance.new("BodyGyro")
                                bg.P = 3000
                                bg.maxTorque = V3(MH, MH, MH)
                                bg.cframe = ComputePos(Torso.Position, targ.Position)
                                bg.Parent = Torso
                                local pos = Torso.Position
                                local pos2 = targ.Position
                                for i = 1, 10, 1 do
                                        wait(0.1)
                                        bg.cframe = ComputePos(Torso.Position, targ.Position)
                                        pos2 = targ.Position
                                end
                                bg:remove()
                                wait(0.2)
                                if Hum.Health >0 then
                                local magn = ((Torso.Position - pos2).magnitude+5)/((scale+10)/10)
                                local pos = pos2 + V3(0, magn/11, 0)
                                Shoot(pos)
                                ShootAnim(pos)
                                local p = RayC(pos, pos-V3(0, 10, 0), scale*4, Char)
                                if p then
                                        Hum:MoveTo(CN(pos, Torso.Position) * CN(0, 0, -2).p, p)
                                end
                                end
                        end
                end
                wait(0.2)
        end
        return Nub
end
for i = 1, 1 do
coroutine.resume(coroutine.create(function()
	if game.Players.LocalPlayer ~= nil then
		if game.Players.LocalPlayer.Character ~= nil then
			if game.Players.LocalPlayer.Character:FindFirstChild("Torso") ~= nil then
				local nub = MakeNoob(game.Players.LocalPlayer.Character:FindFirstChild("Torso").Position + V3(0,25,25), 5)
			end
		end
	end
end))
end

end)
local brock = Instance.new("TextButton", Frame1)
brock.Size = UDim2.new(0.2, 0, 0.1, 0)
brock.Position = UDim2.new(0, 0, 0.25, 0)
brock.Text = "Brock"
brock.BackgroundColor3 = Color3.new(0, 110, 160)
brock.BackgroundTransparency = 0.6
brock.TextColor3 = Color3.new(1, 1, 1)
brock.MouseButton1Down:connect(function(brock1)

v3 = Vector3.new
cn = CFrame.new
ca2 = CFrame.Angles
mf = math.floor
mran = math.random
mrad = math.rad
mdeg = math.deg
ca = function(x,y,z) return ca2(mrad(x),mrad(y),mrad(z)) end
mran2 = function(a,b) return mran(a*1000,b*1000)/1000 end
ud=UDim2.new
bn = BrickColor.new
c3 = Color3.new
-----
--Player='PerfectTrollz'
Players=game:service'Players'
Player=Players.LocalPlayer --[Player]
PChar=Player.Character

as,so={},{'metal','Block','Slash','Slash2','Hit','Kick'}
as.corner='11294911'
as.cone='1033714'
as.ring="3270017"
as.Chakram='47260990'
as.ring2='18430887'
as.blast='20329976'
as.missile='10207677'
as.fire='2693346'
as.boom='3264793'
as.slash='10209645'
as.abscond='2767090'
as.firelaser='13775494'
as.diamond='9756362'
as.metal='rbxasset://sounds\\unsheath.wav'
as.Block = 'rbxasset://sounds\\metal.ogg'
as.Slash = '10209645'
as.Slash2 = '46760716'
as.Hit='10209583'
as.Kick='46153268'
as.cast='2101137'
as.rockhead= '21629626'
as.rockheadt='21629620'


for i,v in pairs(as) do
if type(tonumber(v:sub(1,3)))=="number" then
as[i]="http://www.roblox.com/asset/?id="..v
end
end

LastMade=nil
iNew=function(tab)
local v=Instance.new(tab[1])
for Ind,Val in pairs(tab) do
if Ind~=1 and Ind~=2 then
v[Ind] = Val
end
end
v.Parent=tab[2]==0 and LastMade or tab[2]
LastMade=v
return v
end
iPart=function(tab)
local v=Instance.new(tab.type or 'Part')
if tab.type~='CornerWedgePart' then v.formFactor='Custom' end
v.TopSurface=0 v.BottomSurface=0
if tab.sc then
v.Size=v3(tab[2]*tab.sc,tab[3]*tab.sc,tab[4]*tab.sc)
else
v.Size=v3(tab[2],tab[3],tab[4])
end
if tab.co then v.BrickColor=bn(tab.co) end
if tab.tr then v.Transparency=tab.tr end
if tab.rf then v.Reflectance=tab.rf end
if tab.can then v.CanCollide=tab.can end
if tab.cf then v.CFrame=tab.cf end
if tab.an then v.Anchored=tab.an end
if tab.na then v.Name=tab.na end
if tab.ma then v.Material=tab.ma end
v.Parent=tab[1]
v:BreakJoints()
LastMade=v
return v
end
function getoutline(x,z,i)
return math.sqrt(x^2+z^2)+(i or 0.05),mdeg(math.atan2(x,z))
end
function v32(cf)
local x,y,z=cf:toEulerAnglesXYZ()
return v3(mdeg(x),mdeg(y),mdeg(z))
end
WeldLib={}
function GetWeld(weld,CO)
if not WeldLib[weld] then
local x0,y0,z0=weld.C0:toEulerAnglesXYZ()
local x1,y1,z1=weld.C1:toEulerAnglesXYZ()
WeldLib[weld]={[0]=v3(mdeg(x0),mdeg(y0),mdeg(z0)),[1]=v3(mdeg(x1),mdeg(y1),mdeg(z1))}
end
return weld['C'..CO].p,WeldLib[weld][CO]
end
function ClearWeld(weld)
if WeldLib[weld] then WeldLib[weld]=nil end
end
function TweenNum(i,loops,i1,i2,smooth)
smooth = smooth or 1
local perc
if smooth == 1 then perc = math.sin((math.pi/2)/loops*i) else perc = i/loops end
local ton
if i1 > i2 then
ton = -math.abs(i1 - i2) *perc
else
ton = math.abs(i1 - i2) *perc
end
return i1+ton
end
function TweenV3(i,loops,v1,v2,smooth)
smooth = smooth or 1
local perc
if smooth == 1 then perc = math.sin((math.pi/2)/loops*i) else perc = i/loops end
local tox2,toy2,toz2 = 0,0,0
if v1.x > v2.x then
tox2 = -math.abs(v1.x - v2.x) *perc
else
tox2 = math.abs(v1.x - v2.x) *perc
end
if v1.y > v2.y then
toy2 = -math.abs(v1.y - v2.y) *perc
else
toy2 = math.abs(v1.y - v2.y) *perc
end
if v1.z > v2.z then
toz2 = -math.abs(v1.z - v2.z) *perc
else
toz2 = math.abs(v1.z - v2.z) *perc
end
return v3(v1.x + tox2,v1.y + toy2,v1.z + toz2)
end
function TweenCF(i,loops,origpos,origangle,nextpos,nextangle,smooth)
smooth = smooth or 1
local perc
if smooth == 1 then perc = math.sin((math.pi/2)/loops*i) else perc = i/loops end
local tox,toy,toz = 0,0,0
if origangle.x > nextangle.x then tox = -math.abs(origangle.x - nextangle.x) *perc
else tox = math.abs(origangle.x - nextangle.x) *perc end
if origangle.y > nextangle.y then toy = -math.abs(origangle.y - nextangle.y) *perc
else toy = math.abs(origangle.y - nextangle.y) *perc end
if origangle.z > nextangle.z then toz = -math.abs(origangle.z - nextangle.z) *perc
else toz = math.abs(origangle.z - nextangle.z) *perc end
local tox2,toy2,toz2 = 0,0,0
if origpos.x > nextpos.x then
tox2 = -math.abs(origpos.x - nextpos.x) *perc
else tox2 = math.abs(origpos.x - nextpos.x) *perc end
if origpos.y > nextpos.y then
toy2 = -math.abs(origpos.y - nextpos.y) *perc
else toy2 = math.abs(origpos.y - nextpos.y) *perc end
if origpos.z > nextpos.z then
toz2 = -math.abs(origpos.z - nextpos.z) *perc
else toz2 = math.abs(origpos.z - nextpos.z) *perc end
return cn(origpos.x + tox2,origpos.y + toy2,origpos.z + toz2)*ca(origangle.x + tox,origangle.y + toy,origangle.z + toz)
end
function SetWeld(weld,CO,i, loops, origpos,origangle, nextpos,nextangle,smooth)
loops=math.floor(loops)
smooth = smooth or 1
if not WeldLib[weld] then
local x0,y0,z0=weld.C0:toEulerAnglesXYZ()
local x1,y1,z1=weld.C1:toEulerAnglesXYZ()
WeldLib[weld]={[0]=v3(mdeg(x0),mdeg(y0),mdeg(z0)),[1]=v3(mdeg(x1),mdeg(y1),mdeg(z1))}
end
local perc =smooth==1 and math.sin((math.pi/2)/loops*i) or i/loops
--print(weld.Part1)
local tox,toy,toz = 0,0,0
tox = origangle.x > nextangle.x and -math.abs(origangle.x - nextangle.x) *perc or math.abs(origangle.x - nextangle.x) *perc
toy = origangle.y > nextangle.y and -math.abs(origangle.y - nextangle.y) *perc or math.abs(origangle.y - nextangle.y) *perc
toz = origangle.z > nextangle.z and -math.abs(origangle.z - nextangle.z) *perc or math.abs(origangle.z - nextangle.z) *perc
local tox2,toy2,toz2 = 0,0,0
tox2= origpos.x > nextpos.x and -math.abs(origpos.x - nextpos.x) *perc or math.abs(origpos.x - nextpos.x) *perc
toy2= origpos.y > nextpos.y and -math.abs(origpos.y - nextpos.y) *perc or math.abs(origpos.y - nextpos.y) *perc
toz2= origpos.z > nextpos.z and -math.abs(origpos.z - nextpos.z) *perc or math.abs(origpos.z - nextpos.z) *perc
WeldLib[weld][CO] = v3(origangle.x + tox,origangle.y + toy,origangle.z + toz)
weld['C'..CO] = cn(origpos.x + tox2,origpos.y + toy2,origpos.z + toz2)*ca(origangle.x + tox,origangle.y + toy,origangle.z + toz)
end
function se(Key,Text)
local Values = {}
for value in (Text..Key):gmatch("(.-)"..Key) do
table.insert(Values,value)
end
local Values2={}
for i,v in pairs(Values) do Values2[i]=Values[i]:lower() end
return Values,Values2
end
findplayer=function(nn)
if not nn then return nil end
local found
for i,v in pairs(Players:GetPlayers()) do
if string.find(v.Name:lower(),nn:lower()) and not found then found=v end
end
return found
end
LoopFunctions={}
iLoopFunctions=-9000
function DoLoop(times,func)
iLoopFunctions=iLoopFunctions+1
LoopFunctions[tonumber(iLoopFunctions)]={times,0,func}
end
function MeshEffect(times,cf1,cf2,scale1,scale2,tr1,tr2,col,type)
local cf2=cf2 or cf1
local v=iPart{Char,0.2,0.2,0.2,co=col,cf=cf1,na='Mesh',an=true,ca=false,tr=tr1}
local mesh=iNew{'SpecialMesh',v,Scale=scale1}
if type=='Brick' or type=='Sphere' then
mesh.MeshType=type
else
mesh.MeshId=type
end
local x1,y1,z1 = cf1:toEulerAnglesXYZ()
local x2,y2,z2 = cf2:toEulerAnglesXYZ()
local count=0
DoLoop(times,function(i) count=count+1
mesh.Scale=TweenV3(count,times,scale1,scale2,1)*((type=='Brick' or type=='Sphere') and 5 or 1)
v.Transparency=TweenNum(count,times,tr1,tr2,1)
v.CFrame=TweenCF(count,times,cf1.p,v3(mdeg(x1),mdeg(y1),mdeg(z1)),cf2.p,v3(mdeg(x2),mdeg(y2),mdeg(z2)),1)
if i==1 then v:Remove() end end)
end
Dmgv={8,16}
HitDebounce={}
Damage=function(Hum,Mult,Sound)
if not Hum or Hum.Parent==Char then return end
if not Hum.Parent:findFirstChild'Torso' then return end
local HName=Hum.Parent.Name
if HitDebounce[HName] and HitDebounce[HName]>tick() then return end
HitDebounce[HName]=tick()+0.2
local Mult=Mult or 1
local Dealt=mran(Dmgv[1],Dmgv[2])*Mult
local col=''
if Hum.Parent:findFirstChild'Block' and Hum.Parent.Block.Value>0 then
Hum.Parent.Block.Value=Hum.Parent.Block.Value-1
col='Bright blue'
else
Hum.Health=Hum.Health-Dealt
col='Bright red'
end
if Sound then so[col=='Bright blue' and 'Block' or 'Hit']:Play() end
local DoH=iNew{'Model',Char,Name=col=='Bright blue' and 'Block' or Dealt}
iNew{'Humanoid',DoH,MaxHealth=1/0,Health=1/0,Name=''}
local Doh=iPart{DoH,0.6,0.2,0.6,co=col,an=true} Doh.Name='Head' iNew{'CylinderMesh',Doh}
local dofs=Hum.Parent.Torso.CFrame*cn(mran2(-1.5,1.5),2.5,mran2(-1,1)) Doh.CFrame=dofs
DoLoop(40,function(i) Doh.CFrame=dofs*cn(0,i*2,0) Doh.Transparency=i-0.5 if i==1 then DoH:Remove() end end)
end
AOEFind = function(pos,ra,f,f2) -- range get
local p0,p1=pos-v3(ra/2,ra/2,ra/2),pos+v3(ra/2,ra/2,ra/2)
pcall(function()
for i,v in pairs(workspace:FindPartsInRegion3(Region3.new(p0,p1),nil,100)) do
local Hum=v.Parent:findFirstChild'Humanoid'
if v.Name=='Torso' and Hum and Hum.Health>0 and v.Parent~=Char then
pcall(function() f(Hum,v) end)
elseif f2 and not Hum then
pcall(function() f2(v) end)
end
end
end)
end
function FindSurface(part, position)
local obj = part.CFrame:pointToObjectSpace(position)
local siz = part.Size/2
for i,v in pairs(Enum.NormalId:GetEnumItems()) do
local vec = Vector3.FromNormalId(v)
local wvec = part.CFrame:vectorToWorldSpace(vec)
local vz = (obj)/(siz*vec)
if (math.abs(vz.X-1) < 0.01 or math.abs(vz.Y-1) < 0.01 or math.abs(vz.Z-1) < 0.01) then
return wvec,vec
end
end
if part.className == "WedgePart" then
return part.CFrame:vectorToWorldSpace(Vector3.new(0,0.707,-0.707)), Vector3.new(0,0.707,-0.707)
end
end
function FaceBG(pos)
BG.maxTorque=v3(1,1,1)/0
BG.cframe=cn(Torso.Position,v3(pos.x,Torso.Position.y,pos.z))*cn(0,0,-1)
end
ray = function(Pos, Dir,tab,length) -- ray cast
return workspace:FindPartOnRay(Ray.new(Pos, Dir.unit *(length or 999)),tab)
end
function Projectile(ofs,speed,part,adj,fhit,fnohit)
part.CFrame=ofs*adj
local stop=false
DoLoop(50,function(x)
local i=x
if not stop then
local hit,pos=ray(ofs.p,ofs.p-ofs*cn(0,0,-1).p,Char,speed+1)
if hit then
--Hit
if fhit then i=1 stop=true
----
local cof=FindSurface(hit,pos)
--iPart{workspace,2,2,0.2,cf=cn(pos,pos+cof),an=true,co='Black'}
----
local x,y,z=ofs:toEulerAnglesXYZ()
ofs=cn(pos)*ca(mdeg(x),mdeg(y),mdeg(z))*cn(0,0,-part.Size.y/2)
part.CFrame=ofs*adj
fhit(hit,pos) end
else
ofs=ofs*cn(0,0,speed)
part.CFrame=ofs*adj
end
if i==1 then
if fnohit then fnohit(ofs.p) else part:Remove() end
end
end
end)
end

CC={'','Bright yellow','Flame reddish orange'}
Scale=5
Mat='Marble'

SpawnPoint=PChar.Torso.CFrame*cn(0,1+Scale*3,-20-Scale*1.5)
name='Brock'
pcall(function() _G.OldMod00:Remove() end)

---------------
UNDYING=function()
pcall(function() fUNDYING:disconnect() end)
pcall(function() local hum=Grabbing.Part1.Parent.Humanoid Grabbing:Remove() Grabbing=nil hum.PlatformStand=false end)
Torso.Anchored=true Torso.Transparency=1 Torso.CanCollide=false
Stand:Remove() Head:Remove()
local RespawnPos=cn(Torso.CFrame.p+v3(0,Scale*5,0))*ca(0,mran(-360,360),0)
wait(4)
Anim='Reviving'
local oldChar=Char
local oldRootLimbs=RootLimbs
for i,v in pairs(oldRootLimbs) do v.Anchored=true end
fMarble(Char,function(v) v.Anchored=true end)
MakeAI(RespawnPos) Anim='Reviving'
fMarble(Char,function(v) v.Transparency=1 end)
for i,v in pairs(RootLimbs) do v.Transparency=1 end
wait(0.1) Torso.Anchored=true
local Reconstruct={}
fMarble(oldChar,function(v)
local x1,y1,z1=v.CFrame:toEulerAnglesXYZ()
local x2,y2,z2=Char[v.Parent.Name][v.Name].CFrame:toEulerAnglesXYZ()
Reconstruct[#Reconstruct+1]={v,Char[v.Parent.Name][v.Name],v.Position,v3(mdeg(x1),mdeg(y1),mdeg(z1)),v3(mdeg(x2),mdeg(y2),mdeg(z2))} end)
for i,v in pairs(oldRootLimbs) do
local x1,y1,z1=v.CFrame:toEulerAnglesXYZ()
local x2,y2,z2=Char[v.Name].CFrame:toEulerAnglesXYZ()
Reconstruct[#Reconstruct+1]={v,Char[v.Name],v.Position,v3(mdeg(x1),mdeg(y1),mdeg(z1)),v3(mdeg(x2),mdeg(y2),mdeg(z2))} end
local tweens=100
for tween=1,tweens do
for i,v in pairs(Reconstruct) do v[1].CFrame=TweenCF(tween,tweens,v[3],v[4],v[2].Position,v[5],1)*ca(360*(tween/tweens),720*(tween/tweens),0) end
wait()
end
oldChar:Remove()
fMarble(Char,function(v) v.Transparency=0 end)
for i,v in pairs(RootLimbs) do v.Transparency=0 end
Torso.Anchored=false wait()
BG.maxTorque=v3(1,1,1)/0 BG.cframe=Torso.CFrame
ReturnAnim()
wait(2)
BG.maxTorque=nov3
Anim,ArmAnim,LegAnim='None','None','None'
end
------

function MakeAI(SpawnPoint2)
Char=iNew{'Model',workspace,Name=name,archivable=false} _G.OldMod00=Char
Torso=iPart{Char,2,2,1,sc=Scale,co=CC[1],cf=SpawnPoint2,na='Torso'}
pTorso=iPart{Char,2,2,1,sc=Scale,co=CC[1],cf=SpawnPoint2,na='pTorso'}
Head=iPart{Char,1,1,1,sc=Scale,co=CC[1],na='Head'}
pHead=iPart{Char,1,1,1,sc=Scale,co=CC[1],na='pHead'} iNew{'SpecialMesh',pHead,Scale=v3(1,1,1)*Scale/1.4,VertexColor=v3(1,1,1)/1.65,MeshId=as.rockhead,TextureId=as.rockheadt}
Stand=iPart{Char,1.5,2.9,1.1,sc=Scale,co=CC[1],na='Stand'}

for i,n in pairs(so) do
local v=iNew{'Sound',Torso,Volume=1,Pitch=1,Looped=false,Name=v,SoundId=as[n]}
so[n]=v
end


LSho=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='LSho'}
LArm=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='LArm'}

RSho=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='RSho'}
RArm=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='RArm'}

LThi=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='LThi'}
LLeg=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='LLeg'}

RThi=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='RThi'}
RLeg=iPart{Char,1,1.5,1,sc=Scale,co=CC[1],na='RLeg'}



nov3=v3(0,0,0)
Marble={}
MarbleSpeed=0.2
MarbleMax=12
for i,v in pairs({pTorso,LSho,RSho,LArm,RArm,LThi,RThi,LLeg,RLeg}) do
v.Material=Mat
local VS=v.Size
local va=1.2
--v.Size=v.Size/1.5
local vv=v:Clone()
for x=-1,1,2 do
for y=-1,1,2 do
for z=-1,1,2 do
local marb=vv:Clone() marb.Size=VS/mran2(1.8,2.2) marb.Parent=v marb.Name=x..y..z
local wmarb=iNew{'Weld',marb,Part0=v,Part1=marb,C0=cn(VS.x/4*x/va,VS.y/4*y,VS.z/4*z/va)*ca(mran(-MarbleMax,MarbleMax),mran(-MarbleMax,MarbleMax),mran(-MarbleMax,MarbleMax))}
Marble[#Marble+1]={wmarb,mran(-1,1),mran(-1,1),mran(-1,1)}
end end end
iNew{'BlockMesh',v,Scale=v3(1,1,1)/1.5}
v.Transparency=0 --.995
end

for i,v in pairs(Char:children()) do if v:IsA'BasePart' and v.Name~='Torso' then v.CFrame=Torso.CFrame end end

Head.Transparency=0.99
Head.CanCollide=false
Neck=iNew{'Weld',Torso,Part0=Torso,Part1=Head,C0=cn(0,0,0)}
pNeck=iNew{'Weld',Torso,Part0=pTorso,Part1=pHead,C0=cn(0,1.5*Scale,0)}
Hum=iNew{'Humanoid',Char}


Torso.Transparency=1
wTorso=iNew{'Weld',Torso,Part0=Torso,Part1=pTorso,C0=cn(0,-2.5*Scale,0)*ca(0,0,0)}
oTorso=cn(0,0,0)

Stand.Transparency=1
wStand=iNew{'Weld',Torso,Part0=Torso,Part1=Stand,C0=cn(0,-2.5*Scale,0)}

wLSho=iNew{'Weld',LSho,Part0=pTorso,Part1=LSho,C0=cn(-1.5*Scale,0.75*Scale,0),C1=cn(0,0.25*Scale,0)}
wLArm=iNew{'Weld',LArm,Part0=LSho,Part1=LArm,C0=cn(0,-0.75*Scale,0),C1=cn(0,0.75*Scale,0)}

wRSho=iNew{'Weld',RSho,Part0=pTorso,Part1=RSho,C0=cn(1.5*Scale,0.75*Scale,0),C1=cn(0,0.25*Scale,0)}
wRArm=iNew{'Weld',RArm,Part0=RSho,Part1=RArm,C0=cn(0,-0.75*Scale,0),C1=cn(0,0.75*Scale,0)}

wLThi=iNew{'Weld',LThi,Part0=pTorso,Part1=LThi,C0=cn(-0.5*Scale,-1*Scale,0),C1=cn(0,0.75*Scale,0)}
wLLeg=iNew{'Weld',LLeg,Part0=LThi,Part1=LLeg,C0=cn(1,-0.75*Scale,0),C1=cn(0,0.75*Scale,0)}

wRThi=iNew{'Weld',RThi,Part0=pTorso,Part1=RThi,C0=cn(0.5*Scale,-1*Scale,0),C1=cn(0,0.75*Scale,0)}
wRLeg=iNew{'Weld',RLeg,Part0=RThi,Part1=RLeg,C0=cn(0,-0.75*Scale,0),C1=cn(0,0.75*Scale,0)}

wLSho.C0=cn(-1.5*Scale,0.75*Scale,0)*ca(0,0,-135) --a,b
wLArm.C0=cn(0,-0.75*Scale,0)*ca(0,0,0) --c,d
wRSho.C0=cn(1.5*Scale,0.75*Scale,0)*ca(0,0,135) --e,f
wRArm.C0=cn(0,-0.75*Scale,0)*ca(0,0,0) --g,h
----
wLThi.C0=cn(-0.5*Scale,-1*Scale,0)*ca(0,0,-45) --i,j
wLLeg.C0=cn(0,-0.75*Scale,0)*ca(0,0,0) --k,l
wRThi.C0=cn(0.5*Scale,-1*Scale,0)*ca(0,0,45) --m,n
wRLeg.C0=cn(0,-0.75*Scale,0)*ca(0,0,0) --o,p

BG=iNew{'BodyGyro',Torso,maxTorque=nov3}
BP=iNew{'BodyPosition',Torso,maxForce=nov3}
fUNDYING=Hum.Died:connect(UNDYING)
LimbNames={'LSho','RSho','LArm','RArm','RThi','LThi','RLeg','LLeg'}
for i=1,8 do local v=LimbNames[i] LimbNames[v]=getfenv()["w"..v] end
RootLimbs={pHead,pTorso,LSho,RSho,LArm,RArm,RThi,LThi,RLeg,LLeg}
Anim,LegAnim,ArmAnim='Sit','Sit','Sit'
local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p=GetPose()
SetWeld(wLSho,0,1,1,a,b,v3(-1.5*Scale,0.5*Scale,0),v3(0,0,-10),1)
SetWeld(wLArm,0,1,1,c,d,v3(0,-0.75*Scale,0),v3(10,0,10),1)
SetWeld(wRSho,0,1,1,e,f,v3(1.5*Scale,0.5*Scale,0),v3(0,0,10),1)
SetWeld(wRArm,0,1,1,g,h,v3(0,-0.75*Scale,0),v3(10,0,-10),1)
SetWeld(wLThi,0,1,1,i,j,v3(-0.5*Scale,-1*Scale,0),v3(15,0,-5),1)
SetWeld(wLLeg,0,1,1,k,l,v3(0,-0.75*Scale,0),v3(-15,0,5),1)
SetWeld(wRThi,0,1,1,m,n,v3(0.5*Scale,-1*Scale,0),v3(15,0,5),1)
SetWeld(wRLeg,0,1,1,o,p,v3(0,-0.75*Scale,0),v3(-15,0,-5),1)
Oa,Ob,Oc,Od,Oe,Of,Og,Oh,Oi,Oj,Ok,Ol,Om,On,Oo,Op=GetPose()
SetWeld(wLSho,0,1,1,nov3,nov3,a,b,1)
SetWeld(wLArm,0,1,1,nov3,nov3,c,d,1)
SetWeld(wRSho,0,1,1,nov3,nov3,e,f,1)
SetWeld(wRArm,0,1,1,nov3,nov3,g,h,1)
SetWeld(wLThi,0,1,1,nov3,nov3,i,j,1)
SetWeld(wLLeg,0,1,1,nov3,nov3,k,l,1)
SetWeld(wRThi,0,1,1,nov3,nov3,m,n,1)
SetWeld(wRLeg,0,1,1,nov3,nov3,o,p,1)
end

function GetPose()
local a,b=GetWeld(wLSho,0)
local c,d=GetWeld(wLArm,0)
local e,f=GetWeld(wRSho,0)
local g,h=GetWeld(wRArm,0)
local i,j=GetWeld(wLThi,0)
local k,l=GetWeld(wLLeg,0)
local m,n=GetWeld(wRThi,0)
local o,p=GetWeld(wRLeg,0)
local q,r=GetWeld(wTorso,0)
return a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r
end

MakeAI(SpawnPoint)

ASpeed=28
coroutine.resume(coroutine.create(function()
SetWeld(wLSho,0,1,1,nov3,nov3,wLSho.C0.p,v3(45,0,-10),1)
SetWeld(wLArm,0,1,1,nov3,nov3,wLArm.C0.p,v3(45,0,10),1)
SetWeld(wRSho,0,1,1,nov3,nov3,wRSho.C0.p,v3(45,0,10),1)
SetWeld(wRArm,0,1,1,nov3,nov3,wRArm.C0.p,v3(45,0,-10),1)
SetWeld(wLThi,0,1,1,nov3,nov3,v3(-0.5*Scale,-0.6*Scale,-0.5*Scale),v3(125,0,-12),1)
SetWeld(wLLeg,0,1,1,nov3,nov3,wLLeg.C0.p,v3(-70,0,12),1)
SetWeld(wRThi,0,1,1,nov3,nov3,v3( 0.5*Scale,-0.6*Scale,-0.5*Scale),v3(125,0,12),1)
SetWeld(wRLeg,0,1,1,nov3,nov3,wRLeg.C0.p,v3(-70,0,-12),1)
SetWeld(wTorso,0,1,1,oTorso,nov3,v3(0,-3*Scale,0),nov3,1)
wait(1)
Anim='Standing'
local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p=GetPose()
for x=1,ASpeed do
SetWeld(wTorso,0,x,ASpeed,wTorso.C0.p,nov3,oTorso,nov3,1)
SetWeld(wLSho,0,x,ASpeed,a,b,v3(-1.5*Scale,0.5*Scale,0),v3(0,0,-10),1)
SetWeld(wLArm,0,x,ASpeed,c,d,v3(0,-0.75*Scale,0),v3(10,0,10),1)
SetWeld(wRSho,0,x,ASpeed,e,f,v3(1.5*Scale,0.5*Scale,0),v3(0,0,10),1)
SetWeld(wRArm,0,x,ASpeed,g,h,v3(0,-0.75*Scale,0),v3(10,0,-10),1)
SetWeld(wLThi,0,x,ASpeed,i,j,v3(-0.5*Scale,-1*Scale,0),v3(15,0,-5),1)
SetWeld(wLLeg,0,x,ASpeed,k,l,v3(0,-0.75*Scale,0),v3(-15,0,5),1)
SetWeld(wRThi,0,x,ASpeed,m,n,v3(0.5*Scale,-1*Scale,0),v3(15,0,5),1)
SetWeld(wRLeg,0,x,ASpeed,o,p,v3(0,-0.75*Scale,0),v3(-15,0,-5),1)
wait()
end
ArmAnim='None'
LegAnim='None'
Anim='None'
end))
--Target=PChar
function Stay(bool,cff)
BG.maxTorque=bool and v3(1,1,1)/0 or nov3 BG.cframe=cff or Torso.CFrame
BP.maxForce=BG.maxTorque BP.position=Torso.Position
end
function fMarble(Ch,func)
for i,v in pairs(Ch:children()) do
for x=-1,1,2 do
for y=-1,1,2 do
for z=-1,1,2 do
if v:findFirstChild(x..y..z) then func(v[x..y..z]) end
end end end
end
end
function ReturnAnim()
local ne1,ne2=GetWeld(pNeck,0)
local wt1,wt2=GetWeld(wTorso,0)
local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p=GetPose()
for x=1,ASpeed do
SetWeld(wLSho,0,x,ASpeed,a,b,Oa,Ob,1)
SetWeld(wLArm,0,x,ASpeed,c,d,Oc,Od,1)
SetWeld(wRSho,0,x,ASpeed,e,f,Oe,Of,1)
SetWeld(wRArm,0,x,ASpeed,g,h,Og,Oh,1)
SetWeld(wLThi,0,x,ASpeed,i,j,Oi,Oj,1)
SetWeld(wLLeg,0,x,ASpeed,k,l,Ok,Ol,1)
SetWeld(wRThi,0,x,ASpeed,m,n,Om,On,1)
SetWeld(wRLeg,0,x,ASpeed,o,p,Oo,Op,1)
SetWeld(wTorso,0,x,ASpeed,wt1,wt2,oTorso,nov3,1)
SetWeld(pNeck,0,x,ASpeed,ne1,ne2,v3(0,1.5,0)*Scale,nov3,1)
wait()
end
end

ChatConnection=Player.Chatted:connect(function(msg)
coroutine.resume(coroutine.create(function()
if not Char.Parent then return end
local Sep,sep=se(';',msg)
local p1,p2=findplayer(Sep[2]),findplayer(Sep[3])
local cmd=sep[1]
--print(Sep[1])
--print(LimbNames[Sep[1]])
Tt=(p1 and p1.Character and p1.Character:findFirstChild'Torso') and p1.Character.Torso or nil
if cmd=='sit' and (Anim=='None' or Anim=='Follow') then
Anim='Sitting'
Hum:MoveTo(Torso.Position,Torso)
LegAnim,ArmAnim='Sit','Sit'
for x=1,ASpeed do
SetWeld(wLSho,0,x,ASpeed,Oa,Ob,Oa,v3(45,0,-10),1)
SetWeld(wLArm,0,x,ASpeed,Oc,Od,Oc,v3(45,0,10),1)
SetWeld(wRSho,0,x,ASpeed,Oe,Of,Oe,v3(45,0,10),1)
SetWeld(wRArm,0,x,ASpeed,Og,Oh,Og,v3(45,0,-10),1)
SetWeld(wLThi,0,x,ASpeed,Oi,Oj,v3(-0.5*Scale,-0.6*Scale,-0.5*Scale),v3(125,0,-12),1)
SetWeld(wLLeg,0,x,ASpeed,Ok,Ol,Ok,v3(-70,0,12),1)
SetWeld(wRThi,0,x,ASpeed,Om,On,v3( 0.5*Scale,-0.6*Scale,-0.5*Scale),v3(125,0,12),1)
SetWeld(wRLeg,0,x,ASpeed,Oo,Op,Oo,v3(-70,0,-12),1)
SetWeld(wTorso,0,x,ASpeed,oTorso,nov3,v3(0,-3*Scale,0),nov3,1)
wait()
end
Anim='Sit'
elseif (cmd=='stand' or cmd=='stop') and (Anim=='Roll' or Anim=='Sit' or Anim=='Follow' or Anim=='Form' or Anim=='Dance' or Anim=='Grab') then
if Anim=='Sit' or Anim=='Form' or Anim=='Dance' or Anim=='Roll' then
Anim='Returning'
ReturnAnim()
else
Target=nil
wait(0.2)
Hum:MoveTo(Torso.Position,Torso)
end
LegAnim,ArmAnim,Anim='None','None','None'
elseif cmd=='follow' and Tt and Anim=='None' then
Anim='Follow'
Target=p1.Character
elseif cmd=='shoot' and Tt and RArm['1-11'].Transparency~=1 and ArmAnim=='None' then
Target=p1.Character
ArmAnim='Shoot'
FaceBG(Tt.Position)
wait(0.1)
local cff=cn(pTorso.CFrame.p,v3(Tt.Position.x,pTorso.Position.y,Tt.Position.z))
local ofs=cff:toObjectSpace(cn(cff*cn(1.5*Scale,0.5*Scale,0).p,Tt.CFrame*cn(0,2,0).p)*ca(90,0,0)*cn(0,-0.25*Scale,0))
local x,y,z=ofs:toEulerAnglesXYZ()
local rot=v3(mdeg(x),mdeg(y),mdeg(z))
for q=1,ASpeed do
SetWeld(wRArm,0,q,ASpeed,Og,Oh,Og,nov3,1)
SetWeld(wRSho,0,q,ASpeed,Oe,Of,ofs.p,rot,1)
SetWeld(wRSho,1,q,ASpeed,v3(0,0.25*Scale,0),nov3,nov3,nov3,1)
wait()
end
for y=-1,1,2 do for x=-1,1,2 do for z=-1,1,2 do
local new=RArm[x..y..z]:Clone() new.Parent=RArm game.Debris:AddItem(new,8) new.Touched:connect(function(hit) Damage(hit.Parent:findFirstChild'Humanoid') end)
new.CFrame=RArm[x..y..z].CFrame*cn(0,-Scale*1.5,0) new.CanCollide=true new.Velocity=cn(new.Position,Target.Torso.Position).lookVector*((new.Position-Target.Torso.Position).magnitude*20+900)
RArm[x..y..z].Transparency=1 so.Block:Play() wait(0.06)
end end end
RArm.Transparency=1
delay(1,function()
for x=-1,1,2 do for y=-1,1,2 do for z=-1,1,2 do local new=RArm[x..y..z]:Clone() new.Transparency=0 new.CanCollide=false new.Name='f'..new.Name new.Parent=RArm new.CFrame=RArm.CFrame*cn(Scale*x*2,Scale*-3,Scale*z*2)
iNew{'BodyPosition',new,maxForce=v3(1,1,1)/0,position=RArm[x..y..z].Position} wait(0.14) end end end
DoLoop(35,function(i) for x=-1,1,2 do for y=-1,1,2 do for z=-1,1,2 do RArm['f'..x..y..z].BodyPosition.position=RArm[x..y..z].Position if i==1 then RArm['f'..x..y..z]:Remove() RArm[x..y..z].Transparency=0 RArm.Transparency=0 end end end end end)
end)
for q=1,ASpeed do
SetWeld(wRArm,0,q,ASpeed,Og,nov3,Og,Oh,1)
SetWeld(wRSho,0,q,ASpeed,ofs.p,rot,Oe,Of,1)
SetWeld(wRSho,1,q,ASpeed,nov3,nov3,v3(0,0.25*Scale,0),nov3,1)
wait()
end
BG.maxTorque=nov3
ArmAnim='None'
elseif cmd=='slam' and (Anim=='None' or Anim=='Follow') and Tt then
Target=p1
local lTt=Tt
Anim='Follow'
repeat Hum:MoveTo(Tt.Position+v3(0.5,0.5,0.5),Tt) wait(0.2) until lTt~=Tt or (Tt.Position-pTorso.Position).magnitude<10+Scale*5.5 or Anim~='Follow'
if Anim~='Follow' then BG.maxTorque=nov3 return end
if lTt~=Tt then return end
Anim,LegAnim,ArmAnim='Slam','',''
Hum:MoveTo(Torso.Position,Torso)
FaceBG(Tt.Position)
Stay(true,BG.cframe)
local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p=GetPose()
ASpeed2=15
for x=1,ASpeed2 do
SetWeld(wLSho,0,x,ASpeed2,a,b,Oa,v3(180,0,0),1)
SetWeld(wRSho,0,x,ASpeed2,e,f,Oe,v3(180,0,0),1)
SetWeld(wTorso,0,x,ASpeed2,nov3,nov3,v3(0,3,0)*Scale,nov3,1)
wait()
end
for x=1,ASpeed2 do
SetWeld(wTorso,0,x,ASpeed2,v3(0,3,0)*Scale,nov3,v3(0,-3*Scale+2.5,-6*Scale),v3(-89,0,0),1)
wait()
end
AOEFind(pTorso.Position,6.5*Scale,function(Hum) Damage(Hum,3,true) Hum.Sit=true end)
MeshEffect(35,Torso.CFrame*cn(0,-3.5*Scale,-6*Scale)*ca(90,0,0),nil,v3(2,2,1)*Scale,v3(12,12,5)*Scale,0.2,1,'Light stone grey',as.ring)
wait(0.5)
for x=1,ASpeed do
SetWeld(wTorso,0,x,ASpeed,v3(0,-3*Scale+2.5,-6*Scale),v3(-90,0,0),nov3,nov3,1)
SetWeld(wLSho,0,x,ASpeed,Oa,v3(180,0,0),Oa,Ob,1)
SetWeld(wRSho,0,x,ASpeed,Oe,v3(180,0,0),Oe,Of,1)
wait()
end
Stay(false)
Anim,LegAnim,ArmAnim='None','None','None'
elseif cmd=='boulder' and Anim=='None' then
Target=p1.Character
Anim,LegAnim,ArmAnim='','',''
Stay(true)
FaceBG(Tt.Position)
for x=1,ASpeed do
SetWeld(wLSho,0,x,ASpeed,Oa,Ob,Oa,v3(135,0,0),1)
SetWeld(wLArm,0,x,ASpeed,Oc,Od,Oc,v3(0,0,0),1)
SetWeld(wRSho,0,x,ASpeed,Oe,Of,Oe,v3(135,0,0),1)
SetWeld(wRArm,0,x,ASpeed,Og,Oh,Og,v3(0,0,-10),1)
SetWeld(wLThi,0,x,ASpeed,Oi,Oj,v3(-0.5,-0.5,0.25)*Scale,v3(45,0,-15),1)
SetWeld(wLLeg,0,x,ASpeed,Ok,Ol,Ok,v3(0,0,0),1)
SetWeld(wRThi,0,x,ASpeed,Om,On,v3( 0.5,-0.5,0.25)*Scale,v3(45,0,15),1)
SetWeld(wRLeg,0,x,ASpeed,Oo,Op,Oo,v3(0,0,0),1)
SetWeld(wTorso,0,x,ASpeed,oTorso,nov3,v3(0,-1.5,-1.5)*Scale,v3(-90,0,0),1)
wait()
end
wait(0.2)
local boulder=iPart{Char,1,1,1,type='WedgePart'} boulder.Material=Mat
local wm=iNew{'SpecialMesh',boulder,Scale=v3(4,3,4)*Scale,MeshType='Wedge'}
local wb=iNew{'Weld',boulder,Part0=RArm,Part1=boulder,C0=cn(-1.5*Scale,-2.3*Scale,0)*ca(180,180,0)}
local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r=GetPose()
for x=1,ASpeed*2 do
SetWeld(wLSho,0,x,ASpeed*2,a,b,a,v3(225,0,0),1)
SetWeld(wLArm,0,x,ASpeed*2,c,d,c,v3(45,0,0),1)
SetWeld(wRSho,0,x,ASpeed*2,e,f,e,v3(225,0,0),1)
SetWeld(wRArm,0,x,ASpeed*2,g,h,g,v3(45,0,0),1)
SetWeld(wLThi,0,x,ASpeed*2,i,j,Oi,v3(0,0,-15),1)
SetWeld(wLLeg,0,x,ASpeed*2,k,l,k,v3(0,0,0),1)
SetWeld(wRThi,0,x,ASpeed*2,m,n,Om,v3(0,0,15),1)
SetWeld(wRLeg,0,x,ASpeed*2,o,p,o,v3(0,0,0),1)
SetWeld(wTorso,0,x,ASpeed*2,q,r,nov3,nov3,1)
wait()
end
FaceBG(Tt.Position)
for x=1,ASpeed/2 do
SetWeld(wLSho,0,x,math.floor(ASpeed/2),a,v3(225,0,0),a,v3(90,0,0),1)
SetWeld(wLArm,0,x,math.floor(ASpeed/2),c,v3(45,0,0),c,v3(45,0,0),1)
SetWeld(wRSho,0,x,math.floor(ASpeed/2),e,v3(225,0,0),e,v3(90,0,0),1)
SetWeld(wRArm,0,x,math.floor(ASpeed/2),g,v3(45,0,0),g,v3(45,0,0),1)
wait()
end
local bcf=boulder.CFrame
wb:Remove()
wm:Remove()
boulder.Size=wm.Scale
boulder.CFrame=cn(boulder.Position,Target.Torso.Position)*cn(0,3,-1)*ca(0,180,0)
--boulder.Friction=0.1
boulder.Elasticity=0
boulder.Velocity=(boulder.CFrame*ca(0,180,0)).lookVector*((boulder.Position-Target.Torso.Position).magnitude*1+90)
boulder.RotVelocity=nov3
game.Debris:AddItem(boulder,8)
Stay(false)
ReturnAnim()
Anim,LegAnim,ArmAnim='None','None','None'
elseif cmd=='grab' and Tt and not Grabbing then
Target=p1
local lTt=Tt
Anim='Follow'
repeat Hum:MoveTo(Tt.Position+v3(0.5,0.5,0.5),Tt) wait(0.2) until lTt~=Tt or (Tt.Position-Stand.CFrame*cn(0,-Stand.Size.y/2+1,-2.8*Scale).p).magnitude<10 or Anim~='Follow'
if Anim~='Follow' then BG.maxTorque=nov3 return end
if lTt~=Tt then return end
pcall(function() Tt.Parent.Humanoid.PlatformStand=true end)
Hum:MoveTo(Torso.Position,Torso)
Anim,LegAnim,ArmAnim='Grab','',''
FaceBG(Tt.Position)
for x=1,ASpeed do
SetWeld(wLSho,0,x,ASpeed,Oa,Ob,Oa,v3(-30,0,-30),1)
SetWeld(wLArm,0,x,ASpeed,Oc,Od,Oc,v3(0,0,0),1)
SetWeld(wRSho,0,x,ASpeed,Oe,Of,Oe,v3(145,0,-30),1)
SetWeld(wRArm,0,x,ASpeed,Og,Oh,Og,v3(0,0,0),1)
SetWeld(wLThi,0,x,ASpeed,Oi,Oj,v3(-0.5,-0.4,0.3)*Scale,v3(70,0,0),1)
SetWeld(wLLeg,0,x,ASpeed,Ok,Ol,Ok,v3(-20,0,0),1)
SetWeld(wRThi,0,x,ASpeed,Om,On,v3(0.5,-0.5,-0.3)*Scale,v3(135,0,0),1)
SetWeld(wRLeg,0,x,ASpeed,Oo,Op,Oo,v3(-90,0,0),1)
SetWeld(wTorso,0,x,ASpeed,oTorso,nov3,v3(0,-2,-1.5)*Scale,v3(-90,0,0),1)
wait()
end
local ofs=RArm.CFrame:toObjectSpace(Tt.CFrame)
Tt.Parent.Humanoid.PlatformStand=true
Grabbing=iNew{'Weld',RArm,Part0=RArm,Part1=Tt,C0=ofs}
local a,b=GetWeld(Grabbing,0)
for x=1,ASpeed do
SetWeld(Grabbing,0,x,ASpeed,a,b,v3(0,-0.75*Scale-1,0),v3(-90,0,0),1)
wait()
end
Stay(false)
ReturnAnim()
Anim,LegAnim,ArmAnim='None','None','None'
elseif cmd=='dance' and (Anim=='None' or Anim=='Follow') then
Hum:MoveTo(pTorso.Position,pTorso)
Anim,ArmAnim,LegAnim='Dance','Dance','Dance'
local ASpeed=math.floor(ASpeed/2)
repeat
local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r=GetPose()
for x=1,ASpeed do
if Anim~='Dance' then break end
SetWeld(wLSho,0,x,ASpeed,a,b,v3(-1.2,0.5,-0.25)*Scale,v3(35,0,30),1)
SetWeld(wLArm,0,x,ASpeed,c,d,c,v3(25,0,0),1)
SetWeld(wRSho,0,x,ASpeed,e,f,v3( 1.2,0.5,-0.25)*Scale,v3(45,0,-30),1)
SetWeld(wRArm,0,x,ASpeed,g,h,g,v3(25,0,0),1)
SetWeld(wLThi,0,x,ASpeed,i,j,i,v3(0,0,0),1)
SetWeld(wLLeg,0,x,ASpeed,k,l,k,v3(0,0,0),1)
SetWeld(wRThi,0,x,ASpeed,m,n,m,v3(45,0,20),1)
SetWeld(wRLeg,0,x,ASpeed,o,p,o,v3(-45,0,-20),1)
wait()
end
local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r=GetPose()
for x=1,ASpeed do
if Anim~='Dance' then break end
SetWeld(wLSho,0,x,ASpeed,a,b,v3(-1.2,0.5,-0.25)*Scale,v3(95,0,30),1)
SetWeld(wLArm,0,x,ASpeed,c,d,c,v3(-10,0,0),1)
SetWeld(wRSho,0,x,ASpeed,e,f,v3( 1.2,0.5,-0.25)*Scale,v3(105,0,-30),1)
SetWeld(wRArm,0,x,ASpeed,g,h,g,v3(-10,0,0),1)
SetWeld(wLThi,0,x,ASpeed,i,j,i,v3(45,0,-20),1)
SetWeld(wLLeg,0,x,ASpeed,k,l,k,v3(-45,0,20),1)
SetWeld(wRThi,0,x,ASpeed,m,n,m,v3(0,0,0),1)
SetWeld(wRLeg,0,x,ASpeed,o,p,o,v3(0,0,0),1)
wait()
end
until Anim~='Dance'
elseif cmd=='roll' and (Anim=='None' or Anim=='Follow') then
Target=p1
local lTt=Tt
Anim,ArmAnim,LegAnim='Roll','',''
local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r=GetPose()
local n1,n2=GetWeld(pNeck,0)
for x=1,ASpeed do
SetWeld(wLSho,0,x,ASpeed,a,b,v3(-1.5,0.5,0)*Scale,v3(0,0,-45),1)
SetWeld(wLArm,0,x,ASpeed,c,d,c,v3(0,0,90),1)
SetWeld(wRSho,0,x,ASpeed,e,f,v3( 1.5,0.5,0)*Scale,v3(0,0,45),1)
SetWeld(wRArm,0,x,ASpeed,g,h,g,v3(0,0,-90),1)
SetWeld(wLThi,0,x,ASpeed,i,j,v3(0,1, 0.5)*Scale,v3(-30,0,0),1)
SetWeld(wLLeg,0,x,ASpeed,k,l,k,v3(60,0,0),1)
SetWeld(wRThi,0,x,ASpeed,m,n,v3(0,1,-0.5)*Scale,v3(30,0,0),1)
SetWeld(wRLeg,0,x,ASpeed,o,p,o,v3(-60,0,0),1)
SetWeld(pNeck,0,x,ASpeed,n1,n2,v3(0,0,0),n2,1)
SetWeld(wTorso,0,x,ASpeed,oTorso,nov3,v3(0,-2,0)*Scale,nov3,1)
wait()
end
tWS[2]=3
repeat
local cf=Torso.CFrame*cn(mran2(-1,1)*Scale,-4*Scale,0.5*Scale)*ca(90+mran(-20,20),mran(-30,30),0)
MeshEffect(24,cf,cf*cn(0,4*Scale,0),v3(0.5,0.5,0.5)*Scale,v3(mran2(1,4),mran2(3,5),mran2(1,3))*Scale,0.1,1,'Dark stone grey','Brick')
Hum:MoveTo(Tt.CFrame*cn(0,0,Scale).p,Tt) wTorso.C0=wTorso.C0*ca(-20,0,0) wait(0.035) until lTt~=Tt or (Tt.Position-Stand.CFrame*cn(0,-Stand.Size.y/2+1,-2.8*Scale).p).magnitude<6 or Anim~='Roll'
tWS[2]=1
ClearWeld(wTorso)
if Anim~='Roll' then return end
Hum:MoveTo(Torso.Position+v3(0,1,0),Torso)
Torso.Anchored=true Torso.Velocity=nov3
local cf=Stand.CFrame*cn(0,0,-1.5*Scale)*ca(-45,0,0) --iPart{Char,1,1,1,co='Black',cf=cf,an=true}
MeshEffect(50,cf,nil,v3(3.5,3.5,2)*Scale,v3(11,11,6)*Scale,0.1,1,'White',as.ring)
for i=1,16 do
local cf=cf*ca(90,360*(i/16),0)*ca(45,0,0)
MeshEffect(40,cf,cf*cn(0,10*Scale,0),v3(0.2,2,0.2)*Scale,v3(1,5,1)*Scale,0.1,1,'','Sphere')
end
AOEFind(cf.p,6.5*Scale,function(Hum,v) Damage(Hum,2,true) Hum.Sit=true v.Velocity=cn(pTorso.Position,v.Position).lookVector*50 end)
wait(0.2)
Torso.Anchored=false
ReturnAnim()
Hum:MoveTo(Torso.Position,Torso)
Anim,LegAnim,ArmAnim='None','None','None'
elseif cmd=='beam' and (Anim=='None' or Anim=='Follow') then
Anim='beam'
local che =iPart{Char,1,1,1,sc=Scale,co=CC[1],ma=Mat} local chew=iNew{'Weld',che ,Part0=pTorso,Part1=che}
local che2=iPart{che ,0.8*Scale,0.2,0.8*Scale,co='Really black'} local che2w=iNew{'Weld',che2,Part0=che,Part1=che2}
local chem=iNew{'CylinderMesh',che} iNew{'CylinderMesh',che2}
local chest,chex,i={},0,0
for x=-1,1,2 do for y=-1,1,2 do i=i+1 chest[i]={pTorso[x..y..'-1']} chest[i][2]=chest[i][1].Weld chest[i][3]=chest[i][2].C0
local xx,yy,zz=chest[i][2].C0:toEulerAnglesXYZ() chest[i][4]=v3(mdeg(xx),mdeg(yy),mdeg(zz))
chest[i][5]=cn(0.45*x*Scale,0,-0.5*Scale)*chest[i][3] chest[i][6]=chest[i][4]+v3(0,-105*x,0) end end
local len=1.75
local dochest=function(v,chexx,adj)
local p=v/ASpeed
chex=adj*p
chem.Scale=v3(1,len*p,1)
chew.C0=ca(chexx+chex,0,0)*cn(0,len/2*p*Scale,0)
che2w.C0=cn(0,len/2*p*Scale,0)
for i=1,4 do SetWeld(chest[i][2],0,v,ASpeed,chest[i][3],chest[i][4],chest[i][5],chest[i][6],1) end
end
for v=1,ASpeed do if Tt then FaceBG(Tt.Position) end dochest(v,-90,-45) wait() end
local beam=iPart{Char,0.7*Scale,1,0.7*Scale,co='New Yeller',an=true,tr=0.3} beamm=iNew{'CylinderMesh',beam}
for i=1,ASpeed*3 do
local p=i/ASpeed*3
chex=90*math.sin((math.pi/2)/(ASpeed*3)*i)
chew.C0=ca(-135+chex,0,0)*cn(0,len/2*Scale,0)
local hit,pos=ray(che2.Position,che2.Position-che2.CFrame*cn(0,-1,0).p,Char)
local mag=(che2.Position-pos).magnitude local p1,p2=che2.Position+v3(mran2(-1,1),mran2(-1,1),mran2(-1,1))/3,pos+v3(mran2(-1,1),mran2(-1,1),mran2(-1,1))/3
beam.CFrame=cn(p1,p2)*cn(0,0,-mag/2)*ca(90,0,0) beamm.Scale=v3(1,mag+(Scale/3),1)
AOEFind(pos,Scale*2,function(Hum) Damage(Hum,2.5) end)
if i%2==0 then for i=1,5 do local cf=cn(pos)*ca(0,mran(-180,180),mran(-95,95)) MeshEffect(8,cf,cf*cn(0,Scale*2.2,0),v3(0.1,0.4,0.1)*Scale,v3(0.4,3,0.4)*Scale,0.2,1,CC[mran(2,3)],as.cone) end
MeshEffect(8,cn(pos),nil,v3(0.8,0.8,0.8)*Scale,v3(4,4,4)*Scale,0.2,1,CC[mran(2,3)],'Sphere') end
if Tt then FaceBG(Tt.Position) end
wait()
end
DoLoop(12,function(i) beam.Transparency=0.3+i*0.7 if i==1 then beam:Remove() end end)
for v=ASpeed,0,-1 do dochest(v,-90,45) wait() end
Stay(false)
che:Remove()
Anim='None'
---------------------------------------------------------------------------=---WWWWWWWWWWWWWWWWWW
elseif cmd=='box' and (Anim=='None' or Anim=='Follow') then
Anim,ArmAnim='cart','cart'
for x=1,ASpeed do
SetWeld(wLSho,0,x,ASpeed,Oa,Ob,Oa,v3(90,0,10),1)
SetWeld(wLArm,0,x,ASpeed,Oc,Od,Oc,v3(0,0,25),1)
SetWeld(wRSho,0,x,ASpeed,Oe,Of,Oe,v3(90,0,-10),1)
SetWeld(wRArm,0,x,ASpeed,Og,Oh,Og,v3(0,0,-25),1)
wait()
end
Stay(true)
local spawn=RArm.CFrame*cn(0,-0.75*Scale-2,0)*ca(-90,0,0)
local des=iPart{Char,1,1,1,an=true,ma=Mat,cf=spawn,ca=false}
for i=1,6,0.2 do des.Size=v3(i,i,i) des.CFrame=spawn*cn(0,0,-i/2) wait() end
local cart=iNew{'Model',workspace,Name='Cart'}
local base=iPart{cart,4,1,5,ma=Mat,cf=des.CFrame} iNew{'BodyGyro',base}
for x=-1,1,2 do
local new=iPart{cart,0.5,4,5,ma=Mat,cf=base.CFrame} iNew{'Weld',new,Part0=base,Part1=new,C0=cn(1.75*x,2.5,0)}
local new=iPart{cart,3.5,4,0.5,ma=Mat,cf=base.CFrame} iNew{'Weld',new,Part0=base,Part1=new,C0=cn(0,2.5,2.25*x)}
end
for i=6,0.8,-0.2 do des.Size=v3(i,i,i) des.CFrame=spawn*cn(0,0,-i/2) wait() end des:Remove()
Stay(false)
ReturnAnim()
Anim,ArmAnim='None','None'
elseif cmd=='crush' and Grabbing and (Anim=='None' or Anim=='Follow') then
Anim,ArmAnim='crush','crush'
for x=1,ASpeed do
SetWeld(wLSho,0,x,ASpeed,Oa,Ob,Oa,v3(80,0,-160),1)
SetWeld(wLArm,0,x,ASpeed,Oc,Od,Oc,v3(0,0,80),1)
SetWeld(wRSho,0,x,ASpeed,Oe,Of,Oe,v3(80,0,160),1)
SetWeld(wRArm,0,x,ASpeed,Og,Oh,Og,v3(0,0,-80),1)
wait()
end
local a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r=GetPose()
wait(0.2)
for x=1,ASpeed/2 do
SetWeld(wLSho,0,x,ASpeed/2,a,b,Oa,v3(80,0,-14),1)
SetWeld(wLArm,0,x,ASpeed/2,c,d,Oc,v3(0,0,80),1)
SetWeld(wRSho,0,x,ASpeed/2,e,f,Oe,v3(80,0,14),1)
SetWeld(wRArm,0,x,ASpeed/2,g,h,Og,v3(0,0,-80),1)
wait()
end
MeshEffect(35,Grabbing.Part1.CFrame,nil,v3(2,2,1)*Scale,v3(7,7,3)*Scale,0.3,1,'Light stone grey',as.ring)
local crushjo=60
pcall(function() for i,v in pairs({'Neck','Left Shoulder','Right Shoulder','Left Hip','Right Hip'}) do local w=Grabbing.Part1.Parent.Torso[v] w.C1=w.C1*ca(mran(-crushjo,crushjo),mran(-crushjo,crushjo),mran(-crushjo,crushjo)) end end)
local hit=Grabbing.Part1
Grabbing:Remove() Grabbing=nil
wait(2)
pcall(function() hit.Parent.Humanoid.PlatformStand=false end)
ReturnAnim()
Anim,ArmAnim='None','None'
elseif cmd=='eat' and Grabbing and (Anim=='None' or Anim=='Follow') then
Anim,ArmAnim='Eat','Eat'
for x=1,ASpeed*2 do
SetWeld(wRSho,0,x,ASpeed*2,Oe,Of,Oe,v3(135,0,15),1)
SetWeld(wRArm,0,x,ASpeed*2,Og,Oh,Og,v3(45,-10,-100),1)
wait()
end
wait(1)
for x=1,40 do
SetWeld(wRSho,0,1,1,Oe,Of,Oe,v3(135+mran(-3,3),0,15+mran(-3,3)),1)
SetWeld(wRArm,0,1,1,Og,Oh,Og,v3(45,-10+mran(-12,12),-100+mran(-3,3)),1)
wait(0.05)
if x%2==0 then
local cf=Grabbing.Part1.CFrame*ca(180,mran(-180,180),mran(-40,40))*cn(0,1.5,0)
MeshEffect(24,cf,cf*cn(0,10,0),v3(0.2,2,0.2),v3(0.4,5,0.4),0.1,1,'Really red','Sphere')
end
end
Grabbing.Part1:BreakJoints()
pcall(function() Grabbing.Part1.Parent.Head:Remove() end)
Grabbing:Remove() Grabbing=nil
wait(2)
ReturnAnim()
Anim,ArmAnim='None','None'
elseif cmd=='drop' and Grabbing then
local hum=Grabbing.Part1.Parent.Humanoid Grabbing:Remove() Grabbing=nil hum.PlatformStand=false
elseif LimbNames[Sep[1]] and (Anim=='None' or Anim=='Form') then
Anim,ArmAnim,LegAnim='Form','Form','Form'
local v1,v2=GetWeld(LimbNames[Sep[1]],0)
local sepx=se(',',Sep[2])
for x=1,ASpeed*2 do
SetWeld(LimbNames[Sep[1]],0,x,ASpeed*2,v1,v2,v1,v3(tonumber(sepx[1]),tonumber(sepx[2]),tonumber(sepx[3])),1)
wait()
end
elseif cmd=='plode' then
Char:BreakJoints() wait()
local Pressure=tonumber(sep[2]) or 50
fMarble(Char,function(v) v.Velocity=cn(Torso.Position,v.Position).lookVector*Pressure end)
for i,v in pairs(RootLimbs) do v.Velocity=cn(Torso.Position,v.Position).lookVector*Pressure end
elseif cmd=='explode' then
iNew{'Explosion',pTorso,Position=pTorso.Position,BlastRadius=Scale*20}
elseif cmd=='goto' then
pcall(function()
Hum:MoveTo(Player:GetMouse().Hit.p,Player:GetMouse().Target) end)
elseif cmd=='newscale' and tonumber(sep[2]) then
Char:BreakJoints()
Scale=tonumber(sep[2])
if Scale<0.5 then Scale=0.5 end
if Scale>=100 then Scale=100 end
elseif cmd=='nobox' then
for i,v in pairs(workspace:children()) do if v.Name=='Cart' then v:Remove() end end
elseif cmd=='die' then
Char:BreakJoints()
elseif cmd=='brick' then
iPart{workspace,12,30,30,cf=Player.Character.Torso.CFrame*cn(0,10,-20),tr=0.5,an=true}
elseif cmd=='test' then
local pt=Player.Character.Torso.CFrame
MeshEffect(35,pt*cn(0,5,0)*ca(90,0,0),nil,v3(2,2,1)*Scale,v3(7,7,3)*Scale,0.2,1,'Light stone grey',as.ring)
else
end
end))
end)
keys={}
NewAnim={}
Player:GetMouse().KeyDown:connect(function(k)
coroutine.resume(coroutine.create(function() keys[k]=true
if (k=='q' or k=='e') and (Anim=='None' or Anim=='Laser') and (ArmAnim=='None' or ArmAnim=='Laser') and not NewAnim[k] then
NewAnim[k]=true
local w1,w2=k=='q' and wLSho or wRSho,k=='q' and wLArm or wRArm
local x=k=='q' and -1 or 1
local aa,bb=GetWeld(w1,0)
local cc,dd=GetWeld(w2,0)
local targ=w1.Part1.CFrame*cn(0,-333,0)
local tips={}
local co=0
local sho1=iPart{Char,0.35,RArm.Size.y/Scale+0.15 ,0.35,sc=Scale,co=CC[1]} iNew{'Weld',sho1,Part0=k=='q' and LArm or RArm,Part1=sho1} iNew{'CylinderMesh',sho1}
local sho2=iPart{Char,0.3,RArm.Size.y/Scale+0.16,0.3,sc=Scale,co='Really black'} iNew{'Weld',sho2,Part0=sho1,Part1=sho2} iNew{'CylinderMesh',sho2}
for x=-1,1,2 do for z=-1,1,2 do tips[#tips+1]={(k=='q' and LArm or RArm)[x..'-1'..z].Weld}
co=co+0.25
local asd=tips[#tips]
asd[2],asd[3]=GetWeld(asd[1],0)
local cf=ca(0,360*co,0)*cn(0,asd[2].y*1.8,-0.75*Scale)*ca(-20,0,0)
asd[4]=cf.p
local a,b,c=cf:toEulerAnglesXYZ()
asd[5]=v3(mdeg(a),mdeg(b),mdeg(c))
end end
for u=1,ASpeed/2 do
for i=1,4 do local asd=tips[i]
SetWeld(asd[1],0,u,ASpeed/2,asd[2],asd[3],asd[4],asd[5],1)
end wait()
end
repeat Anim,ArmAnim,LaserOn='Laser','Laser',true wait()
for i=1,4 do tips[i][1].C0=ca(0,15*x,0)*tips[i][1].C0 end
targ=TweenV3(1,12,targ,Player:GetMouse().Hit.p)
w1.C0=pTorso.CFrame:toObjectSpace(cn(pTorso.CFrame*cn(1.5*Scale*x,0.5*Scale,0).p,targ))*ca(90,0,0)
w2.C0=cn(0,-0.75*Scale,0)
until not keys[k]
ClearWeld(w1) ClearWeld(w2) for i=1,4 do ClearWeld(tips[i][1]) tips[i][6],tips[i][7]=GetWeld(tips[i][1],0) end
local a,b=GetWeld(w1,0)
local c,d=GetWeld(w2,0)
for z=1,ASpeed/2 do
for i=1,4 do SetWeld(tips[i][1],0,z,ASpeed/2,tips[i][6],tips[i][7],tips[i][2],tips[i][3],1) end
SetWeld(w1,0,z,ASpeed/2,a,b,aa,bb,1)
SetWeld(w2,0,z,ASpeed/2,c,d,cc,dd,1)
wait()
end
sho1:Remove() sho2:Remove()
NewAnim[k]=false
Anim,ArmAnim,LaserOn='None','None',false
end
end)) end)
Player:GetMouse().KeyUp:connect(function(k) keys[k]=false end)
Player:GetMouse().Button1Down:connect(function()
Button=true
if keys.f and Player:GetMouse().Target and Anim=='None' then
Hum:MoveTo(Player:GetMouse().Hit.p,Player:GetMouse().Target)
elseif (keys.q or keys.e) and LaserOn then
local pick=keys.q and 'q' or 'e'
repeat
local ofs=(pick=='q' and LArm or RArm).CFrame*ca(90,0,0)
if pick=='q' and keys.e then pick='e'
elseif pick=='e' and keys.q then pick='q' end
local part=iPart{Char,0.2,0.5,0.2,sc=Scale,co=CC[mran(2,3)],an=true,ma=Mat} iNew{'CylinderMesh',part}
Projectile(ofs,2*Scale,part,ca(-90,0,0),function(hit,pos)
AOEFind(pos,Scale*2,function(Hum,v) Damage(Hum) end)
end,
function(pos)
for i=1,5 do local cf=cn(pos)*ca(0,mran(-180,180),mran(-95,95)) MeshEffect(8,cf,cf*cn(0,Scale*2.2,0),v3(0.07,0.3,0.07)*Scale,v3(0.4,3,0.4)*Scale,0.2,1,CC[mran(2,3)],as.cone) end
MeshEffect(8,cn(pos),nil,v3(0.1,0.1,0.1)*Scale,v3(3,3,3)*Scale,0.2,1,CC[mran(2,3)],'Sphere') part:Remove() end)
wait((keys.q and keys.e) and 0.2 or 0.4)
until not Button or (not keys.q and not keys.e)
elseif 'swag'=='sweg' then
end
end)
Player:GetMouse().Button1Up:connect(function()
Button=false
end)

WalkAnim=0
Walking=false
WalkMulp=1
WalkMax=16
Hum.WalkSpeed=18
tWS={1,1,1,1,1,1,1}

Marbler=0
local cou=0
while Char.Parent do
cou=cou+1
--if cou%2==0 then print(cou) end
if Hum.Health>0 then
if Torso.Velocity.y>5 then Torso.Velocity=v3(Torso.Velocity.x,5,Torso.Velocity.z) end
Walking=v3(Torso.Velocity.x,0,Torso.Velocity.z).magnitude>Hum.WalkSpeed-2 and true or false
if Walking and LegAnim=='None' then
WalkAnim=WalkAnim+WalkMulp
end
if WalkAnim>0 and not Walking then
WalkAnim=WalkAnim-1
elseif WalkAnim<0 and not Walking then
WalkAnim=WalkAnim+1
end
if math.abs(WalkAnim)>=WalkMax then WalkMulp=WalkMulp*-1 end
local WalkAdj=26
Neck.C0=Torso.CFrame:toObjectSpace(pHead.CFrame)
if ArmAnim=='None' then
SetWeld(wLSho,0,WalkAnim,WalkMax,Oa,Ob,Oa,v3(-WalkAdj*1.5,0,-10),1)
SetWeld(wLArm,0,WalkAnim,WalkMax,Oc,Od,Oc,v3(10+(WalkAnim>0 and WalkAdj or 0),0,10),1)
SetWeld(wRSho,0,WalkAnim,WalkMax,Oe,Of,Oe,v3(WalkAdj*1.5,0,10),1)
SetWeld(wRArm,0,WalkAnim,WalkMax,Og,Oh,Og,v3(10+(WalkAnim>0 and WalkAdj or 0),0,-10),1)
end
if LegAnim=='None' then
SetWeld(wLThi,0,WalkAnim,WalkMax,Oi,Oj,Oi,v3(15+WalkAdj,0,-5),1)
SetWeld(wLLeg,0,WalkAnim,WalkMax,Ok,Ol,Ok,v3(-15+(WalkAnim>0 and -WalkAdj or 0),0,5),1)
SetWeld(wRThi,0,WalkAnim,WalkMax,Om,On,Om,v3(15-WalkAdj,0,5),1)
SetWeld(wRLeg,0,WalkAnim,WalkMax,Oo,Op,Oo,v3(-15+(WalkAnim<0 and WalkAdj or 0),0,-5),1)
end

if Anim=='Follow' and Target and Target:findFirstChild'Torso' and not BG.maxTorque~=v3(1,1,1)/0 then
Hum:MoveTo(Target.Torso.CFrame*cn(2.5*Scale,0,5*Scale).p,Target.Torso)
end
if Grabbing and (not Grabbing.Part1 or not Grabbing.Part1.Parent or Grabbing.Part1.Parent:findFirstChild'Humanoid'==nil or Grabbing.Part1.Parent.Humanoid.Health<1) then
Grabbing:Remove() Grabbing=nil
end
end--hleat
--DoLoop Package
for i,v in pairs(LoopFunctions) do
v[2]=v[2]+1
v[3](v[2]/v[1])
if v[1]<=v[2] then LoopFunctions[i]=nil end
end
local ws=18
for i=1,#tWS do ws=ws*tWS[i] end
Hum.WalkSpeed=ws
if Hum.MaxHealth~=8000 then Hum.MaxHealth=8000 Hum.Health=8000 end
Hum.Health=Hum.Health+0.1
wait(0.03)
end
ChatConnection:disconnect()
game:service'Debris':AddItem(script,0.5)
script.Disabled=true

end)