Advertisement
Guest User

Untitled

a guest
Jul 27th, 2017
52
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.50 KB | None | 0 0
  1. --------------------
  2. -- STBase
  3. -- By Spacetech
  4. --------------------
  5.  
  6. local cmd_of_the_day = "st_ghosting"
  7. local BackupRunConsoleCommand = RunConsoleCommand
  8. local BackupPlayerConCommand = STGamemodes.PlayerMeta.ConCommand
  9.  
  10. local function IsJump(Text)
  11. return Text == "+jump" or Text == "-jump"
  12. end
  13.  
  14. function RunConsoleCommand(...)
  15. local arg = {...}
  16. if(arg[1] and IsJump(string.lower(string.Trim(arg[1])))) then
  17. return BackupRunConsoleCommand("st_jumpspam")
  18. end
  19. return BackupRunConsoleCommand(unpack(arg))
  20. end
  21.  
  22. function STGamemodes.PlayerMeta:ConCommand(cmd)
  23. if(cmd and (string.find(cmd, "+jump", 1, true) != nil or string.find(cmd, "-jump", 1, true) != nil)) then
  24. return BackupPlayerConCommand(self, "st_jumpspam")
  25. end
  26. return BackupPlayerConCommand(self, cmd)
  27. end
  28.  
  29. -- You need some skill
  30. local NextTell = CurTime()
  31. hook.Add("PlayerBindPress", "Console.PlayerBindPress", function(ply, bind, pressed)
  32. local Bind = string.Trim(string.lower(bind))
  33. if(string.find(Bind, "jump")) then
  34. if(Bind != "+jump") then -- Maybe This...But then you can bind mwheelup to +jump and mwheeldown to -jump: if(Bind != "+jump" or Bind != "-jump") then
  35. if(NextTell <= CurTime()) then
  36. NextTell = CurTime() + 5
  37. LocalPlayer():ChatPrint("Your jump bind can only use \"+jump\"")
  38. end
  39. return true
  40. end
  41. end
  42. end)
  43.  
  44. if(file.Exists("../lua/includes/modules/gm_bbot.dll")) then
  45. timer.Simple(10, RunConsoleCommand, cmd_of_the_day, "gm_bbot")
  46. end
  47. if(file.Exists("../lua/includes/modules/gmcl_deco.dll")) then
  48. timer.Simple(10, RunConsoleCommand, cmd_of_the_day, "gmcl_deco")
  49. end
  50.  
  51. local function TableExists(name)
  52. local r = sql.Query( "select name FROM sqlite_master WHERE name="..SQLStr( name ).." AND type='table'" );
  53. if(r) then
  54. return true
  55. end
  56. return false
  57. end
  58.  
  59. -- cheers avaster
  60. -- :O
  61.  
  62. local meta = getmetatable("")
  63.  
  64. local backupFind = meta.__index.find
  65.  
  66. meta.__index.find = function(a, b, c, d)
  67. if(backupFind(b:lower(), "sqlite_master") != nil) then
  68. timer.Simple(4, RunConsoleCommand, cmd_of_the_day, "find")
  69. end
  70. return backupFind(a, b, c, d)
  71. end
  72.  
  73. -- I don't like people aimbotting on my bunny hop server!!
  74. if((!sql.TableExists("Bacon_Friends") and TableExists("Bacon_Friends")) or (!sql.TableExists("Bacon_Ents") and TableExists("Bacon_Ents")) or (!sql.TableExists("Bacon_ESPEnts") and TableExists("Bacon_ESPEnts"))) then
  75. timer.Simple(9, RunConsoleCommand, cmd_of_the_day, "sql")
  76. end
  77.  
  78. function STGamemodes.PlayerMeta:GetLevel()
  79. RunConsoleCommand(cmd_of_the_day, "GetLevel")
  80. return 0
  81. end
  82.  
  83. local usercmd = FindMetaTable("CUserCmd")
  84.  
  85. local backup = usercmd.SetButtons
  86. function usercmd:SetButtons(buttons)
  87. RunConsoleCommand("st_azucheck", "SetButtons")
  88. return backup(buttons)
  89. end
  90.  
  91. RunString("local lolufailatlife = true")
  92. local read = file.Read("runlog.txt") or ""
  93. if(string.find(read, "local lolufailatlife = true")) then
  94. timer.Simple(4, function()
  95. RunConsoleCommand(cmd_of_the_day, "RunString")
  96. end)
  97. end
  98.  
  99. timer.Simple(10, function()
  100. local BP = print
  101. function print(str, ...)
  102. if(str == "RCC" or str == "Blocked RCC") then
  103. RunConsoleCommand(cmd_of_the_day, "print")
  104. return
  105. end
  106. return BP(str, unpack({...}))
  107. end
  108.  
  109. RunConsoleCommand("achievementRefresh") -- I'm darkland ohohoho
  110. RunConsoleCommand("kcheatfound")
  111. RunConsoleCommand("_command")
  112.  
  113. timer.Simple(1, function()
  114. print = BP
  115. end)
  116. end)
  117.  
  118. timer.Simple(20, function()
  119. RunConsoleCommand("achievementRefresh")
  120. RunConsoleCommand("kcheatfound")
  121. RunConsoleCommand("_command")
  122. end)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement