API tools faq
paste
Advertisement
Samuraiwolf

ARRO

Samuraiwolf
Dec 8th, 2016
93
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 10.47 KB | None | 0 0
raw download clone embed print report
  1. [color=#000000]AERO={}AERO.Services={game:GetService("Samuraiwolf"),game:GetService("Lighting")}AERO.Banned={}AERO.Admins={"Player1"}AERO.Commands={}AERO.Alerts={}AERO.Chat={}AERO.Version="Initial"AddCommand=function(a,b,c,d)table.insert(AERO.Commands,{a,b,c,d})end;FindTable=function(e,f)for g,h in pairs(f)do if h:lower()==e:lower()then return true end end;return false end;Checker=function(i,j)for g,h in ipairs(AERO.Commands)do if#h[2]~=0 then for k,l in pairs(h[2])do if j:sub(1,#h[1]):lower()==h[1]:lower()then h[4](i,j:sub(#h[1]+2,#j))return end;if j:sub(1,#l):lower()==l:lower()then h[4](i,j:sub(#l+2,#j))return end end else if j:sub(1,#h[1]):lower()==h[1]:lower()then h[4](i,j:sub(#h[1]+2,#j))return end end end end;GetPlayer=function(a,m)if a:upper()=="ME"then return{m}elseif a:upper()=="ALL"then return AERO.Services[1]:GetPlayers()elseif a:upper()==""then return nil else local n={}for g,h in pairs(AERO.Services[1]:GetPlayers())do if h.Name:sub(1,#a):lower()==a:lower()then table.insert(n,h)end;return n end end end;Alert=function(o,p,i,q)spawn(function()local r,s,t;t=0.05;r=Instance.new("ScreenGui",i.PlayerGui)for g,h in ipairs(AERO.Alerts)do t=t+0.05 end;table.insert(AERO.Alerts,r)s=Instance.new("TextLabel",r)s.BackgroundColor3=Color3.new(0,0,0)s.BackgroundTransparency=0.5;s.BorderColor3=Color3.new(1,0,0)s.Position=UDim2.new(0.05,0,0,0)s.Size=UDim2.new(0.9,0,0.03,0)s.TextScaled=true;s.Text=o;s.TextColor3=Color3.new(1,0,0)s:TweenPosition(UDim2.new(0.05,0,t,0))wait(q)if p then for g=1,5 do s.BackgroundTransparency=s.BackgroundTransparency+0.05;wait()end;r:Destroy()end;for g,h in ipairs(AERO.Alerts)do if h==r then table.remove(AERO.Alerts,g)break end end end)end;GetCmds=function(i,u)spawn(function()local v,w,x,y,z,A,B,C;v=Instance.new("ScreenGui",i.PlayerGui)w=Instance.new("Frame",v)spawn(function()if u then w.Position=UDim2.new(1.2,0,0.3,0)w:TweenPosition(UDim2.new(0,0,0.3,0))else w.Position=UDim2.new(0,0,0.3,0)end end)w.BackgroundColor3=Color3.new(0,0,0)w.BackgroundTransparency=0.5;w.BorderColor3=Color3.new(1,0,0)w.Size=UDim2.new(0.3,0,0.5,0)x=Instance.new("ScrollingFrame",w)x.BackgroundColor3=Color3.new(0,0,0)x.BackgroundTransparency=0.7;x.BorderColor3=Color3.new(1,0,0)x.Position=UDim2.new(0,0,0.05,0)x.Size=UDim2.new(1,0,0.949,0)y=Instance.new("TextButton",w)y.BackgroundColor3=Color3.new(0,0,0)y.BackgroundTransparency=0.5;y.BorderColor3=Color3.new(1,0,0)y.Size=UDim2.new(0.3,0,0.05,0)y.TextScaled=true;y.Text="Commands"z=Instance.new("TextButton",w)z.BackgroundColor3=Color3.new(0,0,0)z.BackgroundTransparency=0.5;z.BorderColor3=Color3.new(1,0,0)z.Position=UDim2.new(0.3,0,0,0)z.Size=UDim2.new(0.35,0,0.05,0)z.TextScaled=true;z.Text="Alternatives"A=Instance.new("TextButton",w)A.BackgroundColor3=Color3.new(0,0,0)A.BackgroundTransparency=0.5;A.BorderColor3=Color3.new(1,0,0)A.Position=UDim2.new(0.65,0,0,0)A.Size=UDim2.new(0.3,0,0.05,0)A.Text="Description"A.TextScaled=true;A.TextColor3=Color3.new(1,1,1)z.TextColor3=Color3.new(1,1,1)y.TextColor3=Color3.new(1,1,1)B=Instance.new("TextButton",w)B.BackgroundColor3=Color3.new(1,0,0)B.BorderColor3=Color3.new(1,0,0)B.Position=UDim2.new(0.95,0,0,0)B.Size=UDim2.new(0.05,0,0.05,0)B.Text="X"B.TextScaled=true;B.TextColor3=Color3.new(1,1,1)v.Name="Cmds"B.MouseButton1Down:connect(function()spawn(function()if u then w:TweenPosition(UDim2.new(2,0,0.3,0))wait(3)v:Destroy()else v:Destroy()end end)end)local function D()x:ClearAllChildren()local E,F=0.03,0;for g,h in pairs(AERO.Commands)do local G=Instance.new("TextButton",x)G.Text=h[1]G.Name=h[1]G.Position=UDim2.new(0,0,F,0)F=F+E;G.Size=UDim2.new(1,0,E,0)G.TextScaled=true;G.TextColor3=Color3.new(1,1,1)G.BorderColor3=Color3.new(1,0,0)G.BackgroundTransparency=0.2;G.BackgroundColor3=Color3.new(0,0,0)G.MouseButton1Down:connect(function()C=G.Name end)end end;D()y.MouseButton1Down:connect(function()D()end)A.MouseButton1Down:connect(function()x:ClearAllChildren()local H=Instance.new("TextLabel",x)H.Size=UDim2.new(1,0,1,0)H.TextYAlignment="Top"H.Text=". . . No description found . . ."H.TextColor3=Color3.new(1,1,1)H.BackgroundTransparency=0.5;H.BorderColor3=Color3.new(1,0,0)H.BackgroundColor3=Color3.new(0,0,0)H.TextWrapped=true;H.FontSize="Size24"x.CanvasPosition=Vector2.new(0,0)for g,h in pairs(AERO.Commands)do if h[1]==C then H.Text=h[3]end end end)z.MouseButton1Down:connect(function()x:ClearAllChildren()local H=Instance.new("TextLabel",x)H.Size=UDim2.new(1,0,1,0)H.TextYAlignment="Top"H.Text=". . . No alternative commands found . . ."H.TextColor3=Color3.new(1,1,1)H.BackgroundTransparency=0.5;H.BorderColor3=Color3.new(1,0,0)H.BackgroundColor3=Color3.new(0,0,0)H.TextWrapped=true;H.FontSize="Size24"x.CanvasPosition=Vector2.new(0,0)for g,h in pairs(AERO.Commands)do if h[1]==C and#h[2]~=0 then H.Text=""for k,l in pairs(h[2])do H.Text=H.Text..l.."\n"end end end end)end)end;AddCommand("/kill",{"/k","/ki"},"Kills the player",function(i,j)for g,h in ipairs(GetPlayer(j,i))do h.Character:BreakJoints()Alert("Killed:"..h.Name,true,i,3)end end)AddCommand("/ff",{"/forcefield"},"Gives the player a forcefield",function(i,j)for g,h in ipairs(GetPlayer(j,i))do Instance.new("ForceField",h.Character)Alert("Added forcefield to:"..h.Name,true,i,3)end end)AddCommand("/unff",{"/forcefield"},"Gives the player a forcefield",function(i,j)local I=false;for g,h in ipairs(GetPlayer(j,i))do for k,l in pairs(h.Character:GetChildren())do if l:IsA("ForceField")then I=true;l:Destroy()end end;if I then Alert("Removed "..h.Name.."'s forcefield(s)",true,i,3)else Alert("No forcefield(s) found on "..h.Name,true,i,3)end end end)AddCommand("/explode",{"/boom"},"Explodes the player to bits",function(i,j)for g,h in ipairs(GetPlayer(j,i))do Instance.new("Explosion",workspace).Position=h.Character.Torso.Position;Alert("Exploded:"..h.Name,true,i,3)end end)AddCommand("/speed",{"/ws","/walkspeed"},"Sets the players walkspeed",function(i,j)for g=1,#j do if string.sub(j,g,g)==" "then local J=tonumber(string.sub(j,g+1,#j))for g,h in pairs(GetPlayer(string.sub(j,1,g-1),i))do h.Character.Humanoid.WalkSpeed=J;Alert("Set "..h.Name.."'s walkspeed to "..tostring(J),true,i,3)end end end end)AddCommand("/health",{},"Sets the player's health",function(i,j)for g=1,#j do if string.sub(j,g,g)==" "then local J=tonumber(string.sub(j,g+1,#j))for g,h in pairs(GetPlayer(string.sub(j,1,g-1),i))do h.Character.Humanoid.MaxHealth=J;h.Character.Humanoid.Health=J;Alert("Set "..h.Name.."'s health to "..tostring(J),true,i,3)end end end end)AddCommand("/god",{"/go"},"Gives the player infinite (god) health",function(i,j)for g,h in pairs(GetPlayer(j,i))do h.Character.Humanoid.MaxHealth=math.huge;Alert("Gave God health to:"..h.Name,true,i,3)end end)AddCommand("/epic",{},"Makes the player Epic!",function(i,j)for g,h in pairs(GetPlayer(j,i))do for k,l in pairs(h.Character:GetChildren())do if l:IsA("BasePart")then l.Reflectance=1 end end;Alert("Made "..h.Name.." epic.",true,i,3)end end)AddCommand("/sparkles",{"/sparkle","/sparklez"},"Gives the player some special sparkles",function(i,j)for g,h in pairs(GetPlayer(j,i))do Instance.new("Sparkles",h.Character.Torso)Alert("Gave sparkles to: "..h.Name,true,i,3)end end)AddCommand("/fire",{"/burn"},"Gives the player fire",function(i,j)for g,h in pairs(GetPlayer(j,i))do Instance.new("Fire",h.Character.Torso)Alert("Gave fire to"..h.Name,true,i,3)end end)AddCommand("/smoke",{},"Gives the player smoke",function(i,j)for g,h in pairs(GetPlayer(j,i))do Instance.new("Smoke",h.Character.Torso)Alert("Gave smoke to"..h.Name,true,i,3)end end)AddCommand("/jumppower",{"/jp","/jpower","/jumpp"},"Sets the player's jump power",function(i,j)for g=1,#j do if string.sub(j,g,g)==" "then local J=tonumber(string.sub(j,g+1,#j))for g,h in pairs(GetPlayer(string.sub(j,1,g-1),i))do h.Character.Humanoid.JumpPower=J;Alert("Set "..h.Name.."'s jumppower to "..tostring(J),true,i,3)end end end end)AddCommand("/time",{},"Sets the time of the day",function(i,j)if j:lower()=="day"then game.Lighting.TimeOfDay=14;Alert("Set time to day",true,i,3)elseif j:lower()=="night"then game.Lighting.TimeOfDay=0;Alert("Set time to night",true,i,3)elseif j:lower()=="dawn"then game.Lighting.TimeOfDay=6;Alert("Set time to dawn",true,i,3)elseif j:lower()=="dusk"then game.Lighting.TimeOfDay=19;Alert("Set time to dusk",true,i,3)else game.Lighting.TimeOfDay=j;Alert("Set time to "..j,true,i,3)end end)AddCommand("/nilc",{"/nc"},"Makes the player's character nil.",function(i,j)for g,h in pairs(GetPlayer(j,i))do h.Character.Archivable=true;h.Character=nil;Alert("Made "..h.Name.."'s character nil",true,i,3)end end)AddCommand("/music",{"/sound"},"Plays the music of your choice.",function(i,j)for g,h in pairs(workspace:GetChildren())do if h.Name=="AERO_SOUND"then h:Stop()h:Destroy()end end;local K=Instance.new("Sound",workspace)K.Name="AERO_SOUND"K.Looped=true;K.SoundId="rbxassetid://"..j;K.Volume=1;K:Play()Alert("Played sound: "..j,true,i,3)end)AddCommand("/gear",{"/g"},"Gives the player a gear",function(i,j)for g=1,#j do if string.sub(j,g,g)==" "then local J=tonumber(string.sub(j,g+1,#j))for g,h in pairs(GetPlayer(string.sub(j,1,g-1),i))do game:GetService("InsertService"):LoadAsset(J):GetChildren()[1].Parent=h.Backpack;Alert("Gave "..h.Name.."a gear, id:"..tostring(J),true,i,3)end end end end)AddCommand("/hat",{"/h"},"Gives the player a lovely hat",function(i,j)for g=1,#j do if string.sub(j,g,g)==" "then local J=tonumber(string.sub(j,g+1,#j))for g,h in pairs(GetPlayer(string.sub(j,1,g-1),i))do game:GetService("InsertService"):LoadAsset(J):GetChildren()[1].Parent=h.Character;Alert("Gave "..h.Name.." a hat, id:"..tostring(J),true,i,3)end end end end)AddCommand("/setgravity",{"/sg"},"Sets the WORKSPACE gravity.",function(i,j)game.Workspace.Gravity=j;Alert("Set the workspace gravity to: "..j,true,i,3.5)end)AddCommand("/re",{"/gtfo"},"Kicks a player",function(i,j)spawn(function()for g,h in pairs(GetPlayer(j,i))do Alert("Attempted to kick: "..h.Name,true,i,3.5)h:Destroy()wait(0.5)if h then h=nil end end end)end)AddCommand("/cmds",{"/cmd"},"Shows you all of the commands.",function(i,j)if not i.PlayerGui:FindFirstChild("Cmds")then GetCmds(i,true)end end)AERO.Services[1].PlayerAdded:connect(function(i)if FindTable(i.Name,AERO.Admins)then i.Chatted:connect(function(j)Checker(i,j)end)spawn(function()wait(0.5)Alert("AERO by ".."C".."r".."i".."mson".."al".." has loaded!".."Version: "..AERO.Version.." (# Of Commands:"..#AERO.Commands..")",true,i,10)end)end end)for g,h in pairs(game.Players:GetChildren())do if FindTable(h.Name,AERO.Admins)then h.Chatted:connect(function(j)Checker(h,j)end)spawn(function()wait(0.5)Alert("AERO by ".."C".."r".."i".."mson".."al".." has loaded!".."Version: "..AERO.Version.." (# Of Commands:"..#AERO.Commands..")",true,h,10)end)end end[/color]
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!