This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| hook = include "newhook.lua" |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| local function wait_png(matstr) | |
| local html = vgui.Create("DHTML") | |
| html:AddFunction("console", "memeify", function() | |
| html.done = true | |
| end) | |
| local mat = Material(matstr) | |
| local rw, rh = mat:GetInt "$realwidth", mat:GetInt "$realheight" | |
| local f = file.Open("materials/"..matstr, "rb", "GAME") | |
| local cont = f:Read(f:Size()) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| local surface = surface | |
| local draw = draw | |
| local Color = Color | |
| surface.CreateFont("MaterialMeepen", { | |
| font = "Tahoma", | |
| size = 13, | |
| weight = 500, | |
| antialias = true, | |
| extended = true |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| local bytecodes = {} | |
| local BC, run_function = {} | |
| local VARG_CONST = {} | |
| local lujlu_mt_funcs | |
| local lujlu_cache = setmetatable({}, {__mode = "k"}) | |
| local lujlu_identifier_mt = { | |
| __tostring = function(self) | |
| return tostring(lujlu_cache[self].data) | |
| end, |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| local red = Color(255,0,0) | |
| local green = Color(0,255,0) | |
| local function log(color,s) | |
| MsgC(color,s .. "\n") | |
| end | |
| function mdmp(out) | |
| local files,_ = file.Find("*.mdmp","BASE_PATH") | |
| if out then log(red,"Found " .. #files .. " files!") end |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| function render.CreateOutlineData(length, passes, color) | |
| local step = length * 2 / 2 ^ (math.Round(passes) - 1) | |
| local matrices = {} | |
| for coord = -length, length, step do | |
| matrices[#matrices + 1] = Matrix() | |
| matrices[#matrices]:Translate(Vector(0, 0, coord)) | |
| matrices[#matrices + 1] = Matrix() |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| /////////////////////////////////////////////////////////// | |
| // <DodgerSky> skin created by OmegaExtern. | |
| // Quick rewrite of the skin I have lost a few days ago. | |
| // Originally written for Garry's Mod game. | |
| // | |
| // Installation: | |
| // Copy this file into the following folder: [Steam installation directory]\steamapps\common\GarrysMod\garrysmod\resource. | |
| /////////////////////////////////////////////////////////// | |
| // Tracker scheme resource file | |
| // |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| setmetatable(_ENV, { __index=lpeg }) | |
| Scopes = { {} } | |
| function eval_expr(expr) | |
| local accum = eval(expr[2]) -- because 1 is "expr" | |
| for i = 3, #expr, 2 do | |
| local operator = expr[i] | |
| local num2 = eval(expr[i+1]) |
This file contains hidden or bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| -- Global 'nil' value | |
| NIL = {} | |
| -- Localise for faster access | |
| local pcall = pcall | |
| local string_len = string.len | |
| local string_sub = string.sub | |
| local string_find = string.find |