Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- --[[insert it in your module
- alright? -HerLxght]]--
- local RealPlayer = script.Parent.Parent
- local FakeMouse = script.FakeMouse:Clone();
- FakeMouse.Parent = RealPlayer.Character;
- script.FakeMouse:Destroy()
- do
- local GUID = {}
- do
- GUID.IDs = {};
- function GUID:new(len)
- local id;
- if(not len)then
- id = (tostring(function() end))
- id = id:gsub("function: ","")
- else
- local function genID(len)
- local newID = ""
- for i = 1,len do
- newID = newID..string.char(math.random(48,90))
- end
- return newID
- end
- repeat id = genID(len) until not GUID.IDs[id]
- local oid = id;
- id = {Trash=function() GUID.IDs[oid]=nil; end;Get=function() return oid; end}
- GUID.IDs[oid]=true;
- end
- return id
- end
- end
- local AHB = Instance.new("BindableEvent")
- local FPS = 30
- local TimeFrame = 0
- local LastFrame = tick()
- local Frame = 1/FPS
- game:service'RunService'.Heartbeat:connect(function(s,p)
- TimeFrame = TimeFrame + s
- if(TimeFrame >= Frame)then
- for i = 1,math.floor(TimeFrame/Frame) do
- AHB:Fire()
- end
- LastFrame=tick()
- TimeFrame=TimeFrame-Frame*math.floor(TimeFrame/Frame)
- end
- end)
- function swait(dur)
- if(dur == 0 or typeof(dur) ~= 'number')then
- AHB.Event:wait()
- else
- for i = 1, dur*FPS do
- AHB.Event:wait()
- end
- end
- end
- local oPlayer = RealPlayer
- local Player = oPlayer
- local loudnesses={}
- script.Parent = Player.Character
- local CoAS = {Actions={}}
- local Event = Instance.new("RemoteEvent")
- Event.Name = "UserInputEvent"
- Event.Parent = Player.Character
- local Func = Instance.new("RemoteFunction")
- Func.Name = "GetClientProperty"
- Func.Parent = Player.Character
- local fakeEvent = function()
- local t = {_fakeEvent=true,Waited={},Connected={}}
- t.Connect = function(self,f)
- local ft={}
- ft={Disconnected=false;disconnect=function(s) if(self.Function==ft)then self.Function=nil end s.Disconnected=true end}
- ft.Disconnect=ft.disconnect
- ft.Func=function(...)
- for id,_ in next, t.Waited do
- t.Waited[id] = true
- end
- return f(...)
- end;
- table.insert(self.Connected,ft)
- return ft;
- end
- t.connect = t.Connect
- t.Wait = function()
- local guid = GUID:new(25)
- local waitingId = guid:Get()
- t.Waited[waitingId]=false
- repeat swait() until t.Waited[waitingId]==true
- t.Waited[waitingId]=nil;
- guid:Trash()
- end
- t.wait = t.Wait
- return t
- end
- local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
- local UsIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
- local Run = {RenderStepped=fakeEvent()}
- function CoAS:BindAction(name,fun,touch,...)
- CoAS.Actions[name] = {Name=name,Function=fun,Keys={...}}
- end
- function CoAS:UnbindAction(name)
- CoAS.Actions[name] = nil
- end
- local function te(self,ev,...)
- local t = self[ev]
- if t and t._fakeEvent and t.Connected then
- for i,v in next, t.Connected do
- if(v.Func and not v.Disconnected)then
- v.Func(...)
- else
- t.Connected[i]=nil
- end
- end
- end
- end
- m.TrigEvent = te
- UsIS.TrigEvent = te
- Run.TrigEvent = te
- Event.OnServerEvent:Connect(function(plr,io)
- if plr~=Player then return end
- --[[table.foreach(io,print)
- print'---']]
- if io.Mouse then
- m.Target = io.Target
- m.Hit = io.Hit
- elseif io.KeyEvent then
- m:TrigEvent('Key'..io.KeyEvent,io.Key)
- elseif io.UserInputType == Enum.UserInputType.MouseButton1 then
- if io.UserInputState == Enum.UserInputState.Begin then
- m:TrigEvent("Button1Down")
- else
- m:TrigEvent("Button1Up")
- end
- end
- if(not io.KeyEvent and not io.Mouse)then
- for n,t in pairs(CoAS.Actions) do
- for _,k in pairs(t.Keys) do
- if k==io.KeyCode then
- t.Function(t.Name,io.UserInputState,io)
- end
- end
- end
- if io.UserInputState == Enum.UserInputState.Begin then
- UsIS:TrigEvent("InputBegan",io,false)
- else
- UsIS:TrigEvent("InputEnded",io,false)
- end
- end
- end)
- Func.OnServerInvoke = function(plr,inst,play)
- if plr~=Player then return end
- if(inst and typeof(inst) == 'Instance' and inst:IsA'Sound')then
- loudnesses[inst]=play
- end
- end
- function GetClientProperty(inst,prop)
- if(prop == 'PlaybackLoudness' and loudnesses[inst])then
- return loudnesses[inst]
- elseif(prop == 'PlaybackLoudness')then
- return Func:InvokeClient(Player,'RegSound',inst)
- end
- return Func:InvokeClient(Player,inst,prop)
- end
- local oldGame = game;
- local oldPlayer = Player;
- local fakePlayer = newproxy(true)
- getmetatable(fakePlayer).__index = function(s,i)
- if(i == 'GetMouse')then
- return function() return m; end
- end
- return Player[i]
- end
- getmetatable(fakePlayer).__newindex = function(s,i,v)
- Player[i]=v
- end
- getmetatable(fakePlayer).__call=function(self,...)
- if(self == fakePlayer)then self = Player end
- local wh = {...}
- local name = table.remove(wh,1)
- for i,v in next, wh do
- wh[i]=v
- end
- if(name == 'GetMouse')then
- return m;
- end
- return self(name,unpack(wh))
- end
- getmetatable(fakePlayer).__namecall=function(self,...)
- if(self == fakePlayer)then self = Player end
- local tuple={...}
- local name = table.remove(tuple,#tuple)
- if(name == 'GetMouse')then
- return m;
- else
- return self[name](self,unpack(tuple))
- end
- end
- local oll = LoadLibrary;
- function LoadLibrary(libtard)
- local libtarddestroyed=oll(libtard)
- if(libtard=='RbxUtility')then
- local library={Create=function(obj)
- local inst = Instance.new(obj)
- return function(props)
- for prop,valu in next, props do
- inst[prop]=valu
- end
- return inst
- end
- end}
- setmetatable(library,{__index=libtarddestroyed,__newindex=function(s,i,v) libtarddestroyed[i]=v end})
- return library
- else
- return libtarddestroyed
- end
- end
- local function GetService(s,i)
- local service = s:GetService(i)
- if(i == 'Players')then
- local oldService = service;
- local fakeService = newproxy(true)
- getmetatable(fakeService).__index = function(s,i)
- if(s == fakeService)then s=oldService end
- if(i == 'LocalPlayer' or i == 'localPlayer')then
- return fakePlayer
- elseif(i == 'oPlayer')then
- return oPlayer
- else
- return s[i]
- end
- end
- getmetatable(fakeService).__newindex = function(s,i,v)
- if(s == fakeService)then s=oldService end
- s[i]=v
- end
- getmetatable(fakeService).__call=function(self,...)
- if(self == fakeService)then self = oldService end
- local wh = {...}
- local name = table.remove(wh,1)
- for i,v in next, wh do
- wh[i]=v
- end
- return self(name,unpack(wh))
- end
- getmetatable(fakeService).__namecall=function(self,...)
- if(self == fakeService)then self = oldService end
- local tuple={...}
- local name = table.remove(tuple,#tuple)
- return self[name](self,unpack(tuple))
- end
- getmetatable(fakeService).__metatable = 'gay'
- return fakeService
- elseif(i == 'RunService')then
- local oldService = service;
- local fakeService = newproxy(true)
- getmetatable(fakeService).__index = function(s,i)
- if(s == fakeService)then s=oldService end
- return Run[i] or s[i]
- end
- getmetatable(fakeService).__newindex = function(s,i,v)
- if(s == fakeService)then s=oldService end
- s[i]=v
- end
- getmetatable(fakeService).__call=function(self,...)
- if(self == fakeService)then self = oldService end
- local wh = {...}
- local name = table.remove(wh,1)
- for i,v in next, wh do
- wh[i]=v
- end
- return self(name,unpack(wh))
- end
- getmetatable(fakeService).__namecall=function(self,...)
- if(self == fakeService)then self = oldService end
- local tuple={...}
- local name = table.remove(tuple,#tuple)
- return self[name](self,unpack(tuple))
- end
- getmetatable(fakeService).__metatable = 'gay'
- return fakeService
- elseif(i == 'UserInputService')then
- return UsIS
- elseif(i == 'ContextActionService')then
- return CoAS;
- else
- return service
- end
- end
- local new = Instance.new;
- Instance = {}
- Instance.new = function(inst,obje)
- local lp = GetService(oldGame,'Players').localPlayer
- local instance = new(inst)
- if(inst=='ObjectValue')then
- local fake = newproxy(true)
- getmetatable(fake).__index=function(self,index)
- if(self==fake)then self=instance end
- return self[index]
- end
- getmetatable(fake).__newindex=function(self,index,value)
- if(self==fake)then self=instance end
- if(index=='Value' and typeof(value)~='Instance' and value==fakePlayer)then
- self[index]=oPlayer
- else
- self[index]=value
- end
- end
- getmetatable(fake).__call=function(self,...)
- if(self == fake)then self = instance end
- local wh = {...}
- local name = table.remove(wh,1)
- for i,v in next, wh do
- if(v == fake)then v = instance end
- wh[i]=v
- end
- return self(name,unpack(wh))
- end
- getmetatable(fake). __namecall=function(self,...)
- if(self == fake)then self = instance end
- local tuple={...}
- local name = table.remove(tuple,#tuple)
- return self[name](self,unpack(tuple))
- end
- return fake
- else
- instance.Parent = obje
- return instance;
- end
- end
- local serviceFunctions={
- service=true,
- GetService=true,
- }
- local fakeGame = newproxy(true)
- getmetatable(fakeGame).__index = function(s,i)
- if(s == fakeGame)then s=oldGame end
- local serv = GetService(oldGame,i)
- if serviceFunctions[i] then
- return GetService
- elseif(serv)then
- return serv
- else
- return s[i]
- end
- end
- getmetatable(fakeGame).__newindex = function(s,i,v)
- if(s == fakeGame)then s=oldGame end
- s[i]=v
- end
- getmetatable(fakeGame).__call=function(self,...)
- if(self == fakeGame)then self = oldGame end
- local wh = {...}
- local name = table.remove(wh,1)
- for i,v in next, wh do
- if(v == fakeGame)then v = oldGame end
- wh[i]=v
- end
- if serviceFunctions[name] then
- return GetService(self,unpack(wh))
- else
- return self(name,unpack(wh))
- end
- end
- getmetatable(fakeGame). __namecall=function(self,...)
- if(self == fakeGame)then self = oldGame end
- local tuple={...}
- local name = table.remove(tuple,#tuple)
- local funcToCall=self[name]
- if serviceFunctions[name] then
- return GetService(self,unpack(tuple))
- else
- return self[name](self,unpack(tuple))
- end
- end
- getmetatable(fakeGame).__metatable = 'gay'
- coroutine.wrap(function()
- while true do
- Run:TrigEvent('RenderStepped')
- swait()
- end
- end)()
- game=fakeGame
- UserInputService,ContextActionService = UsIS,CoAS
- end
- Player = game:GetService("Players").LocalPlayer
- PlayerGui = Player.PlayerGui
- Mouse = Player:GetMouse()
- Cam = workspace.CurrentCamera
- Backpack = Player.Backpack
- Character = Player.Character
- Humanoid = Character.Humanoid
- RootPart = Character["HumanoidRootPart"]
- Torso = Character["Torso"]
- Head = Character["Head"]
- RightArm = Character["Right Arm"]
- LeftArm = Character["Left Arm"]
- RightLeg = Character["Right Leg"]
- LeftLeg = Character["Left Leg"]
- RootJoint = RootPart["RootJoint"]
- Neck = Torso["Neck"]
- RightShoulder = Torso["Right Shoulder"]
- LeftShoulder = Torso["Left Shoulder"]
- RightHip = Torso["Right Hip"]
- LeftHip = Torso["Left Hip"]
- IT = Instance.new
- CF = CFrame.new
- VT = Vector3.new
- RAD = math.rad
- C3 = Color3.new
- UD2 = UDim2.new
- BRICKC = BrickColor.new
- ANGLES = CFrame.Angles
- EULER = CFrame.fromEulerAnglesXYZ
- COS = math.cos
- ACOS = math.acos
- SIN = math.sin
- ASIN = math.asin
- ABS = math.abs
- MRANDOM = math.random
- FLOOR = math.floor
- Animation_Speed = 3
- local FORCERESET = false
- Frame_Speed = 1 / 60 -- (1 / 30) OR (1 / 60)
- local Speed = 16
- local ROOTC0 = CF(0, 0, 0) * ANGLES(RAD(-90), RAD(0), RAD(180))
- local NECKC0 = CF(0, 1, 0) * ANGLES(RAD(-90), RAD(0), RAD(180))
- local RIGHTSHOULDERC0 = CF(-0.5, 0, 0) * ANGLES(RAD(0), RAD(90), RAD(0))
- local LEFTSHOULDERC0 = CF(0.5, 0, 0) * ANGLES(RAD(0), RAD(-90), RAD(0))
- local DAMAGEMULTIPLIER = 1
- local ANIM = "Idle"
- local ATTACK = false
- local EQUIPPED = false
- local HOLD = false
- local COMBO = 1
- local Rooted = false
- local SINE = 0
- local KEYHOLD = false
- local CHANGE = 2 / Animation_Speed
- local WALKINGANIM = false
- local VALUE1 = false
- local VALUE2 = false
- local ROBLOXIDLEANIMATION = IT("Animation")
- ROBLOXIDLEANIMATION.Name = "Roblox Idle Animation"
- ROBLOXIDLEANIMATION.AnimationId = "http://www.roblox.com/asset/?id=180435571"
- --ROBLOXIDLEANIMATION.Parent = Humanoid
- local WEAPONGUI = IT("ScreenGui", PlayerGui)
- WEAPONGUI.Name = "BanishV3Gui"
- local Weapon = IT("Model")
- Weapon.Name = "Adds"
- local Effects = IT("Folder", Weapon)
- Effects.Name = "Effects"
- local ANIMATOR = Humanoid.Animator
- local ANIMATE = Character:FindFirstChild("Animate")
- local UNANCHOR = true
- local TOBANISH = {}
- script.Parent = PlayerGui
- --//=================================\\
- --\\=================================//
- --//=================================\\
- --|| SAZERENOS' ARTIFICIAL HEARTBEAT
- --\\=================================//
- ArtificialHB = Instance.new("BindableEvent", script)
- ArtificialHB.Name = "ArtificialHB"
- script:WaitForChild("ArtificialHB")
- frame = Frame_Speed
- tf = 0
- allowframeloss = false
- tossremainder = false
- lastframe = tick()
- script.ArtificialHB:Fire()
- game:GetService("RunService").Heartbeat:connect(function(s, p)
- tf = tf + s
- if tf >= frame then
- if allowframeloss then
- script.ArtificialHB:Fire()
- lastframe = tick()
- else
- for i = 1, math.floor(tf / frame) do
- script.ArtificialHB:Fire()
- end
- lastframe = tick()
- end
- if tossremainder then
- tf = 0
- else
- tf = tf - frame * math.floor(tf / frame)
- end
- end
- end)
- function Raycast(POSITION, DIRECTION, RANGE, IGNOREDECENDANTS)
- return workspace:FindPartOnRay(Ray.new(POSITION, DIRECTION.unit * RANGE), IGNOREDECENDANTS)
- end
- function PositiveAngle(NUMBER)
- if NUMBER >= 0 then
- NUMBER = 0
- end
- return NUMBER
- end
- local VOLUME = 2
- local PITCH = 1
- local SONGID = 3109097883
- function Debree(Table)
- local KindOf = (Table.Variant or "Ring")
- local Position = (Table.Location or Torso.Position)
- local Coloration = (Table.Color or C3(1,1,1))
- local Texture = (Table.Material or "Slate")
- local Fling = (Table.Scatter or 1)
- local Number = (Table.Amount or 1)
- local Rocks = (Table.DebreeCount or 1)
- local Range = (Table.Distance or 1)
- local Scale = (Table.Size or 1)
- local Timer = (Table.Delay or 1.5)
- coroutine.resume(coroutine.create(function()
- local ScaleVector = VT(Scale,Scale,Scale)
- local Boulders = {}
- Position = CF(Position)
- if KindOf == "Ring" or KindOf == "Both" then
- for RockValue = 1, Number do
- local LOCATION = Position * ANGLES(RAD(0), RAD((360/Number)*RockValue), RAD(0))*CF(0,MRANDOM(-math.ceil(Scale/4),math.ceil(Scale/4)),Range)
- local BOULDER = CreatePart(3, workspace, Texture, 0, 0, BRICKC("Pearl"), "Debree", ScaleVector, true)
- BOULDER.CanCollide = true
- BOULDER.CFrame = LOCATION*ANGLES(RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)))
- BOULDER.Color = Coloration
- table.insert(Boulders,BOULDER)
- end
- end
- if KindOf == "Loose" or KindOf == "Both" then
- for RockValue = 1, Rocks do
- local LOCATION = Position * ANGLES(RAD(0), RAD((360/Number)*RockValue), RAD(0))*CF(0,MRANDOM(-math.ceil(Scale-(Scale/2)),math.ceil(Scale-(Scale/2))),0.7)
- local BOULDER = CreatePart(3, workspace, Texture, 0, 0, BRICKC("Pearl"), "Debree", ScaleVector, false)
- BOULDER.CanCollide = true
- BOULDER.CFrame = LOCATION*ANGLES(RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)))
- BOULDER.Velocity = CF(BOULDER.Position-VT(0,4,0),BOULDER.CFrame*ANGLES(RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)))*CF(0,5,0).p).lookVector*MRANDOM(Fling-(Fling/1.5),Fling+(Fling/1.5))
- BOULDER.Color = Coloration
- table.insert(Boulders,BOULDER)
- end
- end
- if KindOf == "Random" then
- for RockValue = 1, Number do
- local LOCATION = Position * ANGLES(RAD(0), RAD((360/Number)*RockValue), RAD(0))*CF(0,MRANDOM(-math.ceil(Scale/4),math.ceil(Scale/4)),MRANDOM(0,Range))
- local BOULDER = CreatePart(3, workspace, Texture, 0, 0, BRICKC("Pearl"), "Debree", ScaleVector, true)
- BOULDER.CanCollide = true
- BOULDER.CFrame = LOCATION*ANGLES(RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)))
- BOULDER.Color = Coloration
- table.insert(Boulders,BOULDER)
- end
- end
- wait(Timer)
- for E = 1, 45 do
- Swait()
- for A = 1, #Boulders do
- Boulders[A].Transparency = Boulders[A].Transparency + 1/45
- end
- end
- for A = 1, #Boulders do
- Boulders[A]:Destroy()
- end
- end))
- end
- local BASECOLOR = C3(0,0,0)
- local VOLUME = 1
- local PITCH = 1
- local PLAYING = false
- local INTRO = false
- local SCREENS = {}
- local SCREENWELDS = {}
- local GUISTEXT = {}
- local GLASSESWLD = nil
- function NegativeAngle(NUMBER)
- if NUMBER <= 0 then
- NUMBER = 0
- end
- return NUMBER
- end
- function Swait(NUMBER)
- if NUMBER == 0 or NUMBER == nil then
- ArtificialHB.Event:wait()
- else
- for i = 1, NUMBER do
- ArtificialHB.Event:wait()
- end
- end
- end
- local GUID = {}
- local Func = Instance.new("RemoteFunction")
- Func.Name = "GetClientProperty"
- Func.Parent = script
- local fakeEvent = function()
- local t = {_fakeEvent=true,Waited={}}
- t.Connect = function(self,f)
- local ft={Disconnected=false;disconnect=function(s) s.Disconnected=true end}
- ft.Disconnect=ft.disconnect
- ft.Func=function(...)
- for id,_ in next, t.Waited do
- t.Waited[id] = true
- end
- return f(...)
- end;
- self.Function=ft;
- return ft;
- end
- t.connect = t.Connect
- t.Wait = function()
- local guid = GUID:new(25)
- local waitingId = guid:Get()
- t.Waited[waitingId]=false
- repeat Swait() until t.Waited[waitingId]==true
- t.Waited[waitingId]=nil;
- guid:Trash()
- end
- t.wait = t.Wait
- return t
- end
- local S = IT("Sound",script)
- function CreateSound(ID, PARENT, VOLUME, PITCH, DOESLOOP)
- local NEWSOUND = nil
- coroutine.resume(coroutine.create(function()
- NEWSOUND = S:Clone()
- NEWSOUND.Parent = PARENT
- NEWSOUND.Volume = VOLUME
- NEWSOUND.Pitch = PITCH
- NEWSOUND.SoundId = "http://www.roblox.com/asset/?id="..ID
- NEWSOUND:play()
- if DOESLOOP == true then
- NEWSOUND.Looped = true
- else
- repeat wait(1) until NEWSOUND.Playing == false or NEWSOUND.Parent ~= PARENT
- NEWSOUND:remove()
- end
- end))
- return NEWSOUND
- end
- function CreateMesh(MESH, PARENT, MESHTYPE, MESHID, TEXTUREID, SCALE, OFFSET)
- local NEWMESH = IT(MESH)
- if MESH == "SpecialMesh" then
- NEWMESH.MeshType = MESHTYPE
- if MESHID ~= "nil" and MESHID ~= "" then
- NEWMESH.MeshId = "http://www.roblox.com/asset/?id="..MESHID
- end
- if TEXTUREID ~= "nil" and TEXTUREID ~= "" then
- NEWMESH.TextureId = "http://www.roblox.com/asset/?id="..TEXTUREID
- end
- end
- NEWMESH.Offset = OFFSET or VT(0, 0, 0)
- NEWMESH.Scale = SCALE
- NEWMESH.Parent = PARENT
- return NEWMESH
- end
- function CreatePart(FORMFACTOR, PARENT, MATERIAL, REFLECTANCE, TRANSPARENCY, BRICKCOLOR, NAME, SIZE, ANCHOR)
- local NEWPART = IT("Part")
- NEWPART.formFactor = FORMFACTOR
- NEWPART.Reflectance = REFLECTANCE
- NEWPART.Transparency = TRANSPARENCY
- NEWPART.CanCollide = false
- NEWPART.Locked = true
- NEWPART.Anchored = true
- if ANCHOR == false then
- NEWPART.Anchored = false
- end
- NEWPART.BrickColor = BRICKC(tostring(BRICKCOLOR))
- NEWPART.Name = NAME
- NEWPART.Size = SIZE
- NEWPART.Position = Torso.Position
- NEWPART.Material = MATERIAL
- NEWPART:BreakJoints()
- NEWPART.Parent = PARENT
- return NEWPART
- end
- local function weldBetween(a, b)
- local weldd = Instance.new("ManualWeld")
- weldd.Part0 = a
- weldd.Part1 = b
- weldd.C0 = CFrame.new()
- weldd.C1 = b.CFrame:inverse() * a.CFrame
- weldd.Parent = a
- return weldd
- end
- local naeeym2 = Instance.new("BillboardGui",Character)
- naeeym2.AlwaysOnTop = true
- naeeym2.Size = UDim2.new(5,35,2,35)
- naeeym2.StudsOffset = Vector3.new(0,3,0)
- naeeym2.Adornee = Character.Head
- naeeym2.Name = "Name"
- local tecks2 = Instance.new("TextLabel",naeeym2)
- tecks2.BackgroundTransparency = 1
- tecks2.TextScaled = true
- tecks2.BorderSizePixel = 0
- tecks2.Text = "template"
- tecks2.Font = "Code"
- tecks2.TextSize = 30
- tecks2.TextTransparency = 1
- tecks2.TextStrokeTransparency = 1
- tecks2.Size = UDim2.new(1,0,0.5,0)
- tecks2.Parent = naeeym2
- function QuaternionFromCFrame(cf)
- local mx, my, mz, m00, m01, m02, m10, m11, m12, m20, m21, m22 = cf:components()
- local trace = m00 + m11 + m22
- if trace > 0 then
- local s = math.sqrt(1 + trace)
- local recip = 0.5 / s
- return (m21 - m12) * recip, (m02 - m20) * recip, (m10 - m01) * recip, s * 0.5
- else
- local i = 0
- if m11 > m00 then
- i = 1
- end
- if m22 > (i == 0 and m00 or m11) then
- i = 2
- end
- if i == 0 then
- local s = math.sqrt(m00 - m11 - m22 + 1)
- local recip = 0.5 / s
- return 0.5 * s, (m10 + m01) * recip, (m20 + m02) * recip, (m21 - m12) * recip
- elseif i == 1 then
- local s = math.sqrt(m11 - m22 - m00 + 1)
- local recip = 0.5 / s
- return (m01 + m10) * recip, 0.5 * s, (m21 + m12) * recip, (m02 - m20) * recip
- elseif i == 2 then
- local s = math.sqrt(m22 - m00 - m11 + 1)
- local recip = 0.5 / s return (m02 + m20) * recip, (m12 + m21) * recip, 0.5 * s, (m10 - m01) * recip
- end
- end
- end
- function QuaternionToCFrame(px, py, pz, x, y, z, w)
- local xs, ys, zs = x + x, y + y, z + z
- local wx, wy, wz = w * xs, w * ys, w * zs
- local xx = x * xs
- local xy = x * ys
- local xz = x * zs
- local yy = y * ys
- local yz = y * zs
- local zz = z * zs
- return CFrame.new(px, py, pz, 1 - (yy + zz), xy - wz, xz + wy, xy + wz, 1 - (xx + zz), yz - wx, xz - wy, yz + wx, 1 - (xx + yy))
- end
- function QuaternionSlerp(a, b, t)
- local cosTheta = a[1] * b[1] + a[2] * b[2] + a[3] * b[3] + a[4] * b[4]
- local startInterp, finishInterp;
- if cosTheta >= 0.0001 then
- if (1 - cosTheta) > 0.0001 then
- local theta = ACOS(cosTheta)
- local invSinTheta = 1 / SIN(theta)
- startInterp = SIN((1 - t) * theta) * invSinTheta
- finishInterp = SIN(t * theta) * invSinTheta
- else
- startInterp = 1 - t
- finishInterp = t
- end
- else
- if (1 + cosTheta) > 0.0001 then
- local theta = ACOS(-cosTheta)
- local invSinTheta = 1 / SIN(theta)
- startInterp = SIN((t - 1) * theta) * invSinTheta
- finishInterp = SIN(t * theta) * invSinTheta
- else
- startInterp = t - 1
- finishInterp = t
- end
- end
- return a[1] * startInterp + b[1] * finishInterp, a[2] * startInterp + b[2] * finishInterp, a[3] * startInterp + b[3] * finishInterp, a[4] * startInterp + b[4] * finishInterp
- end
- function Clerp(a, b, t)
- local qa = {QuaternionFromCFrame(a)}
- local qb = {QuaternionFromCFrame(b)}
- local ax, ay, az = a.x, a.y, a.z
- local bx, by, bz = b.x, b.y, b.z
- local _t = 1 - t
- return QuaternionToCFrame(_t * ax + t * bx, _t * ay + t * by, _t * az + t * bz, QuaternionSlerp(qa, qb, t))
- end
- function NoOutlines(PART)
- PART.TopSurface, PART.BottomSurface, PART.LeftSurface, PART.RightSurface, PART.FrontSurface, PART.BackSurface = 10, 10, 10, 10, 10, 10
- end
- function CreateWeldOrSnapOrMotor(TYPE, PARENT, PART0, PART1, C0, C1)
- local NEWWELD = IT(TYPE)
- NEWWELD.Part0 = PART0
- NEWWELD.Part1 = PART1
- NEWWELD.C0 = C0
- NEWWELD.C1 = C1
- NEWWELD.Parent = PARENT
- return NEWWELD
- end
- function MakeForm(PART,TYPE)
- if TYPE == "Cyl" then
- local MSH = IT("CylinderMesh",PART)
- elseif TYPE == "Ball" then
- local MSH = IT("SpecialMesh",PART)
- MSH.MeshType = "Sphere"
- elseif TYPE == "Wedge" then
- local MSH = IT("SpecialMesh",PART)
- MSH.MeshType = "Wedge"
- end
- end
- NewInstance = function(instance,parent,properties)
- local inst = Instance.new(instance)
- inst.Parent = parent
- if(properties)then
- for i,v in next, properties do
- pcall(function() inst[i] = v end)
- end
- end
- return inst;
- end
- local r = 255
- local g = 0
- local b = 0
- coroutine.resume(coroutine.create(function()
- while wait() do
- for i = 0, 254/5 do
- swait()
- g = g + 5
- end
- for i = 0, 254/5 do
- swait()
- r = r - 5
- end
- for i = 0, 254/5 do
- swait()
- b = b + 5
- end
- for i = 0, 254/5 do
- swait()
- g = g - 5
- end
- for i = 0, 254/5 do
- swait()
- r = r + 5
- end
- for i = 0, 254/5 do
- swait()
- b = b - 5
- end
- end
- end))
- function Chat(text,color)
- local who = Character
- coroutine.wrap(function()
- if(who:FindFirstChild'ChatGUI')then who.ChatGUI:destroy() end
- local BBG = NewInstance("BillboardGui",who,{Name='ChatGUI',Size=UDim2.new(0,100,0,40),StudsOffset=Vector3.new(0,3,0),Adornee=who.Head})
- local offset = 0;
- local xsize = 0;
- for i = 1, #text do
- offset = offset - 16
- xsize = xsize + 32
- delay(i/25, function()
- local Txt = NewInstance("TextLabel",BBG,{Text = text:sub(i,i),Position=UDim2.new(0,0,0,300),BackgroundTransparency=1,TextColor3=(typeof(color) == 'string' and color:lower() == 'rainbow' and C3.HSV(Hue/360,1,1)) or color,BorderSizePixel=0,Font=Enum.Font.Arcade,TextSize=40,TextStrokeTransparency=0,Size=UDim2.new(1,0,.5,0)})
- coroutine.resume(coroutine.create(function()
- while true do
- swait()
- Txt.TextColor3 = Color3.new(r/255,g/255,b/255)
- end
- end))
- offset = offset + 32
- if(Txt.Parent)then Txt:TweenPosition(UDim2.new(0,offset,0,0),Enum.EasingDirection.Out,Enum.EasingStyle.Elastic,1) end
- end)
- end
- BBG.Size = UDim2.new(0,xsize,0,40)
- delay((#text/25)+3, function()
- for _,v in next, BBG:children() do
- v:TweenPosition(UDim2.new(0,0,0,0),Enum.EasingDirection.In,Enum.EasingStyle.Linear,1)
- end
- wait(1.15)
- BBG:destroy()
- end)
- end)()
- end
- --ParticleEmitter({Speed = 0.5, Drag = 0, Size1 = 0.2, Size2 = 0, Lifetime1 = 0.3, Lifetime2 = 0.7, Parent = Dangle, Emit = 100, Offset = 360, Enabled = true, Acel = VT(0,5,0)})
- local sick = Instance.new("Sound",RootPart)
- sick.SoundId = "rbxassetid://"..SONGID
- sick.Volume = 2
- sick.Looped =true
- sick:Play()
- Mouse.KeyDown:Connect(function(key)
- KEYHOLD = true
- end)
- Mouse.KeyUp:Connect(function()
- KEYHOLD = false
- end)
- local loudnesses = {}
- local RW = RightShoulder
- local LW = LeftShoulder
- function clerp(a,b,t)
- local qa = {QuaternionFromCFrame(a)}
- local qb = {QuaternionFromCFrame(b)}
- local ax, ay, az = a.x, a.y, a.z
- local bx, by, bz = b.x, b.y, b.z
- local _t = 1-t
- return QuaternionToCFrame(_t*ax + t*bx, _t*ay + t*by, _t*az + t*bz,QuaternionSlerp(qa, qb, t))
- end
- local LH = LeftHip
- local RH = RightHip
- radian = math.rad
- random = math.random
- Vec3 = Vector3.new
- Inst = Instance.new
- cFrame = CFrame.new
- Euler = CFrame.fromEulerAnglesXYZ
- vt = Vector3.new
- bc = BrickColor.new
- br = BrickColor.random
- it = Instance.new
- cf = CFrame.new
- cam = game.Workspace.CurrentCamera
- CF = CFrame.new
- angles = CFrame.Angles
- Euler = CFrame.fromEulerAnglesXYZ
- Rad = math.rad
- IT = Instance.new
- BrickC = BrickColor.new
- Cos = math.cos
- Acos = math.acos
- Sin = math.sin
- Asin = math.asin
- Abs = math.abs
- Mrandom = math.random
- Floor = math.floor
- IT = Instance.new
- CF = CFrame.new
- VT = Vector3.new
- RAD = math.rad
- C3 = Color3.new
- UD2 = UDim2.new
- BRICKC = BrickColor.new
- ANGLES = CFrame.Angles
- EULER = CFrame.fromEulerAnglesXYZ
- COS = math.cos
- ACOS = math.acos
- SIN = math.sin
- ASIN = math.asin
- ABS = math.abs
- MRANDOM = math.random
- FLOOR = math.floor
- necko=cf(0, 1, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0)
- necko2=cf(0, -0.5, 0, -1, -0, -0, 0, 0, 1, 0, 1, 0)
- LHC0=cf(-1,-1,0,-0,-0,-1,0,1,0,1,0,0)
- LHC1=cf(-0.5,1,0,-0,-0,-1,0,1,0,1,0,0)
- RHC0=cf(1,-1,0,0,0,1,0,1,0,-1,-0,-0)
- RHC1=cf(0.5,1,0,0,0,1,0,1,0,-1,-0,-0)
- local sine = 0
- local change = 1
- local kan = sick
- local musicinfo = game.MarketplaceService:GetProductInfo(SONGID)
- function WACKYEFFECT(Table)
- local TYPE = (Table.EffectType or "Sphere")
- local SIZE = (Table.Size or VT(1,1,1))
- local ENDSIZE = (Table.Size2 or VT(0,0,0))
- local TRANSPARENCY = (Table.Transparency or 0)
- local ENDTRANSPARENCY = (Table.Transparency2 or 1)
- local CFRAME = (Table.CFrame or Torso.CFrame)
- local MOVEDIRECTION = (Table.MoveToPos or nil)
- local ROTATION1 = (Table.RotationX or 0)
- local ROTATION2 = (Table.RotationY or 0)
- local ROTATION3 = (Table.RotationZ or 0)
- local MATERIAL = (Table.Material or "Neon")
- local COLOR = (Table.Color or C3(1,1,1))
- local TIME = (Table.Time or 45)
- local SOUNDID = (Table.SoundID or nil)
- local SOUNDPITCH = (Table.SoundPitch or nil)
- local SOUNDVOLUME = (Table.SoundVolume or nil)
- coroutine.resume(coroutine.create(function()
- local PLAYSSOUND = false
- local SOUND = nil
- local EFFECT = CreatePart(3, Effects, MATERIAL, 0, TRANSPARENCY, BRICKC("Pearl"), "Effect", VT(1,1,1), true)
- if SOUNDID ~= nil and SOUNDPITCH ~= nil and SOUNDVOLUME ~= nil then
- PLAYSSOUND = true
- SOUND = CreateSound(SOUNDID, EFFECT, SOUNDVOLUME, SOUNDPITCH, false)
- end
- EFFECT.Color = COLOR
- local MSH = nil
- if TYPE == "Sphere" then
- MSH = CreateMesh("SpecialMesh", EFFECT, "Sphere", "", "", SIZE, VT(0,0,0))
- elseif TYPE == "Block" then
- MSH = IT("BlockMesh",EFFECT)
- MSH.Scale = VT(SIZE.X,SIZE.X,SIZE.X)
- elseif TYPE == "Wave" then
- MSH = CreateMesh("SpecialMesh", EFFECT, "FileMesh", "20329976", "", SIZE, VT(0,0,-SIZE.X/8))
- elseif TYPE == "Ring" then
- MSH = CreateMesh("SpecialMesh", EFFECT, "FileMesh", "559831844", "", VT(SIZE.X,SIZE.X,0.1), VT(0,0,0))
- elseif TYPE == "Slash" then
- MSH = CreateMesh("SpecialMesh", EFFECT, "FileMesh", "662586858", "", VT(SIZE.X/10,0,SIZE.X/10), VT(0,0,0))
- elseif TYPE == "Round Slash" then
- MSH = CreateMesh("SpecialMesh", EFFECT, "FileMesh", "662585058", "", VT(SIZE.X/10,0,SIZE.X/10), VT(0,0,0))
- elseif TYPE == "Swirl" then
- MSH = CreateMesh("SpecialMesh", EFFECT, "FileMesh", "1051557", "", SIZE, VT(0,0,0))
- elseif TYPE == "Skull" then
- MSH = CreateMesh("SpecialMesh", EFFECT, "FileMesh", "4770583", "", SIZE, VT(0,0,0))
- elseif TYPE == "Crystal" then
- MSH = CreateMesh("SpecialMesh", EFFECT, "FileMesh", "9756362", "", SIZE, VT(0,0,0))
- end
- if MSH ~= nil then
- local MOVESPEED = nil
- if MOVEDIRECTION ~= nil then
- MOVESPEED = (CFRAME.p - MOVEDIRECTION).Magnitude/TIME
- end
- local GROWTH = SIZE - ENDSIZE
- local TRANS = TRANSPARENCY - ENDTRANSPARENCY
- if TYPE == "Block" then
- EFFECT.CFrame = CFRAME*ANGLES(RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)))
- else
- EFFECT.CFrame = CFRAME
- end
- for LOOP = 1, TIME+1 do
- Swait()
- MSH.Scale = MSH.Scale - GROWTH/TIME
- if TYPE == "Wave" then
- MSH.Offset = VT(0,0,-MSH.Scale.X/8)
- end
- EFFECT.Transparency = EFFECT.Transparency - TRANS/TIME
- if TYPE == "Block" then
- EFFECT.CFrame = CFRAME*ANGLES(RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)),RAD(MRANDOM(0,360)))
- else
- EFFECT.CFrame = EFFECT.CFrame*ANGLES(RAD(ROTATION1),RAD(ROTATION2),RAD(ROTATION3))
- end
- if MOVEDIRECTION ~= nil then
- local ORI = EFFECT.Orientation
- EFFECT.CFrame = CF(EFFECT.Position,MOVEDIRECTION)*CF(0,0,-MOVESPEED)
- EFFECT.Orientation = ORI
- end
- end
- if PLAYSSOUND == false then
- EFFECT:remove()
- else
- SOUND.Stopped:Connect(function()
- EFFECT:remove()
- end)
- end
- else
- if PLAYSSOUND == false then
- EFFECT:remove()
- else
- repeat Swait() until SOUND.Playing == false
- EFFECT:remove()
- end
- end
- end))
- end
- MAINRUINCOLOR = Color3.new(r/255,g/255,b/255)
- Player.Chatted:connect(function(msg)
- if(msg:sub(1,5) == "play/")then
- SONGID = tonumber(msg:sub(6))
- sick.SoundId = "rbxassetid://"..SONGID
- elseif msg:sub(1,4) == "vol/" then
- VOLUME = tonumber(msg:sub(5))
- elseif msg:sub(1,6) == "pitch/" then
- PITCH = msg:sub(7)
- end
- end)
- local noteblock = script.Noteblock:Clone()
- noteblock.Parent = Character
- local bp = Instance.new("BodyPosition", noteblock)
- bp.Position = Character:FindFirstChild("Torso").CFrame * CFrame.new(0, 9, 0).p
- bp.MaxForce = Vector3.new(10000,10000,10000)
- bp.P = 100000
- local rbm = false
- local csm = false
- local loud = GetClientProperty(kan,"PlaybackLoudness")/200
- local timepos = 0
- local mesh = noteblock.Mesh
- returntex = function()
- local function sandbox(var,func)
- local env = getfenv(func)
- local newenv = setmetatable({},{
- __index = function(self,k)
- if k=="script" then
- return var
- else
- return env[k]
- end
- end,
- })
- setfenv(func,newenv)
- return func
- end
- local cors = {}
- local mas = Instance.new("Model",game:GetService("Lighting"))
- local Texture0 = Instance.new("Texture")
- local Texture1 = Instance.new("Texture")
- local Texture2 = Instance.new("Texture")
- local Texture3 = Instance.new("Texture")
- local Texture4 = Instance.new("Texture")
- local Texture5 = Instance.new("Texture")
- Texture0.Parent = mas
- Texture0.Texture = "http://www.roblox.com/asset/?id=87160999"
- Texture0.StudsPerTileU = 4
- Texture0.StudsPerTileV = 4
- Texture1.Parent = mas
- Texture1.Texture = "http://www.roblox.com/asset/?id=87160999"
- Texture1.Face = Enum.NormalId.Left
- Texture1.StudsPerTileU = 4
- Texture1.StudsPerTileV = 4
- Texture2.Parent = mas
- Texture2.Texture = "http://www.roblox.com/asset/?id=87160999"
- Texture2.Face = Enum.NormalId.Top
- Texture2.StudsPerTileU = 4
- Texture2.StudsPerTileV = 4
- Texture3.Parent = mas
- Texture3.Texture = "http://www.roblox.com/asset/?id=87160999"
- Texture3.Face = Enum.NormalId.Bottom
- Texture3.StudsPerTileU = 4
- Texture3.StudsPerTileV = 4
- Texture4.Parent = mas
- Texture4.Texture = "http://www.roblox.com/asset/?id=87160999"
- Texture4.Face = Enum.NormalId.Right
- Texture4.StudsPerTileU = 4
- Texture4.StudsPerTileV = 4
- Texture5.Parent = mas
- Texture5.Texture = "http://www.roblox.com/asset/?id=87160999"
- Texture5.Face = Enum.NormalId.Back
- Texture5.StudsPerTileU = 4
- Texture5.StudsPerTileV = 4
- for i,v in pairs(mas:GetChildren()) do
- v.Parent = noteblock
- pcall(function() v:MakeJoints() end)
- end
- mas:Destroy()
- for i,v in pairs(cors) do
- spawn(function()
- pcall(v)
- end)
- end
- end
- noteblock.ChildRemoved:Connect(function(a)
- if a:IsA("Texture") then
- returntex()
- end
- end)
- while true do
- Swait()
- bp.Position = Character:FindFirstChild("Torso").CFrame * CFrame.new(0, 9, 0).p
- loud = GetClientProperty(kan,"PlaybackLoudness")/200
- if sick.Parent == RootPart then
- timepos = sick.TimePosition
- sick.SoundId = "rbxassetid://"..SONGID
- sick.Volume = VOLUME
- sick.PlaybackSpeed = PITCH
- sick:Resume()
- sick.Looped =true
- else
- sick = Instance.new("Sound",RootPart)
- kan = sick
- sick.TimePosition = timepos
- sick:Play()
- end
- mesh.Scale = Vec3(0.5+loud,0.5+loud,0.5+loud)
- end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement