{"id":"2ZBQu7Qb2m","url":"https://pastebin.ca/2ZBQu7Qb2m","raw_url":"https://raw.anybin.ca/2ZBQu7Qb2m","visibility":"public","access":"public","created_at":1785526172967,"expires_at":null,"fetch_limit":null,"fetches_used":0,"reads_remaining":null,"size_bytes":4164,"syntax_hint":"lua","title":"the rake bypass","filename":"Adonisbypass.txt","change_note":null,"cipher":null,"cipher_meta":null,"parent_id":null,"root_id":"2ZBQu7Qb2m","version":1,"owner_id":"06FVGGH7H07JCVQ2GRC90NCMZR","recipient_id":null,"body":"-- ============================================================\n-- Adonis 反作弊绕过脚本（一次性执行）\n-- 用法：直接运行此脚本，控制台会输出绕过结果\n-- 依赖：getgc, hookfunction, debug.info, newcclosure 等特权函数\n-- ============================================================\n\nlocal function resolveAdonisEnv()\n    local gc = getgc or (debug and debug.getgc)\n    local hookf = hookfunction\n    local env = getrenv\n    local renv = nil\n    if type(env) == \"function\" then\n        pcall(function()\n            renv = env()\n        end)\n    end\n    local dbgInfo = (type(renv) == \"table\" and renv.debug and renv.debug.info) or (debug and debug.info)\n    local newcc = newcclosure or function(fn)\n        return fn\n    end\n    local typeOf = typeof or function(value)\n        return type(value)\n    end\n    return gc, hookf, env, dbgInfo, newcc, typeOf\nend\n\nlocal function eachAdonisGc(fn)\n    local gc = getgc or (debug and debug.getgc)\n    if type(gc) ~= \"function\" then\n        return false\n    end\n    local ok, list = pcall(gc, true)\n    if not ok or type(list) ~= \"table\" then\n        return false\n    end\n    for _, value in next, list do\n        local stop = fn(value)\n        if stop then\n            return true\n        end\n    end\n    return true\nend\n\n-- 强制检测成功，使绕过逻辑始终执行（也可改为真实扫描）\nlocal function detectAdonis()\n    return true\nend\n\nlocal function bypassAdonis()\n    local gc, hookf, env, dbgInfo, newcc, typeOf = resolveAdonisEnv()\n    if not (type(gc) == \"function\" and type(hookf) == \"function\" and type(env) == \"function\" and type(dbgInfo) == \"function\") then\n        print(\"[!] 缺少必要函数，无法绕过\")\n        return false\n    end\n\n    local DetectedMeth, KillMeth\n    -- 扫描 GC 对象，寻找 Adonis 表\n    eachAdonisGc(function(value)\n        if typeOf(value) == \"table\" then\n            local detected = rawget(value, \"Detected\")\n            local kill = rawget(value, \"Kill\")\n            if typeOf(detected) == \"function\" and not DetectedMeth then\n                DetectedMeth = detected\n                pcall(function()\n                    hookf(DetectedMeth, function(methodName, methodFunc)\n                        -- 使 Detected 方法返回 true（表示未检测到作弊）\n                        return true\n                    end)\n                    print(\"[+] 已挂钩 Detected 方法\")\n                end)\n            end\n            if rawget(value, \"Variables\") and rawget(value, \"Process\") and typeOf(kill) == \"function\" and not KillMeth then\n                KillMeth = kill\n                pcall(function()\n                    hookf(KillMeth, function(killFunc)\n                        -- 使 Kill 方法空转，阻止踢出/封禁\n                    end)\n                    print(\"[+] 已挂钩 Kill 方法\")\n                end)\n            end\n            if DetectedMeth and KillMeth then\n                return true -- 停止扫描\n            end\n        end\n    end)\n\n    -- 额外保护：挂钩 debug.info 防止调用栈检测\n    if DetectedMeth and dbgInfo then\n        local old\n        pcall(function()\n            old = hookf(dbgInfo, newcc(function(...)\n                local functionName = ...\n                if functionName == DetectedMeth then\n                    return coroutine.yield(coroutine.running())\n                end\n                return old(...)\n            end))\n            print(\"[+] 已挂钩 debug.info 防止调用栈检测\")\n        end)\n    end\n\n    if DetectedMeth and KillMeth then\n        return true\n    elseif DetectedMeth then\n        return true -- 至少挂钩了 Detected，也算部分成功\n    else\n        print(\"[!] 未找到 Adonis 模块，绕过可能不完整\")\n        return false\n    end\nend\n\n-- ============================================================\n-- 执行绕过\n-- ============================================================\nprint(\"[*] 开始 Adonis 绕过...\")\nlocal ok, result = pcall(bypassAdonis)\nif ok and result then\n    print(\"[✓] Adonis 绕过成功！\")\nelse\n    print(\"[✗] Adonis 绕过失败：\" .. tostring(result))\nend"}