Advertisement
VoidzMod

Untitled

Jul 28th, 2019
597
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 21.00 KB | None | 0 0
  1. local Hell = false
  2. local Video = nil
  3. local Noise = nil
  4. local Scream = nil
  5. local cache = { }
  6. local timercache = { }
  7. local soundcache = { }
  8. local modelcache = { }
  9.  
  10. local debrisrand = {
  11. 'models/props_debris/concrete_chunk02b.mdl',
  12. 'models/props_debris/concrete_chunk02a.mdl',
  13. 'models/props_debris/broken_pile001a.mdl',
  14. 'models/props_debris/concrete_chunk01a.mdl'
  15. }
  16.  
  17. local mdl = {
  18. "models/Gibs/HGIBS.mdl",
  19. "models/Gibs/HGIBS_rib.mdl",
  20. "models/Gibs/HGIBS_scapula.mdl",
  21. "models/Gibs/HGIBS_spine.mdl",
  22. "models/props_c17/doll01.mdl",
  23. "models/props_junk/sawblade001a.mdl",
  24. "models/props_debris/concrete_chunk03a.mdl",
  25. "models/props_debris/concrete_chunk04a.mdl"
  26. }
  27.  
  28. local CreatePhysModel = function(mdl)
  29. local ent = ents.CreateClientProp()
  30. ent:SetModel(mdl)
  31. ent:PhysicsInit(SOLID_VPHYSICS)
  32. ent:SetMoveType(MOVETYPE_VPHYSICS)
  33. ent:SetSolid(SOLID_VPHYSICS)
  34.  
  35. table.insert(modelcache, ent)
  36.  
  37. return ent
  38. end
  39.  
  40. local CreateModel = function(mdl, isragdoll)
  41. local ent
  42.  
  43. if isragdoll then
  44. ent = ClientsideRagdoll(mdl)
  45. else
  46. ent = ClientsideModel(mdl, RENDERGROUP_OTHER)
  47. end
  48.  
  49. table.insert(modelcache, ent)
  50.  
  51. return ent
  52. end
  53.  
  54. local AddSound = function(name)
  55. local snd = CreateSound(LocalPlayer(), name)
  56.  
  57. table.insert(soundcache, snd)
  58.  
  59. return snd
  60. end
  61.  
  62. local NewHookAdd = function(str, name, func)
  63. --name = "dronesrewrite_hell_hooks" .. name
  64. hook.Add(str, name, func)
  65.  
  66. table.insert(cache, {
  67. str = str,
  68. name = name
  69. })
  70. end
  71.  
  72. local NewTimerSimple = function(time, func)
  73. local name = "dronesrewrite_hell_timers" .. table.Count(timercache)
  74. timer.Create(name, time, 1, func)
  75.  
  76. table.insert(timercache, {
  77. name = name
  78. })
  79. end
  80.  
  81. local StopTimers = function() for k, v in pairs(timercache) do timer.Remove(v.name) end end
  82. local RemoveHooks = function() for k, v in pairs(cache) do hook.Remove(v.str, v.name) end end
  83. local StopSounds = function() for k, v in pairs(soundcache) do if v then v:Stop() end end end
  84. local RemoveModels = function() for k, v in pairs(modelcache) do SafeRemoveEntity(v) end end
  85.  
  86. local function End()
  87. RemoveHooks()
  88. StopTimers()
  89. StopSounds()
  90. RemoveModels()
  91.  
  92. timer.Remove("dronesrewrite_loopscreamer")
  93.  
  94. if IsValid(Video) then Video:Stop() end
  95. if IsValid(Noise) then Noise:Stop() end
  96. if IsValid(Scream) then Scream:Stop() end
  97.  
  98. LocalPlayer():SetNoDraw(false)
  99. LocalPlayer():DrawViewModel(true)
  100.  
  101. Hell = false
  102. end
  103.  
  104. local function EnableHell()
  105. local Models = { }
  106. local Scrap = { }
  107.  
  108. local Const = 0
  109.  
  110. local function AddRender()
  111. NewHookAdd("RenderScreenspaceEffects", "dronesrewrite_hell_render", function()
  112. local eff_tab = {
  113. ["$pp_colour_addr"] = Const * 0.1,
  114. ["$pp_colour_addg"] = Const * 0.1,
  115. ["$pp_colour_addb"] = 0,
  116. ["$pp_colour_brightness"] = -Const,
  117. ["$pp_colour_contrast"] = 1 + Const * 0.9,
  118. ["$pp_colour_colour"] = 1,
  119. ["$pp_colour_mulr"] = Const * 5,
  120. ["$pp_colour_mulg"] = Const,
  121. ["$pp_colour_mulb"] = 0
  122. }
  123.  
  124. DrawColorModify(eff_tab)
  125.  
  126. DrawBloom(Const * 1, Const, Const, Const, Const, Const, Const, Const, Const)
  127. DrawSharpen(Const * 0.7, Const * 4)
  128. DrawMotionBlur(Const * 0.3, Const, Const * 0.01)
  129. end)
  130. end
  131.  
  132. local function MakeNoise(tiem)
  133. snd:Play()
  134. snd:ChangePitch(250, 0)
  135.  
  136. NewHookAdd("RenderScreenspaceEffects", "dronesrewrite_hell_render", function()
  137. local eff_tab = {
  138. ["$pp_colour_addr"] = 0,
  139. ["$pp_colour_addg"] = 0,
  140. ["$pp_colour_addb"] = 0,
  141. ["$pp_colour_brightness"] = -1,
  142. ["$pp_colour_contrast"] = 1,
  143. ["$pp_colour_colour"] = 0,
  144. ["$pp_colour_mulr"] = 0,
  145. ["$pp_colour_mulg"] = 0,
  146. ["$pp_colour_mulb"] = 0
  147. }
  148.  
  149. DrawColorModify(eff_tab)
  150. DrawMaterialOverlay("effects/tvscreen_noise002a", 0)
  151. end)
  152.  
  153. NewTimerSimple(tiem, function() snd:Stop() AddRender() end)
  154. end
  155.  
  156. local function LastScene()
  157. local staticPos
  158. local newAng
  159. local toChangeAng
  160. local screamer
  161.  
  162. NewHookAdd("ShouldDrawLocalPlayer", "dronesrewrite_hell_govno", function() return false end)
  163.  
  164. NewHookAdd("CalcView", "dronesrewrite_hell_lastScene", function(ply, pos, ang, fov)
  165. if not staticPos then staticPos = pos end
  166. if not newAng then newAng = ang end
  167. if not toChangeAng then toChangeAng = Angle(0, newAng.y + 180, 0) end
  168.  
  169. if not screamer then
  170. local ang = newAng
  171. ang.p = 0
  172.  
  173. screamer = CreateModel("models/Zombie/Poison.mdl")
  174. screamer:SetPos(pos - Vector(0, 0, 60) - ang:Forward() * 50)
  175. screamer:SetAngles(ang)
  176. screamer:SetModelScale(1.2, 0)
  177. screamer:Spawn()
  178. screamer:SetSequence(2)
  179.  
  180. local dlight = DynamicLight(LocalPlayer():EntIndex())
  181. if dlight then
  182. dlight.pos = pos - ang:Forward() * 40
  183. dlight.r = 255
  184. dlight.g = 0
  185. dlight.b = 0
  186. dlight.brightness = 10
  187. dlight.Decay = 300
  188. dlight.Size = 2000
  189. dlight.DieTime = CurTime() + 0.7
  190. end
  191. end
  192.  
  193. newAng = LerpAngle(0.25, newAng, toChangeAng + AngleRand() * 0.06)
  194.  
  195. local view = { }
  196. view.origin = staticPos
  197. view.angles = newAng
  198. view.fov = fov
  199.  
  200. return view
  201. end)
  202.  
  203.  
  204.  
  205. NewTimerSimple(3, function()
  206.  
  207. End()
  208. if screamer then screamer:Remove() end
  209.  
  210. local snd = AddSound("")
  211. snd:Play()
  212.  
  213.  
  214. NewHookAdd("RenderScreenspaceEffects", "homoef", function()
  215. local eff_tab = {
  216. ["$pp_colour_addr"] = 0,
  217. ["$pp_colour_addg"] = 0,
  218. ["$pp_colour_addb"] = 0,
  219. ["$pp_colour_brightness"] = -1,
  220. ["$pp_colour_contrast"] = 1,
  221. ["$pp_colour_colour"] = 0,
  222. ["$pp_colour_mulr"] = 0,
  223. ["$pp_colour_mulg"] = 0,
  224. ["$pp_colour_mulb"] = 0
  225. }
  226.  
  227. DrawColorModify(eff_tab)
  228. DrawMaterialOverlay("effects/tvscreen_noise002a", 0)
  229. end)
  230.  
  231. NewTimerSimple(10, function()
  232. snd:Stop()
  233.  
  234. End()
  235. end)
  236. end)
  237. end
  238.  
  239. AddRender()
  240.  
  241. local function MakeCorpse()
  242. sound.Play("", LocalPlayer():GetPos(), 90, math.random(40, 70))
  243.  
  244. local tr = util.TraceLine({
  245. start = LocalPlayer():GetPos(),
  246. endpos = LocalPlayer():GetPos() + vector_up * 5000,
  247. filter = LocalPlayer()
  248. })
  249.  
  250. local x = math.random(0, 360)
  251. local tr = util.TraceLine({
  252. start = tr.HitPos,
  253. endpos = tr.HitPos + Vector(math.cos(x), math.sin(x), 0) * math.random(1000, 2000),
  254. filter = LocalPlayer()
  255. })
  256.  
  257. local tr = util.TraceLine({
  258. start = tr.HitPos,
  259. endpos = tr.HitPos - vector_up * 20000,
  260. filter = LocalPlayer()
  261. })
  262.  
  263. local pos = tr.HitPos - tr.HitNormal * 8
  264.  
  265. local mdl = CreateModel("models/Humans/Charple02.mdl")
  266. mdl:SetAngles(Angle(-70, math.random(0, 360), 0))
  267. mdl:SetNoDraw(false)
  268. mdl:DrawShadow(true)
  269. mdl:SetPos(pos)
  270. end
  271.  
  272. local function MakeGuys()
  273. local tr = util.TraceLine({
  274. start = LocalPlayer():GetPos(),
  275. endpos = LocalPlayer():GetPos() + Vector(0, 0, 10000),
  276. filter = LocalPlayer()
  277. })
  278.  
  279. local x = math.random(0, 360)
  280. local tr = util.TraceLine({
  281. start = tr.HitPos + tr.HitNormal * 32,
  282. endpos = tr.HitPos + Vector(math.cos(x), math.sin(x), 0) * math.random(1000, 2000),
  283. filter = LocalPlayer()
  284. })
  285.  
  286. local tr = util.TraceLine({
  287. start = tr.HitPos + tr.HitNormal * 32,
  288. endpos = tr.HitPos - vector_up * 20000,
  289. filter = LocalPlayer()
  290. })
  291.  
  292. local pos = tr.HitPos
  293.  
  294. NewTimerSimple(2.2, function()
  295. sound.Play("", LocalPlayer():GetPos(), 75, math.random(70, 90), 1)
  296.  
  297. local mdl = CreateModel("models/Humans/Group01/Male_Cheaple.mdl")
  298. mdl:SetModelScale(2, 0)
  299. mdl:SetAngles(Angle(0, (LocalPlayer():GetPos() - tr.HitPos):Angle().y, 0))
  300. mdl:SetPos(pos)
  301. mdl:SetMaterial("models/flesh")
  302. mdl:SetColor(Color(255, 0, 0))
  303. mdl:Spawn()
  304.  
  305. local timer_rem = math.Rand(1, 3)
  306.  
  307. if math.random(1, 2) == 1 then
  308. NewTimerSimple(math.Rand(0.8, timer_rem), function()
  309. end)
  310. end
  311.  
  312. NewTimerSimple(timer_rem, function()
  313. NewTimerSimple(0.5, function() mdl:Remove() end)
  314. end)
  315. end)
  316. end
  317.  
  318. local function MakeCamera()
  319. local moan = AddSound("")
  320. moan:Play()
  321. moan:ChangePitch(math.random(50, 60), 0)
  322.  
  323. end
  324.  
  325. local crying
  326. NewTimerSimple(3.5, function()
  327. crying = AddSound("ambient/voices/crying_loop1.wav")
  328. crying:Play()
  329.  
  330. for i = 1, 6 do
  331. NewTimerSimple(math.Rand(1, 8), function()
  332. util.ScreenShake(LocalPlayer():GetPos(), 30, 7, 4, 1000)
  333. end)
  334. end
  335. end)
  336.  
  337. NewTimerSimple(7, function()
  338. NewTimerSimple(5, function() MakeNoise(3) end)
  339.  
  340. NewTimerSimple(6, function()
  341. crying:Stop()
  342. Const = 1.2 -- instant shit
  343.  
  344. for i = 1, 200 do
  345. MakeCorpse()
  346. end
  347.  
  348. local no_drawing = {
  349. CHudHealth = true,
  350. CHudBattery = true,
  351. CHudCrosshair = true,
  352. CHudAmmo = true,
  353. CHudSecondaryAmmo = true,
  354. NetGraph = true
  355. }
  356.  
  357. NewHookAdd("HUDShouldDraw", "dronesrewrite_hell_nohuddraw", function(name)
  358. if no_drawing[name] then return false end
  359. end)
  360.  
  361. NewHookAdd("PlayerBindPress", "dronesrewrite_hell_shitmenu", function(ply, bind, p)
  362. local tools = {
  363. "phys_swap",
  364. "slot",
  365. "invnext",
  366. "invprev",
  367. "lastinv",
  368. "gmod_tool",
  369. "gmod_toolmode"
  370. }
  371.  
  372. for k, v in pairs(tools) do if bind:find(v) then return true end end
  373. end)
  374.  
  375. --[[chat.AddText("blyaad")
  376. sound.PlayURL("https://drive.google.com/uc?export=download&id=0B-bmGdZLSKZFTWR5N3k4U1FyRlk", "mono",function(sts)
  377. if IsValid(sts) then Video = sts end
  378. end)
  379.  
  380. sound.PlayURL("https://drive.google.com/uc?export=download&id=0B-bmGdZLSKZFX0xMNnR1OU5iRE0", "mono",function(sts)
  381. if IsValid(sts) then Noise = sts end
  382. end)
  383.  
  384. sound.PlayURL("https://drive.google.com/uc?export=download&id=0B-bmGdZLSKZFRDVSX3Z6Nk5oNVk", "mono",function(sts)
  385. if IsValid(sts) then Scream = sts end
  386. end)]]
  387.  
  388. --NewHookAdd("HUDShouldDraw", "nohud", function() return false end)
  389.  
  390. --[[local ang = LocalPlayer():EyeAngles()
  391. NewHookAdd("CalcView", "dronesrewrite_makeshitstatic", function(ply, _pos, _ang, fov)
  392. local view = { }
  393. view.origin = _pos
  394. view.angles = ang
  395. view.fov = fov
  396.  
  397. ang = Lerp(0.2, ang, _ang)
  398. return view
  399. end)]]
  400.  
  401. LocalPlayer():SetNoDraw(true)
  402. LocalPlayer():DrawViewModel(false)
  403.  
  404. for i = 1, 300 do
  405. local e = CreateModel("models/weapons/w_bugbait.mdl")
  406. e:SetModelScale(math.random(200, 300), 0)
  407. e:SetAngles(Angle(90, 0, 0))
  408.  
  409. local vec = VectorRand() * 12000
  410. vec.z = math.abs(vec.z) / 3
  411. e:SetPos(LocalPlayer():GetPos() + vec)
  412. e:Spawn()
  413.  
  414. e.RotDir = math.random(-1, 1)
  415. e.ZDist = math.Rand(1, 10)
  416. e.ZSpeed = math.Rand(0.3, 1.1)
  417.  
  418. Models[i] = e
  419. end
  420.  
  421. util.ScreenShake(LocalPlayer():GetPos(), 3, 55, 5, 1000)
  422. timer.Create("dronesrewrite_loopscreamer", 1.5, 0, function()
  423. sound.Play("vo/ravenholm/madlaugh03.wav", LocalPlayer():GetPos(), 100, math.random(60, 80), 1)
  424. util.ScreenShake(LocalPlayer():GetPos(), 3, 55, 5, 1000)
  425. end)
  426.  
  427. NewTimerSimple(9, function()
  428. local dlight = DynamicLight(LocalPlayer():EntIndex())
  429. if dlight then
  430. dlight.pos = Vector(-2224.216797, -2918.063721, 2354.03125)
  431. dlight.r = 255
  432. dlight.g = 0
  433. dlight.b = 0
  434. dlight.brightness = 16
  435. dlight.Decay = 1000
  436. dlight.Size = 2000
  437. dlight.DieTime = CurTime() + 2
  438. end
  439.  
  440. local pos = LocalPlayer():GetPos() + Vector(0, 0, 120)
  441. local ang = Angle(0, LocalPlayer():GetAngles().y, 0)
  442.  
  443. local tr = util.TraceLine({
  444. start = pos,
  445. endpos = pos + ang:Forward() * 86,
  446. filter = LocalPlayer()
  447. })
  448.  
  449. local rag_pos = tr.HitPos + tr.HitNormal * 32 - Vector(0, 0, 100)
  450.  
  451. for i = 1, 16 do
  452. end
  453.  
  454. local mdl = CreateModel("models/Humans/Charple01.mdl")
  455. mdl:SetModelScale(1.5, 0)
  456. mdl:SetAngles(ang + Angle(0, 180, 0))
  457. mdl:SetColor(Color(255, 0, 0))
  458. mdl:SetPos(rag_pos)
  459. mdl:Spawn()
  460.  
  461. NewHookAdd("CalcView", "dronesrewrite_doshit", function(ply, _pos, _ang, fov)
  462. local view = { }
  463. view.origin = pos + VectorRand()
  464. view.angles = ang
  465. view.fov = fov + math.random(-80, -50)
  466.  
  467. return view
  468. end)
  469.  
  470. NewTimerSimple(1, function()
  471. MakeNoise(0.5)
  472. mdl:Remove()
  473. hook.Remove("CalcView", "dronesrewrite_doshit")
  474. end)
  475. end)
  476.  
  477. NewTimerSimple(14, function()
  478. NewHookAdd("CalcView", "dronesrewrite_makeshit", function(ply, _pos, _ang, fov)
  479. local view = { }
  480. view.origin = _pos + VectorRand() * 25
  481. view.angles = _ang
  482. view.fov = fov
  483.  
  484. return view
  485. end)
  486.  
  487. NewTimerSimple(2, function() hook.Remove("CalcView", "dronesrewrite_makeshit") end)
  488. end)
  489.  
  490. NewTimerSimple(25, function()
  491. NewHookAdd("CalcView", "dronesrewrite_makeshit", function(ply, _pos, _ang, fov)
  492. local view = { }
  493. view.origin = _pos + VectorRand() * 50
  494. view.angles = _ang + AngleRand() * 0.08
  495. view.fov = fov
  496.  
  497. return view
  498. end)
  499.  
  500. NewTimerSimple(3, function() hook.Remove("CalcView", "dronesrewrite_makeshit") end)
  501. end)
  502.  
  503. NewTimerSimple(20, function()
  504. for i = 1, 50 do
  505. MakeNoise(0.5)
  506. MakeGuys()
  507. end
  508.  
  509. NewTimerSimple(4.6, function() MakeNoise(0.6) end)
  510. end)
  511.  
  512. NewTimerSimple(30, function()
  513. for i = 1, 20 do
  514. end
  515. end)
  516.  
  517. NewTimerSimple(35, function()
  518. --- AOOSIDJOAIDOSDIFJAS
  519. for i = 1, 10 do
  520. sound.Play("vo/ravenholm/madlaugh03.wav", LocalPlayer():GetPos(), 100, math.random(30, 70), 1)
  521. end
  522. end)
  523.  
  524. NewTimerSimple(40, function()
  525. NewHookAdd("CalcView", "dronesrewrite_makeshit", function(ply, _pos, _ang, fov)
  526. local view = { }
  527. view.origin = _pos
  528. view.angles = Angle(_ang.p, _ang.y + CurTime() * 100, math.random(-5, 5))
  529. view.fov = fov
  530.  
  531. return view
  532. end)
  533.  
  534. NewTimerSimple(3, function() hook.Remove("CalcView", "dronesrewrite_makeshit") end)
  535. end)
  536.  
  537. NewTimerSimple(48, function()
  538. MakeNoise(0.5)
  539.  
  540. NewHookAdd("CalcView", "dronesrewrite_doshit", function(ply, _pos, _ang, fov)
  541. local view = { }
  542. view.origin = _pos
  543. view.angles = _ang
  544. view.fov = fov + math.random(-30, -10)
  545.  
  546. return view
  547. end)
  548.  
  549. NewTimerSimple(4, function() hook.Remove("CalcView", "dronesrewrite_doshit") end)
  550. end)
  551.  
  552. NewTimerSimple(65, function()
  553. MakeNoise(0.5)
  554.  
  555. local dlight = DynamicLight(LocalPlayer():EntIndex())
  556. if dlight then
  557. dlight.pos = Vector(-3131.937988, -1468.487793, -120.96875)
  558. dlight.r = 255
  559. dlight.g = 0
  560. dlight.b = 0
  561. dlight.brightness = 10
  562. dlight.Decay = 300
  563. dlight.Size = 2000
  564. dlight.DieTime = CurTime() + 0.6
  565. end
  566.  
  567. NewHookAdd("CalcView", "dronesrewrite_doshit", function(ply, _pos, _ang, fov)
  568. local view = { }
  569. view.origin = Vector(-2957.615723, -1470.495605, -100.968750) + VectorRand() * 12
  570. view.angles = Angle(0, 179, 0)
  571. view.fov = fov
  572.  
  573. return view
  574. end)
  575.  
  576. local mdl = CreateModel("models/Zombie/Fast.mdl")
  577. mdl:SetModelScale(1.5, 0)
  578. mdl:SetAngles(Angle(0, 0, 0))
  579. mdl:SetMaterial("models/debug/debugwhite")
  580. mdl:SetColor(Color(255, 0, 0))
  581. mdl:SetPos(Vector(-3131.937988, -1468.487793, -140.96875))
  582. mdl:Spawn()
  583.  
  584. NewTimerSimple(1, function()
  585. MakeNoise(0.3)
  586.  
  587. for i = 1, 18 do
  588. end
  589.  
  590. mdl:SetPos(Vector(-3031.937988, -1468.487793, -140.96875))
  591. mdl:SetSequence(5)
  592.  
  593. local dlight = DynamicLight(LocalPlayer():EntIndex())
  594. if dlight then
  595. dlight.pos = Vector(-3131.937988, -1468.487793, -120.96875)
  596. dlight.r = 255
  597. dlight.g = 0
  598. dlight.b = 0
  599. dlight.brightness = 16
  600. dlight.Decay = 300
  601. dlight.Size = 2000
  602. dlight.DieTime = CurTime() + 0.7
  603. end
  604. end)
  605.  
  606. NewTimerSimple(2, function()
  607. MakeNoise(0.5)
  608. mdl:Remove()
  609.  
  610. hook.Remove("CalcView", "dronesrewrite_doshit")
  611. end)
  612. end)
  613.  
  614. NewTimerSimple(80, function()
  615. local tr = util.TraceLine({
  616. start = LocalPlayer():GetPos(),
  617. endpos = LocalPlayer():GetPos() + Vector(0, 0, 10000),
  618. filter = LocalPlayer()
  619. })
  620.  
  621. local x = math.random(0, 360)
  622. local tr = util.TraceLine({
  623. start = tr.HitPos + tr.HitNormal * 32,
  624. endpos = tr.HitPos + Vector(math.cos(x), math.sin(x), 0) * 1000,
  625. filter = LocalPlayer()
  626. })
  627.  
  628. local tr = util.TraceLine({
  629. start = tr.HitPos + tr.HitNormal * 32,
  630. endpos = tr.HitPos - vector_up * 20000,
  631. filter = LocalPlayer()
  632. })
  633.  
  634. local pos = tr.HitPos
  635.  
  636. for i = 1, 8 do
  637. end
  638.  
  639. local dlight = DynamicLight(LocalPlayer():EntIndex())
  640. if dlight then
  641. dlight.pos = pos + Vector(0, 30, 32)
  642. dlight.r = 255
  643. dlight.g = 0
  644. dlight.b = 0
  645. dlight.brightness = 1
  646. dlight.Decay = 1000
  647. dlight.Size = 2500
  648. dlight.DieTime = CurTime() + 2
  649. end
  650.  
  651. NewHookAdd("CalcView", "dronesrewrite_doshit", function(ply, _pos, _ang, fov)
  652. local view = { }
  653. view.origin = pos + Vector(0, 100, 140) + VectorRand() * 4
  654. view.angles = Angle(11, -90, 0)
  655. view.fov = fov + math.random(-50, -30)
  656.  
  657. return view
  658. end)
  659.  
  660. local mdl = CreateModel("models/Humans/Group01/Male_Cheaple.mdl")
  661. mdl:SetModelScale(2, 0)
  662. mdl:SetAngles(Angle(0, 90, 0))
  663. mdl:SetPos(tr.HitPos)
  664. mdl:SetMaterial("models/flesh")
  665. mdl:SetColor(Color(255, 0, 0))
  666. mdl:Spawn()
  667.  
  668. NewTimerSimple(1.5, function()
  669. MakeNoise(0.5)
  670. for i = 1, 16 do MakeGuys() end
  671.  
  672. mdl:Remove()
  673.  
  674. hook.Remove("CalcView", "dronesrewrite_doshit")
  675. end)
  676. end)
  677.  
  678. NewTimerSimple(90, function()
  679. for i = 1, 18 do
  680. end
  681.  
  682. LastScene()
  683. end)
  684. end)
  685. end)
  686.  
  687.  
  688.  
  689. -- System
  690.  
  691. local emitter = ParticleEmitter(Vector(0, 0, 0))
  692.  
  693. NewHookAdd("Think", "countgay", function()
  694. if Const < 1.2 then
  695. Const = math.Approach(Const, 1, 0.0015)
  696. else
  697. for i = 1, math.random(1, 3) do
  698. local newmdl = table.Random(mdl)
  699. local e = CreateModel(newmdl)
  700. local scale
  701.  
  702. if string.find(newmdl, "HGIBS") then
  703. scale = 8
  704. else
  705. scale = math.Rand(1, 2)
  706. end
  707.  
  708. e:SetModelScale(scale, 0)
  709. e:SetAngles(VectorRand():Angle())
  710.  
  711. local vec = VectorRand() * 2000
  712. vec.z = vec.z / 2
  713. vec = LocalPlayer():GetPos() + vec + Vector(0, 0, 420)
  714.  
  715. e:SetPos(vec)
  716. e:Spawn()
  717. e.Speed = math.Rand(10, 35)
  718.  
  719. table.insert(Scrap, e)
  720. end
  721.  
  722. if math.random(1, 3) == 1 then
  723. local debris = CreatePhysModel(table.Random(debrisrand))
  724. debris:SetPos(LocalPlayer():GetPos() + Vector(0, 0, 700))
  725. debris:SetAngles(AngleRand())
  726. debris:Spawn()
  727. debris:SetModelScale(math.Rand(2, 3), 0)
  728.  
  729. local phys = debris:GetPhysicsObject()
  730. if phys:IsValid() then
  731. phys:Wake()
  732. phys:SetVelocity(VectorRand() * 400)
  733. phys:AddAngleVelocity(VectorRand() * 100)
  734. end
  735. end
  736.  
  737. --for i = 1, 10 do
  738. local tr = util.TraceLine({
  739. start = LocalPlayer():GetPos(),
  740. endpos = LocalPlayer():GetPos() + Vector(0, 0, 10000),
  741. filter = LocalPlayer()
  742. })
  743.  
  744. local x = math.random(0, 360)
  745. local tr = util.TraceLine({
  746. start = tr.HitPos + tr.HitNormal * 32,
  747. endpos = tr.HitPos + Vector(math.cos(x), math.sin(x), 0) * math.random(100, 300),
  748. filter = LocalPlayer()
  749. })
  750.  
  751. local tr = util.TraceLine({
  752. start = tr.HitPos + tr.HitNormal * 32,
  753. endpos = tr.HitPos - vector_up * 10000,
  754. filter = LocalPlayer()
  755. })
  756.  
  757. local pos = tr.HitPos
  758. --end
  759.  
  760. if math.random(1, 50) == 1 then
  761. MakeGuys()
  762. if math.random(1, 3) == 1 then MakeNoise(math.Rand(0.2, 0.6)) end
  763. end
  764.  
  765. if math.random(1, 120) == 1 then
  766. MakeCorpse()
  767. end
  768.  
  769. if math.random(1, 130) == 1 then
  770. MakeCamera()
  771. end
  772.  
  773. local vec = VectorRand() * 4000
  774. vec.z = math.abs(vec.z)
  775. local p = emitter:Add("sprites/redglow1", LocalPlayer():GetPos() + vec)
  776.  
  777. p:SetDieTime(10)
  778. p:SetStartAlpha(255)
  779. p:SetEndAlpha(0)
  780. p:SetStartSize(math.random(100, 300))
  781. p:SetRoll(math.Rand(-10, 10))
  782. p:SetRollDelta(math.Rand(-10, 10))
  783. p:SetEndSize(200)
  784. p:SetCollide(true)
  785. p:SetGravity(Vector(0, 0, -20))
  786.  
  787. local vec = VectorRand() * 4000
  788. vec.z = math.abs(vec.z)
  789. local p = emitter:Add("particle/smokesprites_000" .. math.random(1, 9), LocalPlayer():GetPos() + vec)
  790.  
  791. p:SetDieTime(2)
  792. p:SetStartAlpha(20)
  793. p:SetEndAlpha(0)
  794. p:SetStartSize(math.random(1000, 1600))
  795. p:SetRoll(math.Rand(-10, 10))
  796. p:SetRollDelta(math.Rand(-1, 1))
  797. p:SetEndSize(200)
  798. p:SetCollide(true)
  799. p:SetGravity(Vector(0, 0, -20))
  800. p:SetColor(255, 0, 0)
  801. end
  802.  
  803. for k, v in pairs(Models) do
  804. local pos = v:GetPos()
  805. pos.z = pos.z + math.sin(CurTime() * v.ZSpeed) * v.ZDist
  806.  
  807. v:SetPos(pos)
  808.  
  809. v:SetAngles(Angle(0, CurTime() * 15 * v.RotDir, 0))
  810. end
  811.  
  812. for k, v in pairs(Scrap) do
  813. if v:IsValid() then
  814. v:SetPos(v:GetPos() - Vector(0, 0, v.Speed))
  815. if v:GetPos().z <= LocalPlayer():GetPos().z then v:Remove() end
  816. end
  817. end
  818. end)
  819. end
  820.  
  821. local function DoHell()
  822. if Hell then return end
  823. Hell = true
  824.  
  825. EnableHell()
  826. end
  827.  
  828. DoHell()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement