function authorise(request)
		players = fs.open("disk/allowed","r")
		for player in players:lines() do
				if request == player then
						return true
				else
						return false
				end
		end
end

function authorise(request)
		players = fs.open("disk/allowed","r")
		for player in players:lines() do
				if request == player then
						return true
				end
		end
	    return false
end

local weatherTable = { 66, 43, 90, 21 }
local randomWeather = weatherTable[math.random(1, #weatherTable)]
print(randomWeather)

event, button, xPos, yPos = os.pullEvent("mouse_click")

Symmetryc, on 12 September 2013 - 06:49 PM, said:

function t.someFunc(self, other)
-- is the same as:
function t:someFunc(other)
-- just another way to define functions

Lyqyd, on 12 September 2013 - 01:56 PM, said:

Ziriee, on 12 September 2013 - 01:58 PM, said:

-snip-

local function getSize(path)
  local size = fs.getSize(path) -- get the size of the file/directory
  if fs.isDir(path) then -- if it's a directory, get the size of its contents
    local l = fs.list(path)
    for i = 1, #l do
      size = size + getSize(fs.combine(path, l[i]))
    end
  end
  return size
end

print("ROM Size: ", getSize("/rom"))

jay5476, on 27 August 2013 - 04:42 PM, said:

function fillArea(x, y, w, h, color)
  if color then
    term.setBackgroundColor(color)
  end
  local line = string.rep(" ", w)
  for i = 0, h-1 do
    term.setCursorPos(x, y + i)
    term.write(line)
  end
end

shell.resolve("SomeOtherDir")

fs.combine(shell.dir(), "SomeOtherDir")

mitchfizz05, on 27 August 2013 - 08:20 AM, said:

package.pack(path, outPath) -- pack directory "path" to file "outPath"
--[[
Packs a directory
Parameters:
  - path: the path to the directory to pack
  - outPath: the path to save the package file
Return Values:
  - result: boolean indicating if the operation was successful
  - error: error message in case of error
--]]

package.load(path)
--[[
Loads a package file
Parameters:
  - path: the path to the package file
Return Values:
  - entries: table containing the package entries. nil in case of error
  - error: error message in case of error
--]]

package.unpack(path, outPath)
--[[
Unpacks a package file
Parameters:
  - path: the path to the package file
  - outPath: the path to save the directory
Return Values:
  - result: boolean indicating if the operation was successful
  - error: error message in case of error
--]]

local tArgs = {...}
if #tArgs ~= 2 then
  print("Usage: pack <intput path> <output path>")
  return
end

if not package then
  os.loadAPI("package")
  if not package then
    printError("Error loading package API")
    return
  end
end

local ok, err = package.pack(tArgs[1], tArgs[2])
  if not ok then
  printError(err)
end

local tArgs = {...}
if #tArgs ~= 2 then
  print("Usage: unpack <intput path> <output path>")
  return
end

if not package then
  os.loadAPI("package")
  if not package then
    printError("Error loading package API")
    return
  end
end

local ok, err = package.unpack(tArgs[1], tArgs[2])
  if not ok then
  printError(err)
end

local function fillScreen(color)
  term.setBackgroundColor(color)
  term.clear()
end

theoriginalbit, on 16 August 2013 - 06:55 PM, said:

dpd_84, on 12 August 2013 - 03:20 PM, said:

Icanbreathecode, on 12 August 2013 - 02:13 PM, said:

GamerNebulae, on 12 August 2013 - 01:36 PM, said:

if bool1 == not bool2 then
end

local function tableCheck(t, val)
  for i = 1, #t do --# loop through the table. If you need non-numerical keys, you need to use pairs.
	if t[i] == val then --# check if the value matches
	  return i --# return the key/position of the value in the table
	end
  end
end

local t = { "some value", aVariable, 6, "my value" }
local i = tableCheck("my value")
print(i) --# this should print 4

Bubba, on 11 August 2013 - 08:03 AM, said:

immibis, on 11 August 2013 - 07:15 AM, said:

Use peripheral.getNames() if you want it to work with wired modems.

I believe wired modems use peripheral.getNamesRemote(), though I could be wrong

CometWolf, on 11 August 2013 - 08:23 AM, said:

if string.match(peripheral.getType(tSides[i]),"monitor") then

for _,name in ipairs(peripheral.getNames()) do
  --# tell the user there's a peripheral
  print("There's a ", peripheral.getType(name), " on ", name)
  --# if you need to use a certain peripheral, like a monitor:
  if peripheral.getType(name) == "monitor" then
	--# here you can store the monitor side
	monitorSide = name
	--# or directly wrap the monitor
	monitor = peripheral.wrap(name)
	--# or whatever you need to do
	break
  end
end

Elrond1369, on 09 August 2013 - 06:31 PM, said:

fs = table.remove(fs, 14)

Elrond1369, on 09 August 2013 - 05:55 PM, said:

MysticT, on 09 August 2013 - 05:22 PM, said:

> lua
> t = fs
> file = t.open("/rom/apis/peripheral")
> file.readAll()
Passwords retrieved.
Easy />/>
You should override the fs api if you want to secure files.

if string.find(s, "fs%.")==nil then
error("don't try and change fs to somthing else")
end

PixelToast, on 09 August 2013 - 05:23 PM, said:

fail sandbox is fail c_C
MysticT: you forgot a "r"

local t = {}
t[1] = peripheral.wrap("glowstone_illuminator_0")
t[2] = peripheral.wrap("glowstone_illuminator_1")
for i = 1, #t do
  t[i].setColor(0x00FFFF)
end

local function getPeripherals(sType)
  local t = {}
  for _,name in ipairs(peripheral.getNames()) do
	if peripheral.getType(name) == sType then
	  t[#t + 1] = peripheral.wrap(name)
	end
  end
  return t
end

local t = getPeripherals("monitor") -- get all the monitors
for i = 1, #t do
  t[i].write("Hello")
end