Expenox's Programs

Skullblade, on 29 October 2012 - 01:19 AM said:

Not to be mean or anything but there are already WAY too many lock programs on the tutorial already and none of them are really all that different so as to saving space on the forum please (this goes to every1) don't post programs that are already here. Especially door locks…i mean there are only so many ways you can make a wheel and this isn't something new.

PixelToast, on 29 October 2012 - 01:13 AM said:

i made a text box that might help :3

Spoiler

USAGE:
textbox("label goes here")

function textbox(bartext)
term.setCursorBlink( true )
	local sLine = ""
local nPos = 0
local oW, oH = term.getSize()
local w,h=oW-4,math.floor(oH/2)
local sx,sy=4,math.floor(oH/2)
local function redraw()
  local nScroll = 0
  if sx + nPos >= w then
   nScroll = (sx + nPos) - w
  end
  term.setCursorPos(3,math.floor(oH/2)-1)
  write(string.rep("-",oW-5))
  term.setCursorPos(3,math.floor(oH/2)+1)
  write(string.rep("-",oW-5))
  term.setCursorPos(math.floor(oW/2)-math.floor(#bartext/2),math.floor(oH/2)-1)
  write(bartext)
  term.setCursorPos( sx, sy )
  term.write(term.write( string.rep(" ", w - sx + 1) ))
  term.setCursorPos( sx, sy )
  term.write(term.write( string.sub( sLine, nScroll + 1 ) ))
  term.setCursorPos(3,math.floor(oH/2))
  write("|")
  term.setCursorPos(oW-3,math.floor(oH/2))
  write("|")
  term.setCursorPos( sx + nPos - nScroll, sy )
end
redraw()
while true do
  local sEvent, param = os.pullEvent()
  if sEvent == "char" then
   sLine = string.sub( sLine, 1, nPos ) .. param .. string.sub( sLine, nPos + 1 )
   nPos = nPos + 1
   redraw()

  elseif sEvent == "key" then
	  if param == 28 then
	-- Enter
	break

   elseif param == 203 then
	-- Left
	if nPos > 0 then
	 nPos = nPos - 1
	 redraw()
	end

   elseif param == 205 then
	-- Right  
	if nPos < string.len(sLine) then
	 nPos = nPos + 1
	 redraw()
	end

   elseif param == 200 or param == 208 then
				-- Up or down
	if _tHistory then
	 if param == 200 then
	  -- Up
	  if nHistoryPos == nil then
	   if #_tHistory > 0 then
		nHistoryPos = #_tHistory
	   end
	  elseif nHistoryPos > 1 then
	   nHistoryPos = nHistoryPos - 1
	  end
	 else
	  -- Down
	  if nHistoryPos == #_tHistory then
	   nHistoryPos = nil
	  elseif nHistoryPos ~= nil then
	   nHistoryPos = nHistoryPos + 1
	  end	
	 end
	
	 if nHistoryPos then
					 sLine = _tHistory[nHistoryPos]
					 nPos = string.len( sLine )
					else
	  sLine = ""
	  nPos = 0
	 end
	 redraw()
				end
   elseif param == 14 then
	-- Backspace
	if nPos > 0 then
	 sLine = string.sub( sLine, 1, nPos - 1 ) .. string.sub( sLine, nPos + 1 )
	 nPos = nPos - 1	
	 redraw()
	end
   elseif param == 29 then
	term.setCursorBlink( false )
	return nil
   end
  end
end
term.setCursorBlink( false )
term.setCursorPos( w + 1, sy )
return sLine
end

it also works for turtles and monitors :3

Skullblade, on 29 October 2012 - 01:19 AM said:

Not to be mean or anything but there are already WAY too many lock programs on the tutorial already and none of them are really all that different so as to saving space on the forum please (this goes to every1) don't post programs that are already here. Especially door locks…i mean there are only so many ways you can make a wheel and this isn't something new.

MechaTallon, on 16 December 2012 - 10:35 AM said:

Can you please include the pastebin code in the post itself so we can just download it to our computers without clicking a link? Thanks! :)/> And good luck to your programs.

I want some color to the login system! :D/>

MechaTallon, on 16 December 2012 - 11:07 AM said:

xD Awesome!

:D/> also, in the login system, can you make it store the password information in a file?
And encode it in byte code?

string.byte - Encode
string.char - Decode

:3 thanks

MechaTallon, on 16 December 2012 - 11:27 AM said:

:D/> awesome!
^-^ It'll be awesome looking if it has colors and encoding!

MechaTallon, on 16 December 2012 - 11:46 AM said:

:3 the file part shouldn't be VERY complex.

If it doesn't work I'll give you some code. :P/>

term.clear()
local sFile, sPass = "pass.txt", ""
if fs.exist(sFile) then
    local hRead = assert(fs.open(sFile, "r"))
    hRead.close()
end    
term.setCursorPos(1,1)
print("Welcome to Expocraft v1.0 by Expenox")
if sPass == "" then
    print("Set your password: ")
    local sInput = read()
    if sInput ~= "" then
        print("Your password is " .. sInput .. "!")
        sPass = sInput
        hWrite = fs.open(sFile, "w")
        hWrite.write(sPass)
        hWrite.close()
     end
  end
end
sleep(1)
term.write("Login: ")
local input = read("*")
input = string.lower(input)
if input == sPass then
 print("Correct password!")
 textutils.slowPrint("Getting account info...")
 sleep(2)
 term.clear()
 term.setCursorPos(1,1)
 print("ExpoCraft v1.0")
else
 textutils.slowPrint("Wrong password!")
 sleep(2)
 os.reboot()
end

MechaTallon, on 16 December 2012 - 12:23 PM said:

Fixed, at least I think so.

term.clear()
term.setCursorPos(1,1)
local sFile = "pass.txt"
local sPass = ""
if fs.exists(sFile) then
ak = fs.open(sFile, "r")
sPass = ak:readAll()
ak:close()
else
print("Set your password: ")
	local sInput = read()
	if sInput ~= "" then
		print("Your password is " .. sInput .. "!")
		sPass = sInput
		hWrite = io.open(sFile, "w")
		hWrite.write(sPass)
		hWrite.close()
	 end
end
term.clear()
term.setCursorPos(1,1)
print("Welcome to Expocraft v1.0 by Expenox")
sleep(1)
term.write("Login: ")
local input = read("*")
input = string.lower(input)
if input == sPass then
print("Correct password!")
textutils.slowPrint("Getting account info...")
sleep(2)
term.clear()
term.setCursorPos(1,1)
print("ExpoCraft v1.0")
else
textutils.slowPrint("Wrong password!")
sleep(2)
os.reboot()
end

local function tree
  if turtle.detect() then
    turtle.select(16)
    turtle.compare()

MechaTallon, on 16 December 2012 - 01:00 PM said:

xD I don't know the turtle API much, sorry can't help you on that one.
But I'm sure that turtle.compare returns a boolean, which means
if turtle.compare( arguments ) then
would work.

MechaTallon, on 16 December 2012 - 02:08 PM said:

yeah there can!

Expenox, on 17 December 2012 - 02:27 PM said:

Lumberjack program was canceled I will try to make a alternative way.. There was a bug..
If anyone knows whats wrong take a shot at it
>> Code <<
>> Video <<

TheOriginalBIT, on 17 December 2012 - 04:25 PM said:

Expenox, on 17 December 2012 - 02:27 PM said:

Lumberjack program was canceled I will try to make a alternative way.. There was a bug..
If anyone knows whats wrong take a shot at it
>> Code <<
>> Video <<

Sorry that I couldn't help you figure it out :(/>

term.clear()[/size]
local password = "expenox"
local user = "expenox"
term.setCursorPos(1,1)
textutils.slowPrint("Welcome to Expocraft v1.0 by Expenox")
sleep(1)
textutils.slowWrite("Username: ")
local input = read()
input = string.lower(input)
if input == user then
textutils.slowPrint("Correct username!")
textutils.slowWrite("Password: ")
local input = read("*")
if input == password then
textutils.slowPrint("Correct Password!")
sleep(2)
term.clear()
term.setCursorPos(1,1)
textutils.slowPrint("Expocraft V1.0")
else
textutils.slowPrint("Wrong password!")
sleep(2)
os.reboot()
end
else
textutils.slowPrint("Wrong Username!")
sleep(2)
os.reboot()
end

spyman68, on 05 March 2013 - 01:00 PM said:

I would like to help you on the login program when you need a username AND password, I'll take your code and turn it into a username AND password real quick, it'll take about 5 minutes :)/> I actually just discovered this while making my own OS (It's not gonna be too great, just a menu with a lot of shell.run(" ") xD, well here is the login code, I used your code but added/changed some stuff:

term.clear()[/size]
local password = "expenox"
local user = "expenox"
term.setCursorPos(1,1)
textutils.slowPrint("Welcome to Expocraft v1.0 by Expenox")
sleep(1)
textutils.slowWrite("Username: ")
local input = read()
input = string.lower(input)
if input == user then
textutils.slowPrint("Correct username!")
textutils.slowWrite("Password: ")
local input = read("*")
if input == password then
textutils.slowPrint("Correct Password!")
sleep(2)
term.clear()
term.setCursorPos(1,1)
textutils.slowPrint("Expocraft V1.0")
else
textutils.slowPrint("Wrong password!")
sleep(2)
os.reboot()
end
else
textutils.slowPrint("Wrong Username!")
sleep(2)
os.reboot()
end

I did indeed test this, I hope you like it :D/>

spyman68, on 11 March 2013 - 08:23 AM said:

Yeah, sorry about that lol. Did it work for you?

Dragon53535, on 17 October 2013 - 08:11 PM said:

Wishy washy charlie brown, make a new thread, DONT make a new thread. make up your mind :P/>

Skullblade, on 29 October 2012 - 01:43 AM said:

What i meant by 'space' was more just GUI space and not having tons of the same program clutter the forums

Expenox, on 20 October 2013 - 12:23 AM said:

Quarry Management coming soon!

wojbie, on 21 October 2013 - 02:53 PM said:

Could we get a spoiler picture ;)/>

Dragon53535, on 21 October 2013 - 02:20 PM said:

Expenox, on 20 October 2013 - 12:23 AM said:

Quarry Management coming soon!

It better, I helped with it a lot.

though for those who don't know, it's just a fancy "on off" switch, or at least what I helped with.

Expenox, on 21 October 2013 - 09:02 PM said:

Dragon53535, on 21 October 2013 - 02:20 PM said:

Expenox, on 20 October 2013 - 12:23 AM said:

Quarry Management coming soon!

It better, I helped with it a lot.

though for those who don't know, it's just a fancy "on off" switch, or at least what I helped with.

You and I can hopefully make it a full control panel. :D/>

Dragon53535, on 21 October 2013 - 09:06 PM said:

Expenox, on 21 October 2013 - 09:02 PM said:

Dragon53535, on 21 October 2013 - 02:20 PM said:

Expenox, on 20 October 2013 - 12:23 AM said:

Quarry Management coming soon!

It better, I helped with it a lot.

though for those who don't know, it's just a fancy "on off" switch, or at least what I helped with.

You and I can hopefully make it a full control panel. :D/>/>

I would hope so, because just having one thing seems too stupid, we could probably have this program included in your os you are going to make… we'll see.

Dragon53535, on 23 October 2013 - 09:19 PM said:

So what are we doing next oh wise leader?

Skullblade, on 29 October 2012 - 01:19 AM said:

Not to be mean or anything but there are already WAY too many lock programs on the tutorial already and none of them are really all that different so as to saving space on the forum please (this goes to every1) don't post programs that are already here. Especially door locks…i mean there are only so many ways you can make a wheel and this isn't something new.

Xenthera, on 24 October 2013 - 05:10 PM said:

Skullblade, on 29 October 2012 - 01:19 AM said:

Not to be mean or anything but there are already WAY too many lock programs on the tutorial already and none of them are really all that different so as to saving space on the forum please (this goes to every1) don't post programs that are already here. Especially door locks…i mean there are only so many ways you can make a wheel and this isn't something new.

I hate to burst your bubble, but people have to start somewhere. Even if it is a basic lock program. It's not fair any other way.