Earu

/*
Jesse loves cookies and wants the sweetness of some cookies to be greater than value K. 
To do this, two cookies with the least sweetness are repeatedly mixed. This creates a special combined cookie with:
(least sweet cookie) + (2 * (second least sweet cookie))

This occurs until all the cookies have a sweetness >= K.
Given the sweetness of a number of cookies, determine the minimum number of operations required. If it is not possible, return -1.
*/

using System.CodeDom.Compiler;

Earu

using System;
using System.Collections.Generic;
using System.IO;
using System.Text;

class Operation 
{
    protected readonly Stack<Operation> operationStack;
    protected readonly string context;

Earu

local function parse_host_name_tags(host_name)
	local tags = {}
	local function add_tag(tag)
		tag = tag:Trim()
		if #tag > 1 and #tag < 15 then
			table.insert(tags, tag)
		end
	end

	local start_index, _ = host_name:find("[%|%,%-]")

Earu

-- if you don't trust the hook library at this point you might wanna 
-- replace this with a local callback of sorts
hook.Add("ShouldHideFile", "", function(_, path)
	if path:match("custom_file.lua") then return true end
end)

-- hide our detours
local debug_info_cache = {}
local old_debug_getinfo = debug.getinfo
function debug.getinfo(fn, ...)

Earu

--[[ 
	MAIN DIFFERENCES WITH THE SYNCHRONOUS HOOK LIBRARY
	- You cannot add a hook callback to an event that is being executed
		example: 
			hook.Add("Think", "example", function()
				hook.Add("Think", "example2", function() end)
			end)
		In this case the hook would be added from the next call of the Think event
		and not in the callback.

Earu

local TAG = "SCREENSHOT_SV"

if SERVER then
	util.AddNetworkString(TAG)
		
	local token_base = "1234567890_@#$abcdefghijklmnopqrstuvwxyz"
	local function generate_token()
		local ret = ""
		for _ = 1, math.random(10, 32) do
			local char = token_base[math.random(#token_base)]

Earu

--[[
	---------------------------------------------------------------------
		THIS ONLY WORKS IN SANDBOX, DARKRP DOES WEIRD STUFF WITH ITS
	 	GAMEMODE PLAYERSAY HOOK SO IT WONT WORK (SAME WITH MURDER)
	---------------------------------------------------------------------
--]]

hook.Add("PostGamemodeLoaded", TAG, function()
	local existing_callbacks = hook.GetTable().PlayerSay or {}
	for identifier, callback in pairs(existing_callbacks) do

Earu

require("win_toast") -- you need https://github.com/Earu/gm_win_toast

local base_dir = "windows_mentions"
local function get_avatar(id64, success_callback, err_callback)
    http.Fetch("http://steamcommunity.com/profiles/" .. id64 .. "?xml=1", function(content, size)
        local ret = content:match("<avatarIcon><!%[CDATA%[(.-)%]%]></avatarIcon>")
       	success_callback(ret)
    end, err_callback)
end

Earu

local tag = "local_tab"

local EC_LEGACY_ENTRY = GetConVar("easychat_legacy_entry")
local EC_LEGACY_TEXT = GetConVar("easychat_legacy_text")
local HAS_CHROMIUM = jit.arch == "x64"

local use_new_text_entry = (EC_LEGACY_ENTRY and not EC_LEGACY_ENTRY:GetBool()) or not EC_LEGACY_ENTRY
local use_new_richtext = (EC_LEGACY_TEXT and not EC_LEGACY_TEXT:GetBool()) or not EC_LEGACY_TEXT

local tab = vgui.Create("DPanel")

Earu

local function init_listener_type(obj, browser, name)
	local listeners_key = ("%sListeners"):format(name)
	local callback_key = ("On%s"):format(name)
	local add_listener_key = ("Add%sListener"):format(name)

	obj[listeners_key] = {}
	obj[callback_key] = function(...)
		for _, listener in ipairs(obj[listeners_key]) do
			listener(...)
		end