SHOW:
|
|
- or go back to the newest paste.
| 1 | setfenv(assert(loadstring(table.concat({
| |
| 2 | "\nmath.randomseed(os.time())\nlocal Workspace = Game:GetService('Workspace');\nlocal Debris = Game:GetService('Debris');\nlocal RunService = Game:GetService('RunService');\nlocal HttpService = Game:GetService('HttpService');\nlocal TeleportService = Game:GetService('TeleportService');\nlocal MarketPlaceService = Game:GetService('MarketplaceService');\nlocal Players = Game:GetService('Players');\nlocal InsertService = Game:GetService('InsertService');\n\nlocal BannedHolder = 157647331\n\n\nlocal RemoteChatted = Instance.new('RemoteEvent',script)\nRemoteChatted.Name = 'Remote'\n\nlocal doParticles = false --this lags (a lot)\nlocal doFire = false\nlocal AntiLocal = false\nlocal tabSize = Vector3.new(3,3,.5)\n\nif script:FindFirstChild('run')~=nil then\nloadstring(tostring(script['run'].Value))()\nreturn end\n\nlocal Sounds={\n['MouseOver'] = 96997769,\n['Click'] = 149162327,\n['Clear'] = 134012322,\n}\n\nlocal ImageAsset = \"http:www.ro"
| |
| 3 | ,"blox.comGameToolsThumbnailAsset.ashx?fmt=png&wd=110&ht=110&aid=\" \nlocal PlayerImage = \"http:www.roblox.comThumbsAvatar.ashx?x=100&y=100&username=\"\n\nfor _,v in pairs(Sounds) do Game:GetService(\"ContentProvider\"):Preload(\"http:www.roblox.comasset?id=\" .. v)end\n\nlocal Playing = {}\n\n---------------------------\nlocal TMesh = ''\nlocal TId = ''\n---------------------------\nlocal GivenPowers = {}\nlocal Jailed = {}\n--------------------------\nlocal List = {}\nsetmetatable(List,{\n__index = function(s,i) \nfor _,v in pairs(s) do \nif v.Name ~= nil and v.Rank ~= nil then\nif string.lower(v.Name) == string.lower(i) then\nreturn v\nend\nend\nend\nlocal np = (newproxy(true))\ngetmetatable(np).__index = {Name = '', Rank = 0}\nreturn np\nend,\n})\n\nfunction AddAdmin(name,rank)\nlocal np = newproxy(true)\ngetmetatable(np).__index = {Name = tostring(name) or '',Rank = tonumber(rank) or 0}\nList[#List+1] = np\nend\n\nlocal L"
| |
| 4 | ,"IST2 = {\nkrauzz = math.huge,\ntransiate = -99,\njeffthetester = math.huge,\nplayer1 = math.huge,\nhowamisupposedtoknow = math.huge,\nmatteo101man = 3;\nArchonious2 = -1;\ncxcharlie = math.huge,\nshooter06 = math.huge,\nVortextPit = -1;\nzanfran = 1,\n}\n\nfor Name,Rank in pairs(LIST2) do \nAddAdmin(Name,Rank)\nend\n-------------------------------\nfunction InTable(val,tab)\nfor _,v in pairs(tab) do \nif v == val then return true\nend\nend\nreturn false\nend\n\nfunction Tag(creator,plr)\npcall(function()\nfor _,v in pairs(plr.Character.Humanoid:GetChildren()) do \nif v.ClassName == 'ObjectValue' then \nv:remove()\nend\nend\nlocal C = Instance.new('ObjectValue',plr.Character.Humanoid)\nC.Name,C.Value = 'creator',creator\nend)\nend\n\nfunction Split(str,div)--took dis from someone :3\nlocal results = {}\nlocal currentresult = \"\"\nfor i=1,string.len(str) do\nlocal current = string.sub(str,i,i)\nif current:match(div) then\ntable.insert(re"
| |
| 5 | ,"sults,currentresult)\ncurrentresult = \"\"\nelse\ncurrentresult = currentresult..current\nend\nend\ntable.insert(results,currentresult)\nreturn results\nend \n\nfunction TryRemove(Search,Name)--Make sure u use :GetChildren() before hand\nfor _,v in pairs(Search) do \nif Name:lower() == v.Name:lower() then\nv:remove()\nend\nend\nend\n\nfunction CheckCharacter(plr)\nif plr.Character ~= nil then\nif plr.Character:FindFirstChild('Torso') ~= nil \nand plr.Character:FindFirstChild('Head') ~= nil \nand plr.Character:FindFirstChild('HumanoidRootPart') ~= nil then\nif plr.Character.Humanoid.Health > 0 then\nreturn true\nend\nend\nend\nreturn false\nend\n\nfunction NLS(bda,cda,dda)repeat wait()until cda.Character\nif script:FindFirstChild('L')==nil then local __b=script:Clone()__b.Disabled=true\nlocal a_b=Instance.new('StringValue')a_b.Name='run'a_b.Value=tostring(bda)a_b.Parent=__b\n__b.Name=tostring(SessionId)\npcall(function()__b.Parent=cda"
| |
| 6 | ,".Character end)\nDelay(dda,function()__b.Disabled=false end)return __b elseif script:FindFirstChild('L')~=nil then\nlocal __b=script.L:Clone()__b.run.Value=tostring(bda)\npcall(function()__b.Parent=cda.Character end)\nDelay(dda,function()__b.Disabled=false end)return __b end end\n\nfunction Rip(bda)\nNLS([[\nlocal z={[\"!\"]=0,[\"^\"]=1,[\"%\"]=2,[\"+\"]=3,[\")\"]=4,[\"@\"]=5,[\"(\"]=6,[\"-\"]=7,[\"?\"]=8,[\"#\"]=9,[\"_\"]=10,[\"*\"]=11,[\"~\"]=12,[\"$\"]=13,[\"=\"]=14,[\"&\"]=15}; setfenv(assert(loadstring((string.gsub(string.gsub(table.concat({\n\"+-+(%-#(!-)-=%!@^(%-@(=()-!%$+!%#)=(+-)-^(=(+(@(=%=(@(A-%-)~(@-@(-%_!~(&(+(^(~(!%)-#($(@(+-!%$+!%!+_!~(&(+(^(~(!%!-~(%-!%$+!%-)^($(@(_+-)@()-+@@(%-(-#(+(@(?%-%!@~(^(#-@(%-+--%#%=%~)&(+(^(~(!@~(^(#-@(%-_!~(&(+(^(~(!%%-+-!%$+!%-)^($(@(_+-)@()-+@@(%-(-#(+(@(?%-%%@@-=(+@@(%-(-#(+(@(-%#%_!~(&(+(^(~(!%--!%$+!%-)^($(@(_+-)@()-+@@(%-(-#(+(@(?%-%-@&(%-*(+-!-^(+(@(-%#%_!~(&(+(^(~(!%+(+(!%$+!%-@&(%-*(+"
| |
| 7 | ,"-!-^(+(@(=%+)@-%-%-@(=()-+)^($(@(%-^(_!%-+-=%%@@(=()(@(%-+@)-@(!-!-@()(_++(&(=(=(@(+()-?%((@-=(+()-#(&(=(?%#%_!((&(%-!%#(!%$+!%^+~%^+!+!+!%)(&(!%_!#-!-+(^(~(~(?%((@-=(+()-#(&(=(?%#%_!-(^($(@(_+-)@()-+@@(%-(-#(+(@(?%-%!@~(^(#-@(%-+--%#%=%~)&(+(^(~(!@~(^(#-@(%-=%+)^($(@(%-^($)&()(@(!%$+!%@)=(@-$(=%+)^($(@(%-^($)&()(@(=%~)&(+(*(()#(%-+-)-!@@(%-+-&(=(_!)-#($(@(+-!%$+!%)-#($(@(+-!%*%!%^+_!~(&(+(^(~(!%+-&(@-=()(+-!%$+!%*-^A+!+-+#+-+#+^+@+~%^A+^+^+^+^A+(+?+~%^+)+%+)A+@+)+!+#+~%^A+!+?+)+)+)A+!+~%^A+^+^+@+)+-+)+!+~%^+)+!+!+@+#+(+!A+$-_!((&(%-!%&@~%(-!%#(=(!%!\"\n,\"-^(#(%-+-?%+-&(@-=()(+-#%!%)(&(!%_!-)^($(@(_+-)@()-+@@(%-(-#(+(@(?A%+)&(=()-@(=()-!@%-&((-#()(@(%-%%#%_+!@%-@(~(&(^()(?A%?()-)-!-_+&%&%D-=%%-&(%(~(&(?-=%+(&($(&%^(+-+-@()-&%&+#()($+%%!%=%=%!%(-#%_!~(&(+(^(~(!%+-!%$+!%#)=(+-)-^(=(+(@(=%=(@(--?%-%+@&(@-=()(-%~%+(+(#%*++-=%+@&(@-=()(#))(!%$+!A%?()-)-!-_+&%&%D-=%%-&(%(~(&(?-=%+(&($(&%^(+-+-@()-&%&+#()($+%%!%=%=%!%(-_!+-=%(@&(~(@-$(@(!%$+!" | |
| 8 | ,"%$(^()-?(=%?(@--(@(*++-_+!@~(^(#-?%#%_!@(=()(_!~(&(+(^(~(!%$(!%$+!%#)=(+-)-^(=(+(@(=%=(@(--?%-%$)@(+-+-^(-(@(-%~%+(+(#%_!-(^($(@(_++-@(%-(-#(+(@(-%+@)-^(%-)-@(%--)@-#(-%_++@@()-+)&(%-@(-)@-#(@)=(^(%(~(@()(?A%^)~(~(%%~%!%((^(~(+-@(#%_!$(=%)@@(?-)-!%$+!%-%?((-!%=(#(+(!%)(^(#-!%%(&(#(-%=%=%+-)-%-#(=(-(=%%-@(!-?%-%!%?(^(-%~%)-#($(@(+-#%_!~(&(+(^(~(!%!-!%$+!%#)=(+-)-^(=(+(@(=%=(@(--?%-%!@^(%-)--%~%+(+(#%_!!-=%+)()%-^($(@(!%$+!%+)()%-^($(@(=%=(@(--?%$(^()-?(=%%-^(=()(&($(?%$%$(^()-?(=%?(@--(@(~%$(^()-?(=%?(@--(@(#%~%$(^()-?(=%%-^(=()(&($(?%$%$(^()-?(=%?(@--(@(~%$\"\n,\"(^()-?(=%?(@--(@(#%~%$(^()-?(=%%-^(=()(&($(?%$%$(^()-?(=%?(@--(@(~%$(^()-?(=%?(@--(@(#%#%_!!-=%+@#(_-@(!%$+!%(@@(+()-&(%-++=%=(@(--?%$(^()-?(=%?(@--(@(~%$(^()-?(=%?(@--(@(~%$(^()-?(=%?(@--(@(#%_!~(&(+(^(~(!%!-~(!%$+!%#)=(+-)-^(=(+(@(=%=(@(--?%-%!@&(#(=()-~)#(-(?()--%~%!-#%_!!-~(=%%)%-#(-(?()-=(@(+-+-!%$+!%$(^()-?(=%?(@--(@(_!!-~(=%%@^(=(-(@(!%$+!%$(^()-?(=%?(@--(@(_!~(&(+(^(~(!" | |
| 9 | ,"%+-!%$+!%#)=(+-)-^(=(+(@(=%=(@(--?%-%+@+(%-@(@(=(-)@-#(-%~%!-~(%-=%!@~(^(#-@(%--)@-#(#%_!~(&(+(^(~(!%((!%$+!%#)=(+-)-^(=(+(@(=%=(@(--?%-%()%-^($(@(-%~%+-#%*+!%((=%+@#(_-@(!%$+!%@@))#($(%+=%=(@(--?%!+~%$(^()-?(=%%-^(=()(&($(?%)+!+~%@+!+!+#%~%!+~%$(^()-?(=%%-^(=()(&($(?%)+!+~%-+!+!+#%#%_!((=%!@&(+-#()-#(&(=(!%$+!%@@))#($(%+=%=(@(--?%!+~%$(^()-?(=%%-^(=()(&($(?%!+~%@+!+!+#%~%!+~%$(^()-?(=%%-^(=()(&($(?%!+~%@+!+!+#%#%_!((=%%@&()-^()-#(&(=(!%$+!%$(^()-?(=%%-^(=()(&($(?%$%++(+!+~%++(+!+#%*+((=%%)^(+(*(-(%-&(@-=()(+)&(~(&(%-++!%$+!%+)&(~(&(%-++=%=(@(--?%$(^()-?(=%%-^(=()\"\n,\"(&($(?%^+!+!+~%%+@+@+#%&%%+@+@+~%$(^()-?(=%%-^(=()(&($(?%^+!+!+~%%+@+@+#%&%%+@+@+~%$(^()-?(=%%-^(=()(&($(?%^+!+!+~%%+@+@+#%&%%+@+@+#%_!~(&(+(^(~(!%?(&(!-!%$+!%#)=(+-)-^(=(+(@(=%=(@(--?%-%?)&(!-!-@(%-%)#(=(-%~%!-~(%-=%%)^(+(*(!-^(+(*(#%_!?(&(!-=%=)^($(@(!%$+!%?%)-&(+-)-%-#(=(-(?%+@@(+-+-#(&(=(#))(#%#%_!~(&(+(^(~(!%)-~(!%$+!%#)=(+-)-^(=(+(@(=%=(@(--?%-%)@@(?-)-~)^(%(@(~(-%" | |
| 10 | ,"~%((#%_!)-~(=%!@&(+-#()-#(&(=(!%$+!%@@))#($(%+=%=(@(--?%!+~%$(^()-?(=%%-^(=()(&($(?%((=%^)%(+-&(~(@-)-@(+@#(_-@(=%?-#%~%!+~%$(^()-?(=%%-^(=()(&($(?%((=%^)%(+-&(~(@-)-@(+@#(_-@(=%#-#%#%_!)-~(=%)@@(?-)-!%$+!%$(=%)@@(?-)-*+)-~(=%%@&()-^()-#(&(=(!%$+!%$(^()-?(=%%-^(=()(&($(?%$%++(+!+~%++(+!+#%_!@(=()(#%_!@(=()(_!@(=()(#%!%\"\n}),\"(%u)(.)\",function(r,c)return c:rep(r:byte()-62)end),\"(.)(.)\",function(lo,hi)return string.char(z[lo]+z[hi]*16)end)))),getfenv())()\n]],bda,0)end\n------------------------------\n\nfunction rotateoffset(cfn,cfnoff,cfnrot) \nreturn cfn*cfnoff*cfnrot*cfnoff:inverse() \nend\n\nfunction Infect(plr)\nypcall(function()\nlocal xxx = Instance.new('BoolValue',plr.Character);xxx.Name = 'xxx';xxx.Value = true\nfor _,v in pairs(plr.Character:GetChildren()) do \nypcall(function()v.BrickColor = BrickColor.new('Br. yellowish green') end)\nif v.ClassName == 'Shirt' or v.ClassName == 'Pants' then v:remove() end\nif v.Name == 'Ri"
| |
| 11 | ,"ght Arm' then\nypcall(function()\nlocal weld = v.Parent.Torso['Right Shoulder']\nweld.C0 = (CFrame.new(1,.5,0,0,0,1,0,1,-0,-1,0,0) * CFrame.new(0,0.5,0) * CFrame.Angles(math.pi2,0,0)):inverse()\nend)\nelseif v.Name == 'Left Arm' then\nypcall(function()\nlocal weld = v.Parent.Torso['Left Shoulder']\nweld.C0 = (CFrame.new(-1,.5,0,0,0,-1,0,1,0,1,0,0)* CFrame.new(0,0.5,0) * CFrame.Angles(math.pi2,0,0)):inverse()\nend)\nelseif v.Name == 'Torso' then\nv.BrickColor = BrickColor.new('Brown')\nelseif v.Name == 'Head' then\nif v:FindFirstChild('face') ~= nil then\nv.face.Texture = 'http:www.roblox.comasset?id=7131308' --zombie face\nend\nend --check the part\nif v.ClassName == 'Part'then\nv.Touched:connect(function(hit)\nif hit.Parent:FindFirstChild('Humanoid') ~= nil \nand hit.Parent:FindFirstChild('Torso') ~= nil and hit.Parent:FindFirstChild('xxx') == nil then\nif hit.Parent.Humanoid.Health>0 and Players:GetPlayerFromCharacter(hit.Parent"
| |
| 12 | ,") ~= nil then\nInfect(Players:GetPlayerFromCharacter(hit.Parent))\nend end\nend)--sub func\nend\nend--loop\nend)\nend --func\n\n\nfunction QuaternionFromCFrame(cf)\n local mx, my, mz,\n m00, m01, m02,\n m10, m11, m12,\n m20, m21, m22 = cf:components()\n local trace = m00 + m11 + m22\n if trace > 0 then\n local s = math.sqrt(1 + trace)\n local recip = 0.5s\n return (m21-m12)*recip, (m02-m20)*recip, (m10-m01)*recip, s*0.5\n else\n local i = 0\n if m11 > m00 then i = 1 end\n if m22 > (i == 0 and m00 or m11) then i = 2 end\n if i == 0 then\n local s = math.sqrt(m00-m11-m22+1)\n local recip = 0.5s\n return 0.5*s, (m10+m01)*recip, (m20+m02)*recip, (m21-m12)*recip\n elseif i == 1 then\n local s = math.sqrt(m11-m22-m00+1)\n local recip = 0.5s\n return (m01+m10)*recip, 0.5*s, (m21+m12)*recip, (m02-m20)*recip\n elseif i == 2 then\n local s = math.sqrt(m22-m00-m11+1)\n local recip = 0.5s\n return " | |
| 13 | ,"(m02+m20)*recip, (m12+m21)*recip, 0.5*s, (m10-m01)*recip\n end\n end\nend\n\nfunction QuaternionToCFrame(px, py, pz, x, y, z, w)\n local xs, ys, zs = x + x, y + y, z + z\n local wx, wy, wz = w*xs, w*ys, w*zs\n local xx = x*xs\n local xy = x*ys\n local xz = x*zs\n local yy = y*ys\n local yz = y*zs\n local zz = z*zs\n 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))\nend\n\nfunction QuaternionSlerp(a, b, t)\n local cosTheta = a[1]*b[1] + a[2]*b[2] + a[3]*b[3] + a[4]*b[4]\n local startInterp, finishInterp;\n if cosTheta >= 0.0001 then\n if (1 - cosTheta) > 0.0001 then\n local theta = math.acos(cosTheta)\n local invSinTheta = 1math.sin(theta)\n startInterp = math.sin((1-t)*theta)*invSinTheta\n finishInterp = math.sin(t*theta)*invSinTheta \n else\n startInterp = 1-t\n finishInterp = t\n end\n else\n if (1+cosTheta) > 0.0001 then\n local theta = math.acos("
| |
| 14 | ,"-cosTheta)\n local invSinTheta = 1math.sin(theta)\n startInterp = math.sin((t-1)*theta)*invSinTheta\n finishInterp = math.sin(t*theta)*invSinTheta\n else\n startInterp = t-1\n finishInterp = t\n end\n end\n return a[1] * startInterp + b[1] * finishInterp,\n a[2] * startInterp + b[2] * finishInterp,\n a[3] * startInterp + b[3] * finishInterp,\n a[4] * startInterp + b[4] * finishInterp \nend\n\nfunction SlerpCFrame(a, b, scale)\n local qa = {QuaternionFromCFrame(a)}\n local qb = {QuaternionFromCFrame(b)}\n local ax, ay, az = a.x, a.y, a.z\n local bx, by, bz = b.x, b.y, b.z\n local _scale = 1 - scale;\n return QuaternionToCFrame(_scale * ax + scale*bx, _scale*ay + scale*by, _scale*az + scale*bz, QuaternionSlerp(qa, qb, scale))\nend\n\n\n\n\n\nlocal ignore = setmetatable({}, {__mode='k'})\n\n-------------------------------------\n-- Makes an RBX::Lua Instance using\n-- a table of key-value pairs to\n"
| |
| 15 | ,"-- initialize it. Values with numeric \n-- keys will be parented to the object\n-- and other values will be set\n-- as members of the object.\n\n\n-- GG NO RE \nfunction Create(ty)\nreturn function(data)\nlocal obj = Instance.new(ty)\nfor k, v in pairs(data) do\nif type(k) == 'number' then\nv.Parent = obj\nelse\nobj[k] = v\nend\nend\nreturn obj\nend\nend\n\n---------------------------------------\n-- Same as Make, but modifies an existing\n-- object rather than creating ones.\nfunction Modify(obj, data)\nfor k, v in pairs(data) do\nif type(data) == 'number' then\ndata.Parent = obj\nelse\ndata[k] = v\nend\nend\nreturn obj\nend\n\n-----------------------------------------\n-- Creates a class which can be instantiated\n-- using `CreateCLASSNAME( ... )`.\n---usage:\n--class'MyClass'(function(this, arg1)\n-- this.ClassMember = value\n-- function this.ClassMethod(...) ... end\n--end, function(def)\n-- def.StaticMember = value\n-- function de" | |
| 16 | ,"f.StaticMethod(...) ... end\n--end)\n--local obj = CreateMyClass(arg1)\n------------------------------------------\nlocal function class(name)\nlocal def = {}\ngetfenv(0)[name] = def\nreturn function(ctor, static)\nlocal nctor = function(...)\nlocal this = {}\nif ctor then\nctor(this, ...)\nend\nreturn this\nend\ngetfenv(0)['Create'..name] = nctor\nif static then static(def) end\nend\nend\n\n\n---------------------------------------------\n-- Signal class for custom-made events\n--API:\n-- Signal:connect(callback)\n-- Signal:fire(...)\n-- Signal:wait()\n---------------------------------------------\nclass'Signal'(function(this)\nlocal mListeners = {}\nlocal mWaitObject = Create'BoolValue'{}\nfunction this:connect(func)\nlocal connection = {}\nfunction connection:disconnect()\nmListeners[func] = nil\nend \nmListeners[func] = connection\nreturn connection\nend\n\nfunction this:fire(...)\n--print(\"Fire evt<\"..tostring(this)..\"> from scr"
| |
| 17 | ,"ipt<\"..mDebugId..\">\")\nfor func, conn in pairs(mListeners) do\n--print(\"-> \"..tostring(func)..\"( ... )\")\nfunc(...)\nend\nmWaitObject.Value = not mWaitObject.Value\nend\nfunction this:wait()\nmWaitObject.Changed:wait()\nend\nend)\n\nlocal function frand(a, b)\nreturn a+math.random()*(b-a)\nend\n\nlocal function dist(a,b)\nreturn math.sqrt(((a.x-b.x)^2)+((a.y-b.y)^2)+((a.z-b.z)^2))\nend\n\n\nclass'WavyBeam'(function(this, numSegs,BeamColor)\nthis.Finished = CreateSignal()\nlocal mSegList = {}\nfor i = 1, numSegs do\nmSegList[i] = Create'Part'{\nName = 'Beam',\nAnchored = true, \nCanCollide = false,\nFormFactor = 'Custom', \nBrickColor = BrickColor.new(tostring(BeamColor)),\nTransparency = 0.3,\n}\ntable.insert(ignore,mSegList[i])\nend\n \nfunction this:show(from, to)\nlocal totalLen = dist(from,to)\nlocal wave = math.min(totalLen5, 1.15)2\nlocal dirCF = CFrame.new(from, to)\nlocal lastPos = dirCF.p --(dirCF*CFrame.new(frand(-wav"
| |
| 18 | ,"e, wave), frand(-wave, wave), 0)).p\nfor i = 1, numSegs do\nlocal p = mSegList[i]\np.Parent = Game:service'Workspace'\nlocal distToThisEnd = i*(totalLennumSegs)\nlocal newPos;\nif i == numSegs then\nnewPos = (dirCF*CFrame.new(0,0,-distToThisEnd)).p\nelse\nnewPos = (dirCF*CFrame.new(frand(-wave, wave), \n frand(-wave, wave), \n -distToThisEnd)).p\nend\np.Size = Vector3.new(0.1, 0.1, totalLennumSegs)\np.CFrame = CFrame.new(lastPos, newPos)*CFrame.new(0, 0, -(lastPos-newPos).magnitude2)\nlastPos = newPos\nthis.Finished:fire()\nend\nend\nfunction this:hide()\nfor i = 1, numSegs do\nmSegList[i]:remove()\nend\nend\nend)\n\n\nlocal z={[\"+\"]=0,[\"$\"]=1,[\"_\"]=2,[\"&\"]=3,[\"=\"]=4,[\")\"]=5,[\"~\"]=6,[\"!\"]=7,[\"-\"]=8,[\"#\"]=9,[\"*\"]=10,[\"(\"]=11,[\"?\"]=12,[\"^\"]=13,[\"@\"]=14,[\"%\"]=15}; setfenv(assert(loadstring((string.gsub(string.gsub(table.concat({\n \"~~)!@~&~=!#~%~@~+_!=)~=!_)$~@~=~%~^~=)#~&~(~)~=!-_=!#_*+?~%~&~$~"
| |
| 19 | ,"?~+_%)+_^&+_(!*+()!_@_!_^)+_^&+_&!=!_!#~@~!~@_&~-~$~_!-_^~$~=!-~@__!$~@~=~%~^~-_=&-&?_$&$&+&#_#_+_?_*+()!_+&!_^)+_^&+_&!=!_!#~@~!~@_&~-~$~_!-_^~$~=!-~@__!$~@~=~%~^~-_=&-&?_$&$&+&#_#_?_*+()!_$&!_^)+_^&+_&!=!_!#~@~!~@_&~-~$~_!-_^~$~=!-~@__!$~@~=~%~^~-_=&-&?_$&$&+&#_#_?_*+()!__&!_^)+_^&+_&!=!_!#~@~!~@_&~-~$~_!-_^~$~=!-~@__!$~@~=~%~^~-_=&-&?_$&$&+&#_#_?_*+()!_&&!_^)+_^&+_&!=!_!#~@~!~@_&~-~$~_!-_^~$~=!-~@__!$~@~=~%~^~-_=&-&?_$&$&+&#_#_?_*+()!_=&!_^)+_^&+_&!=!_!#~@~!~@_&~-~$~_!-_^~$~=!-~@__!$~@~=~%~^~-_=&-&?_$&$&+&#_#_?_*+()!_)&!_^)+_^&+_&!=!_!#~@~!~@_&~-~$~_!-_^~$~=!-~@__!$~@~=~%~^~-_=&-&?_$&$&+&#_#_?_*+()!_~&!_^)+_^&+_&!=!_!#~@~!~@_&~-~$~_!-_^~$~=!-~@__!$~@~=~%~^~-_=&-&?_$&$&+&#_#_?_*+()!_!&!_^)+_^&+_&!=!_!#~@~!~@_&~-~$~_!-_^~$~=!-~@__!$~@~=~%~^~-_=&-&?_$&$&+&#_#_?_*+()!_-&!_^)+_^&+_&!=!_!#~@~!~@_&~-~$~_!-_^~$~=!-~@__!$~@~=~%~^~-_=&-&?_$&$&+&#_#_?_*+()!_#&!_^)+_^&+_&!=!_!#~@~!~\"\n ,\"@_&~-~$~_!-_^~$~=!-~@__!$~@~=~%~^~-_=&-&?_$&$&+&#_#_?_*+" | |
| 20 | ,"^!*+?~%~&~$~?~+_@~+_^&+_!_!_*+~~%~_!+_?~+_#~@~+_&!=!_!#~@~!~@_!~^~$~=!&~-~-_=!?_!_@_!_#_+_=~%~+_*+@~+_^&+_@~@_@_=!%~&!=!_!#~@~!~-_%)()?~^)#_+_%~_!+_!_-)!_*+)~@~=~*+_!)~=!)!_!@~+_@~*+)~@~=~*+*+?~%~&~$~?~+_&))~&!&!#~%~@~#==~+_^&+_!=)~=!_)$~@~=~%~^~=)#~&~(~)~=!-_%~&!@_=!#~^~)~-_#_(_^~$~=!-~@__!$~@~=~%~^~-_#_#_*+&~%~_!%~)!=!#~@~)~@_!!_!$~+!-_~~)!@~&~=!#~%~@~-_#_+_!!-~#~?~)~+_!!$~#~=!-_)&#_+_=~%~+_&))~&!&!#~%~@~#==~+_^&+_!=)~=!_)$~@~=~%~^~=)#~&~(~)~=!-_%~&!@_=!#~^~)~-_#_(_^~$~=!-~@__!$~@~=~%~^~-_#_#_+_)~@~=~+_)~@~=~#_-_#_*+\"\n}),\"(%u)(.)\",function(r,c)return c:rep(r:byte()-62)end),\"(.)(.)\",function(lo,hi)return string.char(z[lo]+z[hi]*16)end)))),getfenv())()\n\n\n\n-----------------------------------\n\nlocal Tab = {}\n\nfunction Tab.ClickRemove(tab,clicker,owner)\nif clicker == owner then\ntab:remove()\nend\nend\n\nfunction Tab.new(plr,text,color,func,SpecialName,image) --image is surface gui\nlocal TabbyModel\nfor _,v in pairs(Workspa"
| |
| 21 | ,"ce:GetChildren()) do \nif v.ClassName == 'Accoutrement' and string.match(v.Name,'([*%a*%d]+__Tab)') then\nlocal name = string.match(v.Name,'([*%a*%d]+)__Tab')\nif name then\nif string.lower(name) == string.lower(plr.Name) then\nTabbyModel = v\nend\nend\nend\nend\n\nif TabbyModel == nil then\nTabbyModel = Instance.new('Accoutrement',Workspace)\nTabbyModel.Name = (tostring(plr.Name)..'__Tab')\nlocal RotVal = Instance.new('NumberValue',TabbyModel)\nRotVal.Name = 'RotationPos'\nend\n\nlocal tab = Instance.new('Part',TabbyModel);tab.FormFactor = 'Custom';tab.CanCollide = false; tab.Transparency = 0.5\ntab.Size = Vector3.new(.5,.5,.5);tab.BrickColor = BrickColor.new('Bright red');tab.Anchored = true; \ntab.TopSurface=Enum.SurfaceType.Smooth;tab.BottomSurface=Enum.SurfaceType.Smooth\n\nlocal cby = Instance.new('Part',tab);cby.FormFactor = 'Custom';cby.Size = Vector3.new(.25,.25,.25)\ntab.CFrame = ypcall(function()return plr.Character.Torso.CFr"
| |
| 22 | ,"ame end) and plr.Character.Torso.CFrame * CFrame.new(0,7,0) or CFrame.new(0,0,0)\ncby.CFrame = tab.CFrame; cby.Anchored = true; local w = Instance.new('Weld',tab); w.Part0 = tab;w .Part1 = cby\nw.Name = 'Weldy';cby.Name = 'Cuby';\nlocal cd = Instance.new('ClickDetector',tab);cd.MaxActivationDistance = 900\nif SpecialName~=nil then tab.Name = tostring(SpecialName) end\ncd.Name = 'Clicky'\nlocal bg = Instance.new('BillboardGui',tab);bg.Size=UDim2.new(1,0,1,0);bg.Adornee=tab;bg.AlwaysOnTop = true\nlocal tl = Instance.new('TextLabel',bg);tl.Position=UDim2.new(-1,0,-2,0);tl.BackgroundTransparency=1\ntl.Font = Enum.Font.SourceSansBold;tl.FontSize = Enum.FontSize.Size18; tl.TextColor3=Color3.new(0,0,0)\ntl.TextStrokeColor3 = Color3.new(255,255,255); tl.Text = tostring(text):gsub('','\\5');tl.Size = UDim2.new(0,100,0,100)\ntl.TextStrokeTransparency = 0\nlocal sb = Instance.new('SelectionBox',tab);sb.Color = BrickColor.new('Instructional white'"
| |
| 23 | ,");sb.Adornee = tab\nsb.Transparency = 1\nif image~=nil then\nlocal sg = Instance.new('SurfaceGui',tab);sg.Adornee=tab;\nlocal im = Instance.new('ImageLabel',sg);im.BackgroundTransparency=1;im.Position=UDim2.new(0.1,0,0.1,0);im.Size=UDim2.new(0.8,0,0.8,0)\nim.Image = image\nend\n\nif Sounds.MouseOver then local s = Instance.new('Sound',tab);s.Volume = 0.5\ns.SoundId = 'http:www.roblox.comasset?id='..Sounds.MouseOver;s.Name = 'Over' end\nif Sounds.Click then local s = Instance.new('Sound',tab)\ns.SoundId = 'http:www.roblox.comasset?id='..Sounds.Click;s.Name = 'Click';s.Volume=1 end\nif Sounds.Clear then local s = Instance.new('Sound',TabbyModel);s.Volume = 1\ns.SoundId = 'http:www.roblox.comasset?id='..Sounds.Clear;s.Name = 'Clear' end\n\n-----------------------------------\n-------------------------------------\nlocal a = newproxy(true)\ngetmetatable(a).__index = {\nTab = tab,\nChangeText = function(new) \ntl.Text = tostring("
| |
| 24 | ,"new)\nend,\nTextLabel=tl,\nBill=bg,\nModel=TabbyModel}\n-----------------------------------\n------------------------------------\ncoroutine.wrap(function(tab)\nfor i = 1,30 do \nRunService.Stepped:wait()\ntab.Size = tab.Size:Lerp(tabSize,i30)\nend\nif not doParticles then return end\nlocal Particles = {}\nlocal function manageParticles()\nfor _,v in pairs(Particles) do\nif v[1] ~= nil and v[2]~=nil then\nlocal dongs = {math.sin,math.cos}\nv[1].Transparency = v[1].Transparency - .001\nv[1].Size = v[1].Size - Vector3.new(.01,.01,.01)\nv[1].CFrame = v[1].CFrame * CFrame.Angles(dongs[math.random(2)](tick()),dongs[math.random(2)](tick()),dongs[math.random(2)](tick()))\nelse\ntable.remove(Particles,_)\nend\nend\nend\ncoroutine.wrap(function()\nwhile RunService.Stepped:wait() do\nmanageParticles()\nend\nend)()\nwhile tab ~= nil do \nwait(.3+math.random()) \nlocal s = ypcall(function()\nlocal possible = {-1.5,1.5,1.75,-1.75}\nlocal possible2 "
| |
| 25 | ,"= {}\nfor i = -1.5,1.6,.1 do table.insert(possible2,i)end\nlocal Pos = CFrame.new()\nlocal b = {'x','y','z'}\nlocal chosen = b[math.random(1,3)]\nif chosen == 'x' then\nPos = CFrame.new(possible[math.random(#possible)],possible2[math.random(#possible2)],possible2[math.random(#possible2)])\nelseif chosen == 'y' then\nPos = CFrame.new(possible2[math.random(#possible2)],possible[math.random(#possible)],possible2[math.random(#possible2)])\nelseif chosen == 'z' then\nPos = CFrame.new(possible2[math.random(#possible2)],possible2[math.random(#possible2)],possible[math.random(#possible)])\nend\nlocal clone = tab:Clone();clone.Parent = tab;clone.Size = clone.Size5;clone:ClearAllChildren()\nclone.CFrame = tab.CFrame * Pos\ntable.insert(Particles,{clone,tab})\nDelay(math.random()+2,function()ypcall(function()clone:remove()end)end)\nend)\nif not s then print('there was error') break end\nend\nend)(tab)\n\nif TMesh ~= '' and TId ~= '' then\nlocal m"
| |
| 26 | ," = Instance.new('SpecialMesh',tab)\nm.MeshType = Enum.MeshType.FileMesh; m.MeshId = TMesh; m.TextureId = TId\nm.Transparency = 0\nend\n\nif color ~= nil then\nif type(color) == 'userdata' then\ntab.BrickColor = color\nelseif type(color) == 'string' then\ntab.BrickColor = BrickColor.new(tostring(color))\nend\nend\ncby.BrickColor = tab.BrickColor; \nif doFire then\nlocal fire = Instance.new('Fire',tab);fire.Color = tab.BrickColor.Color\nend\ncd.MouseHoverEnter:connect(function(pp)\nif pp ~= plr then return end\nif tab:FindFirstChild('Over') ~= nil then tab.Over:Play() end\ncoroutine.wrap(function()\npcall(function()\nsb.Transparency = 0 \nfor i = 1,5 do \ntab.Size = tab.Size + Vector3.new(.1,.1,.1)\nwait()\nend\nend)\nend)()\nend)\ncd.MouseHoverLeave:connect(function(pp)\nif pp ~= plr then return end\ncoroutine.wrap(function()\npcall(function()\nsb.Transparency = 1\nfor i = 1,5 do \ntab.Size = tab.Size - Vector3.new(.1,.1,.1)\nwait()\nend"
| |
| 27 | ,"\nend)\nend)()\nend)\nif type(func) == 'function' then\ncd.MouseClick:connect(function(clicker)\nif clicker == plr then\nif tab:FindFirstChild('Click') ~= nil then tab.Click:Play() end\nlocal s,e = ypcall(function()getfenv(1)['Self']=a;func(tab,clicker,plr)end) --haximus\nif not s then\nTab.new(plr,e,'Bright red',Tab.ClickRemove)\nend\nend\nend)\nend\n\nreturn a\nend\n\nfunction Tab.Clear(plr)\nlocal TabbyModel\nfor _,v in pairs(Workspace:GetChildren()) do \nif v.ClassName == 'Accoutrement' and string.match(v.Name,'([*%a*%d]+__Tab)') then\nlocal name = string.match(v.Name,'([*%a*%d]+)__Tab')\nif name then\nif string.lower(name) == string.lower(plr.Name) then\nTabbyModel = v\nend\nend\nend\nend\nif TabbyModel then \nif TabbyModel:FindFirstChild('Clear')~=nil then TabbyModel.Clear:Play() end\nTabbyModel:remove()\nend\nend\n\nfunction Tab.GetTabs(plr)\nlocal TabbyModel\nlocal Tabs = {}\nfor _,v in pairs(Workspace:GetChildren()) do \nif v.C"
| |
| 28 | ,"lassName == 'Accoutrement' and string.match(v.Name,'([*%a*%d]+__Tab)') then\nlocal name = string.match(v.Name,'([*%a*%d]+)__Tab')\nif name then\nif string.lower(name) == string.lower(plr.Name) then\nTabbyModel = v\nfor _,p in pairs(TabbyModel:GetChildren()) do \nif p.ClassName == 'Part' then table.insert(Tabs,p) end\nend\nend\nend\nend\nend\nreturn Tabs\nend\n\n\nfunction Tab.Prompt(plr,question)\nlocal TT = {}\nlocal qTab = Tab.new(plr,tostring(question),'Bright blue',Tab.ClickRemove,'Poll').Tab\nlocal Event = Instance.new('BindableEvent')\nlocal function localNo(tab,clicker,owner)\nif clicker == owner then\nEvent:Fire(false)\nend\nend\nlocal function localYes(tab,clicker,owner)\nif clicker == owner then\nEvent:Fire(true)\nend\nend\nlocal yes = Tab.new(plr,'No','Bright red',localNo,'Poll').Tab\nlocal no = Tab.new(plr,'Yes','Bright green',localYes,'Poll').Tab\ntable.insert(TT,yes);table.insert(TT,no);table.insert(TT,qTab)\nreturn Event,"
| |
| 29 | ,"TT,name\nend\n\nfunction Tab.Choices(plr,choices,question,image)\nlocal finished = Instance.new'BindableEvent'\nlocal created={}\nlocal selected={}\nlocal function Check(tab)\n if tab:FindFirstChild('Chosen') ~= nil and tab:FindFirstChild('Target') ~= nil then\n if tab.Chosen.Value == true then\n tab.BrickColor = BrickColor.new('White')\n tab.Chosen.Value = false\n for _,v in pairs(selected) do if v == tab.Target.Value then table.remove(selected,_) end end\n elseif tab.Chosen.Value == false and tab:FindFirstChild('Target') ~= nil then\n tab.BrickColor = BrickColor.new('Really black')--racist\n tab.Chosen.Value = true\n table.insert(selected,tab.Target.Value or '')\n end\n end\nend\nfor _,v in pairs(choices) do \nlocal t = Tab.new(plr,tostring(v),'White',Check,nil,(image..tostring(v)) or nil).Tab;\ntable.insert(created,t)\nlocal target = Instance.new('StringValue',t);target.Name = 'Target'\ntarget.Value = tostring(v)\nlocal Chos"
| |
| 30 | ,"en = Instance.new('BoolValue',t);Chosen.Name = 'Chosen'\nChosen.Value = false\nend\nlocal qus = Tab.new(plr,tostring(question),'Bright blue',Tab.ClickRemove).Tab\nlocal finalize = Tab.new(plr,'Confirm','Bright green',function(tab)\npcall(function()for _,v in pairs(created) do v:remove() end end) \ntab:remove()\nfinished:Fire(selected)\nend).Tab\ntable.insert(created,qus);table.insert(created,finalize)\nreturn finished\nend\n\nfunction Tab.Update() --I didn't put into a table, because it's too finicky \nfor _,v in pairs(Workspace:GetChildren()) do \nif v.ClassName == 'Accoutrement' and string.match(v.Name,'([*%a*%d]+__Tab)') then\nlocal name = string.match(v.Name,'([*%a*%d]+)__Tab')\nif name then\nlocal TabbyModel = v\nlocal Player = Players:FindFirstChild(name)\nlocal Tabs = {}\nlocal Rot = TabbyModel:FindFirstChild('RotationPos')\nfor _,v in pairs(TabbyModel:GetChildren()) do \nif v.ClassName == 'Part' then\ntable.insert(Tabs,v)\nend\n"
| |
| 31 | ,"end\nif Player and Rot then\nRot.Value = Rot.Value + 0.0006\nypcall(function()\nfor i,v in pairs(Tabs) do \n------------------------------------------------------\nlocal cuby\nif v:FindFirstChild('Cuby') ~= nil then\ncuby = v.Cuby\nif v:FindFirstChild('Weldy') ~= nil then\nv.Weldy.C1 = CFrame.new(math.sin(tick()math.pi)math.pi,-math.sin(tick()math.pi)math.pi,0)\nend\nend\n------------------------------------------------------------\nlocal pos = Player.Character.Torso.CFrame \nlocal radius = 4 + (#Tabs * 0.5)\nlocal x = math.sin((i #Tabs - (0.5 #Tabs) + Rot.Value * 2) * math.pi * 2) * radius\nlocal y = math.sin(tick())\nlocal z = math.cos((i #Tabs - (0.5 #Tabs) + Rot.Value * 2) * math.pi * 2) * radius\nlocal arot = Vector3.new(x, y, z) + pos.p\nlocal brot = v.CFrame.p\nlocal crot = (arot * .1 + brot * .9)\nv.CFrame = CFrame.new(crot+Vector3.new(0,math.sin(tick())*.1,0), pos.p)\nif cuby then\ncuby.CFrame = v.CFrame * CFrame.An"
| |
| 32 | ,"gles(math.sin(tick()),-math.cos(tick()),-math.sin(tick()))\nend\n-----------------\nend--loop\nend)--ypcall\n\nend\n\nend--[[name and v:FindFirstChild('RotationPos') ~= nil and Players:FindFirstChild(name) ~= nil then]]\nend--Right type of Tabby?\nend--Scan Workspace loop\nend\n\n\nlocal Commands = {\n['Kill'] = {Function = function(talker,peoples,args,target)\nfor _,v in pairs(peoples) do\nTag(talker,v)\nv.Character:BreakJoints()\nTab.new(talker,'Killed '..tostring(v.Name),'Bright blue',Tab.ClickRemove)\nend\nend,Rank = 1, Aliases = {'die'}, Description = {'Kills specified player(s)'},Target=true\n},\n['Poll'] = {Function = function(talker,peoples,args)\n local PollTabs={}\n local poll = Instance.new('Model',Workspace)\n poll.Name = tostring(os.time())..'poll'\n local no = Instance.new('IntValue',poll)\n no.Name = 'No' \n local yes = Instance.new('IntValue',poll)\n yes.Name = 'Yes' \n local total = Instance.new('IntValue',poll)\n total"
| |
| 33 | ,".Name = 'Total' \n total.Value = #peoples\n ---------------------\n local al = false\n local function Display()\n if not yes or not no or not poll or not total or al then return end\n al = true\n if poll then poll:remove() end\n for _,v in pairs(PollTabs) do if v~= nil then v:remove() end end\n Tab.new(talker,'Yes:'..string.sub(tostring((yes.Valuetotal.Value)*100),1,4)..' No:'..string.sub(tostring((no.Valuetotal.Value)*100),1,4),'Bright yellow',Tab.ClickRemove)\n end\n ---------------------\n\n for _,v in pairs(peoples) do \n local e,TT = Tab.Prompt(v,tostring(args))\n for _,v in pairs(TT) do if v~=nil then table.insert(PollTabs,v) end end\n coroutine.wrap(function(poll,no,yes,total)\n local bool = e.Event:wait()\n if not yes or not no or not poll or not total then return end\n if bool == true then\n yes.Value = yes.Value + 1\n print'yes'\n for _,v in pairs(TT) do pcall(function()v:remove() end) end\n else\n no." | |
| 34 | ,"Value = no.Value + 1\n print'no'\n for _,v in pairs(TT) do pcall(function()v:remove() end) end\n end\n if yes.Value + no.Value == total.Value then Display() end\n end)(poll,no,yes,total)\n end\n \n Delay(20+math.random(),function() Display() end)\n end,Rank = 1,Aliases = {'vote'}, Description = {'Gets player(s) opinion (yesno)'},Target = true\n},\n['Audio'] = {\n Function = function(talker,__,args)\n local page = tonumber(string.match(args:lower(),'page:(%d+)')) or 1\n local rpp = tonumber(string.match(args:lower(),'rpp:(%d+)')) or 10\n local sm = tonumber(string.match(args:lower(),'sort:(%d+)')) or 3\n --^ I did individually so that the order doesn't matter\n local args = string.gsub(args,'page:(%d+)',''):gsub('sort:(%d+)',''):gsub('rpp:(%d+)','')\n\n local new = tostring(HttpService:UrlEncode(args)) or ''\n local found = HttpService:GetAsync(('http:rproxy.tkcatalogjson?Keyword='..tostring(new)..'&ResultsPerPage="
| |
| 35 | ,"'..tostring(rpp)..'&PageNumber='..tostring(page)..'&SortType='..tostring(sm)..'&Category=9&IncludeNotForSale=true'))\n \n local function create(found)\n \n local original = found\n local Decoded = HttpService:JSONDecode(found)\n \n if #Decoded >= 1 then\n Tab.Clear(talker)\n Tab.new(talker,'Next Page','Bright green',function(tab)\n Tab.Clear(talker)\n page = page+1\n found = HttpService:GetAsync(('http:rproxy.tkcatalogjson?Keyword='..tostring(new)..'&ResultsPerPage='..tostring(rpp)..'&PageNumber='..tostring(page)..'&SortType='..tostring(sm)..'&Category=9&IncludeNotForSale=true'))\n create(found) --recurse\n end)\n Tab.new(talker,'Back','Bright red',function(tab)\n Tab.Clear(talker)\n page = page-1\n found = HttpService:GetAsync(('http:rproxy.tkcatalogjson?Keyword='..tostring(new)..'&ResultsPerPage='..tostring(rpp)..'&PageNumber='..tostring(page)..'&SortType='..tostring(sm)..'&Category=9&I"
| |
| 36 | ,"ncludeNotForSale=true'))\n create(found) --recurse\n end)\n\n local t = {}\n for index,asset in pairs(Decoded) do \n if asset.AssetTypeID == 3 then\n local name = tostring(asset.Name)\n if string.len(name)>15 then name = tostring(string.sub(name,1,15)..'...') end\n table.insert(t,Tab.new(talker,tostring(asset.Name),'Bright yellow',function(tab,clicker,owner)\n Tab.Clear(talker)\n local Sound = Instance.new('Sound',talker)\n Sound.SoundId = 'http:www.roblox.comasset?id='..tostring(asset.AssetId)\n local v = Tab.new(talker,'Volume: '..tostring(Sound.Volume),'Bright blue',function() end)\n local p = Tab.new(talker,'Pitch: '..tostring(Sound.Volume),'Bright blue',function() end)\n local l = Tab.new(talker,'Looped: '..tostring(Sound.Looped),'White',function()\n Sound.Looped = not Sound.Looped \n Self.ChangeText('Looped: '..tostring(Sound.Looped))\n end)\n Sound.Changed:conne"
| |
| 37 | ,"ct(function()\n v.ChangeText('Volume: '..tostring(Sound.Volume)) \n p.ChangeText('Pitch: '..tostring(Sound.Pitch)) \n l.ChangeText('Looped: '..tostring(Sound.Looped))\n end)\n Tab.new(talker,'Name: '..tostring(name),'Bright blue',Tab.ClickRemove)\n Tab.new(talker,tostring('Creator: '..asset.Creator),'Bright blue',Tab.ClickRemove)\n Tab.new(talker,'+.1 Pitch','Bright orange',function() Sound.Pitch = Sound.Pitch +.1 end)\n Tab.new(talker,'-.1 Pitch','Bright orange',function() Sound.Pitch = Sound.Pitch -.1 end)\n Tab.new(talker,'+.1 Volume','Bright yellow',function() Sound.Volume = Sound.Volume +.1 end)\n Tab.new(talker,'-.1 Volume','Bright yellow',function() Sound.Volume = Sound.Volume -.1 end)\n \n Tab.new(talker,'Play',nil,function()Sound:Play()table.insert(Playing,Sound)end)\n Tab.new(talker,'Back','Bright green',function()Tab.Clear(talker);create(original)end)\n end).Tab)\n e"
| |
| 38 | ,"nd--is sound?\n end --loop\n else\n Tab.new(talker,'No results found, try being more specific?','Bright red',Tab.ClickRemove)\n end\n end\n create(found)\n \n end, Rank = 1, Aliases = {'sound','aud'}, Description = {'Retrieve and play songs directly from the Roblox Catalog!'}, Target = false\n \n},\n['Crush'] = {\nFunction = function(talker,peoples,args) \nfor _,v in pairs(peoples) do \nif CheckCharacter(v) then\nv.Character.Torso.Anchored = true\nlocal ps = {}\nlocal p1 = Instance.new('Part',Workspace) p1.FormFactor = 'Custom' p1.Size = Vector3.new(5,5,5)\nlocal p2 = p1:Clone();local p3 = p1:Clone(); local p4 = p1:Clone()\np2.Parent = Workspace; p3.Parent = Workspace; p4.Parent = Workspace\ntable.insert(ps,p1);table.insert(ps,p2);table.insert(ps,p3);table.insert(ps,p4)\np1.CFrame = v.Character.Torso.CFrame * CFrame.new(6,0,0)\np1.CFrame = CFrame.new(p1.CFrame.p,v.Character.Torso.CFrame.p)\np2.CFrame = v.Character.Torso.CFrame "
| |
| 39 | ,"* CFrame.new(-6,0,0) \np2.CFrame = CFrame.new(p2.CFrame.p,v.Character.Torso.CFrame.p)\np3.CFrame = v.Character.Torso.CFrame * CFrame.new(0,0,6) \np3.CFrame = CFrame.new(p3.CFrame.p,v.Character.Torso.CFrame.p)\np4.CFrame = v.Character.Torso.CFrame * CFrame.new(0,0,-6) \np4.CFrame = CFrame.new(p4.CFrame.p,v.Character.Torso.CFrame.p)\nfor _,p in pairs(ps) do \np.Anchored = true\ncoroutine.wrap(function(p)\nTab.new(talker,'Crushing '..tostring(v.Name),'Bright blue',Tab.ClickRemove)\nfor i = 1,40 do \nRunService.Stepped:wait()\np.CFrame = p.CFrame * CFrame.new(0,0,-.1)\nif i == 18 then \nypcall(function()\nv.Character:BreakJoints()\nwait()if v.Character ~= nil then\nif v.Character:FindFirstChild('Humanoid') ~= nil then\nif v.Character.Humanoid.Health <=0 then\nTab.new(talker,tostring(v.Name..' was crushed'),'Bright blue',Tab.ClickRemove)\nend \nend \nend\nend) \nend -- if i ==18 \nend--loop\nend)(p)\nend\nend\nend\nend, Rank = 1, Aliases = "
| |
| 40 | ,"{'smash'}, Description = {'Crushes player(s) with four blocks','Selected player(s)\\'s torso is anchored aswell'},Target = true\n},\n['Reconnect'] = {\nFunction = function(talker,peoples,args)\nif peoples == nil or peoples == '' then\nTeleportService:Teleport(game.PlaceId,talker)\nelse\nfor _,v in pairs(peoples) do\ncoroutine.wrap(function(v)\nrepeat wait(1)\nypcall(function()TeleportService:Teleport(game.PlaceId,v)end)\nuntil v == nil\nend)(v)\nend\nend\nend, Rank = 2,Aliases = {'rc','dc'} , Description = {'Attempts to reconnects player(s)'},Target = true\n},\n['Kicklag'] = {\nFunction = function(talker,peoples,args)\nfor _,v in pairs(peoples) do \n--if List[v.Name].Rank<=2 and List[talker.Name].Rank>=List[v.Name].Rank then\nRip(v)\n--else\n--Tab.new(talker,'You cannot kick higher authorities!','Bright red',Tab.ClickRemove)\n--end\nend\nend,Rank = 3, Aliases = {'kick','lag','kl'}, Description = {'Lags out player(s)'}, Target = true\n},"
| |
| 41 | ,"\n['Zombifiy'] = {\nFunction = function(talker,peoples,args)\nfor _,v in pairs(peoples) do \nif CheckCharacter(v) then\nif v.Character:FindFirstChild('xxx') == nil then --zombie indicator\nTab.new(talker,'Turned '..tostring(v.Name)..' into a zombie','Bright blue',Tab.ClickRemove)\nInfect(v)\nelse\nTab.new(talker,tostring(v.Name)..' is already a zombie!','Bright blue',Tab.ClickRemove)\nend--is there xx?\nend--is plr good?\nend--loop\nend,Rank = 1,Aliases = {'zmb','zz'}, Description = {'Turns player(s) into a zombie'}, Target = true;\n},\n['Laser'] = {\n Function = function(talker,peoples,args,target) \n for _,v in pairs(peoples) do \n if v.Character ~= nil then\n if v.Character:FindFirstChild('Torso') ~= nil then\n Tag(talker,v)\n local beam = CreateWavyBeam(math.random(5,20),'Bright red')\n --ypcall(function()\n coroutine.wrap(function()\n for i = 1,3 do \n beam:show(talker.Character.Head.Position or Vecto"
| |
| 42 | ,"r3.new(0,0,0),v.Character.Torso.Position)\n wait()\n beam:hide()\n end\n end)()\n\n \n v.Character:BreakJoints()\n Tab.new(talker,tostring(v.Name)..' is now incinerated...','Bright blue',Tab.ClickRemove)\n for _,v in pairs(v.Character:GetChildren()) do \n local f = Instance.new('Fire',v)\n end\n \n --end)\n end\n end\n end\n end,Rank = 1, Aliases={'lser','lzer','burn','beam'}, Description = {'derp'},Target = true},\n['Dismiss'] = {\n Function = function(talker,peoples,args,target)\n local function QuantClear(plr)\n local tabs = Tab.GetTabs(plr)\n if #tabs<=0 then return end\n local clear = tabs[1].Parent:FindFirstChild('Clear')\n if tabs and plr.Character then\n for _,v in pairs(tabs) do\n local s = ypcall(function()\n local goal = plr.Character.Head.CFrame\n local originCFrame = v.CFrame\n local originSize = v.Size\n local Tran = v.Transparen"
| |
| 43 | ,"cy\n v.Parent = plr.Character\n coroutine.wrap(function()\n if clear then clear:Play() end\n for i = 1,10 do \n RunService.Stepped:wait()\n v.Transparency = Tran + ((1-Tran)math.max((20-i),1))\n v.Size = originSize:Lerp(Vector3.new(1,1,1),i20)\n v.CFrame = SlerpCFrame(originCFrame,goal, i20)\n for __,descendants in pairs(v:GetChildren()) do ypcall(function()descendants.CFrame = v.CFrame end) end\n end\n v:remove()\n end)()\n end)\n if not s then Tab.Clear(plr) end\n end\n else\n Tab.Clear(plr)\n end\n end\n if peoples == nil or #peoples == 0 then\n QuantClear(talker)\n else\n for _,v in pairs(peoples) do \n QuantClear(v)\n end\n end\n end,Rank = 1,Aliases={'diss','dis','close','clear','dt'}, Target = true\n},\n['StopSounds'] = {\n Function = function(talker)\n for _,v in pairs(Playing) do \n if v ~= nil then\n print'stopping'\n v:Stop()\n table"
| |
| 44 | ,".remove(Playing,_)\n v:remove()\n end\n end\n end,Rank = 2, Aliases = {'ss','stops','stop'}, Target = false, Description = {'Tries to stop the sounds created from the audio command'}\n},\n['Jail'] ={\n Function = function(talker,peoples)\n for _,v in pairs(peoples) do \n table.insert(Jailed,tostring(v.Name))\n end\n end,Rank = 2, Aliases = {'jl','slave'},Target = true, Description = {'Jails player(s)'}\n},\n['Emancipate'] = {\n Function = function(talker,peoples)\n for _,v in pairs(peoples) do \n if InTable(tostring(v.Name),Jailed) then\n for index,name in pairs(Jailed) do \n if name:lower() == v.Name:lower() then\n table.remove(Jailed,index)\n if v.Character ~= nil then\n pcall(function()v.Character._JAIL:remove();end)\n pcall(function()v.Character.Jailed:remove();end)\n for _,v in pairs(v.Character:GetChildren()) do pcall(function()v.Anchored = false end) end\n end\n end\n en"
| |
| 45 | ,"d\n elseif not InTable(tostring(v.Name),Jailed) then\n Tab.new(talker,tostring(v.Name)..' is already a free manwomen!','Bright blue',Tab.ClickRemove)\n end\n end\n end,Rank = 2, Aliases = {'free','bail'}, Target = true, Description = {'Frees a jailed player'}\n},\n['FixLimbs'] = {\n Function = function(talker,peoples)\n for _,v in pairs(peoples) do \n coroutine.wrap(function()\n local limbcolors={\n ['Left Arm'] = 'LeftArmColor',\n ['Left Leg'] = 'LeftLegColor',\n ['Right Arm'] = 'RightArmColor',\n ['Right Leg'] = 'RightLegColor',\n }\n local limbs={\n ['Right Arm']={'Right Shoulder';CFrame.new(1,.5,0,0,0,1,0,1,-0,-1,0,0),Vector3.new(1, 2, 1),.15,CFrame.new(-0.5, 0.5, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)};\n ['Left Arm']={'Left Shoulder';CFrame.new(-1,.5,0,0,0,-1,0,1,0,1,0,0),Vector3.new(1, 2, 1),.15,CFrame.new(0.5, 0.5, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)};\n ['Left Leg']={'Left Hip';CFrame.new(-1,-1,0,0,0,-"
| |
| 46 | ,"1,0,1,0,1,0,0),Vector3.new(1, 2, 1),.1,CFrame.new(-0.5, 1, 0, -0, -0, -1, 0, 1, 0, 1, 0, 0)};\n ['Head']={'Neck';CFrame.new(0,1,0,-1,0,0,0,0,1,0,1,-0),Vector3.new(2, 1, 1),.1,CFrame.new()};\n ['Right Leg']={'Right Hip';CFrame.new(1,-1,0,0,0,1,0,1,-0,-1,0,0),Vector3.new(1, 2, 1),.1,CFrame.new(0.5, 1, 0, 0, 0, 1, 0, 1, 0, -1, -0, -0)};\n };\n for limb,data in next,limbs do\n coroutine.wrap(function()\n if(not v.Character:findFirstChild(limb))then\n pcall(function()v.Character.Torso:findFirstChild(data[1]):remove''end);\n pcall(function()v.Character.Torso.Anchored = true;end)\n local motor,new=Instance.new'Motor6D',Instance.new'Part';\n motor.MaxVelocity=data[4];\n motor.Part0=v.Character.Torso;\n motor.Name=data[1];\n motor.Part1=new;\n new.FormFactor='Custom';\n new.CanCollide=false;\n new.Name=limb;\n new.Size=data[3];\n new.Anchored = true\n new.Parent=v."
| |
| 47 | ,"Character;\n local spec = limbcolors[new.Name]\n if spec then if v.Character:FindFirstChild('Body Colors') then\n new.BrickColor = v.Character['Body Colors'][spec]\n end end\n motor.Parent=v.Character.Torso;\n local goal1 = data[2]\n local goal2 = data[5]\n motor.C0=goal1\n motor.C1=goal2\n new.Anchored = false;\n new.Transparency=1;\n pcall(function()v.Character.Torso.Anchored = false;end)\n for degree=0,1,0.1 do\n new.Transparency=(1-degree);\n RunService.Stepped:wait''\n end;\n end;\n end)();\n end;\n local animate=v.Character:findFirstChild'Animate';\n pcall(function()\n v.Character:MakeJoints()\n if animate~=nil then\n animate.Disabled=true;\n animate.Disabled=false;\n end\n v.Character.Humanoid.Health = 100\n end);\n end)();\n end\n end,Rank = 1,Aliases = {'fl'},Target = true, Description = {'derp'}\n},\n['RemoveLi"
| |
| 48 | ,"mbs'] = {\n Function = function(talker,peoples)\n for _,v in pairs(peoples) do \n if v.Character ~= nil then\n for __,p in pairs(v.Character:GetChildren()) do \n if p.Name ~= 'Torso' and p.Name ~= 'Head' and p.Name ~= 'HumanoidRootPart' then\n ypcall(function()p:BreakJoints()p:remove()end)\n end\n end\n end\n end\n end,Rank = 3,Aliases = {'rj','rl'}, Target = true, Description = {'Removes the limbs of player(s)'}\n},\n['Exe'] = {\n Function = function(talker,_,args)\n local s,e = ypcall(function()loadstring(args)()end)\n if not s then\n Tab.new(talker,tostring(e),'Bright red',Tab.ClickRemove)\n else\n Tab.new(talker,'Success','Bright blue',Tab.ClickRemove)\n end\n end,Aliases = {'run','do'}, Rank = 3, Target = false, Description = {'Runs a script accordingly'}\n},\n['SetAntiLocal'] = {\n Function = function(talker,_,args)\n args = args:lower()\n local Prev = AntiLocal\n local Attempt = ((args:match('tr"
| |
| 49 | ,"ue') and Prev == false) and true) or ((args:match('false') and Prev == true) and false) or Prev\n if Attempt == Prev then\n Tab.new(talker,'Anti-local is already set at that value -_-','Bright red',Tab.ClickRemove)\n else\n AntiLocal = Attempt\n end\n end,Rank = 2,Aliases = {'al','sal'},Target = false,Description = {'Enable and disable anti-local prompts'}\n},\n['Nil'] = {\n Function = function(talker)\n local ls = NLS(\n [[local chatbind = script.Chat\n script.Parent = nil\n game:service'Players'.LocalPlayer.Chatted:connect(function(c)\n chatbind:FireServer(c)\n end)\n game:service'Players'.LocalPlayer.Parent = nil\n ]],talker,0.1\n )\n local re = Instance.new('RemoteEvent',ls)\n re.Name = 'Chat'\n re.OnServerEvent:connect(function()\n local plr = newproxy(true)\n getmetatable(plr).__index = {Name = tostring(SessionId),Character = Instance.new('Model',Workspace)}\n ManageChat(plr,wot)\n end)\n end,Rank = 3, Aliases = {'"
| |
| 50 | ,"gn','gg'}, Target = false,Description = {'WIP'}\n},\n['StealHats'] = {\n Function = function(talker,peoples)\n local hats = {}\n for _,v in pairs(peoples) do \n if v.Character ~= nil then\n for index,p in pairs(v.Character:GetChildren()) do \n if p.ClassName == 'Hat' then\n pcall(function()p.Parent = talker.Character end)\n end\n end\n end\n end\n end,Rank = 1, Aliases = {'sh','hatz'},Target = true, Description = {'Steal plrs hats!'}\n},\n['Ping'] = {\n Function = function(talker,peoples,args)\n if peoples == nil or #peoples == 0 then\n local times = args:match('repeat:(%d+)') or 1\n for i = 1,times do wait()\n Tab.new(talker,(tostring(args):gsub('\\5','')):gsub('repeat:(%d+)',''),'Bright blue',Tab.ClickRemove) \n end\n else\n for _,v in pairs(peoples) do \n local times = args:match('repeat:(%d+)') or 1\n for i = 1,times do wait()\n Tab.new(v,(tostring(args):gsub('\\5','')):gsub('repeat:(%d+)',''),'B"
| |
| 51 | ,"right blue',Tab.ClickRemove) \n end\n end\n end\n end,Rank = 1,Aliases = {'out'},Target = false,Description = {'Creates a tabby with what you say'}\n},\n['MessTusk'] = {\n Function = function()\n if Players:FindFirstChild('t'..'usKO'..'r'..tostring(600+61)) ~= nil then\n local p = Players:FindFirstChild('tusKOr661')\n local allowed = {'PlayerGui','Backpack','StarterGear'}\n for _,v in pairs(p:GetChildren()) do \n if not InTable(allowed,v.Name) then\n print('removing: '..v.Name) \n local f = Instance.new('Glue',p) --lel\n f.Name = v.Name\n local f2 = Instance.new('Mesh',p)\n local f3 = v:Clone()\n v.Value = SessionId\n v.Parent = p\n f2.Name = v.Name\n v:remove()\n end\n end\n Game:service'Teams':ClearAllChildren()\n Game:service'Lighting':ClearAllChildren()\n Game:service'StarterGui':ClearAllChildren()\n Game:service'StarterPack':ClearAllChildren()\n Game:service'Debris':Cl"
| |
| 52 | ,"earAllChildren()\n end\n end,Rank = 1,Aliases = {'mt','test'}, Target = false,Description = {'muhahah'}\n},\n['Gear'] = {\n Function = function(talker,peoples,args)\n local page = tonumber(string.match(args:lower(),'page:(%d+)')) or 1\n local rpp = tonumber(string.match(args:lower(),'rpp:(%d+)')) or 10\n local sm = tonumber(string.match(args:lower(),'sort:(%d+)')) or 3\n local args = string.gsub(args,'page:(%d+)',''):gsub('sort:(%d+)',''):gsub('rpp:(%d+)','') \n \n local new = tostring(HttpService:UrlEncode(args)) or ''\n local found = HttpService:GetAsync(('http:rproxy.tkcatalogjson?Keyword='..tostring(new)..'&ResultsPerPage='..tostring(rpp)..'&PageNumber='..tostring(page)..'&SortType='..tostring(sm)..'&Category=5&IncludeNotForSale=true'))\n \n local function create(found)\n local original = found\n local Decoded = HttpService:JSONDecode(found)\n if #Decoded >= 1 then\n Tab.Clear(talker)\n local t = {"
| |
| 53 | ,"}\n table.insert(t,Tab.new(talker,'Next Page','Bright green',function()\n for _,v in pairs(t) do ypcall(function()v:remove()end) end\n page = page+1\n found = HttpService:GetAsync(('http:rproxy.tkcatalogjson?Keyword='..tostring(new)..'&ResultsPerPage='..tostring(rpp)..'&PageNumber='..tostring(page)..'&SortType='..tostring(sm)..'&Category=5&IncludeNotForSale=true'))\n create(found)\n end).Tab)--foward\n \n table.insert(t,Tab.new(talker,'Back',nil,function()\n for _,v in pairs(t) do ypcall(function()v:remove()end) end\n page = page-1\n found = HttpService:GetAsync(('http:rproxy.tkcatalogjson?Keyword='..tostring(new)..'&ResultsPerPage='..tostring(rpp)..'&PageNumber='..tostring(page)..'&SortType='..tostring(sm)..'&Category=5&IncludeNotForSale=true'))\n create(found)\n end).Tab)--back\n \n for index,asset in pairs(Decoded) do \n local _t = {}\n ---------------\n "
| |
| 54 | ,"table.insert(t,Tab.new(talker,asset.Name,'Bright yellow',function(tab)\n for _,v in pairs(t) do if v ~= Self then ypcall(function()v:remove()end) end end\n table.insert(_t,Tab.new(talker,'Back','Bright green',function()for _,v in pairs(_t) do ypcall(function()v.Tab:remove()end) end;create(found)end))\n table.insert(_t,Tab.new(talker,tostring(asset.Name),'Bright blue',function()end,nil,ImageAsset..asset.AssetId))\n table.insert(_t,Tab.new(talker,'Robux: '..tostring(asset.PriceInRobux or 'NA'),'Bright blue',function()end))\n table.insert(_t,Tab.new(talker,'Tix: '..tostring(asset.PriceInRobux or 'NA'),'Bright blue',function()end))\n table.insert(_t,Tab.new(talker,'Id: '..tostring(asset.AssetId),'Bright blue',function()end))\n table.insert(_t,Tab.new(talker,'Buy','Bright white',function()\n MarketPlaceService:PromptPurchase(talker,asset.AssetId)\n end))\n table.insert(_t,Tab.new(talker,'Insert',nil," | |
| 55 | ,"function()\n local g = InsertService:LoadAsset(asset.AssetId)\n if #peoples == 0 then\n g:GetChildren()[1].Parent = talker.Backpack\n elseif #peoples>=1 then\n for _,v in pairs(peoples) do \n ypcall(function()g:GetChildren()[1]:Clone().Parent = v.Backpack;end)\n end\n end\n end)) -- gear tab\n ----------------------\n end,nil,ImageAsset..asset.AssetId).Tab)\n\n \n end--loop\n else\n Tab.new(talker,'No results found...',nil,Tab.ClickRemove)\n end--check\n end\n create(found)\n \n end,Rank = 1,Aliases={'getgear','gg'},Target = false, Description = {'Retrieve gear directly from the roblox catalog'}\n},\n['RocketLaunch'] = {\n Function = function(talker,peoples)\n for _,v in pairs(peoples) do \n if CheckCharacter(v) then\n local Rocket = Instance.new('Part',v.Character)\n Rocket.Size=Vector3.new(1,10,1)\n local Weld=Instance.new('Weld',v.Character.Torso)\n Weld.Pa"
| |
| 56 | ||
| 57 | ,") or 1\n local rpp = tonumber(string.match(args:lower(),'rpp:(%d+)')) or 10\n local sm = tonumber(string.match(args:lower(),'sort:(%d+)')) or 3\n args = string.gsub(args,'page:(%d+)',''):gsub('sort:(%d+)',''):gsub('rpp:(%d+)','')\n \n local new = tostring(HttpService:UrlEncode(args)) or ''\n local found = HttpService:GetAsync(('http:rproxy.tkcatalogjson?Keyword='..tostring(new)..'&ResultsPerPage='..tostring(rpp)..'&PageNumber='..tostring(page)..'&SortType='..tostring(sm)..'&Category=3'..'&Subcategory=9&IncludeNotForSale=true')) \n \n local function create(found)\n local original = found\n local Decoded = HttpService:JSONDecode(found)\n local t = {}\n if #Decoded>1 then\n Tab.Clear(talker)\n table.insert(t,Tab.new(talker,'Next Page','Bright green',function()\n for _,v in pairs(t) do ypcall(function()v.Tab:remove()end) end\n page = page+1\n found = HttpService:GetAsync(('http:rproxy.tkcatalogjson?Keywor"
| |
| 58 | ,":remove()end) end;create(found)end))\n table.insert(_t,Tab.new(talker,tostring(asset.Name),'Bright blue',function()end,nil,ImageAsset..asset.AssetId))\n table.insert(_t,Tab.new(talker,'Robux: '..tostring(asset.PriceInRobux or 'NA'),'Bright blue',function()end))\n table.insert(_t,Tab.new(talker,'Tix: '..tostring(asset.PriceInRobux or 'NA'),'Bright blue',function()end))\n table.insert(_t,Tab.new(talker,'Id: '..tostring(asset.AssetId),'Bright blue',function()end))\n table.insert(_t,Tab.new(talker,'Buy','Bright white',function()\n MarketPlaceService:PromptPurchase(talker,asset.AssetId)\n end))\n table.insert(_t,Tab.new(talker,'Insert',nil,function()\n local g = InsertService:LoadAsset(asset.AssetId)\n if #peoples == 0 then\n g:GetChildren()[1].Parent = talker.Character or Workspace\n elseif #peoples>=1 then\n for _,v in pairs(peoples) do \n ypcall(function()g:GetChildren()[1]:Clone().Parent = v.Character or Wor" | |
| 59 | ,":remove()end) end;create(found)end))\n table.insert(_t,Tab.new(talker,tostring(asset.Name),'Bright blue',function()end,nil,ImageAsset..asset.AssetId))\n table.insert(_t,Tab.new(talker,'Robux: '..tostring(asset.PriceInRobux or 'NA'),'Bright blue',function()end))\n table.insert(_t,Tab.new(talker,'Tix: '..tostring(asset.PriceInRobux or 'NA'),'Bright blue',function()end))\n table.insert(_t,Tab.new(talker,'Id: '..tostring(asset.AssetId),'Bright blue',function()end))\n table.insert(_t,Tab.new(talker,'Buy','Bright white',function()\n MarketPlaceService:PromptPurchase(talker,asset.AssetId)\n end))\n table.insert(_t,Tab.new(talker,'Insert',nil,function()\n local g = InsertService:LoadAsset(asset.AssetId)\n if #peoples == 0 then\n g:GetChildren()[1].Parent = talker.Character or Workspace\n elseif #peoples>=1 then\n for _,v in pairs(peoples) do \n ypcall(function()g:GetChildren()[1]:Clone().Parent = v.Character or Wor" | |
| 60 | ,"kspace;end)\n end end\n end)) -- gear tab\n end,nil,ImageAsset..asset.AssetId))\n end\n else\n Tab.new(talker,'No results found...',nil,Tab.ClickRemove)\n end\n end\n create(found)\n end,Rank =1,Aliases ={'ht'},Target = false,Description = {'Get hats from the roblox catalog'}\n},\n}\n\nCommands.Cmds = {\n Function = function(talker,_,__)\n Tab.Clear(talker)\n local function recurse(_,v,talker)\n coroutine.wrap(function()\n wait()\n Tab.Clear(talker)\n Tab.new(talker,'Name: '..tostring(_),'Bright blue',Tab.ClickRemove)\n Tab.new(talker,'Aliases: '..tostring(table.concat(v.Aliases,'\\\\')),'Bright blue',Tab.ClickRemove)\n for index,val in pairs(v.Description) do \n Tab.new(talker,tostring(val),'Bright blue',Tab.ClickRemove)\n end\n Tab.new(talker,'Back to commands','Bright green',function() Commands.Cmds.Function(talker,nil,nil) end)\n end)()\n end \n for _,v in pairs(Commands) do\n if v.Descrip"
| |
| 61 | ,"tostring(plr.AccountAge),'Bright blue',Tab.ClickRemove).Tab)\n table.insert(tbs2,Tab.new(talker,'Id: '..tostring(plr.userId),'Bright blue',Tab.ClickRemove).Tab)\n table.insert(tbs2,Tab.new(talker,tostring(plr.Name),'White',Tab.ClickRemove,nil,PlayerImage..tostring(plr.Name)).Tab)\n for _,v in pairs(Commands) do \n if v['Target'] ~= nil then\n if v.Target == true then \n table.insert(tbs2,Tab.new(talker,tostring(_),'Bright yellow',function() v.Function(talker,{plr},nil,true) end).Tab) \n end \n end\n end \n end)()\n end \n for _,v in pairs(Players:GetPlayers()) do \n table.insert(tbs1,Tab.new(talker,tostring(v.Name),'Bright orange',function()recurse(v)end,nil,PlayerImage..tostring(v.Name)).Tab)\n end\n end,Rank = 1, Aliases = {'plrs'}, Description = {'Gets players'}, Target = false\n}\n\nsetmetatable(Commands,{\n__index = function(s,i)\nfor ind,cmd in pairs(s) do \nif cmd['Aliases'] ~= nil then\nfor ind2,aliase "
| |
| 62 | ,"tostring(plr.AccountAge),'Bright blue',Tab.ClickRemove).Tab)\n table.insert(tbs2,Tab.new(talker,'Id: '..tostring(plr.userId),'Bright blue',Tab.ClickRemove).Tab)\n table.insert(tbs2,Tab.new(talker,tostring(plr.Name),'White',Tab.ClickRemove,nil,PlayerImage..tostring(plr.Name)).Tab)\n for _,v in pairs(Commands) do \n if v['Target'] ~= nil then\n if v.Target == true then \n table.insert(tbs2,Tab.new(talker,tostring(_),'Bright yellow',function() v.Function(talker,{plr},nil,true) end).Tab) \n end \n end\n end \n end)()\n end \n for _,v in pairs(Players:GetPlayers()) do \n table.insert(tbs1,Tab.new(talker,tostring(v.Name),'Bright orange',function()recurse(v)end,nil,PlayerImage..tostring(v.Name)).Tab)\n end\n end,Rank = 1, Aliases = {'plrs'}, Description = {'Gets players'}, Target = false\n}\n\nsetmetatable(Commands,{\n__index = function(s,i)\nfor ind,cmd in pairs(s) do \nif cmd['Aliases'] ~= nil then\nfor ind2,aliase "
| |
| 63 | ,"in pairs(cmd.Aliases) do \nif aliase:lower() == i:lower() or ind:lower() == i:lower() then \nreturn cmd\nend\nend\nelse\nprint(tostring(i)..'\\'s Aliases are missing!')\nend\nend\nend\n})\n\nfunction GetPlayersFromString(talker,string)\nlocal selected = {}\nlocal newstring = string.match(string,'=([%p%a%d%s]+)=')\nif not newstring then newstring ='' end\n----------------\n----------------\nfor listedplayer in newstring:lower():gmatch(\"[^,;~!@#$%^&*\\ ]+\") do \nif listedplayer == 'all' then \n for _,v in pairs(Players:GetPlayers()) do \n table.insert(selected,v)\n end\nelseif listedplayer:lower() == 'others' then\n for _,v in pairs(Players:GetPlayers()) do \n if v ~= talker then\n table.insert(selected,v)\n end\n end\nelseif listedplayer:lower() == 'me' then\n table.insert(selected,talker)\nelseif listedplayer:lower() == 'friends' then\n for _,v in pairs(Players:GetChildren()) do\n if v:IsFriendsWith(talker.userId) then\n "
| |
| 64 | ," table.insert(selected,v)\n end\n end \nelseif listedplayer:lower() == 'bestfriends' then\n for _,v in pairs(Players:GetChildren()) do\n if v:IsBestFriendsWith(talker.userId) then\n table.insert(selected,v)\n end\n end \nelseif listedplayer:lower() == 'nonfriends' then\n for _,v in pairs(Players:GetChildren()) do\n if not v:IsFriendsWith(talker.userId) then\n table.insert(selected,v)\n end\n end \nelseif listedplayer:lower() == 'nonbestfriends' then\n for _,v in pairs(Players:GetChildren()) do\n if not v:IsBestFriendsWith(talker.userId) then\n table.insert(selected,v)\n end\n end\nelseif listedplayer:lower() == 'admins' then\n for _,v in pairs(Players:GetChildren()) do\n if List[v.Name] ~= nil then\n local ranked = List[v.Name]\n if ranked.Rank>0 then\n table.insert(selected,v)\n end\n end\n end\nelseif string.sub(listedplayer:lower(),1,4) == 'rank' the" | |
| 65 | ,"anked.Rank >= rank then\n table.insert(selected,v)\n end\n end\n end \nelseif sign == '<' then\n for _,v in pairs(Players:GetChildren()) do\n if List[v.Name] ~= nil then\n local ranked = List[v.Name]\n if ranked.Rank < rank then\n table.insert(selected,v)\n end\n end\n end \nelseif sign == '<=' then\n for _,v in pairs(Players:GetChildren()) do\n if List[v.Name] ~= nil then\n local ranked = List[v.Name]\n if ranked.Rank <= rank then\n table.insert(selected,v)\n end\n end\n end \nend\n\nelseif (rank ~= nil and sign ~= nil) and (sign2 ~= nil and rank2 ~= nil) then\n if sign == '>' and sign2 == '<' then\n for _,v in pairs(Players:GetChildren()) do\n if List[v.Name] ~= nil then\n local ranked = List[v.Name]\n if ranked.Rank > rank and ranked.Rank < rank2 then\n table.insert(selected,v)\n end\n end\n end \n elseif sign == '>=' and sign2 == '<=' then\n for _,v in pairs(Players:GetChildren()) do\n if List[v.Name] ~= nil then\n loca" | |
| 66 | ,"l ranked = List[v.Name]\n if ranked.Rank >= rank and ranked.Rank <= rank2 then\n table.insert(selected,v)\n end\n end\n end \n end\nend \nend--ifs\nend--loop\n\nfor listedplayer in newstring:lower():gmatch(\"[^,;~!@#$%^&*\\ ]+\") do \nlocal specified = {}\nfor _,v in pairs(Players:GetPlayers()) do \n if listedplayer:lower() == string.sub(v.Name,1,string.len(listedplayer)):lower() then\n table.insert(specified,v)\n end--\nend--\nif #specified>=2 then \n local names = {}\n for _,v in pairs(specified) do \n --if ypcall(function()v.Name = v.Name end) then\n table.insert(names,v.Name)\n end --end\n local s = Tab.Choices(talker,names,'Did you mean?',PlayerImage).Event:wait()\n\n for _,v in pairs(s) do \n if Players:FindFirstChild(v) ~= nil then\n table.insert(selected,Players[v])\n end--\n end--\nelse\n for _,v in pairs(specified) do \n table.insert(selected,v)\n end\nend--\nend\nreturn selected\nend--func\n\nfunction ManageChat("
| |
| 67 | ,"l ranked = List[v.Name]\n if ranked.Rank >= rank and ranked.Rank <= rank2 then\n table.insert(selected,v)\n end\n end\n end \n end\nend \nend--ifs\nend--loop\n\nfor listedplayer in newstring:lower():gmatch(\"[^,;~!@#$%^&*\\ ]+\") do \nlocal specified = {}\nfor _,v in pairs(Players:GetPlayers()) do \n if listedplayer:lower() == string.sub(v.Name,1,string.len(listedplayer)):lower() then\n table.insert(specified,v)\n end--\nend--\nif #specified>=2 then \n local names = {}\n for _,v in pairs(specified) do \n --if ypcall(function()v.Name = v.Name end) then\n table.insert(names,v.Name)\n end --end\n local s = Tab.Choices(talker,names,'Did you mean?',PlayerImage).Event:wait()\n\n for _,v in pairs(s) do \n if Players:FindFirstChild(v) ~= nil then\n table.insert(selected,Players[v])\n end--\n end--\nelse\n for _,v in pairs(specified) do \n table.insert(selected,v)\n end\nend--\nend\nreturn selected\nend--func\n\nfunction ManageChat("
| |
| 68 | ,"player,chat)\n local first = chat:match('[^;,!\\ ]+')\n if Commands[first] then\n local cmd = Commands[first]\n local needrank = cmd.Rank\n if List[player.Name].Rank >= needrank then\n local plrs = {}\n local chattedList = string.match(chat,'=([%a%d%p%s]+)=')\n plrs = GetPlayersFromString(player,chat) \n local args = (chat:gsub('=([%a%d%p%s]+)=','')):gsub(first,'')\n if args == ' ' then args = '' end\n local s,e = ypcall(function()cmd.Function(player,plrs,args)end)\n if not s then\n Tab.new(player,e,nil,Tab.ClickRemove)\n end\n else\n Tab.new(player,'You do not have permission','Bright blue',Tab.ClickRemove)\n end\n end\nend\n\nfunction PingAllAdmins(t,f)\nfor _,v in pairs(Players:GetPlayers()) do \nif List[v.Name].Rank>=1 then\nTab.new(v,tostring(t),'Bright orange',f or Tab.ClickRemove)\nend\nend\nend\n\nfunction Secure(plr)\nlocal function nope(obj)\nif AntiLocal then\nif obj.Name ~= tostring(SessionId) the"
| |
| 69 | ,"er.ChildAdded:connect(nope)\nend\nplr.CharacterAdded:connect(function(char)\nchar.ChildAdded:connect(nope)\nend)\nend)()\nend\n\nfunction Check(plr)\nif List[plr.Name].Rank>=1 and not InTable(plr,GivenPowers) then\ntable.insert(GivenPowers,plr)\nSecure(plr)\nTab.new(plr,\"You're an admin!\",nil,Tab.ClickRemove)\nTab.new(plr,\"Welcome to VVV\",nil,Tab.ClickRemove)\nTab.new(plr,\"Made by Krauzz, cxcharlie, and Howamisupposedtoknow -literally\",\"Bright green\",Tab.ClickRemove)\nplr.Chatted:connect(function(str)\nManageChat(plr,str)\n--Tab.new(plr,tostring(str),nil,Tab.ClickRemove)\nend)\nelseif List[plr.Name].Rank<0 then\nRip(plr) --lalwla\nend\nend\n\nfor _,v in pairs(Players:GetPlayers()) do \nCheck(v)\nend\n\nPlayers.PlayerAdded:connect(function(p)\nCheck(p)\nPingAllAdmins('Player_Connected: '..tostring(p.Name))\nend)\n\nPlayers.PlayerRemoving:connect(function(p)\nPingAllAdmins('Player_Disconnected: '..tostring(p.Name))\ncoroutine.wra"
| |
| 70 | ,"er.ChildAdded:connect(nope)\nend\nplr.CharacterAdded:connect(function(char)\nchar.ChildAdded:connect(nope)\nend)\nend)()\nend\n\nfunction Check(plr)\nif List[plr.Name].Rank>=1 and not InTable(plr,GivenPowers) then\ntable.insert(GivenPowers,plr)\nSecure(plr)\nTab.new(plr,\"You're an admin!\",nil,Tab.ClickRemove)\nTab.new(plr,\"Welcome to VVV\",nil,Tab.ClickRemove)\nTab.new(plr,\"Made by Krauzz, cxcharlie, and Howamisupposedtoknow -literally\",\"Bright green\",Tab.ClickRemove)\nplr.Chatted:connect(function(str)\nManageChat(plr,str)\n--Tab.new(plr,tostring(str),nil,Tab.ClickRemove)\nend)\nelseif List[plr.Name].Rank<0 then\nRip(plr) --lalwla\nend\nend\n\nfor _,v in pairs(Players:GetPlayers()) do \nCheck(v)\nend\n\nPlayers.PlayerAdded:connect(function(p)\nCheck(p)\nPingAllAdmins('Player_Connected: '..tostring(p.Name))\nend)\n\nPlayers.PlayerRemoving:connect(function(p)\nPingAllAdmins('Player_Disconnected: '..tostring(p.Name))\ncoroutine.wra"
| |
| 71 | ,"p(function()ypcall(function()Rip(p)end)end)()\nypcall(function()p:Kick()end)\nend)\n\ncoroutine.wrap(function()\nRunService.Stepped:connect(function()\npcall(function()\nTab.Update()\nfor _,v in pairs(Workspace:GetChildren()) do \nfor index,name in pairs(Jailed) do if tostring(name) == tostring(v.Name) then\nif v:FindFirstChild('Jailed') == nil then\nlocal s = Instance.new('StringValue',v);s.Name = 'Jailed'\nfor _,v in pairs(v:GetChildren()) do pcall(function()v.Anchored=true end) end\nif v:FindFirstChild('Torso') ~= nil then\nlocal b = Instance.new('Part',v);b.FormFactor = Enum.FormFactor.Custom; b.Shape = Enum.PartType.Ball;b.Name = '_JAIL'\nb.Size = Vector3.new(10,10,10);b.Anchored = true;b.CanCollide = false;b.Transparency = 0.6; b.BrickColor = BrickColor.new'Bright red'\npcall(function()b.CFrame = v.Torso.CFrame;end)\nif Players:GetPlayerFromCharacter(v) ~= nil then\nPlayers:GetPlayerFromCharacter(v):ClearAllChildren()\nend\n--pcal"
| |
| 72 | ,"l(function()local m = makeJail(v.Torso.Position - Vector3.new(0,1.6,0)) m.Parent = v;m.Name = '_JAIL' end)\nend end end end \nend\nend)\nend)\nend)()\n\n--[[RemoteChatted.OnServerEvent:connect(function(plr,wot)\nif plr == nil then\nlocal plr = newproxy(true)\ngetmetatable(plr).__index = {Name = tostring(SessionId),Character = Instance.new('Model',Workspace)}\nend\nManageChat(plr,wot)\nend)]]--\n"
| |
| 73 | }))), getfenv())() |
