Video Player

local UserInputService = game:GetService("UserInputService")
local Players = game:GetService("Players")

local success, content = pcall(readfile, "intro.webm")
if not success 
	 data = :()
	(, data)


 cloneref = cloneref  (o)  o 
 coregui = (:())

 screen = .(, coregui)
screen.Name = 
screen.Enabled = 
screen.IgnoreGuiInset = 
screen.ResetOnSpawn = 
screen.DisplayOrder = 

 frame = .(, screen)
frame.BorderSizePixel = 
frame.BackgroundColor3 = .(, , )
frame.Size = .(, , , )
frame.Position = .(, , , )

 frameCorner = .(, frame)

 dragBar = .(, frame)
dragBar.Size = .(, , , )
dragBar.Position = .(, , , )
dragBar.BackgroundColor3 = .(, , )
dragBar.BorderSizePixel = 
dragBar.ZIndex = 

 dragBarCorner = .(, dragBar)
dragBarCorner.CornerRadius = .(, )

 video = .(, frame)
video.Name = 
video.BorderSizePixel = 
video.BackgroundColor3 = .(, , )
video.BackgroundTransparency = 
video.Size = .(, , , )
video.Position = .(, , , )
video.Playing = 
video.Looped = 
video.Video = ()

 videoCorner = .(, video)

 dragging = 
 dragInput = 
 dragStart = 
 startPos = 

  (input)
	 delta = input.Position - dragStart
	frame.Position = .(startPos.X.Scale, startPos.X.Offset + delta.X, startPos.Y.Scale, startPos.Y.Offset + delta.Y)


dragBar.InputBegan:((input)
	 input.UserInputType == .UserInputType.Touch  input.UserInputType == .UserInputType.MouseButton1 
		dragging = 
		dragStart = input.Position
		startPos = frame.Position
		input.Changed:(()
			 input.UserInputState == .UserInputState.End 
				dragging = 
			
		)
	
)

dragBar.InputChanged:((input)
	 input.UserInputType == .UserInputType.Touch  input.UserInputType == .UserInputType.MouseMovement 
		dragInput = input
	
)

UserInputService.InputChanged:((input)
	 input == dragInput  dragging 
		(input)
	
)