--wait(0.2)
--owner = game.Players.LocalPlayer

--<config>
follow = true
appsSize = Vector2.new(50,50)
--</config>

Char = owner.Character.HumanoidRootPart
screen = Instance.new("Part")
screen.Size = Vector3.new(16, 12, 1)
screen.Transparency = 1
screen.Parent = workspace
screen.Anchored = true
screen.CanCollide = false
event = workspace.Screen2Server.event

game["Run Service"].Heartbeat:Connect(function()
	if follow then
		screen.CFrame = Char.CFrame * CFrame.new(0,Char.OriginalSize.Value.Y + 3.5,-9)
		screen.Rotation = screen.Rotation + Vector3.new(0,180,0)
	end
end)


screenGui = Instance.new("SurfaceGui")
screenGui.Adornee = screen
screenGui.Parent = owner.PlayerGui
screenGui.ClipsDescendants = true
apps = Instance.new("Frame")
apps.Parent = screenGui
apps.Transparency = 1
apps.ZIndex = 1
apps.Size = UDim2.new(1,0,1,0)
uigrid = Instance.new("UIGridLayout")
uigrid.Parent = apps
uigrid.CellSize = UDim2.new(0,appsSize.X,0,appsSize.Y)
uigrid.CellPadding = UDim2.new(0,5,0,5)
uigrid.HorizontalAlignment = Enum.HorizontalAlignment.Left
uigrid.SortOrder = Enum.SortOrder.LayoutOrder
uigrid.VerticalAlignment = Enum.VerticalAlignment.Top
background = Instance.new("ImageLabel")
background.Parent = screenGui
background.Image = "http://www.roblox.com/asset/?id=15429308220"
background.Size = UDim2.new(1,0,1,0)
background.ZIndex = -99
mo = Instance.new("ImageLabel")
mo.Size = UDim2.new(0, 100, 0, 100)
mo.Parent = screenGui
mo.AnchorPoint = Vector2.new(0.5,0.5)
mo.Image = "http://www.roblsx.com/asset/?id=10582909971"
mo.BackgroundTransparency = 1
mostate = 0
mo.ZIndex = 90
mouse = owner:GetMouse()
AppData = Instance.new("Folder")
AppData.Parent = screenGui
AppData.Name = "AppData"
UIS = game:GetService("UserInputService")
MouseDefult = "http://www.roblsx.com/asset/?id=10582909971"

WindowMouse = Vector2.new(0,0)
mouse.Move:Connect(function()
	if mouse.Target == screenGui.Adornee then
		local hit = mouse.Hit.Position
		local GuiParentPart = screenGui.Adornee
		local gc = GuiParentPart.CFrame
		local objectSpaceHit = gc:pointToObjectSpace(hit)
		local topLeftObjectSpace = Vector3.new(-GuiParentPart.Size.X / 2, GuiParentPart.Size.Y / 2, -GuiParentPart.Size.Z / 2)
		local mouseDistanceFromTopLeft = objectSpaceHit - topLeftObjectSpace
		local RelativeLocation = Vector2.new(
			math.abs(mouseDistanceFromTopLeft.X) * screenGui.PixelsPerStud,
			math.abs(mouseDistanceFromTopLeft.Y) * screenGui.PixelsPerStud
		)
		RelativeLocation = Vector2.new(0 - RelativeLocation.X + screenGui.CanvasSize.X,RelativeLocation.Y)
		local mx,my = RelativeLocation.X,RelativeLocation.Y
		WindowMouse = RelativeLocation
		mo.Position = UDim2.new(0,mx,0,my)
		UIS.MouseIconEnabled = false
	else
		UIS.MouseIconEnabled = true
	end
end)
--winodws bar
bar = Instance.new("Frame")
bar.Parent = screenGui
bar.Size = UDim2.new(1,0,0,40)
bar.BackgroundColor3 = Color3.new(0.541176, 0.541176, 0.541176)
bar.ZIndex = 88
bar.Position = UDim2.new(0,0,1,-40)
uilist = Instance.new("UIListLayout")
uilist.Parent = bar
uilist.FillDirection = Enum.FillDirection.Horizontal
windowsB = Instance.new("ImageButton")
windowsB.Parent = bar
windowsB.Size = UDim2.new(0,40,0,40)
windowsB.ZIndex = 89
windowsB.Image = "http://www.roblox.com/asset/?id=3400271144"

windowsList = Instance.new("Frame")
windowsList.Size = UDim2.new(0,150,0,200)
windowsList.Parent = screenGui
windowsList.AnchorPoint = Vector2.new(0,1)
windowsList.Position = UDim2.new(0,0,1,-40)
windowsList.Visible = false
windowsList.ZIndex = 87
uigL = Instance.new("UIGridLayout")
uigL.CellSize = UDim2.new(0.48,0,0,19)
uigL.Parent = windowsList
uigL.FillDirection = Enum.FillDirection.Horizontal
uigL.HorizontalAlignment = Enum.HorizontalAlignment.Left
uigL.SortOrder = Enum.SortOrder.Name
uigL.VerticalAlignment = Enum.VerticalAlignment.Top

followL = Instance.new("TextLabel")
followL.Parent = windowsList
followL.Text = "Follow"
followL.Name = "1_1"
followL.ZIndex = 87
followB = Instance.new("ImageButton")
followB.Parent = windowsList
followB.Name = "1_2"
followB.Image = "http://www.roblox.com/asset/?id=5533192672"
followB.ZIndex = 87

followB.MouseButton1Click:Connect(function()
	if follow then
		followB.Image = "http://www.roblox.com/asset/?id=5533209494"
		follow = false
	else
		followB.Image = "http://www.roblox.com/asset/?id=5533192672"
		follow = true
	end
end)

windowsB.MouseButton1Click:Connect(function()
	windowsList.Visible = not windowsList.Visible
end)

--window
function newWindow(title,icon,size)
	local window = Instance.new("Frame")
	window.Parent = screenGui
	window.Position = UDim2.new(0, 100, 0, 0)
	window.Size = UDim2.new(0,size.X,0,size.Y)
	local moveB = Instance.new("TextButton")
	moveB.Parent = window
	moveB.Size = UDim2.new(1,0,0,20)
	moveB.Text = ""
	moveB.BackgroundColor3 = Color3.new(0.541176, 0.541176, 0.541176)
	local label = Instance.new("TextLabel")
	label.Text = title
	label.Parent = moveB
	label.Position = UDim2.new(0,15,0,0)
	label.Interactable = false
	label.Size = UDim2.new(0,4,1,0)
	label.BackgroundTransparency = 1
	label.TextXAlignment = "Left"
	local iconL = Instance.new("ImageLabel")
	iconL.Image = icon
	iconL.Size = UDim2.new(0,10,0,10)
	iconL.Parent = moveB
	iconL.Position = UDim2.new(0,2.5,0,2.5)
	local Frame = Instance.new("Frame")
	Frame.Size = UDim2.new(1,0,1,-20)
	Frame.Parent = window
	Frame.Position = UDim2.new(0,0,0,15)
	local ReSize = Instance.new("ImageButton")
	ReSize.Parent = window
	ReSize.Image = "http://www.roblox.com/asset/?id=6152529948"
	ReSize.Size = UDim2.new(0,25,0,25)
	ReSize.Position = UDim2.new(1,0,1,0)
	ReSize.BorderSizePixel = 0
	local si = false
	local ta = Instance.new("TextLabel")
	ta.Parent = bar
	ta.Size = UDim2.new(0,100,1,0)
	ta.ZIndex = 89
	ta.Text = title
	local close = Instance.new("ImageButton")
	close.Parent = moveB
	close.Size = UDim2.new(0,13,0,13)
	close.Position = UDim2.new(1,-14,0,0)
	close.Image = "http://www.roblox.com/asset/?id=1249929622"
	close.BackgroundTransparency = 1
	
	
	local mx,my = mouse.X,mouse.Y
	local sx,sy = 0,0

	local Mouse = mouse

	close.MouseButton1Click:Connect(function()
		window:Destroy()
		ta:Destroy()
	end)

	moveB.MouseButton1Down:Connect(function()
		si = false
		mx,my = WindowMouse.X,WindowMouse.Y
		local dxy = window.Position
		local dx,dy = dxy.X.Offset,dxy.Y.Offset
		sx,sy = dx - mx,dy - my
		mostate = 1
		mo.Image = "http://www.roblox.com/asset/?id=12057590448"
	end)
	moveB.MouseButton1Up:Connect(function()
		sx,sy = 0,0
		mostate = 0
		mo.Image = "http://www.roblox.com/asset/?id=12057597405"
	end)
	mouse.Button1Up:Connect(function()
		sx,sy = 0,0
		mostate = 0
	end)
	moveB.MouseEnter:Connect(function() 
		if mostate == 0 then
			mo.Image = "http://www.roblox.com/asset/?id=12057597405"
		else
			mo.Image = "http://www.roblox.com/asset/?id=12057590448"
		end
	end)
	moveB.MouseLeave:Connect(function()
		if mostate == 0 then
			mo.Image = "http://www.roblsx.com/asset/?id=10582909971"
		end
	end)
	mouse.Move:Connect(function()
		if mouse.Target == screenGui.Adornee then
			mx,my = WindowMouse.X,WindowMouse.Y
			mo.Position = UDim2.new(0,mx,0,my)
			if not si then
			mouse.Icon = "http://www.roblox.com/asset/?id=2317070865"
			if sx ~= 0 then
				window.Position = UDim2.new(0,sx + mx,0,sy + my)
			end 
			else
				window.Size = UDim2.new(0,sx + mx,0,sy + my)
			end
		else
			mouse.Icon = "defult"
		end
	end)
	ReSize.MouseButton1Down:Connect(function()
		mx,my = WindowMouse.X,WindowMouse.Y
		local dxy = window.Size
		local dx,dy = dxy.X.Offset,dxy.Y.Offset
		sx,sy = dx - mx,dy - my
		mostate = 2
		mo.Image = "http://www.roblox.com/asset/?id=12057590448"
		si = true
	end)
	ReSize.MouseButton1Up:Connect(function()
		sx,sy = 0,0
		mostate = 0
		mo.Image = "http://www.roblsx.com/asset/?id=10582909971"
		si = false
	end)
	
	return Frame
end
--defult apps
function newApp(image,name,code,arg1,arg2,arg3)
	local app = Instance.new("ImageButton")
	app.Parent = apps
	app.Image = image
	app.Size = UDim2.new(0,appsSize.X,0,appsSize.Y)
	app.BackgroundTransparency = 1
	local label = Instance.new("TextLabel")
	label.Size = UDim2.new(1,0,0,appsSize.Y*0.2)
	label.Parent = app
	label.Text = name
	label.TextScaled = true
	label.Position = UDim2.new(0,0,1,0)
	local data = Instance.new("Folder")
	data.Parent = AppData
	
	app.MouseButton1Click:Connect(function()
		code(data,arg1,arg2,arg3)
	end)
	return data
end
function openScript_App(data)
	local gui = newWindow("*Untitled","http://www.roblox.com/asset/?id=4998267428",Vector2.new(170,170))
	local textbox = Instance.new("TextBox")
	textbox.Parent = gui
	textbox.Size = UDim2.new(1,0,1,0)
	textbox.TextXAlignment = "Left"
	textbox.TextYAlignment = "Top"
	textbox.TextSize = 12
	textbox.BackgroundTransparency = 1
	local run = Instance.new("TextButton")
	run.Parent = gui
	run.Size = UDim2.new(0,50,0,20)
	run.Position = UDim2.new(1,-60,1,-30)
	run.Text = "EXECUTE"
	local save = Instance.new("TextButton")
	save.Parent = gui
	save.Size = UDim2.new(0,50,0,20)
	save.Position = UDim2.new(1,-120,1,-30)
	save.Text = "Save"
	local mdata = data.code
	textbox.ClearTextOnFocus = false
	textbox.Text = mdata.Value
	textbox.MultiLine = true

	save.MouseButton1Click:Connect(function()
		mdata.Value = textbox.Text
	end)
	
	run.MouseButton1Click:Connect(function()
		event:FireServer("run",textbox.Text)
	end)
	
	textbox.MouseEnter:Connect(function()
		mo.Image = "rbxassetid://76067514814746"
	end)
	textbox.MouseLeave:Connect(function()
		mo.Image = MouseDefult
	end)
end

function newScript_App()
	local gui = newWindow("*Untitled","http://www.roblox.com/asset/?id=4998267428",Vector2.new(170,170))
	local textbox = Instance.new("TextBox")
	textbox.Parent = gui
	textbox.Size = UDim2.new(1,0,1,0)
	textbox.TextXAlignment = "Left"
	textbox.TextYAlignment = "Top"
	textbox.TextSize = 12
	textbox.BackgroundTransparency = 1
	textbox.MultiLine = true
	local run = Instance.new("TextButton")
	run.Parent = gui
	run.Size = UDim2.new(0,50,0,20)
	run.Position = UDim2.new(1,-60,1,-30)
	run.Text = "EXECUTE"
	local save = Instance.new("TextButton")
	save.Parent = gui
	save.Size = UDim2.new(0,50,0,20)
	save.Position = UDim2.new(1,-120,1,-30)
	save.Text = "Save"
	local saved = false
	local mdata = nil
	textbox.ClearTextOnFocus = false
	
	save.MouseButton1Click:Connect(function()
		if saved then
			mdata.Value = textbox.Text
		else
			local data = newApp("http://www.roblox.com/asset/?id=4998267428","Script",openScript_App)
			mdata = Instance.new("StringValue")
			mdata.Parent = data
			mdata.Value = textbox.Text
			mdata.Name = "code"
			saved = true
		end
	end)
	
	run.MouseButton1Click:Connect(function()
		event:FireServer("run",textbox.Text)
	end)
	
	textbox.MouseEnter:Connect(function()
		mo.Image = "rbxassetid://76067514814746"
	end)
	textbox.MouseLeave:Connect(function()
		mo.Image = MouseDefult
	end)
end
newApp("http://www.roblox.com/asset/?id=6709885837","New Script",newScript_App)