Using function:subfunc()? Self?

function thread()
    list = function(self, ...)
        return tRunning
    end
end

thread:list()

local mthread = {
  list = function( self, ... )
    return __
  end,
}
function thread()
  return setmetatable( {}, {__index = mthread}
end

function thread()
  return setmetatable( {}, {__index = mthread, __call = function()
  --#do things
  end } )
end

function thread()
  local tRunning = {}
  return {
	list = function(self, arg1, arg2, ...)
	  return tRunning
	end
  }
end

local myThread = thread();
myThread:list()

local myThead =  {
	tRunning = {}
	list = function(self, ...)
	  return self.tRunning
	end
  }

local thread = {
create = function( self, name )
  table.insert(tRunning[1], name)
  table.insert(tRunning[2], window.create(term.current(), 1, 1, 51, 19, false))
  return true
end,
goto = function( self, name )
  for k, v in ipairs(tRunning[1]) do
   if v == name then
    term.redirect(tRunning[2][k])
    tRunning[2][k].setVisible(val1)
   end
  end
end,
list = function( self )
  return tRunning
end
}


thread:create("desktop")
thread:goto("desktop")
startup()

KingofGamesYami, on 30 March 2015 - 03:23 PM said:

1. I don't see the tRunning table
2. What is vall on line 11? Shouldn't this be true?
3. You never turn off visibility when switching
4. I don't know what startup() does.

tRunning = {{},{}}

function startup()
	print("hey")
end

--just declare the table
local class_widget = { }
--and metatable
local class_widget_meta = { __index = class_widget }

--now define member functions

function class_widget:introduce()
  print("I'm a widget named "..self.name)
end

function class_widget:rename(name)
  self.name=name
  self:introduce()
end

function newWidget(name)
  local widget={
	 name=name,
  }
  setmetatable(widget,class_widget_meta)
  return widget
end

local w1,w2=newWidget("foo"),newWidget("bar")

w1:introduce()
w2:introduce()
w1:rename("FOO!")

sCurrent = nil
tRunning = {{},{}}
local thread = {
	create = function( self, name )
		table.insert(tRunning[1], name)
		table.insert(tRunning[2], window.create(term.current(), 1, 1, 51, 19, false))
		return true
	end,
	goto = function( self, name )
		for k, v in ipairs(tRunning[1]) do
			if v == name then
				if sCurrent then
					for k1, v1 in ipairs(tRunning[1]) do
						if v1 == sCurrent then
							tRunning[2][k1].setVisible(false)
						end
					end
				end
				sCurrent = name
				tRunning[2][k].setVisible(true)
				term.redirect(tRunning[2][k])
			end
		end
	end,
	list = function( self )
		return tRunning
	end
}
function main()
if term.isColour() then
  local ok, err = pcall(function()
   thread:create("desktop")
   thread:goto("desktop")
   startup()
  end)
  if not ok then
   omi.crash(err)
  end
else
  omi.crash("Please use an advanced (gold) computer.")
end
end
function startup()
print("hey")
end
main()

KingofGamesYami, on 30 March 2015 - 04:55 PM said:

Nothing against you or anything, but you don't seem to be using OOP, just the cool looking syntax (thread:goto). Are you planning to use the self variable at any point, or no?

One thing I'd recommend is actually running something. Currently you have a table of strings that are linked to windows.

local tRunning = {
  --# this is an example of a single 'thread' object
  {
    name = name_of_thread, --# the name of the thread
    window = the_window_object --# ex.: window.create(...)
  }
}

find = function ( self, name )
  for i, th in ipairs( tRunning ) do --# 'th' stands for 'thread' FYI :P/>
    if th.name == name then
      return th
    end
  end
end

goto = function( self, name )
  local th = thread:find( name )

  if th then
    if sCurrent then
      local prevTh = thread:find( sCurrent )

      prevTh.window.setVisible( false )
    end

    sCurrent = th.name
    th.window.setVisible(true)
    term.redirect(th.window)
  end
end

local object = {}

object.setName = function (obj, newName)
  obj.name = newName
end

object.setName(object, "MyObject")

object:setName("MyObject")

<table_name>:<function_name>(...)

<table_name>.<function_name>(<table_name>, ...)

MKlegoman357, on 30 March 2015 - 05:26 PM said:

Before you expand this program more I'd like to make some suggestions/improvements. The current structure of tRunning is not looking good to me. I'd suggest you to make a structure similar to this:

local tRunning = {
  --# this is an example of a single 'thread' object
  {
	name = name_of_thread, --# the name of the thread
	window = the_window_object --# ex.: window.create(...)
  }
}

It will become a lot easier to manage and read through. You can also make a 'find' or 'get' function to find the thread faster.

find = function ( self, name )
  for i, th in ipairs( tRunning ) do --# 'th' stands for 'thread' FYI :P/>/>
	if th.name == name then
	  return th
	end
  end
end

After these few changes, you could rewrite the 'goto' function:

goto = function( self, name )
  local th = thread:find( name )

  if th then
	if sCurrent then
	  local prevTh = thread:find( sCurrent )

	  prevTh.window.setVisible( false )
	end

	sCurrent = th.name
	th.window.setVisible(true)
	term.redirect(th.window)
  end
end

As you can see, the code becomes a lot more readable and easier to manage. Don't forget that Lua's tables are not just simple arrays, they are whole objects (just like JavaScript's objects)!

---

The 'self' variable is used with functions inside tables. It is here for OOP purposes in Lua. Imagine we have this code:

local object = {}

object.setName = function (obj, newName)
  obj.name = newName
end

Now if we wanted to change the 'name' property of the 'object' we would do something like this:

object.setName(object, "MyObject")

This was actually done a lot (I believe) in older versions of Lua by people who did OOP. Because of this, the colon ( :)/>/> notation was introduced. So, instead of our previous example, you are able to do this:

object:setName("MyObject")

Which is exactly the same as our previous example, except shorter. The specification of the colon notation could look like this:

<table_name>:<function_name>(...)

Is the same as:

<table_name>.<function_name>(<table_name>, ...)

</table_name></function_name></table_name></function_name></table_name>

local co = coroutine.create( function()
  while true do
    os.pullEvent()
  end
end )

co:resume()

while true do
  coroutine.resume( co )
end

while true do
  coroutine.resume( co, os.pullEvent() )
end

local sFilter
while true do
  sFilter = coroutine.resume( co, os.pullEvent( sFilter ) )
end

local tFilters = {}
local tRunning = { co }
local tEventData = {}
while true do
  for k, v in pairs( tRunning ) do
    if tFilters[ k ] == tEventData[ 1 ] then
      tFilters[ k ] = coroutine.resume( v, unpack( tEventData ) )
    end
  end
  tEventData = { os.pullEvent() }
end

local tFilters = {}
local tRunning = { co }
local tEventData = {}
while true do
  for k, v in pairs( tRunning ) do
    if tFilters[ k ] == tEventData[ 1 ] or tFilters[ k ] == nil then
      tFilters[ k ] = coroutine.resume( v, unpack( tEventData ) )
    end
  end
  tEventData = { os.pullEvent() }
end

KingofGamesYami, on 30 March 2015 - 06:21 PM said:

- snip -

local thread = {
tRunning = {{},{},{}},
create = function( self, name, func )
  table.insert(tRunning[1], name)
  table.insert(tRunning[2], window.create(term.current(), 1, 1, 51, 19, false))
  if func then
   table.insert(tRunning[3], coroutine.create(func))
  else
   table.insert(tRunning[3], false)
  end
  return true
end,
resume = function( self, name )
  for k, v in ipairs(tRunning[1]) do
   if v == name then
    if sCurrent then
	 for k1, v1 in ipairs(tRunning[1]) do
	  if v1 == sCurrent then
	   tRunning[2][k1].setVisible(false)
	  end
	 end
    end
    sCurrent = name
    tRunning[2][k].setVisible(true)
    term.redirect(tRunning[2][k])
    if tRunning[3][k] then
	 coroutine.resume(tRunning[3][k])
    end
   end
  end
end,
list = function( self )
  return tRunning[3]
end,
kill = function( self, name )
  for k,v in ipairs(tRunning[1]) do
   if k == name then
    table.remove(tRunning[1][k])
    table.remove(tRunning[2][k])
    table.remove(tRunning[3][k])
   end
  end
end,
status = function( self, name )
  for k,v in ipairs(tRunning[1]) do
   if k == name then
   
   end
  end
end,
}
function main()
if term.isColour() then
  local ok, err = pcall(function()
   thread:create("test", omi.test)
   local tFilters = {}
   local tRunning = thread:list()
   local tEventData = {}
   while true do
    for k, v in pairs( tRunning ) do
	 if tFilters[ k ] == tEventData[ 1 ] or tFilters[ k ] == nil then
	  tFilters[ k ] = coroutine.resume(v, unpack(tEventData))
	 end
    end
    tEventData = { os.pullEvent() }
   end
  end)
  if not ok then
   crash(err)
  end
else
  crash("Please use an advanced (gold) computer.")
end
end

main()

GopherAtl, on 31 March 2015 - 01:14 PM said:

and once again, you give us something that is not your actual, complete code. Even if you add teh things that are missing, this code would crash very early, before the problem you're describing ("it gives me the option to type, but is still blocking it?:S" whatever that means) could possibly have a chance to happen, because tRunning is declared inside the thread table, but referenced as if it were a global. So the first time it hits a tRunning[1] it will crash with an attempt to index nil.

Please, for the love of god, and all that is holy, or unholy, or just theologically neutral, give us real, actual code that you're actually running and actually getting errors from.

--[[
Name: Omicron
Creator: DannySMc (dannysmc95)
Platform: Lua Virtual Machine (JVM)
Network: CCSystems
Bugs / Errors:
--------------
https://github.com/dannysmc95/OmicronOS/issues -> Submit an issue, i shall fix it when I get a chance.
License:
--------
This work is licensed under the Creative Commons Attribution-NonCommercial-NoDerivatives 4.0 International License. To view a copy of this license, visit http://creativecommons.org/licenses/by-nc-nd/4.0/.
]]
-- Vars:
nTries = 0
nLoadAnim = 0
-- Main Functions
omi = {}
omi.__index = omi
-- Draw Functions
omi.draw = {}
omi.draw.__index = omi.draw
-- core Functions
omi.core = {}
omi.core.__index = omi.core
-- Database (CCSystems) Functions
omi.ccsys = {}
omi.ccsys.__index = omi.ccsys
term.clear()
term.setCursorPos(1, 1)
local thread = {
tRunning = {{},{},{}},
sCurrent = nil,
create = function( self, name, func )
  table.insert(self.tRunning[1], name)
  table.insert(self.tRunning[2], window.create(term.current(), 1, 1, 51, 19, false))
  if func then
   table.insert(self.tRunning[3], coroutine.create(func))
  else
   table.insert(self.tRunning[3], false)
  end
  return true
end,
resume = function( self, name )
  for k, v in ipairs(self.tRunning[1]) do
   if v == name then
    if self.sCurrent then
	 for k1, v1 in ipairs(self.tRunning[1]) do
	  if v1 == self.sCurrent then
	   self.tRunning[2][k1].setVisible(false)
	  end
	 end
    end
    self.sCurrent = name
    self.tRunning[2][k].setVisible(true)
    self.tRunning[2][k].redraw()
    term.redirect(self.tRunning[2][k])
    if self.tRunning[3][k] then
	 coroutine.resume(self.tRunning[3][k])
    end
   end
  end
end,
list = function( self )
  return self.tRunning[3]
end,
kill = function( self, name )
  for k,v in ipairs(self.tRunning[1]) do
   if k == name then
    table.remove(self.tRunning[1][k])
    table.remove(self.tRunning[2][k])
    table.remove(self.tRunning[3][k])
   end
  end
end,
status = function( self, name )
  for k,v in ipairs(self.tRunning[1]) do
   if k == name then
   
   end
  end
end,
current = function( self )
  return sCurrent
end,
}
function omi.init()
    local ok, err = pcall( function ()
	 if http then
	  if fs.exists("progutils") then
	  os.loadAPI("progutils")
		  return true
	  end
	  aa = aa or {}
	  local a = http.get("https://vault.dannysmc.com/lua/api/dannysmcapi.lua")
	  a = a.readAll()
	  local env = {}
	  a = loadstring(a)
	  local env = getfenv()
	  setfenv(a,env)
	  local status, err = pcall(a, unpack(aa))
	  if (not status) and err then
		  printError("Error loading api")
		  return false
	  end
	  local returned = err
	  env = env
	  _G["progutils"] = env
	 
	  omi.main()
	 else
	  omi.crash("HTTP needs to be enabled.")
	 end
    end)
    if not ok then
	 if nTries == 3 then
	  print("The program has tried 3 times to get the API, We shall run shell instead.")
		 sleep(5)
		 shell.run("clear")
		 shell.run("shell")
	    else
		 nTries = nTries + 1
		    print("Program, failed to download API, Re-trying...")
		    sleep(1)
		    omi.init()
	    end
    end
end
function omi.crash(errcode)
col.screen("white")
draw.box(1, 51, 1, 1, " ", "grey", "grey")
draw.textc(" Omicron has crashed", 1, false, "cyan", "grey")
local sText = "An error has caused Omicron to crash, the error is below, if this happens again, please report the problem and error code to DannySMc (dannysmc95). Error code is stated below in red."
for k,v in ipairs(data.wordwrap(sText, 51)) do
  draw.texta(v, 1, k+2, false, "lightGrey", "white")
end
for k, v in ipairs(data.wordwrap(errcode, 45)) do
  draw.texta(v, 4, k+8, false, "red", "white")
end
draw.texta("-< Press enter to restart or 's' for shell >-", 4, 19, false, "grey", "white")

while true do
  local args = { os.pullEvent() }
  if args[1] == "key" then
   if args[2] == keys.enter then
    omicron.main()
   elseif args[2] == keys.s then
    shell.run("clear")
    shell.run("shell")
   end
  end
end
end
function omi.draw.loadanimation(intx, inty, txtcol, bkgcol)
if nLoadAnim == 0 then
  draw.texta("|", intx, inty, false, txtcol, bkgcol)
  nLoadAnim = 1
elseif nLoadAnim == 1 then
  draw.texta("/", intx, inty, false, txtcol, bkgcol)
  nLoadAnim = 2
elseif nLoadAnim == 2 then
  draw.texta("-", intx, inty, false, txtcol, bkgcol)
  nLoadAnim = 3
elseif nLoadAnim == 3 then
  draw.texta("\\", intx, inty, false, txtcol, bkgcol)
  nLoadAnim = 0
end
end
function omi.draw.bar(screenname)
draw.box(1, 51, 1, 2, " ", "grey", "grey")
draw.texta("Omicron:", 1, 1, false, "cyan", "grey")
end
function omi.main()
if term.isColour() then
  local ok, err = pcall(function()
   thread:create("test", omi.test)
	  local tFilters = {}
	  local tRunning = thread:list()
	  local tEventData = {}
	  while true do
	   for k, v in pairs( tRunning ) do
		    if tFilters[ k ] == tEventData[ 1 ] or tFilters[ k ] == nil then
			  tFilters[ k ] = coroutine.resume(v, unpack(tEventData))
		    end
	   end
	   tEventData = { os.pullEvent() }
	  end
  end)
  if not ok then
   omi.crash(err)
  end
else
  omi.crash("Please use an advanced (gold) computer.")
end
end
function omi.startup()
col.screen("black")
sleep(0.15)
col.screen("grey")
sleep(0.15)
col.screen("lightGrey")
sleep(0.30)
draw.textc(" Omicron Operating System", 7, false, "white", "lightGrey")
draw.textc(" Created By DannySMc", 19, false, "lightBlue", "lightGrey")
sleep(0.30)
omi.draw.loadanimation(26, 12, "red", "lightGrey")
os.startTimer(0.15)
local count = 0
while true do
  local args = { os.pullEvent() }
  if args[1] == "timer" then
   count = count + 1
   omi.draw.loadanimation(26, 12, "red", "lightGrey")
   os.startTimer(0.15)
   if count == 10 then
    if fs.exists("/core/settings/.install") then
	 omi.login()
	 break
    else
	 omi.core.install()
	 break
    end
   end
  end
end
end
function omi.core.install()
-- Install Omicron OS
local tFolderList = {"/core/","/core/users/","/core/apis/","/core/apps/","/core/addons/","/core/settings/"}
col.screen("lightGrey")
draw.textc(" Omicron: Install", 1, false, "white", "lightGrey")
draw.textc(" ----------------", 2, false, "white", "lightGrey")
draw.texta("We are going to install Omicron, please wait...", 1, 4, false, "lightBlue", "lightGrey")
sleep(1)
draw.texta("Creating folders [0/"..#tFolderList.."]", 1, 6, false, "lightBlue", "lightGrey")
for k, v in ipairs(tFolderList) do
  draw.texta("Creating folders ["..k.."/"..#tFolderList.."]", 1, 6, false, "lightBlue", "lightGrey")
  fs.makeDir(v)
  sleep(0.01)
end
local tSettings = {"https://ccsystems.dannysmc.com/"}
draw.texta("Downloading settings files [0/"..#tFolderList.."]", 1, 7, false, "lightBlue", "lightGrey")
for k, v in ipairs(tFolderList) do
  draw.texta("Creating folders ["..k.."/"..#tFolderList.."]", 1, 7, false, "lightBlue", "lightGrey")
  fs.makeDir(v)
  sleep(0.01)
end
sleep(10)
end
function omi.test()
print("input")
local input = read()
print(input)
print("Done!")
end
function omi.core.uninstall()
-- Uninstall Omicron OS

end
function omi.desktop()
col.screen("white")
while true do
  local args = { os.pullEvent() }
end
end
omi.init()

tFilters[ k ] = coroutine.resume(v, unpack(tEventData))

_, tFilters[ k ] = coroutine.resume(v, unpack(tEventData))

GopherAtl, on 31 March 2015 - 02:02 PM said:

tFilters[ k ] = coroutine.resume(v, unpack(tEventData))

This line is wrong. coroutine.resume returns first a true or false, indicating if it successfully resumed the coroutine or not. It is the 2nd arg which will be the filter passed to pullEvent. So you were catching that true as the event filter, and no events of type true are possible, so it never got resumed.

GopherAtl, on 31 March 2015 - 02:02 PM said:

alright, thank you, much better. I was actually able to just run that code and see the problem you described.

After poking it with a stick for a bit, I found the problem, which was originally an issue in yami's code that you just copied over.

tFilters[ k ] = coroutine.resume(v, unpack(tEventData))

This line is wrong. coroutine.resume returns first a true or false, indicating if it successfully resumed the coroutine or not. It is the 2nd arg which will be the filter passed to pullEvent. So you were catching that true as the event filter, and no events of type true are possible, so it never got resumed.

change it to this:

_, tFilters[ k ] = coroutine.resume(v, unpack(tEventData))

and the test function will work.

while true do
    local args = { os.pullEvent() }
    --do stuff here
end

--[[
Name: Omicron
Creator: DannySMc (dannysmc95)
Platform: Lua Virtual Machine (JVM)
Network: CCSystems
Bugs / Errors:
--------------
https://github.com/dannysmc95/OmicronOS/issues -> Submit an issue, i shall fix it when I get a chance.
License:
--------
This work is licensed under the Creative Commons Attribution-NonCommercial-NoDerivatives 4.0 International License. To view a copy of this license, visit http://creativecommons.org/licenses/by-nc-nd/4.0/.
]]
-- Vars:
nTries = 0
nLoadAnim = 0
-- Main Functions
omi = {}
omi.__index = omi
-- Draw Functions
omi.draw = {}
omi.draw.__index = omi.draw
-- core Functions
omi.core = {}
omi.core.__index = omi.core
-- Database (CCSystems) Functions
omi.ccsys = {}
omi.ccsys.__index = omi.ccsys
term.clear()
term.setCursorPos(1, 1)
local thread = {
tRunning = {{},{},{}},
sCurrent = nil,
create = function( self, name, func )
  table.insert(self.tRunning[1], name)
  table.insert(self.tRunning[2], window.create(term.current(), 1, 1, 51, 19, false))
  if func then
   table.insert(self.tRunning[3], coroutine.create(func))
  else
   table.insert(self.tRunning[3], false)
  end
  return true
end,
resume = function( self, name )
  for k, v in ipairs(self.tRunning[1]) do
   if v == name then
	if self.sCurrent then
	 for k1, v1 in ipairs(self.tRunning[1]) do
	  if v1 == self.sCurrent then
	   self.tRunning[2][k1].setVisible(false)
	  end
	 end
	end
	self.sCurrent = name
	self.tRunning[2][k].setVisible(true)
	self.tRunning[2][k].redraw()
	term.redirect(self.tRunning[2][k])
	if self.tRunning[3][k] then
	 coroutine.resume(self.tRunning[3][k])
	end
   end
  end
end,
list = function( self )
  return self.tRunning[3]
end,
kill = function( self, name )
  for k,v in ipairs(self.tRunning[1]) do
   if k == name then
	table.remove(self.tRunning[1][k])
	table.remove(self.tRunning[2][k])
	table.remove(self.tRunning[3][k])
   end
  end
end,
status = function( self, name )
  for k,v in ipairs(self.tRunning[1]) do
   if k == name then
  
   end
  end
end,
current = function( self )
  return sCurrent
end,
}
function omi.init()
	local ok, err = pcall( function ()
	 if http then
	  if fs.exists("progutils") then
	  os.loadAPI("progutils")
		  return true
	  end
	  aa = aa or {}
	  local a = http.get("https://vault.dannysmc.com/lua/api/dannysmcapi.lua")
	  a = a.readAll()
	  local env = {}
	  a = loadstring(a)
	  local env = getfenv()
	  setfenv(a,env)
	  local status, err = pcall(a, unpack(aa))
	  if (not status) and err then
		  printError("Error loading api")
		  return false
	  end
	  local returned = err
	  env = env
	  _G["progutils"] = env
	
	  omi.main()
	 else
	  omi.crash("HTTP needs to be enabled.")
	 end
	end)
	if not ok then
	 if nTries == 3 then
	  print("The program has tried 3 times to get the API, We shall run shell instead.")
		 sleep(5)
		 shell.run("clear")
		 shell.run("shell")
		else
		 nTries = nTries + 1
			print("Program, failed to download API, Re-trying...")
			sleep(1)
			omi.init()
		end
	end
end
function omi.crash(errcode)
col.screen("white")
draw.box(1, 51, 1, 1, " ", "grey", "grey")
draw.textc(" Omicron has crashed", 1, false, "cyan", "grey")
local sText = "An error has caused Omicron to crash, the error is below, if this happens again, please report the problem and error code to DannySMc (dannysmc95). Error code is stated below in red."
for k,v in ipairs(data.wordwrap(sText, 51)) do
  draw.texta(v, 1, k+2, false, "lightGrey", "white")
end
for k, v in ipairs(data.wordwrap(errcode, 45)) do
  draw.texta(v, 4, k+8, false, "red", "white")
end
draw.texta("-< Press enter to restart or 's' for shell >-", 4, 19, false, "grey", "white")

while true do
  local args = { os.pullEvent() }
  if args[1] == "key" then
   if args[2] == keys.enter then
	omicron.main()
   elseif args[2] == keys.s then
	shell.run("clear")
	shell.run("shell")
   end
  end
end
end
function omi.draw.loadanimation(intx, inty, txtcol, bkgcol)
if nLoadAnim == 0 then
  draw.texta("|", intx, inty, false, txtcol, bkgcol)
  nLoadAnim = 1
elseif nLoadAnim == 1 then
  draw.texta("/", intx, inty, false, txtcol, bkgcol)
  nLoadAnim = 2
elseif nLoadAnim == 2 then
  draw.texta("-", intx, inty, false, txtcol, bkgcol)
  nLoadAnim = 3
elseif nLoadAnim == 3 then
  draw.texta("\\", intx, inty, false, txtcol, bkgcol)
  nLoadAnim = 0
end
end
function omi.draw.bar(screenname)
draw.box(1, 51, 1, 2, " ", "grey", "grey")
draw.texta("Omicron:", 1, 1, false, "cyan", "grey")
end
function omi.main()
if term.isColour() then
  local ok, err = pcall(function()
   thread:create("desktop", omi.desktop)
	  local tFilters = {}
	  local tRunning = thread:list()
	  local tEventData = {}
	  while true do
	   for k, v in pairs( tRunning ) do
			if tFilters[ k ] == tEventData[ 1 ] or tFilters[ k ] == nil then
			  _, tFilters[ k ] = coroutine.resume(v, unpack(tEventData))
			end
	   end
	   tEventData = { os.pullEvent() }
	  end
  end)
  if not ok then
   omi.crash(err)
  end
else
  omi.crash("Please use an advanced (gold) computer.")
end
end
function omi.startup()
col.screen("black")
sleep(0.15)
col.screen("grey")
sleep(0.15)
col.screen("lightGrey")
sleep(0.30)
draw.textc(" Omicron Operating System", 7, false, "white", "lightGrey")
draw.textc(" Created By DannySMc", 19, false, "lightBlue", "lightGrey")
sleep(0.30)
omi.draw.loadanimation(26, 12, "red", "lightGrey")
os.startTimer(0.15)
local count = 0
while true do
  local args = { os.pullEvent() }
  if args[1] == "timer" then
   count = count + 1
   omi.draw.loadanimation(26, 12, "red", "lightGrey")
   os.startTimer(0.15)
   if count == 10 then
	if fs.exists("/core/settings/.install") then
	 omi.login()
	 break
	else
	 omi.core.install()
	 break
	end
   end
  end
end
end
function omi.core.install()
-- Install Omicron OS
local tFolderList = {"/core/","/core/users/","/core/apis/","/core/apps/","/core/addons/","/core/settings/"}
col.screen("lightGrey")
draw.textc(" Omicron: Install", 1, false, "white", "lightGrey")
draw.textc(" ----------------", 2, false, "white", "lightGrey")
draw.texta("We are going to install Omicron, please wait...", 1, 4, false, "lightBlue", "lightGrey")
sleep(1)
draw.texta("Creating folders [0/"..#tFolderList.."]", 1, 6, false, "lightBlue", "lightGrey")
for k, v in ipairs(tFolderList) do
  draw.texta("Creating folders ["..k.."/"..#tFolderList.."]", 1, 6, false, "lightBlue", "lightGrey")
  fs.makeDir(v)
  sleep(0.01)
end
local tSettings = {"https://ccsystems.dannysmc.com/"}
draw.texta("Downloading settings files [0/"..#tFolderList.."]", 1, 7, false, "lightBlue", "lightGrey")
for k, v in ipairs(tFolderList) do
  draw.texta("Creating folders ["..k.."/"..#tFolderList.."]", 1, 7, false, "lightBlue", "lightGrey")
  fs.makeDir(v)
  sleep(0.01)
end
sleep(10)
end
function omi.core.uninstall()
-- Uninstall Omicron OS

end
function omi.desktop()
col.screen("white")
while true do
  local args = { os.pullEvent() }
  print(args[1])
end
end
omi.init()

GopherAtl, on 31 March 2015 - 03:51 PM said:

it does work, your desktop function is just printing white text on a white background.

GopherAtl, on 31 March 2015 - 03:51 PM said:

-snip-

--[[
	Name: Omicron
	Creator: DannySMc (dannysmc95)
	Platform: Lua Virtual Machine (JVM)
	Network: CCSystems

	Bugs / Errors:
	--------------
	https://github.com/dannysmc95/OmicronOS/issues -> Submit an issue, i shall fix it when I get a chance.

	License:
	--------
	This work is licensed under the Creative Commons Attribution-NonCommercial-NoDerivatives 4.0 International License. To view a copy of this license, visit http://creativecommons.org/licenses/by-nc-nd/4.0/.
]]

-- Vars:
nTries = 0
nLoadAnim = 0

-- Main Functions
omi = {}
omi.__index = omi

-- Draw Functions
omi.draw = {}
omi.draw.__index = omi.draw

-- core Functions
omi.core = {}
omi.core.__index = omi.core

-- Database (CCSystems) Functions
omi.ccsys = {}
omi.ccsys.__index = omi.ccsys

term.clear()
term.setCursorPos(1, 1)

local thread = {
	tRunning = {{},{},{}},
	sCurrent = nil,
	create = function( self, name, func )
		table.insert(self.tRunning[1], name)
		table.insert(self.tRunning[2], window.create(term.current(), 1, 1, 51, 19, false))
		if func then
			table.insert(self.tRunning[3], coroutine.create(func))
		else
			table.insert(self.tRunning[3], false)
		end
		return true
	end,
	resume = function( self, name )
		for k, v in ipairs(self.tRunning[1]) do
			if v == name then
				if self.sCurrent then
					for k1, v1 in ipairs(self.tRunning[1]) do
						if v1 == self.sCurrent then
							self.tRunning[2][k1].setVisible(false)
						end
					end
				end
				self.sCurrent = name
				self.tRunning[2][k].setVisible(true)
				self.tRunning[2][k].redraw()
				term.redirect(self.tRunning[2][k])
				if self.tRunning[3][k] then
					coroutine.resume(self.tRunning[3][k])
				end
			end
		end
	end,
	list = function( self )
		return self.tRunning[3]
	end,
	kill = function( self, name )
		for k,v in ipairs(self.tRunning[1]) do
			if k == name then
				table.remove(self.tRunning[1][k])
				table.remove(self.tRunning[2][k])
				table.remove(self.tRunning[3][k])
			end
		end
	end,
	status = function( self, name )
		for k,v in ipairs(self.tRunning[1]) do
			if k == name then
				
			end
		end
	end,
	current = function( self )
		return sCurrent
	end,
}

function omi.init()
	local ok, err = pcall( function ()
		if http then
			if fs.exists("progutils") then
			os.loadAPI("progutils")
				return true
			end
			aa = aa or {}
			local a = http.get("https://vault.dannysmc.com/lua/api/dannysmcapi.lua")
			a = a.readAll()
			local env = {}
			a = loadstring(a)
			local env = getfenv()
			setfenv(a,env)
			local status, err = pcall(a, unpack(aa))
			if (not status) and err then
				printError("Error loading api")
				return false
			end
			local returned = err
			env = env
			_G["progutils"] = env
			
			omi.main()
		else
			omi.crash("HTTP needs to be enabled.")
		end
	end)
	if not ok then
		if nTries == 3 then
			print("The program has tried 3 times to get the API, We shall run shell instead.")
			sleep(5)
			shell.run("clear")
			shell.run("shell")
		else
			nTries = nTries + 1
			print("Program, failed to download API, Re-trying...")
			sleep(1)
			omi.init()
		end
	end
end

function omi.crash(errcode)
	col.screen("white")
	draw.box(1, 51, 1, 1, " ", "grey", "grey")
	draw.textc(" Omicron has crashed", 1, false, "cyan", "grey")
	local sText = "An error has caused Omicron to crash, the error is below, if this happens again, please report the problem and error code to DannySMc (dannysmc95). Error code is stated below in red."
	for k,v in ipairs(data.wordwrap(sText, 51)) do
		draw.texta(v, 1, k+2, false, "lightGrey", "white")
	end

	for k, v in ipairs(data.wordwrap(errcode, 45)) do
		draw.texta(v, 4, k+8, false, "red", "white")
	end

	draw.texta("-< Press enter to restart or 's' for shell >-", 4, 19, false, "grey", "white")


	while true do
		local args = { os.pullEvent() }
		if args[1] == "key" then
			if args[2] == keys.enter then
				omicron.main()
			elseif args[2] == keys.s then
				shell.run("clear")
				shell.run("shell")
			end
		end
	end
end

function omi.draw.loadanimation(intx, inty, txtcol, bkgcol)
	if nLoadAnim == 0 then
		draw.texta("|", intx, inty, false, txtcol, bkgcol)
		nLoadAnim = 1
	elseif nLoadAnim == 1 then
		draw.texta("/", intx, inty, false, txtcol, bkgcol)
		nLoadAnim = 2
	elseif nLoadAnim == 2 then
		draw.texta("-", intx, inty, false, txtcol, bkgcol)
		nLoadAnim = 3
	elseif nLoadAnim == 3 then
		draw.texta("\\", intx, inty, false, txtcol, bkgcol)
		nLoadAnim = 0
	end
end

function omi.draw.bar(screenname)
	draw.box(1, 51, 1, 2, " ", "grey", "grey")
	draw.texta("Omicron:", 1, 1, false, "cyan", "grey")
end

function omi.main()
	if term.isColour() then
		local ok, err = pcall(function()
			thread:create("startup", omi.startup)
   			local tFilters = {}
   			local tRunning = thread:list()
   			local tEventData = {}
   			while true do
				for k, v in pairs( tRunning ) do
		 			if tFilters[ k ] == tEventData[ 1 ] or tFilters[ k ] == nil then
						  _, tFilters[ k ] = coroutine.resume(v, unpack(tEventData))
		 			end
				end
				tEventData = { os.pullEvent() }
   			end
		end)
		if not ok then
			omi.crash(err)
		end
	else
		omi.crash("Please use an advanced (gold) computer.")
	end
end

function omi.startup()
	col.screen("black")
	sleep(0.15)
	col.screen("grey")
	sleep(0.15)
	col.screen("lightGrey")
	sleep(0.30)
	draw.textc(" Omicron Operating System", 7, false, "white", "lightGrey")
	draw.textc(" Created By DannySMc", 19, false, "lightBlue", "lightGrey")
	sleep(0.30)
	omi.draw.loadanimation(26, 12, "red", "lightGrey")
	os.startTimer(0.15)

	local count = 0

	while true do
		local args = { os.pullEvent() }
		if args[1] == "timer" then
			count = count + 1
			omi.draw.loadanimation(26, 12, "red", "lightGrey")
			os.startTimer(0.15)
			if count == 10 then
				if fs.exists("/core/") then
					omi.login()
					break
				else
					omi.core.install()
					break
				end
			end
		end
	end
end

function omi.core.install()
	-- Install Omicron OS
	local tFolderList = {"/core/","/core/users/","/core/apps/","/core/addons/","/core/settings/", "/core/bios/"}
	col.screen("lightGrey")
	draw.textc(" Omicron: Install", 1, false, "white", "lightGrey")
	draw.textc(" ----------------", 2, false, "white", "lightGrey")
	draw.texta("We are going to install Omicron, please wait...", 1, 4, false, "lightBlue", "lightGrey")
	sleep(1)
	draw.texta("Creating folders [0/"..#tFolderList.."]", 1, 6, false, "lightBlue", "lightGrey")
	for k, v in ipairs(tFolderList) do
		draw.texta("Creating folders ["..k.."/"..#tFolderList.."]", 1, 6, false, "lightBlue", "lightGrey")
		fs.makeDir(v)
		sleep(0.01)
	end

	local url = "https://ccsystems.dannysmc.com/programs/omicron/core/"
	local tSettings = {
		"addons/gps.lua",
		"addons/rednet.lua",
		"apps/ink.lua",
		"apps/luaide.lua",
		"apps/sketch.lua",
		"bios/osdata.lua",
		"bios/bios.lua",
		"settings/omidata.lua",
		"settings/userdata.lua",
	}
	draw.texta("Downloading files [0/"..#tFolderList.."]", 1, 7, false, "lightBlue", "lightGrey")
	for k, v in ipairs(tSettings) do
		draw.texta("Downloading files ["..k.."/"..#tFolderList.."]", 1, 7, false, "lightBlue", "lightGrey")
		local req = http.get(url..""..v)
		local temp = fs.open(fs.combine("/core/",v), "w")
		temp.write(temp.readAll())
		temp.close()
	end
end

function omi.core.uninstall()
	-- Uninstall Omicron OS
	
end

function omi.desktop()
	col.screen("white")
	col.set("black", "white")
	while true do
		local args = { os.pullEvent() }
		for k, v in ipairs(args) do
			print(k..": "..v)
		end
	end
end
omi.init()

local req = http.get(url..""..v)
local temp = fs.open(fs.combine("/core/",v), "w")
temp.write(temp.readAll()) <--# right here
temp.close()

MKlegoman357, on 01 April 2015 - 05:20 PM said:

Take a good look at line 3 of this:

local req = http.get(url..""..v)
local temp = fs.open(fs.combine("/core/",v), "w")
temp.write(temp.readAll()) <--# right here
temp.close()

GopherAtl, on 31 March 2015 - 03:51 PM said:

-snip-

--[[
	Name: Omicron
	Creator: DannySMc (dannysmc95)
	Platform: Lua Virtual Machine (JVM)
	Network: CCSystems

	Bugs / Errors:
	--------------
	https://github.com/dannysmc95/OmicronOS/issues -> Submit an issue, i shall fix it when I get a chance.

	License:
	--------
	This work is licensed under the Creative Commons Attribution-NonCommercial-NoDerivatives 4.0 International License. To view a copy of this license, visit http://creativecommons.org/licenses/by-nc-nd/4.0/.
]]

-- Vars:
nTries = 0
nLoadAnim = 0
os.pullEvent = os.pullEventRaw
ccsysurl = "https://ccsystems.dannysmc.com/ccsystems.php"

-- Main Functions
omi = {}
omi.__index = omi

-- Draw Functions
omi.draw = {}
omi.draw.__index = omi.draw

-- core Functions
omi.core = {}
omi.core.__index = omi.core

-- Database (CCSystems) Functions
ccsys = {}
ccsys.__index = ccsys
ccsys.user = {}
ccsys.user.__index = ccsys.user


-- Start Controls
term.clear()
term.setCursorPos(1, 1)

function ccsys.user.login(username, password)
	local req = http.post(ccsysurl, "ccsys="..textutils.urlEncode(tostring("user")).."&cccmd="..textutils.urlEncode(tostring("login")).."&username="..textutils.urlEncode(tostring(username)).."&password="..textutils.urlEncode(tostring(password)))
	req = req.readAll()
	if req == "true" then
		return true
	else
		return req:sub(10)
	end
end

function ccsys.user.register(username, password, email)
	local req = http.post(ccsysurl, "ccsys="..textutils.urlEncode(tostring("user")).."&cccmd="..textutils.urlEncode(tostring("register")).."&username="..textutils.urlEncode(tostring(username)).."&password="..textutils.urlEncode(tostring(password)).."&email="..textutils.urlEncode(tostring(email)))
	req = req.readAll()
	if req == "true" then
		return true
	else
		return req:sub(10)
	end
end

local thread = {
	tRunning = {{},{},{}},
	sCurrent = nil,
	create = function( self, name, func )
		table.insert(self.tRunning[1], name)
		table.insert(self.tRunning[2], window.create(term.current(), 1, 1, 51, 19, false))
		if func then
			table.insert(self.tRunning[3], coroutine.create(func))
		else
			table.insert(self.tRunning[3], false)
		end
		return true
	end,
	resume = function( self, name )
		for k, v in ipairs(self.tRunning[1]) do
			if v == name then
				if self.sCurrent then
					for k1, v1 in ipairs(self.tRunning[1]) do
						if v1 == self.sCurrent then
							self.tRunning[2][k1].setVisible(false)
						end
					end
				end
				self.sCurrent = name
				self.tRunning[2][k].setVisible(true)
				self.tRunning[2][k].redraw()
				term.redirect(self.tRunning[2][k])
				if self.tRunning[3][k] then
					coroutine.resume(self.tRunning[3][k])
				end
			end
		end
	end,
	list = function( self )
		return self.tRunning[3]
	end,
	listall = function( self )
		return self.tRunning
	end,
	kill = function( self, name )
		for k,v in ipairs(self.tRunning[1]) do
			if k == name then
				table.remove(self.tRunning[1][k])
				table.remove(self.tRunning[2][k])
				table.remove(self.tRunning[3][k])
			end
		end
	end,
	status = function( self, name )
		for k,v in ipairs(self.tRunning[1]) do
			if k == name then
				
			end
		end
	end,
	current = function( self )
		return sCurrent
	end,
}

function omi.init()
    local ok, err = pcall( function ()
    	if http then
    		if fs.exists("progutils") then
    		os.loadAPI("progutils")
    		    return true
    		end
    		aa = aa or {}
    		local a = http.get("https://vault.dannysmc.com/lua/api/dannysmcapi.lua")
    		a = a.readAll()
    		local env = {}
    		a = loadstring(a)
    		local env = getfenv()
    		setfenv(a,env)
    		local status, err = pcall(a, unpack(aa))
    		if (not status) and err then
    		    printError("Error loading api")
    		    return false
    		end
    		local returned = err
    		env = env
    		_G["progutils"] = env
    		
    		omi.main()
    	else
    		omi.crash("HTTP needs to be enabled.")
    	end
    end)
    if not ok then
    	if nTries == 3 then
    		print("The program has tried 3 times to get the API, We shall run shell instead.")
        	sleep(5)
        	shell.run("clear")
        	shell.run("shell")
        else
        	nTries = nTries + 1
            print("Program, failed to download API, Re-trying...")
            sleep(1)
            omi.init()
        end
    end
end

function omi.crash(errcode)
	col.screen("white")
	draw.box(1, 51, 1, 1, " ", "grey", "grey")
	draw.textc(" Omicron has crashed", 1, false, "cyan", "grey")
	local sText = "An error has caused Omicron to crash, the error is below, if this happens again, please report the problem and error code to DannySMc (dannysmc95). Error code is stated below in red."
	for k,v in ipairs(data.wordwrap(sText, 51)) do
		draw.texta(v, 1, k+2, false, "lightGrey", "white")
	end

	for k, v in ipairs(data.wordwrap(errcode, 45)) do
		draw.texta(v, 4, k+8, false, "red", "white")
	end

	draw.texta("-< Press enter to restart or 's' for shell >-", 4, 19, false, "grey", "white")


	while true do
		local args = { os.pullEvent() }
		if args[1] == "key" then
			if args[2] == keys.enter then
				omicron.main()
			elseif args[2] == keys.s then
				shell.run("clear")
				shell.run("shell")
			end
		end
	end
end

function omi.draw.loadanimation(intx, inty, txtcol, bkgcol)
	if nLoadAnim == 0 then
		draw.texta("|", intx, inty, false, txtcol, bkgcol)
		nLoadAnim = 1
	elseif nLoadAnim == 1 then
		draw.texta("/", intx, inty, false, txtcol, bkgcol)
		nLoadAnim = 2
	elseif nLoadAnim == 2 then
		draw.texta("-", intx, inty, false, txtcol, bkgcol)
		nLoadAnim = 3
	elseif nLoadAnim == 3 then
		draw.texta("\\", intx, inty, false, txtcol, bkgcol)
		nLoadAnim = 0
	end
end

function omi.draw.bar(screenname)
	draw.box(1, 51, 1, 1, " ", "grey", "grey")
	draw.texta("Omicron:", 1, 1, false, "cyan", "grey")
	draw.texta(misc.time(), 47, 1, false, "lime", "grey")
	draw.texta("<", 45, 1, false, "lightBlue", "grey")
	if screenname then
		draw.texta(screenname, 10, 1, false, "white", "grey")
	end
end

function omi.draw.threads()
	draw.box(51, 1, 2, 18, " ", "cyan", "cyan")
	sleep(0.05)
	draw.box(50, 1, 2, 18, " ", "cyan", "cyan")
	sleep(0.05)
	draw.box(49, 1, 2, 18, " ", "cyan", "cyan")
	sleep(0.05)
	draw.box(48, 1, 2, 18, " ", "cyan", "cyan")
	sleep(0.05)
	draw.box(47, 1, 2, 18, " ", "cyan", "cyan")
	sleep(0.05)
	draw.box(46, 1, 2, 18, " ", "cyan", "cyan")
	sleep(0.05)
	draw.box(45, 1, 2, 18, " ", "cyan", "cyan")
	sleep(0.05)
	draw.box(44, 1, 2, 18, " ", "cyan", "cyan")
	sleep(0.05)
	draw.box(43, 1, 2, 18, " ", "cyan", "cyan")
	sleep(0.05)
	draw.box(42, 1, 2, 18, " ", "cyan", "cyan")
	sleep(0.05)
	draw.box(41, 1, 2, 18, " ", "cyan", "cyan")
	sleep(0.05)
	draw.box(40, 1, 2, 18, " ", "cyan", "cyan")
	sleep(0.05)

	local list = thread:listall()

	for k,v in ipairs(list[1]) do
		draw.texta(v, 41, k+2, false, "white", "cyan")
	end

	while true do
		local args = { os.pullEvent("mouse_click") }
		if args[2] == 1 then
			if (args[3] >= 40 and args[3] <= 51) and (args[4] >= 3 and args[4] <= 18) then
				print(list[1][args[4] - 2])
				thread:resume(list[3][args[4] - 2])
				break
			end
		end
	end
end

function omi.main()
	if term.isColour() then
		local ok, err = pcall(function()
			thread:create("kernal", omi.startup)
   			local tFilters = {}
   			local tRunning = thread:list()
   			local tEventData = {}
   			while true do
    			for k, v in pairs( tRunning ) do
         			if tFilters[ k ] == tEventData[ 1 ] or tFilters[ k ] == nil then
          				_, tFilters[ k ] = coroutine.resume(v, unpack(tEventData))
         			end
    			end
    			tEventData = { os.pullEvent() }
   			end
		end)
		if not ok then
			omi.crash(err)
		end
	else
		omi.crash("Please use an advanced (gold) computer.")
	end
end

function omi.startup()
	col.screen("black")
	sleep(0.15)
	col.screen("grey")
	sleep(0.15)
	col.screen("lightGrey")
	sleep(0.30)
	draw.textc(" Omicron Operating System", 7, false, "white", "lightGrey")
	draw.textc(" Created By DannySMc", 19, false, "lightBlue", "lightGrey")
	sleep(0.30)
	omi.draw.loadanimation(26, 12, "red", "lightGrey")
	os.startTimer(0.15)

	local count = 0

	while true do
		local args = { os.pullEvent() }
		if args[1] == "timer" then
			count = count + 1
			omi.draw.loadanimation(26, 12, "red", "lightGrey")
			os.startTimer(0.15)
			if count == 10 then
				if fs.exists("/core/") then
					--thread:create("login", omi.core.login())
					--thread:goto("login")
					thread:create("desktop", omi.core.desktop())
					thread:goto("desktop")
					break
				else
					omi.core.install()
					break
				end
			end
		end
	end
end

function omi.core.install()
	-- Install Omicron OS
	local tFolderList = {"/core/","/core/users/","/core/apps/","/core/addons/","/core/settings/", "/core/bios/"}
	col.screen("lightGrey")
	draw.textc(" Omicron: Install", 1, false, "white", "lightGrey")
	draw.textc(" ----------------", 2, false, "white", "lightGrey")
	draw.texta("We are going to install Omicron, please wait...", 1, 4, false, "lightBlue", "lightGrey")
	sleep(1)
	draw.texta("Creating folders [0/"..#tFolderList.."]", 1, 6, false, "lightBlue", "lightGrey")
	for k, v in ipairs(tFolderList) do
		draw.texta("Creating folders ["..k.."/"..#tFolderList.."]", 1, 6, false, "lightBlue", "lightGrey")
		fs.makeDir(v)
		sleep(0.01)
	end

	local url = "https://ccsystems.dannysmc.com/programs/omicron/core"
	local tSettings = {
		"addons/gps.lua", 
		"addons/rednet.lua", 
		"apps/ink.lua", 
		"apps/luaide.lua", 
		"apps/sketch.lua", 
		"bios/osdata.lua", 
		"bios/bios.lua",
		"settings/omidata.lua",
		"settings/userdata.lua",
	}
	draw.texta("Downloading files [0/"..#tSettings.."]", 1, 7, false, "lightBlue", "lightGrey")
	for k, v in pairs(tSettings) do
		draw.texta("Downloading files ["..k.."/"..#tSettings.."]", 1, 7, false, "lightBlue", "lightGrey")
		local req = http.get(url.."/"..v)
		local temp = fs.open(fs.combine("/core/",v), "w")
		temp.write(req.readAll())
		temp.close()
	end

	local url = "https://ccsystems.dannysmc.com/ccsystems.php"
	draw.texta("Pinging CCSystems Database...", 1, 8, false, "lightBlue", "lightGrey")
	local req = http.post(url, "ccsys="..textutils.urlEncode(tostring("ping")))
	if req.readAll() == "true" then
		draw.texta("Server is online...", 1, 9, false, "lightBlue", "lightGrey")
	else
		draw.texta("Server is offline...", 1, 9, false, "lightBlue", "lightGrey")
	end

	sleep(1.5)

	thread:create("login", omi.core.login())
	thread:goto("login")

end

function omi.core.register()

end

function omi.core.login()
	if fs.exists("/core/settings/.saveuserdata") then
		local config = config.load("/core/settings/userdata.lua")
		username = config.username
		password = config.password
		local stat = ccsys.user.login(username, password)
		if stat then
			thread:create("desktop", omi.core.desktop)
			thread:goto("desktop")
		end
	else
		local savecred = false
		col.screen("white")
		draw.box(1, 51, 1, 1, " ", "grey", "grey")
		draw.texta("Omicron Login", 1, 1, false, "cyan", "grey")
		draw.texta(misc.time(), 47, 1, false, "lime", "grey")
		draw.box(1, 51, 2, 1, " ", "lightGrey", "lightGrey")
		draw.texta("         Register         |          Login          ", 1, 2, false, "white", "lightGrey")
		draw.texta("Login", 38, 2, false, "lime", "lightGrey")
	
		draw.texta("Username", 8, 5, false, "lightGrey", "white")
		draw.texta("Password", 8, 9, false, "lightGrey", "white")
		draw.texta("Login", 38, 2, false, "lime", "lightGrey")
		draw.box(8, 37, 6, 1, false, "cyan", "cyan")
		draw.box(8, 37, 10, 1, false, "cyan", "cyan")
		draw.texta("   Login   ", 8, 16, false, "white", "cyan")
		draw.texta("   Exit   ", 35, 16, false, "white", "cyan")
		draw.texta(" Toggle ", 8, 13, false, "white", "cyan")
		draw.texta("Save Credentials: "..tostring(savecred), 17, 13, false, "lightGrey", "white")
	
		while true do
			local args = { os.pullEvent() }
			if args[1] == "timer" then
				draw.texta(misc.time(), 47, 1, false, "lime", "grey")
			elseif args[1] == "mouse_click" then
				if args[2] == 1 then
					if (args[3] >= 1 and args[3] <= 25) and (args[4] == 2) then
						omi.core.register()
					elseif (args[3] >= 8 and args[3] <= 45) and (args[4] == 6) then
						col.set("white", "cyan")
						term.setCursorPos(8, 6)
						write("                                     ")
						term.setCursorPos(8, 6)
						write(": ")
						username = tostring(read())
					elseif (args[3] >= 8 and args[3] <= 45) and (args[4] == 10) then
						col.set("white", "cyan")
						term.setCursorPos(8, 10)
						write("                                     ")
						term.setCursorPos(8, 10)
						write(": ")
						password = crypt.sha256(tostring(read("*")))
					elseif (args[3] >= 8 and args[3] <= 18) and (args[4] == 16) then
						local stat = ccsys.user.login(username, password)
						if stat then
							draw.popup("Logged In!")
							sleep(1)
							thread:create("desktop", omi.core.desktop)
							thread:create("test", omi.test)
							thread:resume("desktop")
						else
							omi.core.login()
						end
					elseif (args[3] >= 35 and args[3] <= 44) and (args[4] == 16) then						
						shell.run("shell")
					end
				end
			end
		end
	end
end

function omi.core.uninstall()
	-- Uninstall Omicron OS
	
end

function omi.core.desktop()
	col.screen("white")
	omi.draw.bar("Desktop")
	col.set("black", "white")
	term.setCursorPos(1,3)
	local list = thread:listall()
	for k,v in pairs(list[1]) do
		print(v)
	end
	while true do
		local args = { os.pullEvent() }
		if args[1] == "timer" then
			omi.draw.bar("Desktop")
		elseif args[1] == "char" then
			if args[2] == "1" then
				thread:create("switcher", omi.draw.threads)
			end
		end
	end
end

function omi.test()
	col.screen("black")
	print("> Running coroutine")
	for i = 1, 10 do
		print(i)
	end

	print("Killing...")
	thread:resume("desktop")
end
omi.init()