if component then
 function log(...)
  for k,v in ipairs({...}) do
   component.invoke(component.list("ocemu")(),"log",v)
  end
 end
 print=log
else log = print
end
do -- so local works
 -- task format:
 -- {
 -- ["n"] = "name",
 -- ["c"] = coroutine of task,
 -- ["e"] = { table, of, environment, variables },
 -- ["p"] = parent pid,
 -- ["u"] = user ID,
 -- ["ep"]= event queue pointer
 -- }
 local tT,nP,rg,eq,p = {},1,_G,{},1 -- taskTable,nextPid,real _G,event queue
 _G.cT,sbt,C,T = 0,{},coroutine,table -- currentTask,sandboxTable
 function _G.spawn(n,f,e)
  tT[nP] = {}
  sbt[nP] = {}
  setmetatable(sbt[nP],{__index=_G})
  _ENV = sbt[nP]
  tT[nP].c = coroutine.create(f)
  _ENV = rg
  tT[nP].n = n
  tT[nP].p = cT or -1
  if tT[cT] then
   tT[nP].u,tT[nP].ep,tT[nP].e = tT[cT].u,tT[cT].ep,e or tT[cT].e or {}
  else
   tT[nP].u,tT[nP].ep,tT[nP].e = 0,1,{}
  end
  nP = nP + 1
 end
 function _G.sched()
  _G.sched = nil
  while #tT > 0 do
   eq[#eq+1]={computer.pullSignal(p)} -- add the latest event to the eq
   if #eq > 16 then
    table.remove(eq,1) -- remove the earliest if the eq is full
    for pid,proc in ipairs(tT) do
     if proc.ep > 1 then
      proc.ep = proc.ep - 1 -- decrement pointers for tasks to keep them on the same ones
     end
    end
   end
   for pid,proc in ipairs(tT) do
    if coroutine.status(proc.c) == "dead" then
     tT[pid] = nil
    else
     cT=pid
     sbt[pid].ev = eq[#eq] -- make an ev for MultICE compat
     coroutine.resume(proc.c)
    end
   end
  end
 end
 _G.event = {}
 function event.get() -- get the next event in the queue, or nil
  if eq[tT[cT].ep] then
   tT[cT].ep = tT[cT].ep + 1
   if tT[cT].ep > 17 then
    tT[cT].ep = 17
   end
   return eq[tT[cT].ep - 1]
  end
 end
 function event.pull(t) -- return or wait for the next event, optionally with the first param matching t
  while true do
   local e = event.get()
   if e then
    if t then
     if e[1] == t then
      return table.unpack(e)
     end
    else
     return table.unpack(e)
    end
   end
   coroutine.yield()
  end
 end
 event.push = computer.pushSignal
 function os.getenv(k)
  if tT[cT] then
   return tT[cT].e[k]
  end
 end
 function os.setenv(k,v)
  if tT[cT] then
   tT[cT].e[k] = v
  end
 end
end