Final version

actions.lua

@@ -0,0 +1,121 @@
+local userInputServce = game:GetService'UserInputService'
+
+local module = {}
+local actions = {}
+
+local Action = {}
+Action.__index = Action
+
+local function compare(prop, val, obj)
+	return obj[prop] == val
+end
+
+local function isMapValid(inputObject, map)
+	for property, value in pairs(map) do
+		local success, result = pcall(compare, property, value, inputObject)
+		if success then
+			if not result then
+				return false
+			end
+		else
+			warn(result)
+		end
+	end
+	return true
+end
+
+local function areMapsValid(inputObject, maps)
+	for i = 1, #maps do
+		if isMapValid(inputObject, maps[i]) then
+			return true
+		end
+	end
+	return false
+end
+
+function Action:_ConnectInputListeners()
+	if #self.InputListeners > 0 then return end
+	local function callback(inputObject, ...)
+		if areMapsValid(inputObject, self.InputMaps) then
+			self.Callback(inputObject, ...)
+		end
+	end
+	table.insert(self.InputListeners, userInputServce.InputBegan:Connect(callback))
+	table.insert(self.InputListeners, userInputServce.InputChanged:Connect(callback))
+	table.insert(self.InputListeners, userInputServce.InputEnded:Connect(callback))
+end
+
+function Action:BindToInput(inputMap)
+	table.insert(self.InputMaps, inputMap)
+	self:_ConnectInputListeners()
+end
+
+function Action:Bind(signal, check)
+	local t = typeof(check)
+	if not (t == "nil" or t == "function") then error("Invalid parameter 2 for check callback") end
+	if not typeof(signal) == "RBXScriptSignal" then error("Invalid parameter 1 for signal") end
+	if self.Listeners[signal] then error("Action is already bound to " .. tostring(signal)) end
+	local name = tostring(signal):sub(8)
+	local callback = check and function (...)
+		if check(...) then
+			self.Callback(name, ...)
+		end
+	end or function (...)
+		self.Callback(name, ...)
+	end
+	self.Listeners[signal] = {callback, self.Active and signal:Connect(callback)}
+end
+
+function Action:Unbind(signal)
+	if not typeof(signal) == "RBXScriptSignal" then error("Invalid parameter 1 for signal") end
+	local data = self.Listeners[signal]
+	if not data then error("Action is not bound to " .. tostring(signal)) end
+	if data[2] then
+		data[2]:Disconnect()
+	end
+	self.Listeners[signal] = nil
+end
+
+function Action:SetActive(active)
+	if self.Active == active then return end
+	self.Active = active
+	if active then
+		for listener, data in pairs(self.Listeners) do
+			data[2] = listener:Connect(data[1])
+		end
+		self:_ConnectInputListeners()
+	else
+		for listener, data in pairs(self.Listeners) do
+			data[2]:Disconnect()
+			data[2] = nil
+		end
+		for i = 1, #self.InputListeners do
+			table.remove(self.InputListeners, 1):Disconnect()
+		end
+	end
+end
+
+function Action.new(callback)
+	return setmetatable({
+		Callback = callback,
+		Listeners = {},
+		InputListeners = {},
+		InputMaps = {},
+		Active = true
+	}, Action)
+end
+
+function module:CreateAction(name, callback)
+	if actions[name] then error("An action with that name already exists") end
+	local action = Action.new(callback)
+	actions[name] = action
+	return action
+end
+
+function module:GetAction(name)
+	return actions[name] or error("Action does not exist")
+end
+
+module.Action = Action
+
+return module

manifest.json

@@ -0,0 +1,12 @@
+{
+    "Description": "Create Actions which can be bound to user input",
+    "Version": "1.0.0",
+    "Repository": {
+        "Type": "Git",
+        "URL": "https://github.com/RbxPM/Actions"
+    },
+    "Author": {
+        "Name": "woot3",
+        "Id": 1451803
+    }
+}