-- This script has been converted to FE by iPxter


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
do
	print("FE Compatibility code by Mokiros | Translated to FE by iPxter")
	script.Parent = Player.Character

	--RemoteEvent for communicating
	local Event = Instance.new("RemoteEvent")
	Event.Name = "UserInput_Event"

	--Fake event to make stuff like Mouse.KeyDown work
	local function fakeEvent()
		local t = {_fakeEvent=true,Connect=function(self,f)self.Function=f end}
		t.connect = t.Connect
		return t
	end

	--Creating fake input objects with fake variables
    local m = {Target=nil,Hit=CFrame.new(),KeyUp=fakeEvent(),KeyDown=fakeEvent(),Button1Up=fakeEvent(),Button1Down=fakeEvent()}
	local UIS = {InputBegan=fakeEvent(),InputEnded=fakeEvent()}
	local CAS = {Actions={},BindAction=function(self,name,fun,touch,...)
		CAS.Actions[name] = fun and {Name=name,Function=fun,Keys={...}} or nil
	end}
	--Merged 2 functions into one by checking amount of arguments
	CAS.UnbindAction = CAS.BindAction

	--This function will trigger the events that have been :Connect()'ed
	local function te(self,ev,...)
		local t = m[ev]
		if t and t._fakeEvent and t.Function then
			t.Function(...)
		end
	end
	m.TrigEvent = te
	UIS.TrigEvent = te

	Event.OnServerEvent:Connect(function(plr,io)
	    if plr~=Player then return end
		if io.isMouse then
			m.Target = io.Target
			m.Hit = io.Hit
		else
			local b = io.UserInputState == Enum.UserInputState.Begin
			if io.UserInputType == Enum.UserInputType.MouseButton1 then
				return m:TrigEvent(b and "Button1Down" or "Button1Up")
			end
			for _,t in pairs(CAS.Actions) do
				for _,k in pairs(t.Keys) do
					if k==io.KeyCode then
						t.Function(t.Name,io.UserInputState,io)
					end
				end
			end
			m:TrigEvent(b and "KeyDown" or "KeyUp",io.KeyCode.Name:lower())
			UIS:TrigEvent(b and "InputBegan" or "InputEnded",io,false)
	    end
	end)
	Event.Parent = NLS([==[
	local Player = game:GetService("Players").LocalPlayer
	local Event = script:WaitForChild("UserInput_Event")

	local UIS = game:GetService("UserInputService")
	local input = function(io,a)
		if a then return end
		--Since InputObject is a client-side instance, we create and pass table instead
		Event:FireServer({KeyCode=io.KeyCode,UserInputType=io.UserInputType,UserInputState=io.UserInputState})
	end
	UIS.InputBegan:Connect(input)
	UIS.InputEnded:Connect(input)

	local Mouse = Player:GetMouse()
	local h,t
	--Give the server mouse data 30 times every second, but only if the values changed
	--If player is not moving their mouse, client won't fire events
	while wait(1/30) do
		if h~=Mouse.Hit or t~=Mouse.Target then
			h,t=Mouse.Hit,Mouse.Target
			Event:FireServer({isMouse=true,Target=t,Hit=h})
		end
	end]==],Player.Character)
	Mouse,mouse,UserInputService,ContextActionService = m,m,UIS,CAS
	end


--Converted with ttyyuu12345's model to script plugin v4
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
cors = {}
mas = Instance.new("Model",game:GetService("Lighting"))
Tool0 = Instance.new("Tool")
Part1 = Instance.new("Part")
LocalScript2 = Instance.new("LocalScript")
Script3 = Instance.new("Script")
LocalScript4 = Instance.new("LocalScript")
LocalScript5 = Instance.new("LocalScript")
Part6 = Instance.new("Part")
LocalScript7 = Instance.new("LocalScript")
LocalScript8 = Instance.new("LocalScript")
Sound9 = Instance.new("Sound")
ParticleEmitter10 = Instance.new("ParticleEmitter")
PointLight11 = Instance.new("PointLight")
LocalScript12 = Instance.new("LocalScript")
Sound13 = Instance.new("Sound")
ParticleEmitter14 = Instance.new("ParticleEmitter")
PointLight15 = Instance.new("PointLight")
BillboardGui16 = Instance.new("BillboardGui")
TextBox17 = Instance.new("TextBox")
Accessory18 = Instance.new("Accessory")
Part19 = Instance.new("Part")
SpecialMesh20 = Instance.new("SpecialMesh")
Attachment21 = Instance.new("Attachment")
Vector3Value22 = Instance.new("Vector3Value")
Weld23 = Instance.new("Weld")
Accessory24 = Instance.new("Accessory")
Part25 = Instance.new("Part")
SpecialMesh26 = Instance.new("SpecialMesh")
Attachment27 = Instance.new("Attachment")
Weld28 = Instance.new("Weld")
Accessory29 = Instance.new("Accessory")
Part30 = Instance.new("Part")
SpecialMesh31 = Instance.new("SpecialMesh")
Attachment32 = Instance.new("Attachment")
Vector3Value33 = Instance.new("Vector3Value")
Weld34 = Instance.new("Weld")
Weld35 = Instance.new("Weld")
LocalScript36 = Instance.new("LocalScript")
ForceField37 = Instance.new("ForceField")
Sound38 = Instance.new("Sound")
LocalScript39 = Instance.new("LocalScript")
ForceField40 = Instance.new("ForceField")
LocalScript41 = Instance.new("LocalScript")
LocalScript42 = Instance.new("LocalScript")
Sound43 = Instance.new("Sound")
ParticleEmitter44 = Instance.new("ParticleEmitter")
PointLight45 = Instance.new("PointLight")
LocalScript46 = Instance.new("LocalScript")
Sound47 = Instance.new("Sound")
ParticleEmitter48 = Instance.new("ParticleEmitter")
PointLight49 = Instance.new("PointLight")
Tool0.Name = "Aquamarine Wand"
Tool0.Parent = mas
Tool0.GripForward = Vector3.new(-0.914366484, 0.380257547, -0.139060885)
Tool0.GripPos = Vector3.new(0.600966454, 0.271429777, 0.0519190952)
Tool0.GripRight = Vector3.new(-0.128400177, 0.0533977672, 0.990283847)
Tool0.GripUp = Vector3.new(-0.38398847, -0.923337817, 0)
Tool0.CanBeDropped = false
Part1.Name = "Handle"
Part1.Parent = Tool0
Part1.Material = Enum.Material.SmoothPlastic
Part1.BrickColor = BrickColor.new("Navy blue")
Part1.Rotation = Vector3.new(-90, -0.00999999978, -90)
Part1.CanCollide = false
Part1.FormFactor = Enum.FormFactor.Custom
Part1.Shape = Enum.PartType.Cylinder
Part1.Size = Vector3.new(2.13999963, 0.170000076, 0.199999973)
Part1.CFrame = CFrame.new(118.000183, 39.6357765, -40.8030701, 0, 1, -9.89999971e-05, 6.60000005e-05, 9.89999971e-05, 1, 1, -6.53400001e-09, -6.60000005e-05)
Part1.BottomSurface = Enum.SurfaceType.Smooth
Part1.TopSurface = Enum.SurfaceType.Smooth
Part1.Color = Color3.new(0.0862745, 0.105882, 0.407843)
Part1.Position = Vector3.new(118.000183, 39.6357765, -40.8030701)
Part1.Orientation = Vector3.new(-90, -90, 0)
Part1.Color = Color3.new(0.0862745, 0.105882, 0.407843)
LocalScript2.Parent = Tool0
table.insert(cors,sandbox(LocalScript2,function()
-- Variables for services
local render = game:GetService("RunService").RenderStepped
local contextActionService = game:GetService("ContextActionService")
local userInputService = game:GetService("UserInputService")

local player = owner
local mouse = player:GetMouse()
local Tool = script.Parent

-- Variables for Module Scripts
local screenSpace = require(Tool:WaitForChild("ScreenSpace"))

local connection
-- Variables for character joints

local neck, shoulder, oldNeckC0, oldShoulderC0

local mobileShouldTrack = true

-- Thourough check to see if a character is sitting
local function amISitting(character)
	local t = character.Torso
	for _, part in pairs(t:GetConnectedParts(true)) do
		if part:IsA("Seat") or part:IsA("VehicleSeat") then
			return true
		end
	end
end

-- Function to call on renderstepped. Orients the character so it is facing towards
-- the player mouse's position in world space. If character is sitting then the torso
-- should not track
local function frame(mousePosition)
	-- Special mobile consideration. We don't want to track if the user was touching a ui
	-- element such as the movement controls. Just return out of function if so to make sure
	-- character doesn't track
	if not mobileShouldTrack then return end

	-- Make sure character isn't swiming. If the character is swimming the following code will
	-- not work well; the character will not swim correctly. Besides, who shoots underwater?
	if player.Character.Humanoid:GetState() ~= Enum.HumanoidStateType.Swimming then
		local torso = player.Character.Torso
		local head = player.Character.Head

		local toMouse = (mousePosition - head.Position).unit
		local angle = math.acos(toMouse:Dot(Vector3.new(0,1,0)))

		local neckAngle = angle

		-- Limit how much the head can tilt down. Too far and the head looks unnatural
		if math.deg(neckAngle) > 110 then
			neckAngle = math.rad(110)
		end
		neck.C0 = CFrame.new(0,1,0) * CFrame.Angles(math.pi - neckAngle,math.pi,0)

		-- Calculate horizontal rotation
		local arm = player.Character:FindFirstChild("Right Arm")
		local fromArmPos = torso.Position + torso.CFrame:vectorToWorldSpace(Vector3.new(
			torso.Size.X/2 + arm.Size.X/2, torso.Size.Y/2 - arm.Size.Z/2, 0))
		local toMouseArm = ((mousePosition - fromArmPos) * Vector3.new(1,0,1)).unit
		local look = (torso.CFrame.lookVector * Vector3.new(1,0,1)).unit
		local lateralAngle = math.acos(toMouseArm:Dot(look))

		-- Check for rogue math
		if tostring(lateralAngle) == "-1.#IND" then
			lateralAngle = 0
		end

		-- Handle case where character is sitting down
		if player.Character.Humanoid:GetState() == Enum.HumanoidStateType.Seated then

			local cross = torso.CFrame.lookVector:Cross(toMouseArm)
			if lateralAngle > math.pi/2 then
				lateralAngle = math.pi/2
			end
			if cross.Y < 0 then
				lateralAngle = -lateralAngle
			end
		end

		-- Turn shoulder to point to mouse
		shoulder.C0 = CFrame.new(1,0.5,0) * CFrame.Angles(math.pi/2 - angle,math.pi/2 + lateralAngle,0)

		-- If not sitting then aim torso laterally towards mouse
		if not amISitting(player.Character) then
			torso.CFrame = CFrame.new(torso.Position, torso.Position + (Vector3.new(
				mousePosition.X, torso.Position.Y, mousePosition.Z)-torso.Position).unit)
		else
			--print("sitting")
		end
	end
end

-- Function to bind to render stepped if player is on PC
local function pcFrame()
	frame(mouse.Hit.p)
end

-- Function to bind to touch moved if player is on mobile
local function mobileFrame(touch, processed)
	-- Check to see if the touch was on a UI element. If so, we don't want to update anything
	if not processed then
		-- Calculate touch position in world space. Uses Stravant's ScreenSpace Module script
		-- to create a ray from the camera.
		local test = screenSpace.ScreenToWorld(touch.Position.X, touch.Position.Y, 1)
		local nearPos = game.Workspace.CurrentCamera.CoordinateFrame:vectorToWorldSpace(screenSpace.ScreenToWorld(touch.Position.X, touch.Position.Y, 1))
		nearPos = game.Workspace.CurrentCamera.CoordinateFrame.p - nearPos
		local farPos = screenSpace.ScreenToWorld(touch.Position.X, touch.Position.Y,50)
		farPos = game.Workspace.CurrentCamera.CoordinateFrame:vectorToWorldSpace(farPos) * -1
		if farPos.magnitude > 900 then
			farPos = farPos.unit * 900
		end
		local ray = Ray.new(nearPos, farPos)
		local part, pos = game.Workspace:FindPartOnRay(ray, player.Character)

		-- if a position was found on the ray then update the character's rotation
		if pos then
			frame(pos)
		end
	end
end

local oldIcon = nil
-- Function to bind to equip event
local function equip()
	local torso = player.Character.Torso

	-- Setup joint variables
	neck = torso.Neck
	oldNeckC0 = neck.C0
	shoulder = torso:FindFirstChild("Right Shoulder")
	oldShoulderC0 = shoulder.C0

	-- Remember old mouse icon and update current
	oldIcon = mouse.Icon
	mouse.Icon = "http://www.roblox.com/asset/?id=170477320"

	-- Bind TouchMoved event if on mobile. Otherwise connect to renderstepped
	if userInputService.TouchEnabled then
		connection = userInputService.TouchMoved:connect(mobileFrame)
	else
		connection = render:connect(pcFrame)
	end

	-- Bind TouchStarted and TouchEnded. Used to determine if character should rotate
	-- during touch input
	userInputService.TouchStarted:connect(function(touch, processed)
		mobileShouldTrack = not processed
	end)
	userInputService.TouchEnded:connect(function(touch, processed)
		mobileShouldTrack = false
	end)

	-- Fire server's equip event
	game.ReplicatedStorage.ROBLOX_PistolEquipEvent:FireServer()

	-- Bind event for when mouse is clicked to fire server's fire event
	mouse.Button1Down:connect(function()
		game.ReplicatedStorage.ROBLOX_PistolFireEvent:FireServer(mouse.Hit.p)
	end)

	-- Bind reload event to mobile button and r key
	contextActionService:BindActionToInputTypes("Reload", function()
		game.ReplicatedStorage.ROBLOX_PistolReloadEvent:FireServer()
	end, true, "")

	-- If game uses filtering enabled then need to update server while tool is
	-- held by character.
	if workspace.FilteringEnabled then
		while connection do
			wait()
			game.ReplicatedStorage.ROBLOX_PistolUpdateEvent:FireServer(neck.C0, shoulder.C0)
		end
	end
end

-- Function to bind to Unequip event
local function unequip()
	if connection then connection:disconnect() end
	contextActionService:UnbindAction("Reload")
	game.ReplicatedStorage.ROBLOX_PistolUnequipEvent:FireServer()
	mouse.Icon = oldIcon
	neck.C0 = oldNeckC0
	shoulder.C0 = oldShoulderC0
end

-- Bind tool events
Tool.Equipped:connect(equip)
Tool.Unequipped:connect(unequip)
end))
Script3.Name = "qPerfectionWeld"
Script3.Parent = Tool0
table.insert(cors,sandbox(Script3,function()
-- Created by Quenty (@Quenty, follow me on twitter).
-- Should work with only ONE copy, seamlessly with weapons, trains, et cetera.
-- Parts should be ANCHORED before use. It will, however, store relatives values and so when tools are reparented, it'll fix them.

--[[ INSTRUCTIONS
- Place in the model
- Make sure model is anchored
- That's it. It will weld the model and all children.

THIS SCRIPT SHOULD BE USED ONLY BY ITSELF. THE MODEL SHOULD BE ANCHORED.
THIS SCRIPT SHOULD BE USED ONLY BY ITSELF. THE MODEL SHOULD BE ANCHORED.
THIS SCRIPT SHOULD BE USED ONLY BY ITSELF. THE MODEL SHOULD BE ANCHORED.
THIS SCRIPT SHOULD BE USED ONLY BY ITSELF. THE MODEL SHOULD BE ANCHORED.
THIS SCRIPT SHOULD BE USED ONLY BY ITSELF. THE MODEL SHOULD BE ANCHORED.
THIS SCRIPT SHOULD BE USED ONLY BY ITSELF. THE MODEL SHOULD BE ANCHORED.
THIS SCRIPT SHOULD BE USED ONLY BY ITSELF. THE MODEL SHOULD BE ANCHORED.
THIS SCRIPT SHOULD BE USED ONLY BY ITSELF. THE MODEL SHOULD BE ANCHORED.

This script is designed to be used is a regular script. In a local script it will weld, but it will not attempt to handle ancestory changes.
]]

--[[ DOCUMENTATION
- Will work in tools. If ran more than once it will not create more than one weld.  This is especially useful for tools that are dropped and then picked up again.
- Will work in PBS servers
- Will work as long as it starts out with the part anchored
- Stores the relative CFrame as a CFrame value
- Takes careful measure to reduce lag by not having a joint set off or affected by the parts offset from origin
- Utilizes a recursive algorith to find all parts in the model
- Will reweld on script reparent if the script is initially parented to a tool.
- Welds as fast as possible
]]

-- qPerfectionWeld.lua
-- Created 10/6/2014
-- Author: Quenty
-- Version 1.0.3

-- Updated 10/14/2014 - Updated to 1.0.1
--- Bug fix with existing ROBLOX welds ? Repro by asimo3089

-- Updated 10/14/2014 - Updated to 1.0.2
--- Fixed bug fix.

-- Updated 10/14/2014 - Updated to 1.0.3
--- Now handles joints semi-acceptably. May be rather hacky with some joints. :/

local NEVER_BREAK_JOINTS = false -- If you set this to true it will never break joints (this can create some welding issues, but can save stuff like hinges).


local function CallOnChildren(Instance, FunctionToCall)
	-- Calls a function on each of the children of a certain object, using recursion.

	FunctionToCall(Instance)

	for _, Child in next, Instance:GetChildren() do
		CallOnChildren(Child, FunctionToCall)
	end
end

local function GetNearestParent(Instance, ClassName)
	-- Returns the nearest parent of a certain class, or returns nil

	local Ancestor = Instance
	repeat
		Ancestor = Ancestor.Parent
		if Ancestor == nil then
			return nil
		end
	until Ancestor:IsA(ClassName)

	return Ancestor
end

local function GetBricks(StartInstance)
	local List = {}

	-- if StartInstance:IsA("BasePart") then
	-- 	List[#List+1] = StartInstance
	-- end

	CallOnChildren(StartInstance, function(Item)
		if Item:IsA("BasePart") then
			List[#List+1] = Item;
		end
	end)

	return List
end

local function Modify(Instance, Values)
	-- Modifies an Instance by using a table.

	assert(type(Values) == "table", "Values is not a table");

	for Index, Value in next, Values do
		if type(Index) == "number" then
			Value.Parent = Instance
		else
			Instance[Index] = Value
		end
	end
	return Instance
end

local function Make(ClassType, Properties)
	-- Using a syntax hack to create a nice way to Make new items.

	return Modify(Instance.new(ClassType), Properties)
end

local Surfaces = {"TopSurface", "BottomSurface", "LeftSurface", "RightSurface", "FrontSurface", "BackSurface"}
local HingSurfaces = {"Hinge", "Motor", "SteppingMotor"}

local function HasWheelJoint(Part)
	for _, SurfaceName in pairs(Surfaces) do
		for _, HingSurfaceName in pairs(HingSurfaces) do
			if Part[SurfaceName].Name == HingSurfaceName then
				return true
			end
		end
	end

	return false
end

local function ShouldBreakJoints(Part)
	--- We do not want to break joints of wheels/hinges. This takes the utmost care to not do this. There are
	--  definitely some edge cases.

	if NEVER_BREAK_JOINTS then
		return false
	end

	if HasWheelJoint(Part) then
		return false
	end

	local Connected = Part:GetConnectedParts()

	if #Connected == 1 then
		return false
	end

	for _, Item in pairs(Connected) do
		if HasWheelJoint(Item) then
			return false
		elseif not Item:IsDescendantOf(script.Parent) then
			return false
		end
	end

	return true
end

local function WeldTogether(Part0, Part1, JointType, WeldParent)
	--- Weld's 2 parts together
	-- @param Part0 The first part
	-- @param Part1 The second part (Dependent part most of the time).
	-- @param [JointType] The type of joint. Defaults to weld.
	-- @param [WeldParent] Parent of the weld, Defaults to Part0 (so GC is better).
	-- @return The weld created.

	JointType = JointType or "Weld"
	local RelativeValue = Part1:FindFirstChild("qRelativeCFrameWeldValue")

	local NewWeld = Part1:FindFirstChild("qCFrameWeldThingy") or Instance.new(JointType)
	Modify(NewWeld, {
		Name = "qCFrameWeldThingy";
		Part0  = Part0;
		Part1  = Part1;
		C0     = CFrame.new();--Part0.CFrame:inverse();
		C1     = RelativeValue and RelativeValue.Value or Part1.CFrame:toObjectSpace(Part0.CFrame); --Part1.CFrame:inverse() * Part0.CFrame;-- Part1.CFrame:inverse();
		Parent = Part1;
	})

	if not RelativeValue then
		RelativeValue = Make("CFrameValue", {
			Parent     = Part1;
			Name       = "qRelativeCFrameWeldValue";
			Archivable = true;
			Value      = NewWeld.C1;
		})
	end

	return NewWeld
end

local function WeldParts(Parts, MainPart, JointType, DoNotUnanchor)
	-- @param Parts The Parts to weld. Should be anchored to prevent really horrible results.
	-- @param MainPart The part to weld the model to (can be in the model).
	-- @param [JointType] The type of joint. Defaults to weld.
	-- @parm DoNotUnanchor Boolean, if true, will not unachor the model after cmopletion.

	for _, Part in pairs(Parts) do
		if ShouldBreakJoints(Part) then
			Part:BreakJoints()
		end
	end

	for _, Part in pairs(Parts) do
		if Part ~= MainPart then
			WeldTogether(MainPart, Part, JointType, MainPart)
		end
	end

	if not DoNotUnanchor then
		for _, Part in pairs(Parts) do
			Part.Anchored = false
		end
		MainPart.Anchored = false
	end
end

local function PerfectionWeld()
	local Tool = GetNearestParent(script, "Tool")

	local Parts = GetBricks(script.Parent)
	local PrimaryPart = Tool and Tool:FindFirstChild("Handle") and Tool.Handle:IsA("BasePart") and Tool.Handle or script.Parent:IsA("Model") and script.Parent.PrimaryPart or Parts[1]

	if PrimaryPart then
		WeldParts(Parts, PrimaryPart, "Weld", false)
	else
		warn("qWeld - Unable to weld part")
	end

	return Tool
end

local Tool = PerfectionWeld()


if Tool and script.ClassName == "Script" then
	--- Don't bother with local scripts

	script.Parent.AncestryChanged:connect(function()
		PerfectionWeld()
	end)
end

-- Created by Quenty (@Quenty, follow me on twitter).

end))
LocalScript4.Name = "MainScript"
LocalScript4.Parent = Tool0
table.insert(cors,sandbox(LocalScript4,function()
wait()
tool = script.Parent
lineconnect = tool.LineConnect
object = nil
mousedown = false
found = false
BP = Instance.new("BodyPosition")
BP.maxForce = Vector3.new(math.huge*math.huge,math.huge*math.huge,math.huge*math.huge) --pwns everyone elses bodyposition
BP.P = BP.P*10 --faster movement. less bounceback.
dist = nil
point = Instance.new("Part")
point.Locked = true
point.Anchored = true
point.formFactor = 0
point.Shape = 0
point.BrickColor = BrickColor.new("Toothpaste")
point.Size = Vector3.new(1,1,1)
point.CanCollide = false
local mesh = Instance.new("SpecialMesh")
mesh.MeshType = "Sphere"
mesh.Scale = Vector3.new(.35,.35,.35)
mesh.Parent = point
handle = tool.Shoot
front = tool.Shoot
color = tool.Shoot
objval = nil
local hooked = false
local hookBP = BP:clone()
hookBP.maxForce = Vector3.new(30000,30000,30000)

function LineConnect(partz1,partz2,parent)
	local p1 = Instance.new("ObjectValue")
	p1.Value = partz1
	p1.Name = "Partz1"
	local p2 = Instance.new("ObjectValue")
	p2.Value = partz2
	p2.Name = "Partz2"
	local par = Instance.new("ObjectValue")
	par.Value = parent
	par.Name = "Par"
	local col = Instance.new("ObjectValue")
	col.Value = color
	col.Name = "Color"
	local s = lineconnect:Clone()
	s.Name = "LineConnectClone"
	s.Disabled = false
	p1.Parent = s
	p2.Parent = s
	par.Parent = s
	col.Parent = s
	s.Parent = tool
		if (partz2==object) then
		objval = p2
	end
end

function onButton1Down(mouse)
	if (mousedown==true) then return end
	mousedown = true
	coroutine.resume(coroutine.create(function()
		local p = point:clone()
		p.Parent = tool
		LineConnect(front,object,workspace)
		while (mousedown==true) do
			p.Parent = tool
			if (object==nil) then
				if (mouse.Target==nil) then
					local lv = CFrame.new(front.Position,mouse.Hit.p)
					p.CFrame = CFrame.new(front.Position+(lv.lookVector*1000))
				else
					p.CFrame = CFrame.new(mouse.Hit.p)
				end
			else
				LineConnect(front,object,workspace)
				break
			end
			wait()
		end
		p:remove()
	end))
	while (mousedown==true) do
		if (mouse.Target~=nil) then
			local t = mouse.Target
			if (t.Anchored==false) then
				object = t
				dist = (object.Position-front.Position).magnitude
				break
			end
		end
		wait()
	end
	while (mousedown==true) do
		if (object.Parent==nil) then break end
		local lv = CFrame.new(front.Position,mouse.Hit.p)
		BP.Parent = object
		BP.position = front.Position+lv.lookVector*dist
		wait()
	end
	BP:remove()
	object = nil
	objval.Value = nil
end

function onKeyDown(key,mouse)
	local key = key:lower()
	local yesh = false
	if (key=="q") then
		if (dist>=5) then
			dist = dist-30
		end
	end
	if key == "" then
	if (object==nil) then return end
	for _,v in pairs(object:children()) do
	if v.className == "BodyGyro" then
	return nil
	end
	end
	BG = Instance.new("BodyGyro")
	BG.maxTorque = Vector3.new(math.huge,math.huge,math.huge)
	BG.cframe = CFrame.new(object.CFrame.p)
	BG.Parent = object
	repeat wait() until(object.CFrame == CFrame.new(object.CFrame.p))
	BG.Parent = nil
	if (object==nil) then return end
	for _,v in pairs(object:children()) do
	if v.className == "BodyGyro" then
	v.Parent = nil
	end
	end
	object.Velocity = Vector3.new(0,0,0)
	object.RotVelocity = Vector3.new(0,0,0)
	end
	if (key=="e") then
		dist = dist+5
	end
	if (key=="h") then
		if (object==nil) then return end
		local e = Instance.new("Explosion")
		e.Parent = workspace
		e.Position = object.Position
		color.BrickColor = BrickColor.Black()
		point.BrickColor = BrickColor.White()
		wait(.48)
		color.BrickColor = BrickColor.White()
		point.BrickColor = BrickColor.Black()
	end
	if (key=="]") then
		if not hooked then
		if (object==nil) then return end
		hooked = true
		hookBP.position = object.Position
		if tool.Parent:findFirstChild("Torso") then
		hookBP.Parent = tool.Parent.Torso
		if dist ~= (object.Size.x+object.Size.y+object.Size.z)+5 then
		dist = (object.Size.x+object.Size.y+object.Size.z)+5
		end
		end
		else
		hooked = false
		hookBP.Parent = nil
		end
	end
	if (key=="r") then
		if (dist<=30) then
			dist = dist+30
		end
	end
	if (key=="b") then
	if (object==nil) then return end
	local New = object:clone()
	New.Parent = object.Parent
	for _,v in pairs(New:children()) do
	if v.className == "BodyPosition" or v.className == "BodyGyro" then
	v.Parent = nil
	end
	end
	object = New
	mousedown = false
	mousedown = true
	LineConnect(front,object,workspace)
		while (mousedown==true) do
		if (object.Parent==nil) then break end
		local lv = CFrame.new(front.Position,mouse.Hit.p)
		BP.Parent = object
		BP.position = front.Position+lv.lookVector*dist
		wait()
	end
	BP:remove()
	object = nil
	objval.Value = nil
	end
	if (key=="c") then
		local Cube = Instance.new("Part")
		Cube.Locked = true
		Cube.Size = Vector3.new(4,4,4)
		Cube.formFactor = 0
		Cube.TopSurface = 0
		Cube.BottomSurface = 0
		Cube.Name = "WeightedStorageCube"
		Cube.Parent = workspace
		Cube.CFrame = CFrame.new(mouse.Hit.p) + Vector3.new(0,2,0)
		for i = 0,5 do
			local Decal = Instance.new("Decal")
			Decal.Texture = "http://www.roblox.com/asset/?id=2662260"
			Decal.Face = i
			Decal.Name = "WeightedStorageCubeDecal"
			Decal.Parent = Cube
		end
	end
	if (key=="[") then
		if dist ~= 15 then
			dist = 15
		end
	end
end

function onEquipped(mouse)
	keymouse = mouse
	local char = tool.Parent
	human = char.Humanoid
	human.Changed:connect(function() if (human.Health==0) then mousedown = false BP:remove() point:remove() tool:remove() end end)
	mouse.Button1Down:connect(function() onButton1Down(mouse) end)
	mouse.Button1Up:connect(function() mousedown = false end)
	mouse.KeyDown:connect(function(key) onKeyDown(key,mouse) end)
	mouse.Icon = "rbxasset://textures\\GunCursor.png"
end

tool.Equipped:connect(onEquipped)
end))
LocalScript5.Name = "LineConnect"
LocalScript5.Parent = Tool0
LocalScript5.Disabled = true
table.insert(cors,sandbox(LocalScript5,function()
wait()
if script.Disabled == false then
local check = script.Partz1
local partz1 = script.Partz1.Value
local partz2 = script.Partz2.Value
local parent = script.Par.Value
local color = script.Color
local line = Instance.new("Part")
line.TopSurface = 0
line.BottomSurface = 0
line.Reflectance = .5
line.Name = "Laser"
line.Locked = true
line.CanCollide = false
line.Anchored = true
line.formFactor = 0
line.Size = Vector3.new(0.3,0.3,1)
local mesh = Instance.new("BlockMesh")
mesh.Parent = line
while true do
	if (check.Value==nil) then break end
	if (partz1==nil or partz2==nil or parent==nil) then break end
	if (partz1.Parent==nil or partz2.Parent==nil) then break end
	if (parent.Parent==nil) then break end
	local lv = CFrame.new(partz1.Position,partz2.Position)
	local dist = (partz1.Position-partz2.Position).magnitude
	line.Parent = parent
	line.Material = "Neon"
	line.BrickColor = color.Value.BrickColor
	line.Reflectance = color.Value.Reflectance
	line.Transparency = "0.2"
	line.CFrame = CFrame.new(partz1.Position+lv.lookVector*dist/2)
	line.CFrame = CFrame.new(line.Position,partz2.Position)
	mesh.Scale = Vector3.new(.25,.25,dist)
	wait()
end
line:remove()
script:remove()
end
end))
Part6.Name = "Shoot"
Part6.Parent = Tool0
Part6.Material = Enum.Material.Neon
Part6.BrickColor = BrickColor.new("Toothpaste")
Part6.Transparency = 0.5
Part6.Rotation = Vector3.new(-90, -0.00999999978, -90)
Part6.CanCollide = false
Part6.FormFactor = Enum.FormFactor.Custom
Part6.Shape = Enum.PartType.Cylinder
Part6.Size = Vector3.new(0.0899999961, 0.191250086, 0.224999964)
Part6.CFrame = CFrame.new(118.000183, 39.6357117, -41.878067, 0, 1, -9.89999971e-05, 6.60000005e-05, 9.89999971e-05, 1, 1, -6.53400001e-09, -6.60000005e-05)
Part6.BottomSurface = Enum.SurfaceType.Smooth
Part6.TopSurface = Enum.SurfaceType.Smooth
Part6.Color = Color3.new(0, 1, 1)
Part6.Position = Vector3.new(118.000183, 39.6357117, -41.878067)
Part6.Orientation = Vector3.new(-90, -90, 0)
Part6.Color = Color3.new(0, 1, 1)
LocalScript7.Name = "Aqua0"
LocalScript7.Parent = mas
table.insert(cors,sandbox(LocalScript7,function()
	--[[ Script By reeces44 ]]--
--[[	  Thanks For Using  	]]--
------------------------------------
	----------------------------
		--------------------

------------------------------------
------------------------------------
--[[	 	Instructions		]]--
------------------------------------
--[[
	Press F to start flying
	When Flying holding W will speed up.
	When Flying Holding S will speed down.

	Put in StarterPack for everyone to fly.
	Alternatively, place the script in any players
	backpack to allow them to fly.

	Have Fun,
	reeces44.
--]]
-------------------------------------

local player = owner
local mouse = player:GetMouse()

function GetMassRecursive(p)
	local mass = 0
	for i,v in pairs(p:GetChildren())do
		if #v:GetChildren() > 0 then
			mass = mass + GetMassRecursive(v)
		end
		if v:IsA("Part") then
			print(v.Name)
			mass = mass + v:GetMass()
		end
	end
	return mass
end

local wDown = false
local sDown = false
local isFlying = false
local speed = 10
mouse.KeyDown:connect(function(key)
	if key == "f" then
		if isFlying then
			speed = 0
			wait()
			player.Character.Torso["Anti-Grav"]:Destroy()
			player.Character.Torso["FlyingVelocity"]:Destroy()
			player.Character.Humanoid.PlatformStand = false
			isFlying = false
		else
			speed = 10
			local f = Instance.new("BodyForce")
			f.Name = "Anti-Grav"
			f.Force = Vector3.new(0,196.2,0) * (GetMassRecursive(player.Character))
			f.Parent = player.Character.Torso
			local v = Instance.new("BodyVelocity")
			v.Velocity = (mouse.Hit.p - player.Character.Torso.Position).unit * 10
			v.P = 100
			v.MaxForce = Vector3.new(math.huge,math.huge,math.huge)
			v.Name = "FlyingVelocity"
			v.Parent = player.Character.Torso
			player.Character.Humanoid.PlatformStand = true
			isFlying = true
		end
	end
	if key == "w" then
		wDown = true
	end
	if key == "s" then
		sDown = true
	end
end)
mouse.KeyUp:connect(function(key)
	if key == "w" then
		wDown = false
	end
	if key == "s" then
		sDown = false
	end
end)
local MAX_SPEED = 200
local MIN_SPEED = 0
spawn(function()
	while player.Character.Humanoid.Health > 0 do
		if isFlying then
			local r = 1+(speed/500)
			player.Character:SetPrimaryPartCFrame(CFrame.new(player.Character.PrimaryPart.Position,mouse.Hit.p)*CFrame.Angles(math.pi/r,math.pi,math.pi))
			player.Character.Torso.FlyingVelocity.Velocity = (mouse.Hit.p - player.Character.Torso.Position).unit * speed
			if wDown then
				speed = speed + 5
				if speed > MAX_SPEED then
					speed = MAX_SPEED
				end
			elseif sDown then
				speed = speed - 5
				if speed < MIN_SPEED then
					speed = MIN_SPEED
				end
			end
		end

		game:GetService("RunService").RenderStepped:wait()
	end
end)
end))
LocalScript8.Name = "Aqua1"
LocalScript8.Parent = mas
table.insert(cors,sandbox(LocalScript8,function()
local mouse = owner:GetMouse()
local Character = owner.Character
local aa = false
function Particles() -- Main Function (Clones the Particle find the Player and put's the Particles into them)
	for _,v in pairs(owner.Character:GetChildren()) do
		if v:IsA("BasePart") then
			local Sound = script.FatSound:Clone()
			Sound.Parent = owner.Character.Head
			local AquaLight = script.AquaLight:Clone()
			AquaLight.Parent = owner.Character.Head
			local Particles = script.TestParticles:Clone() -- Name TestParticles to your Particles name.
			Particles.Parent = v
			Sound:Play()
		end
	end
end

function ParticlesDestroy() -- To remove the Particles again.
	for _,v in pairs(owner.Character:GetChildren()) do
		if v:FindFirstChild("TestParticles") then  -- Name TestParticles to your Particles name.
		v.TestParticles.Enabled = false
		v.TestParticles:Destroy()
		end
		if owner.Character.Head:FindFirstChild("FatSound") then  -- Name TestParticles to your Particles name.
		owner.Character.Head.FatSound:Destroy()
		end
	end
end

function particles(a,b) -- Key Function, just don't touch this.
	if a == ("p") then
		if aa == true then
			aa = false
			ParticlesDestroy()
		else

		if aa == false then
			aa = true
			Particles()
			end
		end
	end
end


mouse.KeyDown:Connect(particles) -- Connects both Functions.

end))
Sound9.Name = "FatSound"
Sound9.Parent = LocalScript8
Sound9.SoundId = "rbxassetid://782722084"
Sound9.Volume = 2
ParticleEmitter10.Name = "TestParticles"
ParticleEmitter10.Parent = LocalScript8
ParticleEmitter10.Transparency = NumberSequence.new(1,0.63749998807907,1)
ParticleEmitter10.Size = NumberSequence.new(0.24999976158142,0.625,0.3125,0.68749964237213,0.43749988079071)
ParticleEmitter10.Color = ColorSequence.new(Color3.new(0.172549, 0.960784, 1),Color3.new(0.172549, 0.960784, 1))
ParticleEmitter10.LightEmission = 2
ParticleEmitter10.Texture = "rbxassetid://337127439"
ParticleEmitter10.Lifetime = NumberRange.new(4, 4)
ParticleEmitter10.Speed = NumberRange.new(4, 4)
ParticleEmitter10.Color = ColorSequence.new(Color3.new(0.172549, 0.960784, 1),Color3.new(0.172549, 0.960784, 1))
PointLight11.Name = "AquaLight"
PointLight11.Parent = LocalScript8
PointLight11.Color = Color3.new(0, 0.984314, 1)
PointLight11.Brightness = 5
PointLight11.Range = 5
PointLight11.Color = Color3.new(0, 0.984314, 1)
LocalScript12.Name = "Aqua2"
LocalScript12.Parent = mas
table.insert(cors,sandbox(LocalScript12,function()
local mouse = owner:GetMouse()
local Character = owner.Character
local aa = false
function Particles() -- Main Function (Clones the Particle find the Player and put's the Particles into them)
			local AquaLight = script.AquaLight:Clone()
			AquaLight.Parent = owner.Character.Head
			local Particles = script.BillboardGui:Clone() -- Name TestParticles to your Particles name.
			Particles.Parent = owner.Character.Head
end
function ColorHair()
	if Character:findFirstChild("BoyAnimeHair_Blue") == nil and Character:findFirstChild("moonWings") == nil then
	local hair = script.BoyAnimeHair_Blue:Clone()
	hair.Parent = Character
	local wings = script.moonWings:Clone()
	wings.Parent = Character
	local gem = script.Gem:Clone()
	gem.Parent = Character
	end
	for _,v in pairs(owner.Character:GetChildren()) do
		if Character:findFirstChild("BoyAnimeHair_Blue") then
			Character.BoyAnimeHair_Blue.Handle.Mesh.TextureId = ""
			Character.BoyAnimeHair_Blue.Handle.Color = Color3.fromRGB(0, 178, 240)
		end
		if Character:findFirstChild("moonWings") then
			Character.moonWings.Handle.Mesh.TextureId = ""
			Character.moonWings.Handle.Color = Color3.fromRGB(89, 178, 240)
			Character.moonWings.Handle.Mesh.Offset = Vector3.new(0, 0.5, 0.5)
			Character.moonWings.Handle.Mesh.Scale = Vector3.new(7,7,7)
			Character.moonWings.Handle.Transparency = 0.4
		end
	end
end
function ParticlesDestroy() -- To remove the Particles again.
	for _,v in pairs(owner.Character:GetChildren()) do
		if owner.Character.Head:FindFirstChild("BillboardGui") then  -- Name TestParticles to your Particles name.
		owner.Character.Head.BillboardGui:Destroy()
		end
		if owner.Character.Head:FindFirstChild("AquaLight") then  -- Name TestParticles to your Particles name.
		owner.Character.Head.AquaLight:Destroy()
		end
	end
end

function particles(a,b) -- Key Function, just don't touch this.
	if a == ("m") then
		if aa == true then
			aa = false
			ParticlesDestroy()
		else

		if aa == false then
			aa = true
			ColorHair()
			Particles()
			end
		end
	end
end


mouse.KeyDown:Connect(particles) -- Connects both Functions.

end))
Sound13.Name = "FatSound"
Sound13.Parent = LocalScript12
Sound13.SoundId = "rbxassetid://782722084"
Sound13.Volume = 2
ParticleEmitter14.Name = "TestParticles"
ParticleEmitter14.Parent = LocalScript12
ParticleEmitter14.Transparency = NumberSequence.new(1,0.63749998807907,1)
ParticleEmitter14.Size = NumberSequence.new(0.24999976158142,0.625,0.3125,0.68749964237213,0.43749988079071)
ParticleEmitter14.Color = ColorSequence.new(Color3.new(0.172549, 0.960784, 1),Color3.new(0.172549, 0.960784, 1))
ParticleEmitter14.LightEmission = 2
ParticleEmitter14.Texture = "rbxassetid://337127439"
ParticleEmitter14.Lifetime = NumberRange.new(4, 4)
ParticleEmitter14.Speed = NumberRange.new(4, 4)
ParticleEmitter14.Color = ColorSequence.new(Color3.new(0.172549, 0.960784, 1),Color3.new(0.172549, 0.960784, 1))
PointLight15.Name = "AquaLight"
PointLight15.Parent = LocalScript12
PointLight15.Color = Color3.new(0, 0.984314, 1)
PointLight15.Brightness = 5
PointLight15.Range = 5
PointLight15.Color = Color3.new(0, 0.984314, 1)
BillboardGui16.Parent = LocalScript12
BillboardGui16.Size = UDim2.new(40, 40, 1, 1)
BillboardGui16.Active = true
BillboardGui16.StudsOffset = Vector3.new(0, 3, 0)
TextBox17.Name = "Text"
TextBox17.Parent = BillboardGui16
TextBox17.Transparency = 1
TextBox17.Size = UDim2.new(1, 1, 1, 1)
TextBox17.Text = "Aquamarine"
TextBox17.BackgroundColor3 = Color3.new(0, 0, 0)
TextBox17.BackgroundTransparency = 1
TextBox17.BorderColor3 = Color3.new(0, 0, 0)
TextBox17.ClearTextOnFocus = false
TextBox17.MultiLine = true
TextBox17.Font = Enum.Font.Fantasy
TextBox17.FontSize = Enum.FontSize.Size14
TextBox17.TextColor3 = Color3.new(0.164706, 0.960784, 1)
TextBox17.TextScaled = true
TextBox17.TextStrokeColor3 = Color3.new(0.0784314, 0.141176, 0.427451)
TextBox17.TextStrokeTransparency = 0
TextBox17.TextWrapped = true
TextBox17.TextYAlignment = Enum.TextYAlignment.Top
Accessory18.Name = "BoyAnimeHair_Blue"
Accessory18.Parent = LocalScript12
Accessory18.AttachmentPos = Vector3.new(-0.0599999987, 0.560000002, -0.100000001)
Part19.Name = "Handle"
Part19.Parent = Accessory18
Part19.CanCollide = false
Part19.Locked = true
Part19.FormFactor = Enum.FormFactor.Symmetric
Part19.Size = Vector3.new(1.4200002, 0.870000005, 1.40999985)
Part19.CFrame = CFrame.new(0.0599999949, 4.44000006, 0.100272246, 1, -7.87137555e-09, 0, 7.87137555e-09, 1, 4.1444221e-16, -3.26223034e-24, -4.1444221e-16, 1)
Part19.BottomSurface = Enum.SurfaceType.Smooth
Part19.TopSurface = Enum.SurfaceType.Smooth
Part19.Position = Vector3.new(0.0599999949, 4.44000006, 0.100272246)
SpecialMesh20.Parent = Part19
SpecialMesh20.MeshId = "http://www.roblox.com/asset/?id=398987591 "
SpecialMesh20.Scale = Vector3.new(0.819999993, 0.819999993, 0.819999993)
SpecialMesh20.TextureId = "http://www.roblox.com/asset/?id=398618334"
SpecialMesh20.MeshType = Enum.MeshType.FileMesh
SpecialMesh20.Scale = Vector3.new(0.819999993, 0.819999993, 0.819999993)
Attachment21.Name = "HairAttachment"
Attachment21.Parent = Part19
Attachment21.Rotation = Vector3.new(2.37457894e-14, -1.86912034e-22, -4.50996595e-07)
Attachment21.CFrame = CFrame.new(-0.0599999912, 0.659999847, -0.100272246, 1, 7.87137555e-09, -3.26223034e-24, -7.87137555e-09, 1, -4.1444221e-16, 0, 4.1444221e-16, 1)
Attachment21.Position = Vector3.new(-0.0599999912, 0.659999847, -0.100272246)
Attachment21.Axis = Vector3.new(1, -7.87137555e-09, 0)
Attachment21.Orientation = Vector3.new(2.37457894e-14, -1.86912034e-22, -4.50996595e-07)
Vector3Value22.Name = "OriginalSize"
Vector3Value22.Parent = Part19
Vector3Value22.Value = Vector3.new(1.4200002, 0.870000005, 1.40999985)
Weld23.Name = "AccessoryWeld"
Weld23.Parent = Part19
Weld23.C0 = CFrame.new(-0.0599999912, 0.659999847, -0.100272246, 1, 7.87137555e-09, -3.26223034e-24, -7.87137555e-09, 1, -4.1444221e-16, 0, 4.1444221e-16, 1)
Weld23.C1 = CFrame.new(0, 0.600000024, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Weld23.Part0 = Part19
Accessory24.Name = "moonWings"
Accessory24.Parent = LocalScript12
Accessory24.AttachmentPos = Vector3.new(0, 1.29999995, -1.10000002)
Part25.Name = "Handle"
Part25.Parent = Accessory24
Part25.CanCollide = false
Part25.Locked = true
Part25.FormFactor = Enum.FormFactor.Custom
Part25.Size = Vector3.new(3.80002809, 2.99999952, 1.60000014)
Part25.CFrame = CFrame.new(4.78408427e-31, 3.70000029, 1.10027242, 1, 6.83440315e-31, 0, -6.83440315e-31, 1, 0, 0, 0, 1)
Part25.BottomSurface = Enum.SurfaceType.Smooth
Part25.TopSurface = Enum.SurfaceType.Smooth
Part25.Position = Vector3.new(4.78408427e-31, 3.70000029, 1.10027242)
SpecialMesh26.Parent = Part25
SpecialMesh26.MeshId = "rbxassetid://147982651"
SpecialMesh26.Scale = Vector3.new(4, 4, 4)
SpecialMesh26.TextureId = "rbxassetid://845817136"
SpecialMesh26.MeshType = Enum.MeshType.FileMesh
SpecialMesh26.Scale = Vector3.new(4, 4, 4)
Attachment27.Name = "BodyBackAttachment"
Attachment27.Parent = Part25
Attachment27.Rotation = Vector3.new(0, 0, 3.91582454e-29)
Attachment27.CFrame = CFrame.new(0, -0.700000286, -0.600272417, 1, -6.83440315e-31, 0, 6.83440315e-31, 1, -0, 0, 0, 1)
Attachment27.Position = Vector3.new(0, -0.700000286, -0.600272417)
Attachment27.Axis = Vector3.new(1, 6.83440315e-31, 0)
Attachment27.Orientation = Vector3.new(0, 0, 3.91582454e-29)
Weld28.Name = "AccessoryWeld"
Weld28.Parent = Part25
Weld28.C0 = CFrame.new(0, -0.700000286, -0.600272417, 1, -6.83440315e-31, 0, 6.83440315e-31, 1, -0, 0, 0, 1)
Weld28.C1 = CFrame.new(0, 0, 0.5, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Weld28.Part0 = Part25
Accessory29.Name = "Gem"
Accessory29.Parent = LocalScript12
Accessory29.AttachmentPos = Vector3.new(-0.0599999987, 0.560000002, -0.100000001)
Part30.Name = "Handle"
Part30.Parent = Accessory29
Part30.BrickColor = BrickColor.new("Tr. Lg blue")
Part30.Rotation = Vector3.new(-179.709991, 46.3799973, 179.789993)
Part30.CanCollide = false
Part30.Locked = true
Part30.FormFactor = Enum.FormFactor.Symmetric
Part30.Size = Vector3.new(1.4200002, 0.870000005, 1.40999985)
Part30.CFrame = CFrame.new(-99.2781677, 3.28853726, -22.2383442, -0.689900041, -0.00251038512, 0.723899245, -1.19641973e-05, 0.99999404, 0.00345644192, -0.723903596, 0.00237593846, -0.689895928)
Part30.BottomSurface = Enum.SurfaceType.Smooth
Part30.TopSurface = Enum.SurfaceType.Smooth
Part30.Color = Color3.new(0.737255, 0.913726, 0.941177)
Part30.Position = Vector3.new(-99.2781677, 3.28853726, -22.2383442)
Part30.Orientation = Vector3.new(-0.199999988, 133.619995, 0)
Part30.Color = Color3.new(0.737255, 0.913726, 0.941177)
SpecialMesh31.Parent = Part30
SpecialMesh31.MeshId = "rbxassetid://432748939"
SpecialMesh31.Offset = Vector3.new(-0.200000003, 0.0799999982, -0.5)
SpecialMesh31.Scale = Vector3.new(0.00100000005, 0.00200000009, 0.00100000005)
SpecialMesh31.MeshType = Enum.MeshType.FileMesh
SpecialMesh31.Scale = Vector3.new(0.00100000005, 0.00200000009, 0.00100000005)
Attachment32.Name = "HairAttachment"
Attachment32.Parent = Part30
Attachment32.Rotation = Vector3.new(2.37457894e-14, -1.86912034e-22, -4.50996595e-07)
Attachment32.CFrame = CFrame.new(-0.0599999912, 0.659999847, -0.100272246, 1, 7.87137555e-09, -3.26223034e-24, -7.87137555e-09, 1, -4.1444221e-16, 0, 4.1444221e-16, 1)
Attachment32.Position = Vector3.new(-0.0599999912, 0.659999847, -0.100272246)
Attachment32.Axis = Vector3.new(1, -7.87137555e-09, 0)
Attachment32.Orientation = Vector3.new(2.37457894e-14, -1.86912034e-22, -4.50996595e-07)
Vector3Value33.Name = "OriginalSize"
Vector3Value33.Parent = Part30
Vector3Value33.Value = Vector3.new(1.4200002, 0.870000005, 1.40999985)
Weld34.Name = "AccessoryWeld"
Weld34.Parent = Part30
Weld34.C0 = CFrame.new(-0.0599999912, 0.659999847, -0.100272246, 1, 7.87137555e-09, -3.26223034e-24, -7.87137555e-09, 1, -4.1444221e-16, 0, 4.1444221e-16, 1)
Weld34.C1 = CFrame.new(0, 0.600000024, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Weld34.Part0 = Part30
Weld35.Name = "AccessoryWeld"
Weld35.Parent = Part30
Weld35.C0 = CFrame.new(-0.0599999912, 0.659999847, -0.100272246, 1, 7.87137555e-09, -3.26223034e-24, -7.87137555e-09, 1, -4.1444221e-16, 0, 4.1444221e-16, 1)
Weld35.C1 = CFrame.new(0, 0.600000024, 0, 1, 0, 0, 0, 1, 0, 0, 0, 1)
Weld35.Part0 = Part30
LocalScript36.Name = "Aqua3"
LocalScript36.Parent = mas
table.insert(cors,sandbox(LocalScript36,function()
local mouse = owner:GetMouse()
local Character = owner.Character
local aa = false
function Particles() -- Main Function (Clones the Particle find the Player and put's the Particles into them)
			local AquaLight = script.ForceField:Clone()
			AquaLight.Parent = owner.Character
			local hum = Character:findFirstChild("Humanoid")
			hum.MaxHealth = 99999999999999999999999999999999999999999999999*math.huge
			hum.Health = 99999999999999999999999999999999999999999999999*math.huge
			local Sound = script.AquaSound:Clone()
			Sound.Parent = game.Workspace
			Sound:Play()
end

function ParticlesDestroy() -- To remove the Particles again.
	for _,v in pairs(owner.Character:GetChildren()) do
		if owner.Character:findFirstChild("ForceField") then  -- Name TestParticles to your Particles name.
		owner.Character.ForceField:Destroy()
		end
		if owner.Character.Head:FindFirstChild("AquaSound") then  -- Name TestParticles to your Particles name.
		owner.Character.Head.AquaSound:Destroy()
		end
	end
end

function particles(a,b) -- Key Function, just don't touch this.
	if a == ("k") then
		if aa == true then
			aa = false
			ParticlesDestroy()
		else

		if aa == false then
			aa = true
			Particles()
			end
		end
	end
end


mouse.KeyDown:Connect(particles) -- Connects both Functions.

end))
ForceField37.Parent = LocalScript36
Sound38.Name = "AquaSound"
Sound38.Parent = LocalScript36
Sound38.SoundId = "rbxassetid://1507235987"
Sound38.Volume = 5
LocalScript39.Name = "Aqua4"
LocalScript39.Parent = mas
table.insert(cors,sandbox(LocalScript39,function()
local mouse = owner:GetMouse()
local Character = owner.Character
local aa = false
function Particles() -- Main Function (Clones the Particle find the Player and put's the Particles into them)
			local AquaLight = Instance.new("Explosion")
			AquaLight.Parent = owner.Character.Head
			AquaLight.BlastRadius = 30
			AquaLight.DestroyJointRadiusPercent = 99999999999999
			AquaLight.Position = Character.Torso.Position
			local hum = Character:findFirstChild("Humanoid")
			hum.MaxHealth = 99999999999999999999999999999999999999999999999*math.huge
			hum.Health = 99999999999999999999999999999999999999999999999*math.huge
end

function ParticlesDestroy() -- To remove the Particles again.
	for _,v in pairs(owner.Character:GetChildren()) do
		if owner.Character:findFirstChild("ForceField") then  -- Name TestParticles to your Particles name.
		owner.Character.ForceField:Destroy()
		end
	end
end

function particles(a,b) -- Key Function, just don't touch this.
	if a == ("x") then
		if aa == true then
			aa = false
			--ParticlesDestroy()
		else

		if aa == false then
			aa = true
			Particles()
			end
		end
	end
end


mouse.KeyDown:Connect(particles) -- Connects both Functions.

end))
ForceField40.Parent = LocalScript39
LocalScript41.Name = "Aqua5"
LocalScript41.Parent = mas
table.insert(cors,sandbox(LocalScript41,function()
scale = 0.75
-------------------------------
p	=owner
c	=p.Character
---------------------------------
p.CharacterAdded:connect(function()
	wait(1)
	p.CanLoadCharacterAppearance = false
	------------------------------------------------------PHYSICAL SCALING
	local joints = c.Torso:GetChildren()
	table.insert(joints,c.HumanoidRootPart.RootJoint)
	local jointCache = {}

	for i = 1,#joints do
		if joints[i]:IsA("Motor6D") then
			joints[i].C0 = CFrame.new(joints[i].C0.p * scale) * CFrame.Angles(joints[i].C0:toEulerAnglesXYZ())
			joints[i].C1 = CFrame.new(joints[i].C1.p * scale) * CFrame.Angles(joints[i].C0:toEulerAnglesXYZ())

			table.insert(jointCache, {joints[i]:Clone(),joints[i].Parent})
			joints[i]:Remove()
		end
	end

	local children = c:GetChildren()
	for i = 1,#children do
		if children[i]:IsA("BasePart") then
			children[i].FormFactor = "Custom"
			children[i].Size = children[i].Size * scale
		end
	end

	for i = 1,#jointCache do
		jointCache[i][1].Parent = jointCache[i][2]
	end

	--------------------------------------------------------VALUE SCALING
	c.Humanoid.WalkSpeed = c.Humanoid.WalkSpeed * scale
	c.Humanoid.JumpPower = c.Humanoid.JumpPower * scale/2

end)

end))
LocalScript42.Name = "Aqua6"
LocalScript42.Parent = mas
table.insert(cors,sandbox(LocalScript42,function()
local mouse = owner:GetMouse()
local Character = owner.Character
local aa = false
function Particles() -- Main Function (Clones the Particle find the Player and put's the Particles into them)
	for _,v in pairs(owner.Character:GetChildren()) do
		if v:IsA("BasePart") then
			local Sound = script.FatSound:Clone()
			Sound.Parent = owner.Character.Head
			local AquaLight = script.AquaLight:Clone()
			AquaLight.Parent = owner.Character.Head
			local Particles = script.TestParticles:Clone() -- Name TestParticles to your Particles name.
			Particles.Parent = v
			Sound:Play()
		end
	end
end

function ParticlesDestroy() -- To remove the Particles again.
	for _,v in pairs(owner.Character:GetChildren()) do
		if v:FindFirstChild("TestParticles") then  -- Name TestParticles to your Particles name.
		v.TestParticles.Enabled = false
		v.TestParticles:Destroy()
		end
		if owner.Character.Head:FindFirstChild("FatSound") then  -- Name TestParticles to your Particles name.
		owner.Character.Head.FatSound:Destroy()
		end
	end
end

function particles(a,b) -- Key Function, just don't touch this.
	if a == ("z") then
		if aa == true then
			aa = false
			ParticlesDestroy()
		else

		if aa == false then
			aa = true
			Particles()
			end
		end
	end
end


mouse.KeyDown:Connect(particles) -- Connects both Functions.

end))
Sound43.Name = "FatSound"
Sound43.Parent = LocalScript42
Sound43.SoundId = "rbxassetid://783504787"
Sound43.Volume = 2
ParticleEmitter44.Name = "TestParticles"
ParticleEmitter44.Parent = LocalScript42
ParticleEmitter44.Transparency = NumberSequence.new(1,0.63749998807907,1)
ParticleEmitter44.Size = NumberSequence.new(0.24999976158142,0.625,0.3125,0.68749964237213,0.43749988079071)
ParticleEmitter44.Color = ColorSequence.new(Color3.new(0.172549, 0.960784, 1),Color3.new(0.172549, 0.960784, 1))
ParticleEmitter44.LightEmission = 2
ParticleEmitter44.Texture = "rbxassetid://337127439"
ParticleEmitter44.Lifetime = NumberRange.new(4, 4)
ParticleEmitter44.Speed = NumberRange.new(4, 4)
ParticleEmitter44.Color = ColorSequence.new(Color3.new(0.172549, 0.960784, 1),Color3.new(0.172549, 0.960784, 1))
PointLight45.Name = "AquaLight"
PointLight45.Parent = LocalScript42
PointLight45.Color = Color3.new(0, 0.984314, 1)
PointLight45.Brightness = 5
PointLight45.Range = 5
PointLight45.Color = Color3.new(0, 0.984314, 1)
LocalScript46.Name = "Aqua7"
LocalScript46.Parent = mas
table.insert(cors,sandbox(LocalScript46,function()
local mouse = owner:GetMouse()
local Character = owner.Character
local aa = false
function Particles() -- Main Function (Clones the Particle find the Player and put's the Particles into them)
	for _,v in pairs(owner.Character:GetChildren()) do
		if v:IsA("BasePart") then
			local Sound = script.StomachSound:Clone()
			Sound.Parent = owner.Character.Head
			local AquaLight = script.AquaLight:Clone()
			AquaLight.Parent = owner.Character.Head
			local Particles = script.TestParticles:Clone() -- Name TestParticles to your Particles name.
			Particles.Parent = v
			Sound:Play()
		end
	end
end

function ParticlesDestroy() -- To remove the Particles again.
	for _,v in pairs(owner.Character:GetChildren()) do
		if v:FindFirstChild("TestParticles") then  -- Name TestParticles to your Particles name.
		v.TestParticles.Enabled = false
		v.TestParticles:Destroy()
		end
		if owner.Character.Head:FindFirstChild("StomachSound") then  -- Name TestParticles to your Particles name.
		owner.Character.Head.StomachSound:Destroy()
		end
	end
end

function particles(a,b) -- Key Function, just don't touch this.
	if a == ("u") then
		if aa == true then
			aa = false
			ParticlesDestroy()
		else

		if aa == false then
			aa = true
			Particles()
			end
		end
	end
end


mouse.KeyDown:Connect(particles) -- Connects both Functions.

end))
Sound47.Name = "StomachSound"
Sound47.Parent = LocalScript46
Sound47.SoundId = "rbxassetid://1509410219"
Sound47.Volume = 2
ParticleEmitter48.Name = "TestParticles"
ParticleEmitter48.Parent = LocalScript46
ParticleEmitter48.Transparency = NumberSequence.new(1,0.63749998807907,1)
ParticleEmitter48.Size = NumberSequence.new(0.24999976158142,0.625,0.3125,0.68749964237213,0.43749988079071)
ParticleEmitter48.Color = ColorSequence.new(Color3.new(0.172549, 0.960784, 1),Color3.new(0.172549, 0.960784, 1))
ParticleEmitter48.LightEmission = 2
ParticleEmitter48.Texture = "rbxassetid://337127439"
ParticleEmitter48.Lifetime = NumberRange.new(4, 4)
ParticleEmitter48.Speed = NumberRange.new(4, 4)
ParticleEmitter48.Color = ColorSequence.new(Color3.new(0.172549, 0.960784, 1),Color3.new(0.172549, 0.960784, 1))
PointLight49.Name = "AquaLight"
PointLight49.Parent = LocalScript46
PointLight49.Color = Color3.new(0, 0.984314, 1)
PointLight49.Brightness = 5
PointLight49.Range = 5
PointLight49.Color = Color3.new(0, 0.984314, 1)
for i,v in pairs(mas:GetChildren()) do
	v.Parent = game:GetService("Players").LocalPlayer.Backpack
	pcall(function() v:MakeJoints() end)
end
mas:Destroy()
for i,v in pairs(cors) do
	spawn(function()
		pcall(v)
	end)
end