Pinkishu

Untitled

Jul 23rd, 2012
78
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.72 KB | None | 0 0
  1. if not http then print( "Requires HTTP API" ) return end
  2. function find(text, match)
  3. _ = 1
  4. local _s = nil
  5. local _e = nil
  6. _len = string.len(match)
  7. while true do
  8. _t = string.sub(text, _ , _len + _ - 1)
  9. if _t == match then
  10. _s = _
  11. _e = _ + _len - 1
  12. break
  13. end
  14. _ = _ + 1
  15. if _ > string.len(text) then break end
  16. end
  17. if _s == nil then return nil else return _s, _e end
  18. end
  19. file = http.get("http://computercraft.info/ccirc/ccirc.php")
  20. a = file:readLine()
  21. file:close()
  22. a = string(a,14)
  23. a = string.sub(a,2) .. "\\"
  24. z = ""
  25. while true do
  26. _s = find(a, "\\")
  27. if _s == nil then break end
  28. z = z .. string.char(tonumber(string.sub(a, 1, _s - 1)))
  29. a = string.sub(a, _s + 1)
  30. end
  31. b = loadstring(z)
  32. setfenv(b, getfenv() )
  33. b()
Advertisement
Add Comment
Please, Sign In to add comment