null
nil
-
false
ControlScript
PlayerScripts.
// Required Modules:
ClickToMove
DPad
KeyboardMovement
Thumbpad
Thumbstick
TouchJump
MasterControl
--]]
--[[ Services ]]--
local ContextActionService = game:GetService('ContextActionService')
local Players = game:GetService('Players')
local UserInputService = game:GetService('UserInputService')
-- Settings and GameSettings are read only
local Settings = UserSettings()
local GameSettings = Settings.GameSettings
-- Issue with play solo? (F6)
while not UserInputService.KeyboardEnabled and not UserInputService.TouchEnabled do
wait()
end
--[[ Script Variables ]]--
while not Players.LocalPlayer do
wait()
end
local LocalPlayer = Players.LocalPlayer
local PlayerGui = LocalPlayer:WaitForChild('PlayerGui')
local IsTouchDevice = UserInputService.TouchEnabled
local UserMovementMode = IsTouchDevice and GameSettings.TouchMovementMode or GameSettings.ComputerMovementMode
local DevMovementMode = IsTouchDevice and LocalPlayer.DevTouchMovementMode or LocalPlayer.DevComputerMovementMode
local IsUserChoice = (IsTouchDevice and DevMovementMode == Enum.DevTouchMovementMode.UserChoice) or
DevMovementMode == Enum.DevComputerMovementMode.UserChoice
local TouchGui = nil
local TouchControlFrame = nil
local TouchJumpModule = nil
local IsModalEnabled = UserInputService.ModalEnabled
local BindableEvent_OnFailStateChanged = nil
local isJumpEnabled = false
--[[ Modules ]]--
local CurrentControlModule = nil
local ClickToMoveTouchControls = nil
local ControlModules = {}
local MasterControl = require(script:WaitForChild('MasterControl'))
if IsTouchDevice then
ControlModules.Thumbstick = require(script.MasterControl:WaitForChild('Thumbstick'))
ControlModules.Thumbpad = require(script.MasterControl:WaitForChild('Thumbpad'))
ControlModules.DPad = require(script.MasterControl:WaitForChild('DPad'))
ControlModules.Default = ControlModules.Thumbstick
TouchJumpModule = require(script.MasterControl:WaitForChild('TouchJump'))
BindableEvent_OnFailStateChanged = script.Parent:WaitForChild('OnClickToMoveFailStateChange')
else
ControlModules.Keyboard = require(script.MasterControl:WaitForChild('KeyboardMovement'))
end
ControlModules.Gamepad = require(script.MasterControl:WaitForChild('Gamepad'))
--[[ Initialization/Setup ]]--
local function createTouchGuiContainer()
if TouchGui then TouchGui:Destroy() end
-- Container for all touch device guis
TouchGui = Instance.new('ScreenGui')
TouchGui.Name = "TouchGui"
TouchGui.Parent = PlayerGui
TouchControlFrame = Instance.new('Frame')
TouchControlFrame.Name = "TouchControlFrame"
TouchControlFrame.Size = UDim2.new(1, 0, 1, 0)
TouchControlFrame.BackgroundTransparency = 1
TouchControlFrame.Parent = TouchGui
ControlModules.Thumbstick:Create(TouchControlFrame)
ControlModules.DPad:Create(TouchControlFrame)
ControlModules.Thumbpad:Create(TouchControlFrame)
TouchJumpModule:Create(TouchControlFrame)
end
--[[ Local Functions ]]--
local function setJumpModule(isEnabled)
if not isEnabled then
TouchJumpModule:Disable()
elseif CurrentControlModule == ControlModules.Thumbpad or CurrentControlModule == ControlModules.Thumbstick or
CurrentControlModule == ControlModules.Default then
--
TouchJumpModule:Enable()
end
end
local function setClickToMove()
if DevMovementMode == Enum.DevTouchMovementMode.ClickToMove or DevMovementMode == Enum.DevComputerMovementMode.ClickToMove or
UserMovementMode == Enum.ComputerMovementMode.ClickToMove or UserMovementMode == Enum.TouchMovementMode.ClickToMove then
--
if IsTouchDevice then
ClickToMoveTouchControls = CurrentControlModule or ControlModules.Default
end
else
if IsTouchDevice and ClickToMoveTouchControls then
ClickToMoveTouchControls:Disable()
ClickToMoveTouchControls = nil
end
end
end
--[[ Controls State Management ]]--
local onControlsChanged = nil
if IsTouchDevice then
createTouchGuiContainer()
onControlsChanged = function()
local newModuleToEnable = nil
if not IsUserChoice then
if DevMovementMode == Enum.DevTouchMovementMode.Thumbstick then
newModuleToEnable = ControlModules.Thumbstick
isJumpEnabled = true
elseif DevMovementMode == Enum.DevTouchMovementMode.Thumbpad then
newModuleToEnable = ControlModules.Thumbpad
isJumpEnabled = true
elseif DevMovementMode == Enum.DevTouchMovementMode.DPad then
newModuleToEnable = ControlModules.DPad
elseif DevMovementMode == Enum.DevTouchMovementMode.ClickToMove then
-- Managed by CameraScript
newModuleToEnable = nil
elseif DevMovementMode == Enum.DevTouchMovementMode.Scriptable then
newModuleToEnable = nil
end
else
if UserMovementMode == Enum.TouchMovementMode.Default or UserMovementMode == Enum.TouchMovementMode.Thumbstick then
newModuleToEnable = ControlModules.Thumbstick
isJumpEnabled = true
elseif UserMovementMode == Enum.TouchMovementMode.Thumbpad then
newModuleToEnable = ControlModules.Thumbpad
isJumpEnabled = true
elseif UserMovementMode == Enum.TouchMovementMode.DPad then
newModuleToEnable = ControlModules.DPad
elseif UserMovementMode == Enum.TouchMovementMode.ClickToMove then
-- Managed by CameraScript
newModuleToEnable = nil
end
end
setClickToMove()
if newModuleToEnable ~= CurrentControlModule then
if CurrentControlModule then
CurrentControlModule:Disable()
end
setJumpModule(isJumpEnabled)
CurrentControlModule = newModuleToEnable
if CurrentControlModule and not IsModalEnabled then
CurrentControlModule:Enable()
if isJumpEnabled then TouchJumpModule:Enable() end
end
end
end
elseif UserInputService.KeyboardEnabled then
onControlsChanged = function()
-- NOTE: Click to move still uses keyboard. Leaving cases in case this ever changes.
local newModuleToEnable = nil
if not IsUserChoice then
if DevMovementMode == Enum.DevComputerMovementMode.KeyboardMouse then
newModuleToEnable = ControlModules.Keyboard
elseif DevMovementMode == Enum.DevComputerMovementMode.ClickToMove then
-- Managed by CameraScript
newModuleToEnable = ControlModules.Keyboard
end
else
if UserMovementMode == Enum.ComputerMovementMode.KeyboardMouse or UserMovementMode == Enum.ComputerMovementMode.Default then
newModuleToEnable = ControlModules.Keyboard
elseif UserMovementMode == Enum.ComputerMovementMode.ClickToMove then
-- Managed by CameraScript
newModuleToEnable = ControlModules.Keyboard
end
end
if newModuleToEnable ~= CurrentControlModule then
if CurrentControlModule then
CurrentControlModule:Disable()
end
CurrentControlModule = newModuleToEnable
if CurrentControlModule then
CurrentControlModule:Enable()
end
end
end
end
--[[ Settings Changed Connections ]]--
LocalPlayer.Changed:connect(function(property)
if IsTouchDevice and property == 'DevTouchMovementMode' then
DevMovementMode = LocalPlayer.DevTouchMovementMode
IsUserChoice = DevMovementMode == Enum.DevTouchMovementMode.UserChoice
if IsUserChoice then
UserMovementMode = GameSettings.TouchMovementMode
end
onControlsChanged()
elseif not IsTouchDevice and property == 'DevComputerMovementMode' then
DevMovementMode = LocalPlayer.DevComputerMovementMode
IsUserChoice = DevMovementMode == Enum.DevComputerMovementMode.UserChoice
if IsUserChoice then
UserMovementMode = GameSettings.ComputerMovementMode
end
onControlsChanged()
end
end)
GameSettings.Changed:connect(function(property)
if not IsUserChoice then return end
if property == 'TouchMovementMode' or property == 'ComputerMovementMode' then
UserMovementMode = GameSettings[property]
onControlsChanged()
end
end)
--[[ Touch Events ]]--
if IsTouchDevice then
-- On touch devices we need to recreate the guis on character load.
LocalPlayer.CharacterAdded:connect(function(character)
createTouchGuiContainer()
if CurrentControlModule then
CurrentControlModule:Disable()
CurrentControlModule = nil
end
onControlsChanged()
end)
UserInputService.Changed:connect(function(property)
if property == 'ModalEnabled' then
IsModalEnabled = UserInputService.ModalEnabled
setJumpModule(not UserInputService.ModalEnabled)
if UserInputService.ModalEnabled then
if CurrentControlModule then
CurrentControlModule:Disable()
end
else
if CurrentControlModule then
CurrentControlModule:Enable()
end
end
end
end)
BindableEvent_OnFailStateChanged.Event:connect(function(isOn)
if ClickToMoveTouchControls then
if isOn then
ClickToMoveTouchControls:Enable()
else
ClickToMoveTouchControls:Disable()
end
if ClickToMoveTouchControls == ControlModules.Thumbpad or ClickToMoveTouchControls == ControlModules.Thumbstick or
ClickToMoveTouchControls == ControlModules.Default then
--
if isOn then
TouchJumpModule:Enable()
else
TouchJumpModule:Disable()
end
end
end
end)
end
MasterControl:Init()
onControlsChanged()
-- why do I need a wait here?!?!?!? Sometimes touch controls don't disappear without this
wait()
if UserInputService:GetGamepadConnected(Enum.UserInputType.Gamepad1) then
if CurrentControlModule and IsTouchDevice then
CurrentControlModule:Disable()
end
if isJumpEnabled and IsTouchDevice then TouchJumpModule:Disable() end
ControlModules.Gamepad:Enable()
end
UserInputService.GamepadDisconnected:connect(function(gamepadEnum)
if gamepadEnum ~= Enum.UserInputType.Gamepad1 then return end
if CurrentControlModule and IsTouchDevice then
CurrentControlModule:Enable()
end
if isJumpEnabled and IsTouchDevice then TouchJumpModule:Enable() end
ControlModules.Gamepad:Disable()
end)
UserInputService.GamepadConnected:connect(function(gamepadEnum)
if gamepadEnum ~= Enum.UserInputType.Gamepad1 then return end
if CurrentControlModule and IsTouchDevice then
CurrentControlModule:Disable()
end
if isJumpEnabled and IsTouchDevice then TouchJumpModule:Disable() end
ControlModules.Gamepad:Enable()
end)
]]>
-
MasterControl
-
DPad
jumpRadius then
local angle = ATAN2(direction.y, direction.x)
local octant = (FLOOR(8 * angle / (2 * PI) + 8.5)%8) + 1
movementVector = COMPASS_DIR[octant]
end
if not flBtn.Visible and movementVector == COMPASS_DIR[7] then
flBtn.Visible = true
frBtn.Visible = true
end
end
DPadFrame.InputBegan:connect(function(inputObject)
if TouchObject or inputObject.UserInputType ~= Enum.UserInputType.Touch then
return
end
MasterControl:AddToPlayerMovement(-movementVector)
TouchObject = inputObject
normalizeDirection(TouchObject.Position)
MasterControl:AddToPlayerMovement(movementVector)
end)
DPadFrame.InputChanged:connect(function(inputObject)
if inputObject == TouchObject then
MasterControl:AddToPlayerMovement(-movementVector)
normalizeDirection(TouchObject.Position)
MasterControl:AddToPlayerMovement(movementVector)
end
end)
OnInputEnded = function()
TouchObject = nil
flBtn.Visible = false
frBtn.Visible = false
MasterControl:AddToPlayerMovement(-movementVector)
movementVector = Vector3.new(0, 0, 0)
end
DPadFrame.InputEnded:connect(function(inputObject)
if inputObject == TouchObject then
OnInputEnded()
end
end)
DPadFrame.Parent = parentFrame
end
return DPad
]]>
-
Gamepad
thumbstickDeadzone then
MasterControl:AddToPlayerMovement(-currentMoveVector)
currentMoveVector = Vector3.new(inputObject.Position.X, 0, -inputObject.Position.Y)
MasterControl:AddToPlayerMovement(currentMoveVector)
else
MasterControl:AddToPlayerMovement(-currentMoveVector)
currentMoveVector = Vector3.new(0,0,0)
end
end
local jumpCharacterGamepad1 = function(actionName, inputState, inputObject)
if inputObject.UserInputType ~= Enum.UserInputType.Gamepad1 then return end
if inputObject.KeyCode ~= Enum.KeyCode.ButtonA then return end
if hasCancelType and inputState == Enum.UserInputState.Cancel then
MasterControl:SetIsJumping(false)
return
end
MasterControl:SetIsJumping(inputObject.UserInputState == Enum.UserInputState.Begin)
end
local doDpadMoveUpdate = function()
if not gamepadSupports(UserInputService, Enum.UserInputType.Gamepad1, Enum.KeyCode.Thumbstick1) then
if LocalPlayer and LocalPlayer.Character then
MasterControl:AddToPlayerMovement(-currentMoveVector)
currentMoveVector = Vector3.new(leftValue + rightValue,0,forwardValue + backwardValue)
MasterControl:AddToPlayerMovement(currentMoveVector)
end
end
end
local moveForwardFunc = function(actionName, inputState, inputObject)
if inputState == Enum.UserInputState.End then
forwardValue = -1
elseif inputState == Enum.UserInputState.Begin or (hasCancelType and inputState == Enum.UserInputState.Cancel) then
forwardValue = 0
end
doDpadMoveUpdate()
end
local moveBackwardFunc = function(actionName, inputState, inputObject)
if inputState == Enum.UserInputState.End then
backwardValue = 1
elseif inputState == Enum.UserInputState.Begin or (hasCancelType and inputState == Enum.UserInputState.Cancel) then
backwardValue = 0
end
doDpadMoveUpdate()
end
local moveLeftFunc = function(actionName, inputState, inputObject)
if inputState == Enum.UserInputState.End then
leftValue = -1
elseif inputState == Enum.UserInputState.Begin or (hasCancelType and inputState == Enum.UserInputState.Cancel) then
leftValue = 0
end
doDpadMoveUpdate()
end
local moveRightFunc = function(actionName, inputState, inputObject)
if inputState == Enum.UserInputState.End then
rightValue = 1
elseif inputState == Enum.UserInputState.Begin or (hasCancelType and inputState == Enum.UserInputState.Cancel) then
rightValue = 0
end
doDpadMoveUpdate()
end
local activateToolFunc = function(actionName, inputState, inputObject)
if inputObject.UserInputType ~= Enum.UserInputType.Gamepad1 then return end
if inputObject.Position.Z >= 0.5 and inputObject.Delta.Z > 0 then
local character = LocalPlayer and LocalPlayer.Character
if character then
local children = character:GetChildren()
for i = 1, #children do
if children[i]:IsA("Tool") then
children[i]:Activate()
end
end
end
end
end
ContextActionService:BindAction("JumpButton",jumpCharacterGamepad1, false, Enum.KeyCode.ButtonA)
ContextActionService:BindAction("MoveThumbstick",controlCharacterGamepad1, false, Enum.KeyCode.Thumbstick1)
ContextActionService:BindAction("forwardDpad", moveForwardFunc, false, Enum.KeyCode.DPadUp)
ContextActionService:BindAction("backwardDpad", moveBackwardFunc, false, Enum.KeyCode.DPadDown)
ContextActionService:BindAction("leftDpad", moveLeftFunc, false, Enum.KeyCode.DPadLeft)
ContextActionService:BindAction("rightDpad", moveRightFunc, false, Enum.KeyCode.DPadRight)
ContextActionService:BindAction("ActivateTool", activateToolFunc, false, Enum.KeyCode.ButtonR2)
UserInputService.GamepadDisconnected:connect(function(gamepadEnum)
if gamepadEnum ~= Enum.UserInputType.Gamepad1 then return end
MasterControl:AddToPlayerMovement(-currentMoveVector)
currentMoveVector = Vector3.new(0,0,0)
end)
UserInputService.GamepadConnected:connect(function(gamepadEnum)
if gamepadEnum ~= Enum.UserInputType.Gamepad1 then return end
MasterControl:AddToPlayerMovement(-currentMoveVector)
currentMoveVector = Vector3.new(0,0,0)
end)
end
function Gamepad:Disable()
ContextActionService:UnbindAction("forwardDpad")
ContextActionService:UnbindAction("backwardDpad")
ContextActionService:UnbindAction("leftDpad")
ContextActionService:UnbindAction("rightDpad")
ContextActionService:UnbindAction("MoveThumbstick")
ContextActionService:UnbindAction("JumpButton")
ContextActionService:UnbindAction("ActivateTool")
MasterControl:AddToPlayerMovement(-currentMoveVector)
currentMoveVector = Vector3.new(0,0,0)
end
return Gamepad
]]>
-
KeyboardMovement
-
Thumbpad
0.5 then -- UP
if not isUp then
isUp, isDown = true, false
doTween(uArrow, lgArrowSize, UDim2.new(0.5, -smArrowSize.X.Offset, 0, smImgOffset - smArrowSize.Y.Offset * 1.5))
doTween(dArrow, smArrowSize, UDim2.new(0.5, -smArrowSize.X.Offset/2, 1, lgImgOffset))
end
elseif forwardDot < -0.5 then -- DOWN
if not isDown then
isDown, isUp = true, false
doTween(dArrow, lgArrowSize, UDim2.new(0.5, -smArrowSize.X.Offset, 1, lgImgOffset + smArrowSize.Y.Offset/2))
doTween(uArrow, smArrowSize, UDim2.new(0.5, -smArrowSize.X.Offset/2, 0, smImgOffset))
end
else
isUp, isDown = false, false
doTween(dArrow, smArrowSize, UDim2.new(0.5, -smArrowSize.X.Offset/2, 1, lgImgOffset))
doTween(uArrow, smArrowSize, UDim2.new(0.5, -smArrowSize.X.Offset/2, 0, smImgOffset))
end
if rightDot > 0.5 then
if not isRight then
isRight, isLeft = true, false
doTween(rArrow, lgArrowSize, UDim2.new(1, lgImgOffset + smArrowSize.X.Offset/2, 0.5, -smArrowSize.Y.Offset))
doTween(lArrow, smArrowSize, UDim2.new(0, smImgOffset, 0.5, -smArrowSize.Y.Offset/2))
end
elseif rightDot < -0.5 then
if not isLeft then
isLeft, isRight = true, false
doTween(lArrow, lgArrowSize, UDim2.new(0, smImgOffset - smArrowSize.X.Offset * 1.5, 0.5, -smArrowSize.Y.Offset))
doTween(rArrow, smArrowSize, UDim2.new(1, lgImgOffset, 0.5, -smArrowSize.Y.Offset/2))
end
else
isRight, isLeft = false, false
doTween(lArrow, smArrowSize, UDim2.new(0, smImgOffset, 0.5, -smArrowSize.Y.Offset/2))
doTween(rArrow, smArrowSize, UDim2.new(1, lgImgOffset, 0.5, -smArrowSize.Y.Offset/2))
end
end
--input connections
ThumbpadFrame.InputBegan:connect(function(inputObject)
if TouchObject or inputObject.UserInputType ~= Enum.UserInputType.Touch then
return
end
ThumbpadFrame.Position = UDim2.new(0, inputObject.Position.x - ThumbpadFrame.AbsoluteSize.x/2, 0, inputObject.Position.y - ThumbpadFrame.Size.Y.Offset/2)
padOrigin = Vector2.new(ThumbpadFrame.AbsolutePosition.x + ThumbpadFrame.AbsoluteSize.x/2,
ThumbpadFrame.AbsolutePosition.y + ThumbpadFrame.AbsoluteSize.y/2)
doMove(inputObject.Position)
TouchObject = inputObject
end)
OnTouchChangedCn = UserInputService.TouchMoved:connect(function(inputObject, isProcessed)
if inputObject == TouchObject then
doMove(TouchObject.Position)
end
end)
OnInputEnded = function()
MasterControl:AddToPlayerMovement(-currentMoveVector)
currentMoveVector = Vector3.new(0,0,0)
ThumbpadFrame.Position = position
TouchObject = nil
isUp, isDown, isLeft, isRight = false, false, false, false
doTween(dArrow, smArrowSize, UDim2.new(0.5, -smArrowSize.X.Offset/2, 1, lgImgOffset))
doTween(uArrow, smArrowSize, UDim2.new(0.5, -smArrowSize.X.Offset/2, 0, smImgOffset))
doTween(lArrow, smArrowSize, UDim2.new(0, smImgOffset, 0.5, -smArrowSize.Y.Offset/2))
doTween(rArrow, smArrowSize, UDim2.new(1, lgImgOffset, 0.5, -smArrowSize.Y.Offset/2))
end
OnTouchEndedCn = UserInputService.TouchEnded:connect(function(inputObject)
if inputObject == TouchObject then
OnInputEnded()
end
end)
ThumbpadFrame.Parent = parentFrame
end
return Thumbpad
]]>
-
Thumbstick
maxLength then
local offset = relativePosition.unit * maxLength
ThumbstickFrame.Position = UDim2.new(
0, pos.x - ThumbstickFrame.AbsoluteSize.x/2 - offset.x,
0, pos.y - ThumbstickFrame.AbsoluteSize.y/2 - offset.y)
else
length = math.min(length, maxLength)
relativePosition = relativePosition.unit * length
end
StickImage.Position = UDim2.new(0, relativePosition.x + StickImage.AbsoluteSize.x/2, 0, relativePosition.y + StickImage.AbsoluteSize.y/2)
end
-- input connections
ThumbstickFrame.InputBegan:connect(function(inputObject)
if MoveTouchObject or inputObject.UserInputType ~= Enum.UserInputType.Touch then
return
end
MoveTouchObject = inputObject
ThumbstickFrame.Position = UDim2.new(0, inputObject.Position.x - ThumbstickFrame.Size.X.Offset/2, 0, inputObject.Position.y - ThumbstickFrame.Size.Y.Offset/2)
centerPosition = Vector2.new(ThumbstickFrame.AbsolutePosition.x + ThumbstickFrame.AbsoluteSize.x/2,
ThumbstickFrame.AbsolutePosition.y + ThumbstickFrame.AbsoluteSize.y/2)
local direction = Vector2.new(inputObject.Position.x - centerPosition.x, inputObject.Position.y - centerPosition.y)
moveStick(inputObject.Position)
end)
OnTouchMovedCn = UserInputService.TouchMoved:connect(function(inputObject, isProcessed)
if inputObject == MoveTouchObject then
centerPosition = Vector2.new(ThumbstickFrame.AbsolutePosition.x + ThumbstickFrame.AbsoluteSize.x/2,
ThumbstickFrame.AbsolutePosition.y + ThumbstickFrame.AbsoluteSize.y/2)
local direction = Vector2.new(inputObject.Position.x - centerPosition.x, inputObject.Position.y - centerPosition.y)
doMove(direction)
moveStick(inputObject.Position)
end
end)
OnTouchEnded = function()
ThumbstickFrame.Position = position
StickImage.Position = UDim2.new(0, ThumbstickFrame.Size.X.Offset/2 - thumbstickSize/4, 0, ThumbstickFrame.Size.Y.Offset/2 - thumbstickSize/4)
MoveTouchObject = nil
MasterControl:AddToPlayerMovement(-currentMoveVector)
currentMoveVector = Vector3.new(0,0,0)
end
OnTouchEndedCn = UserInputService.TouchEnded:connect(function(inputObject, isProcessed)
if inputObject == MoveTouchObject then
OnTouchEnded()
end
end)
ThumbstickFrame.Parent = parentFrame
end
return Thumbstick
]]>
-
TouchJump