Keyboard NS API

-- Keyboard API, created by Detective_Smith. Forum topic can be found below.
-- http://www.computercraft.info/forums2/index.php?/topic/24268-keyboard/page__pid__231026#entry231026

local keyRepeat = true
local keysHeld = {}
local tblr = table.remove

local function search(key)
    for i = 1, #keysHeld do
        if keysHeld[i] == key then return true end
    end
end

local function apply(key, held)
    if held then if not search(key) then keysHeld[#keysHeld + 1] = key end
    else for i = 1, #keysHeld do if keysHeld[i] == key then tblr(keysHeld, i); break end end end
end

Keyboard = {
    version      = function()      return "1.032-NS"  end, -- NS stands for Non-String
    isDown       = function(key)   return search(key) end,
    getHeldKeys  = function()      return keysHeld    end,
    setKeyRepeat = function(kBool) keyRepeat = kBool  end,
    getKeyRepeat = function()      return keyRepeat   end,
    reset        = function()      keysHeld = {}      end,
    updateKeys   = function(event, key, held)
        if event == "key" then apply(key, not held or keyRepeat)
        elseif event == "key_up" then apply(key)
        elseif event == "paste" then apply(keys.v, true) end
    end
}

--[[
local update = Keyboard.updateKeys
os.pullEvent = function(...)
    local eventData = {os.pullEventRaw()}
    update(eventData[1], eventData[2], eventData[3])
    return unpack(eventData)
end
--]]