----- Script made by Pedrorb03 -----

if game:GetService("RunService"):IsClient() then error("Script must be server-side in order to work; use h/ and not hl/") end
local Player,Mouse,mouse,UserInputService,ContextActionService = owner
local RealPlayer = Player
do print("FE Compatibility code by Mokiros")local a=RealPlayer;script.Parent=a.Character;local b=Instance.new("RemoteEvent")b.Name="UserInput_Event"local function c()local d={_fakeEvent=true,Functions={},Connect=function(self,e)table.insert(self.Functions,e)end}d.connect=d.Connect;return d end;local f={Target=nil,Hit=CFrame.new(),KeyUp=c(),KeyDown=c(),Button1Up=c(),Button1Down=c(),Button2Up=c(),Button2Down=c()}local g={InputBegan=c(),InputEnded=c()}local CAS={Actions={},BindAction=function(self,h,i,j,...)CAS.Actions[h]=i and{Name=h,Function=i,Keys={...}}or nil end}CAS.UnbindAction=CAS.BindAction;local function k(self,l,...)local d=f[l]if d and d._fakeEvent then for m,e in pairs(d.Functions)do e(...)end end end;f.TrigEvent=k;g.TrigEvent=k;b.OnServerEvent:Connect(function(n,o)if n~=a then return end;f.Target=o.Target;f.Hit=o.Hit;if not o.isMouse then local p=o.UserInputState==Enum.UserInputState.Begin;if o.UserInputType==Enum.UserInputType.MouseButton1 then return f:TrigEvent(p and"Button1Down"or"Button1Up")end;if o.UserInputType==Enum.UserInputType.MouseButton2 then return f:TrigEvent(p and"Button2Down"or"Button2Up")end;for m,d in pairs(CAS.Actions)do for m,q in pairs(d.Keys)do if q==o.KeyCode then d.Function(d.Name,o.UserInputState,o)end end end;f:TrigEvent(p and"KeyDown"or"KeyUp",o.KeyCode.Name:lower())g:TrigEvent(p and"InputBegan"or"InputEnded",o,false)end end)b.Parent=NLS([==[local a=game:GetService("Players").LocalPlayer;local b=script:WaitForChild("UserInput_Event")local c=a:GetMouse()local d=game:GetService("UserInputService")local e=function(f,g)if g then return end;b:FireServer({KeyCode=f.KeyCode,UserInputType=f.UserInputType,UserInputState=f.UserInputState,Hit=c.Hit,Target=c.Target})end;d.InputBegan:Connect(e)d.InputEnded:Connect(e)local h,i;while wait(1/30)do if h~=c.Hit or i~=c.Target then h,i=c.Hit,c.Target;b:FireServer({isMouse=true,Target=i,Hit=h})end end]==],Player.Character)local r=game;local s={__index=function(self,q)local t=rawget(self,"_RealService")if t then return typeof(t[q])=="function"and function(m,...)return t[q](t,...)end or t[q]end end,__newindex=function(self,q,u)local t=rawget(self,"_RealService")if t then t[q]=u end end}local function v(d,w)d._RealService=typeof(w)=="string"and r:GetService(w)or w;return setmetatable(d,s)end;local x={GetService=function(self,t)return rawget(self,t)or r:GetService(t)end,Players=v({LocalPlayer=v({GetMouse=function(self)return f end},Player)},"Players"),UserInputService=v(g,"UserInputService"),ContextActionService=v(CAS,"ContextActionService"),RunService=v({_btrs={},RenderStepped=r:GetService("RunService").Heartbeat,BindToRenderStep=function(self,h,m,i)self._btrs[h]=self.Heartbeat:Connect(i)end,UnbindFromRenderStep=function(self,h)self._btrs[h]:Disconnect()end},"RunService")}rawset(x.Players,"localPlayer",x.Players.LocalPlayer)x.service=x.GetService;v(x,game)game,owner=x,x.Players.LocalPlayer end



laser = nil
laserRot = 0
pos2 = Vector3.new(0,0,0)
counter = 0
function chargeLaser()
	local part = Instance.new("Part")
	part.Name = "ChargingLaser"
	game:GetService("Debris"):AddItem(part,1)
	part.Parent = game.Players.LocalPlayer.Character
	part.BackSurface = Enum.SurfaceType.SmoothNoOutlines
	part.FrontSurface = Enum.SurfaceType.SmoothNoOutlines
	part.TopSurface = Enum.SurfaceType.SmoothNoOutlines
	part.BottomSurface = Enum.SurfaceType.SmoothNoOutlines
	part.LeftSurface = Enum.SurfaceType.SmoothNoOutlines
	part.RightSurface = Enum.SurfaceType.SmoothNoOutlines
    part.Material = Enum.Material.Neon
    part.Anchored = true
    part.CanCollide = false
    part.Size = Vector3.new(0.5,0.5,0.5)
    local light = math.random(50,150)
    local rotx = math.random(-360,360)
local roty = math.random(-360,360)
local rotz = math.random(-360,360)
    part.Color = Color3.fromRGB(light,light,light)
part.Transparency = 0.4
part.CFrame = game.Players.LocalPlayer.Character["Right Arm"].CFrame:toWorldSpace(CFrame.new(Vector3.new(0,-1.1,0))) *CFrame.Angles(math.rad(rotx),math.rad(roty),math.rad(rotz))
    for i=0.4,1,0.1 do
	wait()
	part.Size = Vector3.new(0.5+i,0.5+i,0.5+i)
	part.Transparency = i
part.CFrame = game.Players.LocalPlayer.Character["Right Arm"].CFrame:toWorldSpace(CFrame.new(Vector3.new(0,-1.1,0))) *CFrame.Angles(math.rad(rotx),math.rad(roty),math.rad(rotz))
end
part:remove()
end
function chargeLaser2()
	local part = Instance.new("Part")
	game:GetService("Debris"):AddItem(part,1)
	part.Name = "ChargingLaser2"
	part.Parent = game.Players.LocalPlayer.Character
	part.BackSurface = Enum.SurfaceType.SmoothNoOutlines
	part.FrontSurface = Enum.SurfaceType.SmoothNoOutlines
	part.TopSurface = Enum.SurfaceType.SmoothNoOutlines
	part.BottomSurface = Enum.SurfaceType.SmoothNoOutlines
	part.LeftSurface = Enum.SurfaceType.SmoothNoOutlines
	part.RightSurface = Enum.SurfaceType.SmoothNoOutlines
    part.Material = Enum.Material.Neon
    part.Anchored = true
    part.CanCollide = false
    part.Size = Vector3.new(2,2,2)
    local light = math.random(50,150)
    local rotx = math.random(-360,360)
local roty = math.random(-360,360)
local rotz = math.random(-360,360)
    part.Color = Color3.fromRGB(light,light,light)
part.Transparency = 0.4
part.CFrame = CFrame.new(pos2) *CFrame.Angles(math.rad(rotx),math.rad(roty),math.rad(rotz))
    for i=0.4,1,0.1 do
	wait()
	part.Size = Vector3.new(2+i,2+i,2+i)
	part.Transparency = i
part.CFrame = CFrame.new(pos2) *CFrame.Angles(math.rad(rotx),math.rad(roty),math.rad(rotz))
end
part:remove()
end




game:GetService("RunService").RenderStepped:connect(function()
	counter = counter +1
	if counter >= 3 then
		counter = 0
		chargeLaser()
		if laser ~= nil then
			chargeLaser2(pos2)
		end
	end

	laserRot = laserRot+1
	if laser ~= nil then
		local pos1 = game.Players.LocalPlayer.Character.ChargingLaser.Position
		pos2 = game.Players.LocalPlayer:GetMouse().Hit.p

		laser.Size = Vector3.new(0.75,0.75,(pos1-pos2).magnitude)
		laser.CFrame = CFrame.new((pos1+pos2)/2,pos1)*CFrame.Angles(0,0,math.rad(laserRot))

		local ray = Ray.new(pos1,(pos2-pos1).unit*600)
        local hit,position,normal = game.Workspace:FindPartOnRay(ray,game.Players.LocalPlayer.Character)
		if hit then


			hit.Name = "nil"
			hit.Material = Enum.Material.Concrete

			local c= hit.Color.r+hit.Color.g+hit.Color.b

			c = c*255
		c = c/3
			hit.Color = Color3.fromRGB(c,c,c)


			for _,child in pairs(hit:GetChildren()) do
				if child:IsA("BasePart") then


					child.Name = "nil"
			child.Material = Enum.Material.Concrete
				local c= child.Color.r+child.Color.g+child.Color.b

			c = c*255
			c = c/3
			child.Color = Color3.fromRGB(c,c,c)

				end
				if not child:IsA("BasePart") then
					child:remove()
				end
			end
		end
	end
end)
game:GetService("UserInputService").InputBegan:connect(function(key)
	if key.KeyCode == Enum.KeyCode.F then
	game.Players.LocalPlayer.Character.Torso["Right Shoulder"].C0 = game.Players.LocalPlayer.Character.Torso["Right Shoulder"].C0*CFrame.Angles(0,0,math.rad(90))
	laser = Instance.new("Part")
	laser.Name = "Laser"
	laser.Transparency = 0.25
	laser.Parent = game.Players.LocalPlayer.Character
	laser.BackSurface = Enum.SurfaceType.SmoothNoOutlines
	laser.FrontSurface = Enum.SurfaceType.SmoothNoOutlines
	laser.TopSurface = Enum.SurfaceType.SmoothNoOutlines
	laser.BottomSurface = Enum.SurfaceType.SmoothNoOutlines
	laser.LeftSurface = Enum.SurfaceType.SmoothNoOutlines
	laser.RightSurface = Enum.SurfaceType.SmoothNoOutlines
    laser.Material = Enum.Material.Neon
    laser.Anchored = true
    laser.CanCollide = false
    laser.Size = Vector3.new(0.75,0.75,0.75)
    laser.Color = Color3.fromRGB(100,100,100)

	end
end)
game:GetService("UserInputService").InputEnded:connect(function(key)
	if key.KeyCode == Enum.KeyCode.F then
	game.Players.LocalPlayer.Character.Torso["Right Shoulder"].C0 = game.Players.LocalPlayer.Character.Torso["Right Shoulder"].C0*CFrame.Angles(0,0,math.rad(-90))
	laser:remove()
	laser = nil
	end
end)