Quipex

Disk/mem/autorun/redworks

Apr 22nd, 2012
140
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.47 KB | None | 0 0
  1. --Setup redworks functions
  2.  
  3. local path=":/mem/redworks/programs:/mem/redworks/libs"
  4. if http then path=path..":/mem/redworks/programs/http:/bin"end
  5.  
  6. shell.setPath( ".:/mem/redworks/programs:/rom/programs"..path )
  7. help.setPath( "mem/redworks/help:/rom/help/" )
  8. shell.setAlias( "ls", "list" )
  9. shell.setAlias( "dir", "list" )
  10. shell.setAlias( "cp", "copy" )
  11. shell.setAlias( "mv", "move" )
  12. shell.setAlias( "rm", "delete" )
  13. shell.setAlias( "off", "shutdown" )
  14. shell.setAlias( "faq", "help" )
  15. shell.setAlias( "cl", "clear" )
  16. shell.setAlias( "goto", "cd" )
  17. shell.setAlias( "del", "delete" )
  18.  
  19. -- Load APIs
  20. local tApis = fs.list( "/mem/redworks/apis" )
  21. for n,sFile in ipairs( tApis ) do
  22. if not fs.isDir( sFile ) then
  23. os.loadAPI( fs.combine( "/mem/redworks/apis", sFile ) )
  24. end
  25. end
  26.  
  27. -- Do login code
  28. redworks.showLogo()
  29. local user,succ = redworks.doLogin()
  30. if not succ then
  31. --Login failed
  32. term.clear()
  33. term.setCursorPos(1,5)
  34. print("login failed.\n\nLocking terminal for 15 seconds")
  35. local bExit=false
  36. os.startTimer(15)
  37. while not bExit do
  38. falt, sEvent, param = pcall(os.pullEvent)
  39. if sEvent == "timer" then
  40. bExit = true
  41. end
  42. end
  43. os.shutdown()
  44. else
  45. redworks.setUser(user)
  46. end
  47.  
  48. term.clear()
  49. term.setCursorPos(1,1)
  50. print(os.version() .. " with Redworks "..redworks.version().." Terminal ID# " .. os.getComputerID())
  51. print("Welcome " .. redworks.getUser()..".".. " Current time is "..textutils.formatTime( os.time(), false ))
  52. term.setCursorPos(1,4)
Add Comment
Please, Sign In to add comment