Pause for normal Computers

local pauseKey = 68 --f10
local ignoreEvent = {term_resize=true}
local dropEvent = {key=true,char=true,mouse_click=true,mouse_scroll=true,paste=true,terminate=true}
local password = ""

if #password > 0 then
  ignoreEvent["char"] = false
end

local paused = false
local qEvents = {}
local pchars = 0

local oldPull = os.pullEventRaw

local function osQueue()
  for i,j in pairs(qEvents) do
    os.queueEvent(unpack(j))
  end
  qEvents = {}
end

os.pullEventRaw = function(filter)
  while true do
    local r = {oldPull()}
    if r[1] == "key" and r[2] and r[2] == pauseKey and (pchars == #password or not paused) then
      paused = not paused
      if not paused then
        osQueue()
        pchars = 0
      end
    elseif paused and not ignoreEvent[r[1]] then
      if not dropEvent[r[1]] then
        table.insert(qEvents,r)
      end
      if r[1] == "terminate" and pchars == #password then
        --print("Pause Programm unloaded")
        os.pullEventRaw = oldPull
        paused=false
        osQueue()
        return oldPull(filter)
      end
      if r[1] == "char" and r[2] then
        pchars = pchars + 1
        if r[2] ~= password:sub(pchars,pchars) then
          pchars = r[2] == password:sub(1,1) and 1 or 0
        end
      end
    elseif not filter or r[1]==filter or (r[1]=="terminate" and not paused) then
      return unpack(r)
    end
  end
end