YA228

123123123

Jan 5th, 2021
44
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 14.89 KB | None | 0 0
  1. local hello = [[
  2. HELLO СОСИТЕ ХУЙ
  3.  
  4. ]]
  5.  
  6. local da = GetRenderTarget( "da" .. os.time(), ScrW(), ScrH() )
  7.  
  8. hook.Add( "RenderScene", "ASG", function( vOrigin, vAngle, vFOV )
  9. local vw = {
  10. x = 0,
  11. y = 0,
  12. w = ScrW(),
  13. h = ScrH(),
  14. dopostprocess = true,
  15. origin = vOrigin,
  16. angles = vAngle,
  17. fov = vFOV,
  18. drawhud = true,
  19. drawmonitors = true,
  20. drawviewmodel = true
  21. }
  22. render.RenderView( vw )
  23. render.CopyTexture( nil, da )
  24. cam.Start2D()
  25. hook.Run( "HKDPAINT" )
  26. cam.End2D()
  27. render.SetRenderTarget( da )
  28. return true
  29. end )
  30.  
  31. hook.Add( "ShutDown", "RemoveAntiScreenGrab", function()
  32. render.SetRenderTarget()
  33. end )
  34. render.Capture = function()
  35. return
  36. end
  37.  
  38. MsgC(Color(255,255,255), hello.."\n")
  39.  
  40. surface.PlaySound ("buttons/blip1.wav")
  41.  
  42. concommand.Add("chsvopen", function()
  43.  
  44. local ply = LocalPlayer()
  45. local yesmenu = false
  46. local x = 15
  47. local y = ScrH() - 150
  48. local rgb = 0
  49.  
  50. CreateClientConVar("bhp", 0, true, false)
  51. CreateClientConVar("atstrafe", 0, true, false)
  52. CreateClientConVar("rgbphysg", 0, true, false)
  53. CreateClientConVar("spammerflash", 0, true, false)
  54. CreateClientConVar("crsh", 0, true, false)
  55. CreateClientConVar("barinfotwentytwoaye", 0, true, false)
  56. CreateClientConVar("thrd3", 0, true, false)
  57. CreateClientConVar("watermarktwe3", 0, true, false)
  58. CreateClientConVar("spamsndbtwe", 0, true, false)
  59. CreateClientConVar("spamdrptwe", 0, true, false)
  60.  
  61. surface.CreateFont('font', {
  62. font = 'CloseCaption_Bold',
  63. size = 23,
  64. weight = 700
  65. })
  66.  
  67. surface.CreateFont('btns', {
  68. font = 'CloseCaption_Bold',
  69. size = 15,
  70. weight = 700
  71. })
  72.  
  73. surface.CreateFont('inf', {
  74. font = 'CloseCaption_Bold',
  75. size = 22,
  76. weight = 600
  77. })
  78.  
  79. function smpbhp()
  80. if GetConVarNumber("bhp") == 1 and input.IsKeyDown( KEY_SPACE ) then
  81. if ply:IsTyping() == false and ply:IsOnGround() then
  82. RunConsoleCommand("+jump")
  83. timer.Create("Bhop", 0, math.random( .280, .290 ), function()
  84. RunConsoleCommand("-jump")
  85. end)
  86. end
  87. elseif GetConVarNumber("bhp") == 1 and input.IsKeyDown( KEY_SPACE ) then
  88. if ply:IsTyping() == false and ply:IsOnGround() then
  89. RunConsoleCommand("+jump")
  90. timer.Create("Bhop", 0, .01, function()
  91. RunConsoleCommand("-jump")
  92. end)
  93. end
  94. end
  95. end
  96.  
  97. hook.Add("Think", "smpbhp", smpbhp)
  98.  
  99. function fsh()
  100. if GetConVarNumber("spammerflash") == 1 and input.IsKeyDown(KEY_F) then
  101. timer.Create("Spam flashlight", 0, 0, function()
  102. RunConsoleCommand('impulse','100')
  103. end)
  104. elseif GetConVarNumber("spammerflash") == 0 or ( not input.IsKeyDown(KEY_F) ) then
  105. timer.Remove("Spam flashlight")
  106. end
  107. end
  108.  
  109. hook.Add("Think", "fsh", fsh)
  110.  
  111. hook.Add( "HUDPaint", "crs", function()
  112. if GetConVarNumber("crsh") == 1 then
  113. RunConsoleCommand( "hud_draw_fixed_reticle", "1" )
  114. elseif GetConVarNumber("crsh") == 0 then
  115. RunConsoleCommand( "hud_draw_fixed_reticle", "0" )
  116. end
  117. end)
  118.  
  119. hook.Add( "HKDPAINT", "Info-Bar", function()
  120. if GetConVarNumber("barinfotwentytwoaye") == 1 then
  121. local speed = math.Round(ply:GetVelocity():Length())
  122. local fps = math.Round(1/RealFrameTime())
  123. local hp = ply:Health()
  124. local name = ply:Name()
  125. local armor = ply:Armor()
  126. local ping = ply:Ping()
  127. draw.RoundedBox( 1, x-30, y-385, 250, 110, Color(0, 0, 0, 150) )
  128. draw.SimpleText( "Health: ", "inf", x-8, y-380, Color( 0,0,0 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  129. draw.SimpleText( "Health: ", "inf", x-10, y-380, Color( 50, 205, 50 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  130. draw.SimpleText( hp, "inf", x+57, y-380, Color( 0,0,0 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  131. draw.SimpleText( hp, "inf", x+55, y-380, Color( 255, 255, 255, 255 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  132. draw.SimpleText( "Armor: ", "inf", x-8, y-360, Color( 0,0,0 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  133. draw.SimpleText( "Armor: ", "inf", x-10, y-360, Color( 0, 191, 255 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  134. draw.SimpleText( armor, "inf", x+57, y-360, Color( 0,0,0 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  135. draw.SimpleText( armor, "inf", x+55, y-360, Color( 255, 255, 255, 255 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  136. draw.SimpleText( "Speed: ", "inf", x-8, y-340, Color( 0,0,0 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  137. draw.SimpleText( "Speed: ", "inf", x-10, y-340, Color( 255, 255, 0 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  138. draw.SimpleText( speed, "inf", x+58, y-340, Color( 0,0,0 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  139. draw.SimpleText( speed, "inf", x+56, y-340, Color( 255, 255, 255, 255 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  140. draw.SimpleText( "FPS: ", "inf", x-8, y-320, Color( 0,0,0 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  141. draw.SimpleText( "FPS: ", "inf", x-10, y-320, Color( 153, 50, 204 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  142. draw.SimpleText( fps, "inf", x+37, y-320, Color( 0,0,0 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  143. draw.SimpleText( fps, "inf", x+35, y-320, Color( 255, 255, 255, 255 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  144. draw.SimpleText( "PING: ", "inf", x-8, y-300, Color( 0,0,0 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  145. draw.SimpleText( "PING: ", "inf", x-10, y-300, Color( 255, 140, 0 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  146. draw.SimpleText( ping, "inf", x+48, y-300, Color( 0,0,0 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  147. draw.SimpleText( ping, "inf", x+46, y-300, Color( 255, 255, 255, 255 ), TEXT_ALIGN_LEFT, TEXT_ALIGN_LEFT)
  148. elseif GetConVarNumber("barinfotwentytwoaye") == 0 then
  149. hook.Remove("Info-Bar")
  150. end
  151. end)
  152.  
  153. hook.Add("HKDPAINT", "WateRmar-da", function()
  154. if GetConVarNumber("watermarktwe3") == 1 then
  155. surface.SetTextColor(0,0,0)
  156. surface.SetFont("btns")
  157. surface.SetTextPos(6.9 , 5)
  158. surface.DrawText("CHSV-menu | "..os.date("%H:%M:%S").." | Website - https://4sv4.ml ")
  159. surface.SetTextColor(HSVToColor( CurTime() % 6 * 60, 1, 1))
  160. surface.SetFont("btns")
  161. surface.SetTextPos(5 , 5)
  162. surface.DrawText("CHSV-menu | "..os.date("%H:%M:%S").." | Website - https://4sv4.ml ")
  163. elseif GetConVarNumber("watermarktwe3") == 0 then
  164. hook.Remove("WateRmar-da")
  165. end
  166. end)
  167.  
  168. hook.Add( "CalcView", "3DPerson", function(ply, pos, angles, fov, cmd)
  169. local thrdPerson = {}
  170. if GetConVarNumber("thrd3") == 1 then
  171. thrdPerson.origin = pos-( angles:Forward()*100 )
  172. thrdPerson.angles = angles
  173. thrdPerson.fov = fov
  174. thrdPerson.drawviewer = true
  175. return thrdPerson
  176. elseif GetConVarNumber("thrd3") == 0 then
  177. thrdPerson.origin = pos-( angles:Forward() )
  178. thrdPerson.angles = angles
  179. thrdPerson.fov = fov
  180. end
  181. end)
  182.  
  183. local function rgbphys()
  184. if GetConVarNumber("rgbphysg") == 1 then
  185. rgb = rgb + 1
  186. ply:SetWeaponColor(Vector(math.Rand(0,1),math.Rand(0,1),math.Rand(0,1)))
  187. rgb = 0
  188. end
  189. end
  190. if GetConVarNumber("rgbphysg") == 1 then
  191. hook.Add("Think","dargbicho",rgbphys)
  192. else
  193. hook.Remove("Think","dargbicho",rgbphys)
  194. end
  195.  
  196. cvars.AddChangeCallback("rgbphysg", function()
  197. if GetConVarNumber("rgbphysg") == 1 then
  198. hook.Add("CreateMove", "wtf", rgbphys)
  199. else
  200. hook.Remove("CreateMove", "wtf")
  201. ply:SetWeaponColor(Vector(0,1,1))
  202. rgb = 0
  203. end
  204. end)
  205.  
  206. function spammersnadx()
  207. if GetConVarNumber("spamsndbtwe") == 1 then
  208. ply:ConCommand("say ".."Website - 4sv4.ml")
  209. elseif GetConVarNumber("spamdrptwe") == 1 then
  210. ply:ConCommand("say /ooc ".."Website - 4sv4.ml")
  211. end
  212. end
  213.  
  214. hook.Add("Think", "spammersnadx", spammersnadx)
  215.  
  216. hook.Add("CreateMove", "atstrafeda", function(cmd)
  217. if GetConVarNumber("atstrafe") == 1 and input.IsKeyDown(KEY_SPACE) and ply:GetMoveType() ~= MOVETYPE_NOCLIP and ply:GetMoveType() ~= MOVETYPE_LADDER then
  218. if(cmd:GetMouseX() < 0) then
  219. cmd:SetSideMove(-10000);
  220. elseif(cmd:GetMouseX() > 0) then
  221. cmd:SetSideMove(10000);
  222. end
  223. end
  224. end)
  225.  
  226. local menu = vgui.Create( "DFrame" )
  227. menu:SetTitle( "" )
  228. menu:SetSize( 250,240 )
  229. menu:Center()
  230. menu:MakePopup()
  231. menu:ShowCloseButton( false )
  232. menu.Paint = function( self, w, h )
  233. draw.RoundedBox( 0, 0, 0, w, h, Color( 10, 10, 10, 180 ) )
  234. surface.SetDrawColor(Color(0, 255, 0))
  235. surface.DrawOutlinedRect( 2, 2, w-4, h-4 )
  236. draw.SimpleText('MAIN - FUNCTIONS', "font", 37, 30, Color(0,0,0) )
  237. draw.SimpleText('MAIN - FUNCTIONS', "font", 35, 30, Color(255,255,255) )
  238. draw.SimpleText('___________', "font", 72, 32, Color(0,0,0) )
  239. draw.SimpleText('___________', "font", 70, 32, HSVToColor( CurTime() % 6 * 60, 1, 1) )
  240. draw.SimpleText('OTHER - FUNCTIONS', "font", 30, 90, Color(0,0,0) )
  241. draw.SimpleText('OTHER - FUNCTIONS', "font", 28, 90, Color(255,255,255) )
  242. draw.SimpleText('___________', "font", 72, 92, Color(0,0,0) )
  243. draw.SimpleText('___________', "font", 70, 92, HSVToColor( CurTime() % 6 * 60, 1, 1) )
  244. draw.SimpleText('SPAMING - FUNCTIONS', "font", 15, 180, Color(0,0,0) )
  245. draw.SimpleText('SPAMING - FUNCTIONS', "font", 13, 180, Color(255,255,255) )
  246. draw.SimpleText('___________', "font", 72, 182, Color(0,0,0) )
  247. draw.SimpleText('___________', "font", 70, 182, HSVToColor( CurTime() % 6 * 60, 1, 1) )
  248. end
  249.  
  250. local bhpbtn = vgui.Create( "DCheckBoxLabel", menu )
  251. bhpbtn:SetText( "BUNNYHOP")
  252. bhpbtn:SetFont( "btns" )
  253. bhpbtn:SetTextColor( Color(0, 191, 255) )
  254. bhpbtn:SetPos( 25, 65 )
  255. bhpbtn:SetConVar( "bhp" )
  256. bhpbtn:SizeToContents()
  257. function bhpbtn.Button:Paint()
  258. surface.SetDrawColor(128, 128, 128)
  259. surface.DrawRect(0, 0, 100, 100)
  260. if self:GetChecked() then
  261. surface.SetDrawColor(Color( 50, 205, 50 ) )
  262. surface.DrawRect(0, 0, 100, 100)
  263. end
  264. surface.SetDrawColor(Color(100, 100, 100, 255))
  265. surface.DrawOutlinedRect(0, 0, 100, 100)
  266. end
  267.  
  268. local atstrafebhpbtn = vgui.Create( "DCheckBoxLabel", menu )
  269. atstrafebhpbtn:SetText( "AUTOSTRAFE")
  270. atstrafebhpbtn:SetFont( "btns" )
  271. atstrafebhpbtn:SetTextColor( Color(255, 127, 80) )
  272. atstrafebhpbtn:SetPos( 133, 65 )
  273. atstrafebhpbtn:SetConVar( "atstrafe" )
  274. atstrafebhpbtn:SizeToContents()
  275. function atstrafebhpbtn.Button:Paint()
  276. surface.SetDrawColor(128, 128, 128)
  277. surface.DrawRect(0, 0, 100, 100)
  278. if self:GetChecked() then
  279. surface.SetDrawColor(Color( 50, 205, 50 ) )
  280. surface.DrawRect(0, 0, 100, 100)
  281. end
  282. surface.SetDrawColor(Color(100, 100, 100, 255))
  283. surface.DrawOutlinedRect(0, 0, 100, 100)
  284. end
  285.  
  286. local flshbtn = vgui.Create( "DCheckBoxLabel", menu )
  287. flshbtn:SetText( "FLASHSPAM" )
  288. flshbtn:SetFont( "btns" )
  289. flshbtn:SetTextColor( Color(0, 255, 0) )
  290. flshbtn:SetPos( 25, 120 )
  291. flshbtn:SetConVar( "spammerflash" )
  292. flshbtn:SizeToContents()
  293. function flshbtn.Button:Paint()
  294. surface.SetDrawColor(128, 128, 128)
  295. surface.DrawRect(0, 0, 100, 100)
  296. if self:GetChecked() then
  297. surface.SetDrawColor(Color( 50, 205, 50 ) )
  298. surface.DrawRect(0, 0, 100, 100)
  299. end
  300. surface.SetDrawColor(Color(100, 100, 100, 255))
  301. surface.DrawOutlinedRect(0, 0, 100, 100)
  302. end
  303.  
  304. local crosshairbtn = vgui.Create( "DCheckBoxLabel", menu )
  305. crosshairbtn:SetText( "CROSSHAIR" )
  306. crosshairbtn:SetFont( "btns" )
  307. crosshairbtn:SetTextColor( Color(255, 165, 0) )
  308. crosshairbtn:SetPos( 133, 120 )
  309. crosshairbtn:SetConVar( "crsh" )
  310. crosshairbtn:SizeToContents()
  311. function crosshairbtn.Button:Paint()
  312. surface.SetDrawColor(128, 128, 128)
  313. surface.DrawRect(0, 0, 100, 100)
  314. if self:GetChecked() then
  315. surface.SetDrawColor(Color( 50, 205, 50 ) )
  316. surface.DrawRect(0, 0, 100, 100)
  317. end
  318. surface.SetDrawColor(Color(100, 100, 100, 255))
  319. surface.DrawOutlinedRect(0, 0, 100, 100)
  320. end
  321.  
  322. local bar_twe10 = vgui.Create( "DCheckBoxLabel", menu )
  323. bar_twe10:SetText( "INFO-BAR" )
  324. bar_twe10:SetFont( "btns" )
  325. bar_twe10:SetTextColor( Color(138, 43, 226) )
  326. bar_twe10:SetPos( 25, 140 )
  327. bar_twe10:SetConVar( "barinfotwentytwoaye" )
  328. bar_twe10:SizeToContents()
  329. function bar_twe10.Button:Paint()
  330. surface.SetDrawColor(128, 128, 128)
  331. surface.DrawRect(0, 0, 100, 100)
  332. if self:GetChecked() then
  333. surface.SetDrawColor(Color( 50, 205, 50 ) )
  334. surface.DrawRect(0, 0, 100, 100)
  335. end
  336. surface.SetDrawColor(Color(100, 100, 100, 255))
  337. surface.DrawOutlinedRect(0, 0, 100, 100)
  338. end
  339.  
  340. local thrdwtfda = vgui.Create( "DCheckBoxLabel", menu )
  341. thrdwtfda:SetText( "3-PERSON" )
  342. thrdwtfda:SetFont( "btns" )
  343. thrdwtfda:SetTextColor( Color(0, 255, 255) )
  344. thrdwtfda:SetPos( 133, 140 )
  345. thrdwtfda:SetConVar( "thrd3" )
  346. thrdwtfda:SizeToContents()
  347. function thrdwtfda.Button:Paint()
  348. surface.SetDrawColor(128, 128, 128)
  349. surface.DrawRect(0, 0, 100, 100)
  350. if self:GetChecked() then
  351. surface.SetDrawColor(Color( 50, 205, 50 ) )
  352. surface.DrawRect(0, 0, 100, 100)
  353. end
  354. surface.SetDrawColor(Color(100, 100, 100, 255))
  355. surface.DrawOutlinedRect(0, 0, 100, 100)
  356. end
  357.  
  358. local wtrbtn = vgui.Create( "DCheckBoxLabel", menu )
  359. wtrbtn:SetText( "WATERMARK" )
  360. wtrbtn:SetFont( "btns" )
  361. wtrbtn:SetTextColor( Color(255, 255, 0) )
  362. wtrbtn:SetPos( 25, 160 )
  363. wtrbtn:SetConVar( "watermarktwe3" )
  364. wtrbtn:SizeToContents()
  365. function wtrbtn.Button:Paint()
  366. surface.SetDrawColor(128, 128, 128)
  367. surface.DrawRect(0, 0, 100, 100)
  368. if self:GetChecked() then
  369. surface.SetDrawColor(Color( 50, 205, 50 ) )
  370. surface.DrawRect(0, 0, 100, 100)
  371. end
  372. surface.SetDrawColor(Color(100, 100, 100, 255))
  373. surface.DrawOutlinedRect(0, 0, 100, 100)
  374. end
  375.  
  376. local rgbbtn = vgui.Create( "DCheckBoxLabel", menu )
  377. rgbbtn:SetText( "RGB-PHYSGUN" )
  378. rgbbtn:SetFont( "btns" )
  379. rgbbtn:SetTextColor( Color(255, 69, 0) )
  380. rgbbtn:SetPos( 133, 160 )
  381. rgbbtn:SetConVar( "rgbphysg" )
  382. rgbbtn:SizeToContents()
  383. function rgbbtn.Button:Paint()
  384. surface.SetDrawColor(128, 128, 128)
  385. surface.DrawRect(0, 0, 100, 100)
  386. if self:GetChecked() then
  387. surface.SetDrawColor(Color( 50, 205, 50 ) )
  388. surface.DrawRect(0, 0, 100, 100)
  389. end
  390. surface.SetDrawColor(Color(100, 100, 100, 255))
  391. surface.DrawOutlinedRect(0, 0, 100, 100)
  392. end
  393.  
  394. local spambtnsbx = vgui.Create( "DCheckBoxLabel", menu )
  395. spambtnsbx:SetText( "SANDBOX" )
  396. spambtnsbx:SetFont( "btns" )
  397. spambtnsbx:SetTextColor( Color(230, 230, 250) )
  398. spambtnsbx:SetPos( 25, 210 )
  399. spambtnsbx:SetConVar( "spamsndbtwe" )
  400. spambtnsbx:SizeToContents()
  401. function spambtnsbx.Button:Paint()
  402. surface.SetDrawColor(128, 128, 128)
  403. surface.DrawRect(0, 0, 100, 100)
  404. if self:GetChecked() then
  405. surface.SetDrawColor(Color( 50, 205, 50 ) )
  406. surface.DrawRect(0, 0, 100, 100)
  407. end
  408. surface.SetDrawColor(Color(100, 100, 100, 255))
  409. surface.DrawOutlinedRect(0, 0, 100, 100)
  410. end
  411.  
  412. local spambtndrp = vgui.Create( "DCheckBoxLabel", menu )
  413. spambtndrp:SetText( "DARKRP" )
  414. spambtndrp:SetFont( "btns" )
  415. spambtndrp:SetTextColor( Color(230, 230, 250) )
  416. spambtndrp:SetPos( 133, 210 )
  417. spambtndrp:SetConVar( "spamdrptwe" )
  418. spambtndrp:SizeToContents()
  419. function spambtndrp.Button:Paint()
  420. surface.SetDrawColor(128, 128, 128)
  421. surface.DrawRect(0, 0, 100, 100)
  422. if self:GetChecked() then
  423. surface.SetDrawColor(Color( 50, 205, 50 ) )
  424. surface.DrawRect(0, 0, 100, 100)
  425. end
  426. surface.SetDrawColor(Color(100, 100, 100, 255))
  427. surface.DrawOutlinedRect(0, 0, 100, 100)
  428. end
  429.  
  430. local close = vgui.Create( "DButton", menu )
  431. close:SetText( "X" )
  432. close:SetTextColor( Color(255,255,255) )
  433. close:SetPos( 207, 3 )
  434. close:SetSize( 40, 22.5 )
  435. close.Paint = function( self, w, h )
  436. draw.RoundedBox( 0, 0, 0, w, h, Color(255,0,0) )
  437. close.DoClick = function()
  438. menu:Close()
  439. end
  440. end
  441. end)
Add Comment
Please, Sign In to add comment