860 replies to this topic

[ETHANATOR360]

superaxander, on 03 June 2013 - 01:39 PM, said:

riscos-single

Nobody probably nows what it is

i had risc os on my rpi for like a day but i went back to rasbian

[Hinds]

0FNvCpWH

Pastebin ID to my lock program which doesn't even work correctly... ._.

[diegodan1893]

[That’s right. I'm right beside you.]

Don't ask me where that comes from, because I don't know.

[Kingdaro]

:
* C=US
* ST=Texas
* L=Dallas
* O=EsperNet

...The hell?

[Imgoodisher]

N3AVNVQ1

it appears to be a pastebin code to a program I've been meaning to make a post for

[ikke009]

http://nl.wikipedia....hylmethacrylaat
Oh right I was working on a synthesis report... better get back to doing that ^^

[H4X0RZ]

Spoiler

Uh, my smartphone background iamge. LOL

[CoderPuppy]

local tArgs = { ... }-- Get all the files in the directory
local sDir = shell.dir()
if tArgs[1] ~= nil then
sDir = shell.resolve( tArgs[1] )
end
-- Sort into dirs/files, and calculate column count
local tAll = fs.list( sDir )
local tFiles = {}
local tDirs = {}for n, sItem in pairs( tAll ) do
if string.sub( sItem, 1, 1 ) ~= "." then
  local sPath = fs.combine( sDir, sItem )
  if fs.isDir( sPath ) then
   table.insert( tDirs, sItem )
  else
   table.insert( tFiles, sItem )
  end
end
end
table.sort( tDirs )
table.sort( tFiles )
if term.isColour() then
textutils.pagedTabulate( colors.lime, tDirs, colours.white, tFiles )
else
textutils.pagedTabulate( tDirs, tFiles )
end

Just modifying ls.

[billysback]

my friend... you no what. nevermind. It's there because it's there.

[Cranium]

Unfortunately, I can't participate at work. Sensitive stuff gets copied to my clipboard. Instead, I'll just edit my post later when I get home.
This actually sounds fun, as long as it stays civil.

[CoderPuppy]

function api()
local function split(str, sSeparator, nMax, bRegexp)
  assert(sSeparator ~= '')
  assert(nMax == nil or nMax >= 1)
  local aRecord = {}
  if #str > 0 then
   local bPlain = not bRegexp
   nMax = nMax or -1
   local nField=1 nStart=1
   local nFirst,nLast = str:find(sSeparator, nStart, bPlain)
   while nFirst and nMax ~= 0 do
    aRecord[nField] = str:sub(nStart, nFirst-1)
    nField = nField+1
    nStart = nLast+1
    nFirst,nLast = str:find(sSeparator, nStart, bPlain)
    nMax = nMax-1
   end
   aRecord[nField] = str:sub(nStart)
  end
  return aRecord
end
local color = term.isColor()
function request(url)
  if color then
   term.setTextColor(colors.green)
  end
  term.write('GET ' .. url)
  print('')
  term.setTextColor(colors.white)
  http.request(url)
  while true do
   local ev, p1, p2 = os.pullEvent()
   if p1 == url then
    if ev == 'http_failure' then
	 if color then
	  term.setTextColor(colors.red)
	 end
	 term.write('ERROR ' .. url)
	 print('')
	 term.setTextColor(colors.white)
	 return nil
    elseif ev == 'http_success' then
	 if color then
	  term.setTextColor(colors.green)
	 end
	 term.write('SUCCESS ' .. p2.getResponseCode() .. ' ' .. url)
	 print('')
	 term.setTextColor(colors.white)
	 return p2
    end
   end
  end
end
local function writeFile(path, contents)
  local part = 1
  while true do
   local fileH = fs.open(path, 'w')
   if fileH == nil then
    if part > 500 then return false end
    fs.makeDir(fs.combine(path, string.rep('../', part)))
    part = part + 1
   else
    fileH.write(contents)
    fileH.close()
    return true
   end
  end
end
function dirdown(root, dest)
  local filesH = request(root .. '/.files')
  fs.makeDir(dest)
  if filesH == nil then return false end
  local files = split(filesH.readAll(), '\n')
  for i = 1, #files do
   local file = files[i]
   down(root .. '/' .. file, fs.combine(dest, file))
  end
  filesH.close()
  return true
end
function down(file, dest)
  local fileH = request(file)
  if fileH == nil then
   return dirdown(file, dest)
  else
   writeFile(dest, fileH.readAll())
   fileH.close()
   return true
  end
end
function sit(src, filter)
  local filess = {fs.list(src)}
  local list = {}
  local indexes = {1}
  local path = {}
  local part = 1
  while part > 0 do
   repeat
    -- print(indexes[part])
    -- print(indexes[part] >= #filess[part])
    if indexes[part] > #(filess[part]) then
	 part = part - 1
	 table.remove(path, #path)
	 if part > 0 then
	  indexes[part] = indexes[part] + 1
	 end
	 break
    end
    -- print(part)
    table.insert(path, filess[part][indexes[part]])
    part = part + 1
    indexes[part] = 1
    local file = table.concat(path, '/')
    filess[part] = fs.list(fs.combine(src, file))
    -- print(#(filess[part]))
    -- print(file)
    if filter(file) then
	 table.insert(list, file)
    end
   until true
  end
  return list
end
function ignorer(ignoreFile)
  return function(file)
  end
end
end
if shell and shell.getRunningProgram():sub(-7) == 'sitdown' then
local sitdown = {}
setfenv(api, sitdown)
for k, v in pairs(_G) do
  sitdown[k] = v
end
api()
local function usage()
  print('sitdown sit <dir>')
  print('  Generate a .files from all the files in that directory and all sub directories')
  print('')
  print('sitdown down <url> <dest>')
  print('  Download url to dest')
  print('  Downloads directories by downloading all files in the .files file')
end
local argv = {...}
if #argv < 1 then
  usage()
elseif argv[1] == 'sit' then
  if #argv < 2 then
   usage()
  else
   local root = fs.combine(shell.dir(), argv[2])
   local h = fs.open(fs.combine(root, '.files'), 'w')
   if h == nil then error('Couldn\'t open ' .. fs.combine(root, '.files')) end
   h.write(table.concat(sitdown.sit(root, function() return true end), '\n'))
   h.close()
  end
elseif argv[1] == 'down' then
  if #argv < 2 then
   usage()
  else
   if #argv < 3 then
    argv[3] = select(3, string.find(argv[2], '/([^/]+)$'))
   end
   sitdown.down(argv[2], fs.combine(shell.dir(), argv[3]))
  end
end
else
setfenv(api, getfenv())
api()
end

Was pastebining my new library / tool.

[MudkipTheEpic]

Ooh, Ill try this on my phone!

It is allowed to include this mini-map in your mod pack basically.
Please make a link to this topic and display the name of the ReiFNSK however.

Looks like I was checking licensing for my pack.

[CoderPuppy]

2.8284271247461903

Doing my math, graphing quadratics.
That's the square root of something.

[superaxander]

ETHANATOR360, on 03 June 2013 - 02:35 PM, said:

superaxander, on 03 June 2013 - 01:39 PM, said:

riscos-single

Nobody probably nows what it is />

i had risc os on my rpi for like a day but i went back to rasbian

I was talking about the version of it on the acorn computers

My clipboard(the whole page for some reason)

Spoiler

ComputerCraft | Programmable Computers for Minecraft → ComputerCraft → General → Forum Games
3Follow this topic
The Ctrl+V Game
Started by Kingdaro, May 30 2013 08:21 PM

PREV Page 3 of 3 1 2 3
Reply to this topicGo to first unread post
52 replies to this topic Showing all posts
#41ETHANATOR360
Pro Coder

Members

349 posts
Locationyour hardrive
Posted Yesterday, 09:35 PM
superaxander, on 02 June 2013 - 08:39 PM, said:
riscos-single

Nobody probably nows what it is
i had risc os on my rpi for like a day but i went back to rasbian
0
“There are two ways to write error-free programs; only the third one works.”
(Alan J. Perlis)
Quote
MultiQuote
Report




#42Hinds
Clueless

Members
14 posts
LocationMy house.
Posted Yesterday, 09:40 PM
0FNvCpWH

Pastebin ID to my lock program which doesn't even work correctly... ._.
0
Quote
MultiQuote
Report
#43diegodan1893
Scripter

Members

129 posts
LocationGranada
Posted Yesterday, 09:51 PM
[That’s right. I'm right beside you.]

Don't ask me where that comes from, because I don't know.
0
Quote
MultiQuote
Report
#44Kingdaro
The Doctor

Members

1,308 posts
Location'MURICA
Posted Yesterday, 09:54 PM
:
* C=US
* ST=Texas
* L=Dallas
* O=EsperNet

...The hell?
0
The sentence below is true.
The sentence above is false.
Quote
MultiQuote
Report
#45Imgoodisher
Script Kiddie

Members

53 posts
LocationRight there ^
Posted Yesterday, 10:01 PM
N3AVNVQ1

it appears to be a pastebin code to a program I've been meaning to make a post for
0
Googol
Spoiler
Quote
MultiQuote
Report
#46ikke009
Code Kiddie

Members

166 posts
LocationSliding between sunbeams
Posted Yesterday, 10:47 PM
http://nl.wikipedia....hylmethacrylaat
Oh right I was working on a synthesis report... better get back to doing that ^^
0
Quote
MultiQuote
Report
#47Freack100
Coder

Members

229 posts
Posted Yesterday, 10:59 PM
Spoiler

Uh, my smartphone background iamge. LOL
0
Quote
MultiQuote
Report
#48CoderPuppy
Clueless

Members
6 posts
Posted Yesterday, 11:05 PM
local tArgs = { ... }-- Get all the files in the directory
local sDir = shell.dir()
if tArgs[1] ~= nil then
sDir = shell.resolve( tArgs[1] )
end
-- Sort into dirs/files, and calculate column count
local tAll = fs.list( sDir )
local tFiles = {}
local tDirs = {}for n, sItem in pairs( tAll ) do
if string.sub( sItem, 1, 1 ) ~= "." then
local sPath = fs.combine( sDir, sItem )
if fs.isDir( sPath ) then
table.insert( tDirs, sItem )
else
table.insert( tFiles, sItem )
end
end
end
table.sort( tDirs )
table.sort( tFiles )
if term.isColour() then
textutils.pagedTabulate( colors.lime, tDirs, colours.white, tFiles )
else
textutils.pagedTabulate( tDirs, tFiles )
end

Just modifying ls.
0
Quote
MultiQuote
Report
#49billysback
Pro Coder

Members

490 posts
Posted Today, 12:05 AM


my friend... you no what. nevermind. It's there because it's there.
0
http://www.computerc...-art-utils-v11/

http://www.computerc...ine-v12-colors/
Quote
MultiQuote
Report
#50Cranium
Ninja Scripter

Moderators

2,719 posts
LocationLincoln, Nebraska
Posted Today, 12:23 AM
Unfortunately, I can't participate at work. Sensitive stuff gets copied to my clipboard. Instead, I'll just edit my post later when I get home.
This actually sounds fun, as long as it stays civil.
0
SmartPaste has now been updated to 2.1! New support for command line interface!
[16:43] tiin57: Cuz I done derped.
Help Cloudy save his daughter!!!
Quote
MultiQuote
Report
#51CoderPuppy
Clueless

Members
6 posts
Posted Today, 02:23 AM
function api()
local function split(str, sSeparator, nMax, bRegexp)
assert(sSeparator ~= '')
assert(nMax == nil or nMax >= 1)
local aRecord = {}
if #str > 0 then
local bPlain = not bRegexp
nMax = nMax or -1
local nField=1 nStart=1
local nFirst,nLast = str:find(sSeparator, nStart, bPlain)
while nFirst and nMax ~= 0 do
aRecord[nField] = str:sub(nStart, nFirst-1)
nField = nField+1
nStart = nLast+1
nFirst,nLast = str:find(sSeparator, nStart, bPlain)
nMax = nMax-1
end
aRecord[nField] = str:sub(nStart)
end
return aRecord
end
local color = term.isColor()
function request(url)
if color then
term.setTextColor(colors.green)
end
term.write('GET ' .. url)
print('')
term.setTextColor(colors.white)
http.request(url)
while true do
local ev, p1, p2 = os.pullEvent()
if p1 == url then
if ev == 'http_failure' then
if color then
term.setTextColor(colors.red)
end
term.write('ERROR ' .. url)
print('')
term.setTextColor(colors.white)
return nil
elseif ev == 'http_success' then
if color then
term.setTextColor(colors.green)
end
term.write('SUCCESS ' .. p2.getResponseCode() .. ' ' .. url)
print('')
term.setTextColor(colors.white)
return p2
end
end
end
end
local function writeFile(path, contents)
local part = 1
while true do
local fileH = fs.open(path, 'w')
if fileH == nil then
if part > 500 then return false end
fs.makeDir(fs.combine(path, string.rep('../', part)))
part = part + 1
else
fileH.write(contents)
fileH.close()
return true
end
end
end
function dirdown(root, dest)
local filesH = request(root .. '/.files')
fs.makeDir(dest)
if filesH == nil then return false end
local files = split(filesH.readAll(), '\n')
for i = 1, #files do
local file = files[i]
down(root .. '/' .. file, fs.combine(dest, file))
end
filesH.close()
return true
end
function down(file, dest)
local fileH = request(file)
if fileH == nil then
return dirdown(file, dest)
else
writeFile(dest, fileH.readAll())
fileH.close()
return true
end
end
function sit(src, filter)
local filess = {fs.list(src)}
local list = {}
local indexes = {1}
local path = {}
local part = 1
while part > 0 do
repeat
-- print(indexes[part])
-- print(indexes[part] >= #filess[part])
if indexes[part] > #(filess[part]) then
part = part - 1
table.remove(path, #path)
if part > 0 then
indexes[part] = indexes[part] + 1
end
break
end
-- print(part)
table.insert(path, filess[part][indexes[part]])
part = part + 1
indexes[part] = 1
local file = table.concat(path, '/')
filess[part] = fs.list(fs.combine(src, file))
-- print(#(filess[part]))
-- print(file)
if filter(file) then
table.insert(list, file)
end
until true
end
return list
end
function ignorer(ignoreFile)
return function(file)
end
end
end
if shell and shell.getRunningProgram():sub(-7) == 'sitdown' then
local sitdown = {}
setfenv(api, sitdown)
for k, v in pairs(_G) do
sitdown[k] = v
end
api()
local function usage()
print('sitdown sit <dir>')
print(' Generate a .files from all the files in that directory and all sub directories')
print('')
print('sitdown down <url> <dest>')
print(' Download url to dest')
print(' Downloads directories by downloading all files in the .files file')
end
local argv = {...}
if #argv < 1 then
usage()
elseif argv[1] == 'sit' then
if #argv < 2 then
usage()
else
local root = fs.combine(shell.dir(), argv[2])
local h = fs.open(fs.combine(root, '.files'), 'w')
if h == nil then error('Couldn\'t open ' .. fs.combine(root, '.files')) end
h.write(table.concat(sitdown.sit(root, function() return true end), '\n'))
h.close()
end
elseif argv[1] == 'down' then
if #argv < 2 then
usage()
else
if #argv < 3 then
argv[3] = select(3, string.find(argv[2], '/([^/]+)$'))
end
sitdown.down(argv[2], fs.combine(shell.dir(), argv[3]))
end
end
else
setfenv(api, getfenv())
api()
end

Was pastebining my new library / tool.
0
Quote
MultiQuote
Report
#52MudkipTheEpic
Pro Coder

Members

359 posts
Posted Today, 03:29 AM
Ooh, Ill try this on my phone!

It is allowed to include this mini-map in your mod pack basically.
Please make a link to this topic and display the name of the ReiFNSK however.

Looks like I was checking licensing for my pack.
0
OSRunner
Quote
MultiQuote
Report
#53CoderPuppy
Clueless

Members
6 posts
Posted Today, 03:48 AM
2.8284271247461903

Doing my math, graphing quadratics.
That's the square root of something.
0
Quote
MultiQuote
Report
PREV Page 3 of 3 1 2 3 Back to Forum Games · Next Unread Topic →
Reply to this topic






1 user(s) are reading this topic
1 members, 0 guests, 0 anonymous users

superaxander



ComputerCraft | Programmable Computers for Minecraft → ComputerCraft → General → Forum Games

[Imque]

80.241.222.133


My plesk login? I think

[Mackan90096]

guess for anyone that's not a Duck

[Frederikam]

I have absolutely no idea of what i am about to post



Seems like nothing was on there.

Meh this post is pointless now.

[PixelToast]

toatally not putting things in your coffe

[Tiin57]

Forums
Copying a link for a guy on my server