Meelos Commands

This is a script builder command script made mostly by Meelo. It is a very non-conventional one. It uses commands that no other command script has. It also uses a system to prevent removing of the copyright. So, before the script, here are all the commands allowed.

Seatman/Player (Broken)
-Makes a snowman with a seat for a center out of a player
Snowman/Player
-Turns the player into a snowman
Abominable/Player
-Turns the player into a snowman that kills anything it touches
Shutdown
-Shuts a server down
Rebody/Player
-Gives a player a new body
Posses/Player
-Take over someone's body
Deposses/Player
-Removes a player's body
Machine/Player (Made by earth100)
-Gives the player a suit and a bubble that keeps them from falling off the base
Banish/Player
-Kicks a player from the server
Friend/Player (Broken)
-Adds a player to the friends list
Enemy/Player (Broken)
-Adds a player to the enemies list
Shield/Player (Broken)
-Gives the player a force field
Disagree/Player
-Messages appear
-Drains the health of the victim
Burn/Player
-Messages appear
-Drains the health of the victim
Laser/Player
-Kills victim
-Makes a laser beam go from you to him

Keywords:
all
-Everyone
others
-Everyone except for you
self
-You
friends (Broken)
-People on friends list
enemies (Broken)
-People on enemies list

How to use Keywords:
You say "Command/Keyword". Such as, you could say:
Laser/others

local Me = game.Players.Meelo
Friends = {}
--Made by Meelo with anti-Alter technology!
--Do NOT attempt to steal this Command Script
Enemies = {}
function Destroy(Obj)
local A = nil
Obj.Parent = A
end
function Snowman(Other,Killing,Seat)
if(Seat==nil)then Seat = false end
local P = game.Players:findFirstChild(Other)
if(P==nil)then return end
if(P.className~= "Player")then return end
if(P.Character==nil)then return end
if(P.Character:findFirstChild("Torso")==nil)then return end
if(P.Character:findFirstChild("Humanoid")==nil)then return end
if(P.Character:findFirstChild("Head")==nil)then return end
local A = nil
if(Seat)then
A = Instance.new("Seat")
else
A = Instance.new("Part")
end
A.Shape = "Ball"
A.Size = Vector3.new(4,4,4)
A.Color = Color3.new(1,1,1)
A.CanCollide = false
A.Parent = P.Character
local W = Instance.new("Weld")
W.Parent = P.Character.Torso
W.Part0 = W.Parent
W.Part1 = A
W.C0 = CFrame.new(0,3,0)
local b = Instance.new("Part")
b.Shape = "Ball"
b.Size = Vector3.new(6,6,6)
b.Color = Color3.new(1,1,1)
b.CanCollide = false
b.Parent = game.Workspace
b.CFrame = CFrame.new(0,20,0)
local w = Instance.new("Weld")
w.Parent = W.Parent
w.Part0 = w.Parent
w.Part1 = b
w.C0 = CFrame.new(0,-1,0)
P.Character.Torso.Neck.C0 = P.Character.Torso.Neck.C0 + Vector3.new(0,4,0)
if(P.Character:findFirstChild("Left Arm")~=nil)then
P.Character["Left Arm"]:Remove()
end
if(P.Character:findFirstChild("Right Arm")~=nil)then
P.Character["Right Arm"]:Remove()
end
if(P.Character:findFirstChild("Left Leg")~=nil)then
P.Character["Left Leg"]:Remove()
end
if(P.Character:findFirstChild("Right Leg")~=nil)then
P.Character["Right Leg"]:Remove()
end
if(Killing)then
b.Touched:connect(function(hit)
if(hit.Parent:findFirstChild("Humanoid")~=nil)then
if(hit.Parent ~= A.Parent)then
hit.Parent.Humanoid.Health = 0
end
end
end)
end
Instance.new("ForceField").Parent = P.Character.Torso
P.Character.Head.Name = "Fred"
P.Character.Humanoid.Name = "Hahah"
if(Killing)then
P.Character.Name = "The Abominable Snowman"
else
P.Character.Name = "Frosty The Snowman"
end
if(string.find(P.CharacterAppearance,"http://www.roblox.com/asset?id=5832475",1,true)==nil)then
P.CharacterAppearance = P.CharacterAppearance .. ";http://www.roblox.com/asset?id=5832475"
end
end
function Laser(Other)
local P1 = game.Players:findFirstChild(Other)
if(P1~=nil)then
P1.Character.Humanoid.Health = 0
local P = Instance.new("Part")
local Place0 = Me.Character.Torso.CFrame
local Place1 = P1.Character.Torso.Position
P.formFactor = 0
P.Size = Vector3.new(1,1,(Place0.p - Place1).magnitude)
P.CFrame = CFrame.new((Place0.p + Place1)/2,Place0.p)
P.Parent = game.Workspace
P.Color = Color3.new(1,0,0)
P.Anchored = true
P.CanCollide = false
local E = Instance.new("Explosion")
E.Position = Place1
E.Parent = game.Workspace
for i = 1,20 do
P.Transparency = i*0.05
wait(0.1)
end
Destroy(P)
end
end
function Burn(Other)
local P1 = game.Players:findFirstChild(Other)
if(P1~=nil)then
local M = Instance.new("Message")
M.Parent = game.Workspace
M.Text = Other .. " is a witch! BURN IT WITHOUT TRIAL!!!"
wait(3)
Destroy(M)
for i = 1,100 do
P1.Character.Humanoid.Health = 100-i
wait(0.1)
end
M = Instance.new("Message")
M.Parent = game.Workspace
M.Text = "HA! " .. Other.. " is dead!"
wait(3)
M.Text = "Oh wait... " .. Other .. "'s not a witch."
wait(3)
Destroy(M)
end
end
function Disagree(Other)
local P1 = game.Players:findFirstChild(Other)
if(P1~=nil)then
local M = Instance.new("Message")
M.Parent = game.Workspace
M.Text = Me.Name .. " respectfully disagrees with " .. Other .. "... BURN " .. string.upper(Other)
wait(3)
Destroy(M)
for i = 1,100 do
P1.Character.Humanoid.Health = 100-i
wait(0.1)
end
M = Instance.new("Message")
M.Parent = game.Workspace
M.Text = "HA! " .. Other.. " is dead!"
wait(3)
M.Text = "Yes! " .. Other .. "'s ideas are destroyed."
wait(3)
Destroy(M)
end
end
function Banish(Other)
local P1 = game.Players:findFirstChild(Other)
if(P1~=nil)then
Destroy(P1)
end
end
function Machine(Other)
local me = game.Players:findFirstChild(Other)
if(me~=nil)then

me = me.Character

if(me==nil)then return end

--Shortcuts

  local p = Instance.new("Part")
  p.Parent = game.Workspace
  p.Name = "FollowOrb"
  p.Size = Vector3.new(20,20,20)
  p.Shape = "Ball"
  p.BrickColor = BrickColor.new(1)
  p.Position = Vector3.new(0,30,0)
  p.TopSurface = 0
  p.BottomSurface = 0
  p.Locked = true
  local bp = Instance.new("BodyPosition")
  bp.Parent = p
  bp.maxForce = Vector3.new(9.9e+036, 9.9e+036, 9.9e+036)
  bp.position = Vector3.new(1,1,1)
  local bg = Instance.new("BodyGyro")
  bg.maxTorque = Vector3.new(9.9e+030, 0, 0)

--War Machine

f = Instance.new("ForceField")
f.Parent = me

--Shield

local P = me:GetChildren()
for i=1, #P do
if P[i].className == "Hat" then
Destroy(P[i]) -- WILL NEED TO BE EDITED FOR NON SB!!!
end
end

--Remove Hats

belt1 = Instance.new("Part")
belt1.formFactor = 1
belt1.Size = Vector3.new(2,2,1)
belt1.BrickColor = BrickColor.new(1)
belt1.TopSurface = 0
belt1.CanCollide = false
belt1.Parent = me
belt1.BottomSurface = 0

mesh1 = Instance.new("SpecialMesh")
mesh1.Parent = belt1
mesh1.Scale = Vector3.new(1.2,1.2,1.35)
mesh1.MeshType = "Brick"

weld6 = Instance.new("Weld")
weld6.Part0 = me.Torso
weld6.Part1 = belt1
weld6.Parent = me.Torso

--Torso Complete

belt1 = Instance.new("Part")
belt1.formFactor = 1
belt1.Size = Vector3.new(1,2,1)
belt1.BrickColor = BrickColor.new(1)
belt1.TopSurface = 0
belt1.CanCollide = false
belt1.Parent = me
belt1.BottomSurface = 0

mesh1 = Instance.new("SpecialMesh")
mesh1.Parent = belt1
mesh1.Scale = Vector3.new(1.35,1.2,1.35)
mesh1.MeshType = "Brick"

weld6 = Instance.new("Weld")
weld6.Part0 = me:findFirstChild("Left Leg")
weld6.Part1 = belt1
weld6.Parent = me:findFirstChild("Left Leg")

-- Left Leg

belt1 = Instance.new("Part")
belt1.formFactor = 1
belt1.Size = Vector3.new(1,2,1)
belt1.BrickColor = BrickColor.new(1)
belt1.TopSurface = 0
belt1.CanCollide = false
belt1.Parent = me
belt1.BottomSurface = 0

mesh1 = Instance.new("SpecialMesh")
mesh1.Parent = belt1
mesh1.Scale = Vector3.new(1.35,1.2,1.35)
mesh1.MeshType = "Brick"

weld6 = Instance.new("Weld")
weld6.Part0 = me:findFirstChild("Right Leg")
weld6.Part1 = belt1
weld6.Parent = me:findFirstChild("Right Leg")

-- Right Leg

belt1 = Instance.new("Part")
belt1.formFactor = 1
belt1.Size = Vector3.new(1,2,1)
belt1.BrickColor = BrickColor.new(1)
belt1.TopSurface = 0
belt1.CanCollide = false
belt1.Parent = me
belt1.BottomSurface = 0

mesh1 = Instance.new("SpecialMesh")
mesh1.Parent = belt1
mesh1.Scale = Vector3.new(1.35,1.2,1.35)
mesh1.MeshType = "Brick"

weld6 = Instance.new("Weld")
weld6.Part0 = me:findFirstChild("Right Arm")
weld6.Part1 = belt1
weld6.Parent = me:findFirstChild("Right Arm")

--Right Arm

belt1 = Instance.new("Part")
belt1.formFactor = 1
belt1.Size = Vector3.new(1,2,1)
belt1.BrickColor = BrickColor.new(1)
belt1.TopSurface = 0
belt1.CanCollide = false
belt1.Parent = me
belt1.BottomSurface = 0

mesh1 = Instance.new("SpecialMesh")
mesh1.Parent = belt1
mesh1.Scale = Vector3.new(1.35,1.2,1.35)
mesh1.MeshType = "Brick"

weld6 = Instance.new("Weld")
weld6.Part0 = me:findFirstChild("Left Arm")
weld6.Part1 = belt1
weld6.Parent = me:findFirstChild("Left Arm")

--Left Arm

belt1 = Instance.new("Part")
belt1.formFactor = 1
belt1.Size = Vector3.new(1,1,1)
belt1.BrickColor = BrickColor.new(1)
belt1.TopSurface = 0
belt1.CanCollide = false
belt1.Parent = me
belt1.BottomSurface = 0

mesh1 = Instance.new("SpecialMesh")
mesh1.Parent = belt1
mesh1.Scale = Vector3.new(2.5,1.3,2.5)

weld6 = Instance.new("Weld")
weld6.Part0 = me.Head
weld6.Part1 = belt1
weld6.Parent = me.Head

--Head

belt1 = Instance.new("Part")
belt1.formFactor = 2
belt1.Size = Vector3.new(1,1,1)
belt1.TopSurface = 0
belt1.CanCollide = false
belt1.Parent = me
belt1.BottomSurface = 0
belt1.BrickColor = me.Torso.BrickColor

mesh1 = Instance.new("SpecialMesh")
mesh1.Parent = belt1
mesh1.Scale = Vector3.new(1.5,0.5,1.5)
mesh1.MeshType = "Brick"

weld6 = Instance.new("Weld")
weld6.Part0 = me:findFirstChild("Left Arm")
weld6.Part1 = belt1
weld6.Parent = me:findFirstChild("Left Arm")

--Left Arm Band

belt1 = Instance.new("Part")
belt1.formFactor = 2
belt1.Size = Vector3.new(1,1,1)
belt1.TopSurface = 0
belt1.CanCollide = false
belt1.Parent = me
belt1.BottomSurface = 0
belt1.BrickColor = me.Torso.BrickColor

mesh1 = Instance.new("SpecialMesh")
mesh1.Parent = belt1
mesh1.Scale = Vector3.new(1.5,0.5,1.5)
mesh1.MeshType = "Brick"

weld6 = Instance.new("Weld")
weld6.Part0 = me:findFirstChild("Right Arm")
weld6.Part1 = belt1
weld6.Parent = me:findFirstChild("Right Arm")

--Right Arm Band

belt1 = Instance.new("Part")
belt1.formFactor = 2
belt1.Size = Vector3.new(1,1,1)
belt1.TopSurface = 0
belt1.CanCollide = false
belt1.Parent = me
belt1.BottomSurface = 0
belt1.BrickColor = me.Torso.BrickColor

mesh1 = Instance.new("SpecialMesh")
mesh1.Parent = belt1
mesh1.Scale = Vector3.new(1.5,0.5,1.5)
mesh1.MeshType = "Brick"

weld6 = Instance.new("Weld")
weld6.Part0 = me:findFirstChild("Right Leg")
weld6.Part1 = belt1
weld6.Parent = me:findFirstChild("Right Leg")

--Right Leg Band

belt1 = Instance.new("Part")
belt1.formFactor = 2
belt1.Size = Vector3.new(1,1,1)
belt1.TopSurface = 0
belt1.CanCollide = false
belt1.Parent = me
belt1.BottomSurface = 0
belt1.BrickColor = me.Torso.BrickColor

mesh1 = Instance.new("SpecialMesh")
mesh1.Parent = belt1
mesh1.Scale = Vector3.new(1.5,0.5,1.5)
mesh1.MeshType = "Brick"

weld6 = Instance.new("Weld")
weld6.Part0 = me:findFirstChild("Left Leg")
weld6.Part1 = belt1
weld6.Parent = me:findFirstChild("Left Leg")

--Left Arm Band

  wait(1)
  me.Torso.CFrame = CFrame.new(0,30,0)
  me.Name = " "
  me.Humanoid.MaxHealth = 0
  me.Humanoid.WalkSpeed = 128
  delay(0,function()
while true do
  bp.position = Vector3.new(me.Torso.Position.x,0, me.Torso.Position.z)
  wait()
  p.CFrame = CFrame.new(me.Torso.Position.x,0, me.Torso.Position.z)
  end
end)
end
end
function Deposses(Other)
   local Plyr = game.Players:findFirstChild(Other)
   if(Plyr==nil)then return end
   Destroy(Plyr.Character)
end
function Rebody(Other)
   local Plyr = game.Players:findFirstChild(Other)
   if(Plyr == nil)then return end
   local Char = Instance.new("Model")
   Char.Parent = game.Workspace
   Char.Name = Other
   local Base = Instance.new("Part")
   Base.formFactor = 0
   Base.Color = Color3.new(1,1,1)
   local Torso = Base["Clone"](Base)
   Torso.Size = Vector3.new(2,2,1)
   Torso.Name = "Torso"
   Torso.CFrame = CFrame.new(1.06483041e-020, 23.9954472, 25.5, -1, -2.43469607e-021, -1.30447516e-022, -2.43469607e-021, 1, 3.04094353e-021, 1.30447516e-022, 3.04094353e-021, -1)
   Torso.Parent = Char
   local LArm = Base["Clone"](Base)
   LArm.Name = "Left Arm"
   LArm.Size = Vector3.new(1,2,1)
   LArm.Parent = Char
   local Head = Base["Clone"](Base)
   Head.Name = "Head"
   Head.Size = Vector3.new(2,1,1)
   Head.Parent = Char
   local RArm = LArm["Clone"](LArm)
   RArm.Parent = Char
   RArm.Name = "Right Arm"
   local RLeg = LArm["Clone"](LArm)
   RLeg.Parent = Char
   RLeg.Name = "Right Leg"
   local LLeg = LArm["Clone"](LArm)
   LLeg.Parent = Char
   LLeg.Name = "Left Leg"
   local HMesh = Instance.new("SpecialMesh")
   HMesh.Scale = Vector3.new(1.25,1.25,1.25)
   HMesh.MeshType = 0
   HMesh.Parent = Head
   local Face = Instance.new("Decal")
   Face.Texture = "rbxasset://textures\face.png"
   Face.Parent = Head
   local Shirt = Instance.new("Decal")
   Shirt.Texture = "http://www.roblox.com/asset/?id=5126735"
   Shirt.Parent = Torso
   local RShoulder = Instance.new("Motor")
   RShoulder.Parent = Torso
   RShoulder.Part0 = Torso
   RShoulder.Part1 = RArm
   RShoulder.C0 = CFrame.new(1, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
   RShoulder.C1 = CFrame.new(-0.5, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
   RShoulder.Name = "Right Shoulder"
   RShoulder = Instance.new("Motor")
   RShoulder.Parent = Torso
   RShoulder.Part0 = Torso
   RShoulder.Part1 = LArm
   RShoulder.C0 = CFrame.new(-1, 0.5, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
   RShoulder.C1 = CFrame.new(0.5, 0.5, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
   RShoulder.Name = "Left Shoulder"
   RShoulder = Instance.new("Motor")
   RShoulder.Parent = Torso
   RShoulder.Part0 = Torso
   RShoulder.Part1 = RLeg
   RShoulder.C0 = CFrame.new(1, -1, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
   RShoulder.C1 = CFrame.new(0.5, 1, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)
   RShoulder.Name = "Right Hip"
   RShoulder = Instance.new("Motor")
   RShoulder.Parent = Torso
   RShoulder.Part0 = Torso
   RShoulder.Part1 = LLeg
   RShoulder.C0 = CFrame.new(-1, -1, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
   RShoulder.C1 = CFrame.new(-0.5, 1, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)
   RShoulder.Name = "Left Hip"
   RShoulder = Instance.new("Snap")
   RShoulder.Parent = Torso
   RShoulder.Part0 = Torso
   RShoulder.Part1 = Head
   RShoulder.C0 = CFrame.new(0, 1, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0)
   RShoulder.C1 = CFrame.new(0, -0.5, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0)
   RShoulder.Name = "Left Hip"
   local Humanoid = Instance.new("Humanoid")
   Humanoid.RightLeg = RLeg
   Humanoid.LeftLeg = LLeg
   Humanoid.Parent = Char
   Char.Controller = 7
   Plyr.Character = Char
end      
function Chatted(msg,reci)
if(string.sub(msg,1,4)=="/sc ")then
Chatted(string.sub(msg,5),reci)
return
end
if(string.find(msg,"all")~=nil)then
local P = game.Players:GetChildren()
for l = 1,#P do
delay(0,function()Chatted(string.gsub(msg,"all",P[l].Name),reci);end)
end
end
if(string.find(msg,"friends")~=nil)then
for l = 1,#Friends do
delay(0,function()Chatted(string.gsub(msg,"friends",Friends[l].Name),reci);end)
end
end
if(string.find(msg,"enemies")~=nil)then
for l = 1,#Enemies do
delay(0,function()Chatted(string.gsub(msg,"enemies",Enemies[l].Name),reci);end)
end
end
if(string.find(msg,"others")~=nil)then
local P = game.Players:GetChildren()
for l = 1,#P do
if(P[l].Name ~= Me.Name)then
delay(0,function()Chatted(string.gsub(msg,"others",P[l].Name),reci);end)
end
end
end
function Posses(Other)
   local Plyr = game.Players:findFirstChild(Other)
   if(Plyr==nil)then return end
   Me.Character = Plyr.Character
end
if(string.find(msg,"self")~=nil)then
Chatted(string.gsub(msg,"self",Me.Name),reci)
end
if(string.sub(msg,1,6)=="Laser/")then
Laser(string.sub(msg,7))
end
if(string.sub(msg,1,5)=="Burn/")then
Burn(string.sub(msg,6))
end
if(string.sub(msg,1,9)=="Disagree/")then
Disagree(string.sub(msg,10))
end
if(string.sub(msg,1,7)=="Shield/")then
Shield(string.sub(msg,8))
end
if(string.sub(msg,1,6)=="Enemy/")then
table.insert(Enemies,string.sub(msg,7))
end
if(string.sub(msg,1,7)=="Friend/")then
table.insert(Friends,string.sub(msg,8))
end
if(string.sub(msg,1,7)=="Banish/")then
Banish(string.sub(msg,8))
end
if(string.sub(msg,1,8)=="Machine/")then
Machine(string.sub(msg,9))
end
if(string.sub(msg,1,9)=="Deposses/")then
Deposses(string.sub(msg,10))
end
if(string.sub(msg,1,7)=="Posses/")then
Posses(string.sub(msg,8))
end
if(string.sub(msg,1,7)=="Rebody/")then
Rebody(string.sub(msg,8))
end
if(msg == "Shutdown")then
Destroy(game.NetworkServer)
end
if(string.sub(msg,1,8)=="Snowman/")then
Snowman(string.sub(msg,9),false)
end
if(string.sub(msg,1,11)=="Abominable/")then
Snowman(string.sub(msg,12),true)
end
if(string.sub(msg,1,8)=="Seatman/")then
Snowman(string.sub(msg,9),false,true)
end
end
function Chara(L,J)
if(J==nil)then J = L end
return string.sub(script.Source,string.find(script.Source,"Friends")+L,string.find(script.Source,"Friends")+J)
end
Me[string.upper(string.char(99)) .. Chara(49) .. Chara(17) .. Chara(46) .. Chara(37) .. Chara(25) .. Chara(18)]:connect(Chatted)
Unless otherwise stated, the content of this page is licensed under Creative Commons Attribution-NonCommercial 3.0 License

SSL configuration warning

This site has been configured to use only SSL (HTTPS) secure connection. SSL is available only for Pro+ premium accounts.

If you are the master administrator of this site, please either upgrade your account to enable secure access. You can also disable SSL access in the Site Manager for this site.