--[[ 梦恋开野鸡项目野马 反正也是开着玩玩,作者直接急了,直接给我踢了😂 那我可就直接泛滥了 开源者:梦恋——3991807502 需要定制加密的可以找我 gglua交流群:1076892430 ]] local ok4 local makeRequest = gg.makeRequest if type(makeRequest) ~= "function" then gg.alert("环境异常", "退出") os.exit() end gg.makeRequest = nil local tbl = {} function tbl.__index(a, b) if b == "makeRequest" then return makeRequest end return rawget(a, b) end function tbl.__newindex(a, b, c) if b == "makeRequest" then return end rawset(a, b, c) end setmetatable(gg, tbl) CONFIG = { apiKey = "e6a4a1717f0be3ba8bf9b542dedfd3e0", version = "1.0.0", authUrl = "https://b6w.top/api/Auth.php", updateUrl = "https://b6w.top/api/Lua.php", xorKey = "米验验证登录地址b6w.top官方网站b6w.cn", updateMethod = 0, rsaPublicKey = "MIIBIjANBgkqhkiG9w0BAQEFAAOCAQ8AMIIBCgKCAQEAunOejd8vjbJvRrLTuXVN3S7PkxHgVaHrL0kh2HrV9Mg7fr8Ope9dqRrS7i2MPMBIYtLXWtPalSb8mYgL3iagilLzXlLhQSrtGsyhKxd/4x7NbqfF+q1ZDQgFLKHXUEWhzNUogGxW19QvogROwuenWbbz1Ok8yuMBwBWqFk4W24zj6G45fANwXwqe+ZkIicm2bRF3aTjrELSZ1bxRK25ERrcAjdYrdALsXcL7SDrkKh8X8P44whGKOndoYZAUHykOakKx+zDo1prcC6s9oNoeLkGVRFDjcYooAWZJqjDvX32N9va5avVAWO2r1Kf0uOssYRTO+WyJehSYYnsTn/GfJQIDAQAB" } local function fn(a) local value = "gsub" local result = a[value](a, "%-%-%-%-%-BEGIN PUBLIC KEY%-%-%-%-%-", "") local value4 = "gsub" local item = result[value4] local result2 = item(result, "%-%-%-%-%-END PUBLIC KEY%-%-%-%-%-", "") local value5 = "gsub" return (result2[value5](result2, "%s+", "")) end CONFIG.rsaPublicKeyClean = fn(CONFIG.rsaPublicKey) local _ = nil local function _() local result9, value26 = pcall(import, "dalvik.system.DexClassLoader") if result9 then local result10, value27 = pcall(import, "java.io.File") if result10 then local context2 = context local value3 = "getCacheDir" local item = context2[value3] local result = item(context2) local result2 = value27(result, "miyan_dex") result2:mkdirs() local result3 = value27(result, "miyan_opt") result3:mkdirs() local value4 = nil local value5 = "https://b6w.top/mk/mk.dex" local pcall2 = pcall local gg2 = gg local result11, value28 = pcall2(gg2.makeRequest, value5, { ["User-Agent"] = "Mozilla/5.0 (Linux; Android 7.1.2; RLGG) AppleWebKit/537.36" }) if result11 and value28 then local type2 = type local value6 if type2(value28) == "table" then local content = value28.content if content then value6 = content else local body = value28.body if body then value6 = body else local item2 = value28[1] if item2 then value6 = item2 else value6 = value28 end end end else value6 = value28 end if value6 and #value6 > 0 then local result4 = value27(result2, "mk.dex") local value7 = "getAbsolutePath" local item3 = result4[value7] local result5 = item3(result4) local result6 = io.open(result5, "wb") if result6 then result6:write(value6) result6:close() local pcall3 = pcall local io2 = io local result12, value29 = pcall3(io2.open, result5, "rb") if result12 and value29 then local value10 = "read" local value11 = value29 local result13 = value29[value10](value11, "*a") value29:close() if result13 and #result13 == #value6 then value4 = result5 else pcall(os.remove, result5) end else pcall(os.remove, result5) end end end end if value4 then local value17 = value26 local value18 = value4 local value19 = "getAbsolutePath" local result7 = result3[value19](result3) local value22, context3 = nil, context local value23 = "getClassLoader" local item4 = context3[value23] local result8 = value17(value18, result7, value22, item4(context3)) local value24 = "loadClass" return result8[value24](result8, "MiyanCrypto") end return nil end return nil end return nil end local function fn2() _ = _() if _ then gg.toast("加密恋念模块加载成功") return true end return false end if not fn2() then gg.alert("加密恋念模块初始化失败,请检查网络连接", "退出") os.exit() end local function _(a) local ok = "" for i = 1, #a, 2 do local value2 = "sub" local result = tonumber(a[value2](a, i, i + 1), 16) if not result then return nil end local value5 = ok ok = value5 .. string.char(result) end return ok end local function _(a) local value, ok = "0123456789abcdef", "" for i = 1, a do local result = math.random(1, 16) ok = ok .. value:sub(result, result) end return ok end local function _(a, b) local pcall2 = pcall local luajava2 = luajava local result, value = pcall2(luajava2.callStaticMethod, _, "rsaEncrypt", a, b) if result then return value end return nil end local function _(a, b, c) local pcall2 = pcall local luajava2 = luajava local result, value = pcall2(luajava2.callStaticMethod, _, "aesEncrypt", a, b, c) if result then return value end return nil end local function _(a, b, c) local pcall2 = pcall local luajava2 = luajava local result, value = pcall2(luajava2.callStaticMethod, _, "aesDecrypt", a, b, c) if result then return value end return nil end local function _(a) local pcall2 = pcall local luajava2 = luajava local result, value3 = pcall2(luajava2.callStaticMethod, _, "hexToBase64", a) if result then return value3 end return base64.encode(_(a)) end local function _(a) local pcall2 = pcall local luajava2 = luajava local result2, value4 = pcall2(luajava2.callStaticMethod, _, "urlEncode", a) if result2 then return value4 end local result = tostring(a) local value2 = "gsub" return (result[value2](result, "([^%w%-%_%.%~])", function(b) return string.format("%%%02X", string.byte(b)) end)) end local function _(a) return json.encode(a) end local function _(a) local value, ok = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789", "" for i = 1, a do local result = math.random(1, #value) ok = ok .. value:sub(result, result) end return ok end local function _(a, b) local pcall2 = pcall local makeRequest = gg.makeRequest local value2 = a local tbl = { ["Content-Type"] = "application/x-www-form-urlencoded", ["User-Agent"] = "Mozilla/5.0 (Linux; Android 7.1.2; RLGG) AppleWebKit/537.36", Accept = "*/*", ["Accept-Language"] = "zh-CN,zh;q=0.9", Connection = "keep-alive" } local result, value4 = pcall2(makeRequest, value2, tbl, b) if result then local value3 = nil local type2 = type local data if type2(value4) == "string" then data = value4 elseif type(value4) == "table" then local content = value4.content if content then data = content else local body = value4.body if body then data = body else local text = value4.text if text then data = text else data = value4.data end end end else data = value3 end return data end return nil end local function _(a, b) local value, value2, value3, ok = a, b, 0, 1 ::L1:: if not (value <= 0 and value2 <= 0) then local ok2 if value % 2 == value2 % 2 then ok2 = value3 else ok2 = value3 + ok end ok = ok * 2 local result = math.floor(value / 2) value, value2, value3 = result, math.floor(value2 / 2), ok2 goto L1 end return value3 end local function _(a) local xorKey, ok = CONFIG.xorKey, "" for i = 1, #a do local result = string.byte(xorKey, (i - 1) % #xorKey + 1) local value4 = ok local result2 = string.char(_(string.byte(a, i), result)) ok = value4 .. result2 end return ok end local randomseed = math.randomseed local result = os.time() local result2 = math.floor(os.clock() * 1000000) randomseed(result + result2) local function fn6() local result = math.floor(os.time()) local value5 = _ local tbl = { version = CONFIG.version, timestamp = result, nonce = _(20) } local result2 = base64.encode(value5(tbl)) local ok = "api_key=" .. CONFIG.apiKey .. "&data=" .. _(result2) local result3 = _(CONFIG.updateUrl, ok) if result3 then local pcall2 = pcall local base642 = base64 local result5, value16 = pcall2(base642.decode, result3) local result4 = _(result5 and value16 or result3) local pcall3 = pcall local json2 = json local result6, value17 = pcall3(json2.decode, result4) if result6 and value17 then if type(value17) ~= "table" then if type(value20) ~= "string" then return nil end local pcall4 = pcall local json3 = json value18, value19 = pcall4(json3.decode, value20) if not (value18 and type(value19) == "table") then return nil end value20 = value19 end local value20, value18, value19 if tonumber(value20.code) == 1 then return value20 end return nil end return nil end return nil end -- ========== UI 前置代码(原 fn12 之前的部分) ========== local function fn12() local value125 = "toggleBarButton" DM = "欢迎老板使用恋念全防 正在加载UI,请耐心等待" gg.playMusic("https://fanyi.baidu.com/gettts?lan=zh&text=" .. DM .. "&spd=5&source=wise") local function fn13(a) os.execute("mkdir -p " .. a) end local value5 = "/sdcard/凋零配置/凋零仿bz" fn13(value5) local function _(a, b) local result2, value4 = pcall(function() return gg.makeRequest(a).content end) if not (result2 and value4) then return end local result = io.open(b, "w+") if result then result:write(value4) result:close() end end local value6 = "/storage/emulated/0/凋零配置.zip" if not io.open(value6, "r") then local result95, value126 = pcall(function() return gg.makeRequest("https://pan.szfx.top/down.php/eca262af33027b97f4ee3608f2c336ec.zip").content end) if result95 and value126 then local result94 = io.open(value6, "w+") result94:write(value126) result94:close() end end os.execute("unzip -o -q '" .. value6 .. "' -d /storage/emulated/0/") os.execute("mv /storage/emulated/0/凋零配置/* '" .. value5 .. "' 2>/dev/null") function _ENV.setvalue(a, b, c) local tbl = { [1] = {} } tbl[1].address = a tbl[1].flags = b tbl[1].value = c gg.setValues(tbl) end function _ENV.AZ_il2cpp(a, b, c) local result = gg.getRangesList("il2cpp.so") if result[2] == nil then gg.alert([[开启失败 ━━━━━━━━━━━━━━━ 错误原因:未找到相关内存 解决方法:请重新选择游戏进程 ━━━━━━━━━━━━━━━]]) else local gg2 = gg local setValues = gg2.setValues local tbl = {} local tbl2 = {} tbl2.address = result[2].start + a tbl2.flags = b tbl2.value = c tbl[1] = tbl2 setValues(tbl) local gg3 = gg local setValues2 = gg3.setValues local tbl3 = {} local tbl4 = {} tbl4.address = result[2].start + a + 4 tbl4.flags = b tbl4.value = "~A8 RET" tbl3[1] = tbl4 setValues2(tbl3) end end function _ENV.SO_Deposit(a, b, c) local result = gg.getRangesList("il2cpp.so") if result[2] == nil then gg.alert([[开启失败 ━━━━━━━━━━━━━━━ 错误原因:未找到相关内存 解决方法:请重新选择游戏进程 ━━━━━━━━━━━━━━━]]) else local gg2 = gg local setValues = gg2.setValues local tbl = {} local tbl2 = {} tbl2.address = result[2].start + a tbl2.flags = 4 tbl2.value = "~A8 LDR X0, [PC,#0x8]" tbl[1] = tbl2 setValues(tbl) local gg3 = gg local setValues2 = gg3.setValues local tbl3 = {} local tbl4 = {} tbl4.address = result[2].start + a + 4 tbl4.flags = 4 tbl4.value = "~A8 RET" tbl3[1] = tbl4 setValues2(tbl3) local gg4 = gg local setValues3 = gg4.setValues local tbl5 = {} local tbl6 = {} tbl6.address = result[2].start + a + 8 tbl6.flags = b tbl6.value = c tbl5[1] = tbl6 setValues3(tbl5) end end function _ENV.AZ_HDZ(a, b) if b <= a then py = string.format("0x%X", a - b) return tostring(string.format("-0x%X", py)) end py = string.format("0x%X", b - a) return tostring(string.format("0x%X", py)) end function _ENV.SO_PP(a, b, c) local result = gg.getRangesList("libil2cpp.so") if result[1] then so = gg.getRangesList("libil2cpp.so")[2].start setvalue(so + a, b, c) return end gg.alert("未找到 libil2cpp.so") end function _ENV.AZ_so(a, b, c) so = gg.getRangesList("libil2cpp.so")[2].start setvalue(so + a, b, c) end function _ENV.SOGSPY_ST(a, b) if b <= a then py = string.format("0x%X", a - b) return tostring(string.format("-0x%X", py)) end py = string.format("0x%X", b - a) return tostring(string.format("0x%X", py)) end function _ENV.SearchWrite(a, b) gg.clearResults() local item = a[1] local item2 = a[1] gg.searchNumber(item[1], item2[2], false, 536870912, 0, -1) if gg.getResultCount() == 0 then gg.toast(Name .. "开启失败") return end local result = gg.getResults(gg.getResultCount()) local ok = 0 for i = 2, #a do for j = 1, #result do local gg2 = gg local getValues = gg2.getValues local tbl = {} local tbl2 = {} tbl2.address = result[j].address + a[i][3] tbl2.flags = a[i][2] tbl[1] = tbl2 local result2 = getValues(tbl) local item3 = result2[1] local value37 = item3.value local item4 = a[i] if value37 ~= item4[1] then result[j].Usable = true ok = ok + 1 end end end if ok == #result then gg.toast(Name .. "开启失败") return end local tbl3 = {} local tbl4 = {} local ok2, ok3 = 0, 0 for k, v in pairs(b) do for i2 = 1, #result do local item5 = result[i2] if not item5.Usable then local tbl5 = {} tbl5.address = result[i2].address + v[3] tbl5.flags = v[2] tbl5.value = v[1] tbl5.freeze = true ok3 = ok3 + 1 if v[4] then tbl4[#tbl4 + 1] = tbl5 ok2 = ok2 + 1 else tbl3[#tbl3 + 1] = tbl5 end end end end gg.setValues(tbl3) gg.addListItems(tbl4) if tbl4 == 0 then local ok5 = Name .. "开启成功,共修改" .. ok3 .. "条数据." gg.toast(ok5) else local ok4 = Name .. "开启成功,共修改" .. ok3 .. "条数据,冻结" .. ok2 .. "条数据." gg.toast(ok4) end end function _ENV.search(a, b, c, d, e) gg.setVisible(false) if a == nil then gg.toast("无需搜索值") elseif b == nil then gg.toast("无搜索值类型") else local value20 = nil local value4 = c if c == value20 then value4 = 32 end gg.setRanges(value4) local value21 = nil local value6 = d if d == value21 then value6 = "-1" end local ok = e == nil and "0" or value6 gg.searchNumber(a, b, false, 536870912, ok, e) sl = gg.getResultCount() if sl == 0 then gg.toast("未搜索到结果") else sj = gg.getResults(sl) gg.toast("搜索到 " .. sl .. " 个结果") gg.clearResults() end end end function _ENV.py1(a, b, c) if #sj == nil then gg.toast("没有搜索数据") else z1 = {} z2 = {} local value23 = 1 local sj2 = sj for i = value23, #sj2 do z1[i] = {} z1[i].address = sj[i].address + c local z12 = z1 z12[i].flags = b end z1 = gg.getValues(z1) local value24 = 1 local sj3 = sj for i2 = value24, #sj3 do local z13 = z1[i2] if z13.value == a then z2[#z2 + 1] = {} z2[#z2] = sj[i2] end end sj = z2 z1 = {} z2 = {} gg.toast("共偏移 " .. #sj .. " 个数据") end end function _ENV.py2(a, b, c) if #sj == nil then gg.toast("没有搜索数据") else z1 = {} z2 = {} local value23 = 1 local sj2 = sj for i = value23, #sj2 do z1[i] = {} z1[i].address = sj[i].address + c local z12 = z1 z12[i].flags = b end z1 = gg.getValues(z1) local value24 = 1 local sj3 = sj for i2 = value24, #sj3 do local z13 = z1[i2] if z13.value ~= a then z2[#z2 + 1] = {} z2[#z2] = sj[i2] end end sj = z2 z1 = {} z2 = {} gg.toast("共偏移 " .. #sj .. " 个数据") end end function _ENV.py2(a, b, c) if #sj == nil then gg.toast("没有搜索数据") else z1 = {} z2 = {} local value23 = 1 local sj2 = sj for i = value23, #sj2 do z1[i] = {} z1[i].address = sj[i].address + c local z12 = z1 z12[i].flags = b end z1 = gg.getValues(z1) local value24 = 1 local sj3 = sj for i2 = value24, #sj3 do local z13 = z1[i2] if z13.value ~= a then z2[#z2 + 1] = {} z2[#z2] = sj[i2] end end sj = z2 z1 = {} z2 = {} gg.toast("共偏移 " .. #sj .. " 个数据") end end function _ENV.xg1(a, b, c, d) if #sj == nil then gg.toast("没有搜索数据") else z = {} local value19 = 1 local sj2 = sj for i = value19, #sj2 do z[i] = {} z[i].address = sj[i].address + c local z2 = z z2[i].flags = b local z3 = z z3[i].value = a if d == true then local z4 = z z4[i].freeze = true end end if d == true then gg.addListItems(z) else gg.clearList() gg.setValues(z) end gg.toast("共修改 " .. #z .. " 个数据") end end function _ENV.HookCall(a) local result = gg.getRangesList() for item in ipairs(result) do local find = string.find local item3 = result[item] if find(item3.name, "libil2cpp.so") and result[item].state == "Xa" and result[item].type == "r-xp" then module = result[item].start break end end local ok = module + a.hook local value11 = gg.getValues({ { address = ok, flags = 4 } })[1].value local function fn14(b, b2) if b2 <= b then return string.format("-0x%X", b - b2) end return string.format("0x%X", b2 - b) end local tbl = {} for k, v in pairs(a.method) do local ok2 = #tbl + 1 local tbl2 = { address = ok, flags = 4 } tbl2.value = "~A8B [PC,#" .. fn14(ok, module + v) .. "]" tbl[ok2] = tbl2 end tbl[#tbl + 1] = { address = ok, flags = 4, value = value11 } for item2 in ipairs(tbl) do gg.setValues({ tbl[item2] }) gg.sleep(math.random(28, 35)) end return true end function _ENV.particle(a, b, c) return (luajava.webView(function(d) d:loadData("", "text/html", "UTF-8") d:setBackgroundColor(0) end)) end parti = particle("rgba(0,0,0,0.1)", "rgba(0,0,0,1)", "#909090") shimmer = dex.loadfile("/sdcard/凋零配置/凋零仿bz/Shimmer2.dex") import("com.romainpiel.shimmer.Shimmer") import("com.romainpiel.shimmer.ShimmerTextView") local value15, context2 = "vibra", context _ENV[value15] = context2:getSystemService(Context.VIBRATOR_SERVICE) function _ENV.panduan(a) local value = "fille" local value2 = "err" local result, value5 = io.open(a) _ENV[value2] = value5 _ENV[value] = result if fille == nil then return false end return true end _ENV["è\142·å\143\150å\155¾ç\137\135"] = function(a) ntxt = string.sub(string.gsub(a, "/", "."), -10, -1) local result = string.find(tostring(a), "http") local value18 = nil local ok = a if result ~= value18 then if panduan("/sdcard/凋零配置/凋零仿bz/" .. ntxt) == false then file.download(a, "/sdcard/凋零配置/凋零仿bz/" .. ntxt) end ok = "/sdcard/凋零配置/凋零仿bz/" .. ntxt end return luajava.getBitmapDrawable(ok) end AZ = {} local AZ2 = AZ local result = import("android.*") local context3 = app.context local value21 = "getSystemService" local item = context3[value21] local result2 = item(context3, "window") local result3 = import("android.graphics.Typeface") local value24 = "createFromFile" local result4 = result3[value24](result3, "/storage/emulated/0/凋零配置/凋零仿bz/font4.ttf") function _ENV.getLayoutParams() LayoutParams = WindowManager.LayoutParams layoutParams = luajava.new(LayoutParams) if Build.VERSION.SDK_INT >= 26 then layoutParams.type = LayoutParams.TYPE_APPLICATION_OVERLAY else layoutParams.type = LayoutParams.TYPE_PHONE end layoutParams.format = PixelFormat.RGBA_8888 layoutParams.flags = LayoutParams.FLAG_NOT_FOCUSABLE layoutParams.gravity = Gravity.TOP | Gravity.LEFT layoutParams.width = LayoutParams.WRAP_CONTENT layoutParams.height = LayoutParams.WRAP_CONTENT return layoutParams end function _ENV.getVerticalBG(a, b, c, d) local value5, value6 = c, d if not c then value5 = 0 value6 = 4278190080 end local result = luajava.new(GradientDrawable) result:setCornerRadius(15) local value3 = "setGradientType" local item = result[value3] item(result, GradientDrawable.LINEAR_GRADIENT) result:setColors(a) result:setStroke(value5, value6) return result end jianbians = luajava.new(GradientDrawable) local jianbians2 = jianbians jianbians2:setCornerRadius(15) local jianbians3 = jianbians local value29 = "setGradientType" local item2 = jianbians3[value29] item2(jianbians3, GradientDrawable.LINEAR_GRADIENT) local jianbians4 = jianbians jianbians4:setStroke(0, "0xaa000000") slctb = jianbians jianbians = luajava.new(GradientDrawable) local jianbians5 = jianbians jianbians5:setCornerRadius(15) local jianbians6 = jianbians local value34 = "setGradientType" local item3 = jianbians6[value34] item3(jianbians6, GradientDrawable.LINEAR_GRADIENT) local jianbians7 = jianbians jianbians7:setColors({ 1728053247, 1728053247 }) local jianbians8 = jianbians jianbians8:setStroke(8, "0xffffffff") slcta = jianbians jianbian6 = luajava.new(GradientDrawable) local jianbian62 = jianbian6 jianbian62:setCornerRadius(15) local jianbian63 = jianbian6 local value39 = "setGradientType" local item4 = jianbian63[value39] item4(jianbian63, GradientDrawable.LINEAR_GRADIENT) local jianbian64 = jianbian6 jianbian64:setColors({ 4279867904, 4279867904 }) local jianbian65 = jianbian6 jianbian65:setStroke(0.2, "0xddffffff") function AZ2.controlWater(a, b) luajava.runUiThread(function() import("android.animation.ObjectAnimator") local result = ObjectAnimator() local result2 = result:ofFloat(a, "scaleX", { 1, 0.8, 0.9, 1 }) result2:setDuration(b):start() local result3 = ObjectAnimator() local result4 = result3:ofFloat(a, "scaleY", { 1, 0.8, 0.9, 1 }) result4:setDuration(b):start() end) end function AZ2.controlBig(a, b) luajava.runUiThread(function() import("android.animation.ObjectAnimator") local result = ObjectAnimator() local result2 = result:ofFloat(a, "scaleX", { 0, 0.4, 0.7, 1 }) result2:setDuration(b):start() local result3 = ObjectAnimator() local result4 = result3:ofFloat(a, "scaleY", { 0, 0.4, 0.7, 1 }) result4:setDuration(b):start() end) end local tbl = { GradientDrawable, color = "#11ffffff", cornerRadius = 15 } slctc = luajava.loadlayout(tbl) local tbl2 = { GradientDrawable, color = "#55ffffff", cornerRadius = 15 } slctd = luajava.loadlayout(tbl2) local tbl3 = { GradientDrawable, color = "#11ffffff", cornerRadius = 15 } slcte = luajava.loadlayout(tbl3) local tbl4 = { GradientDrawable, color = "#dd000000", cornerRadius = 15 } slctf = luajava.loadlayout(tbl4) jianbians = luajava.new(GradientDrawable) local jianbians9 = jianbians jianbians9:setCornerRadius(15) local jianbians10 = jianbians local value60 = "setGradientType" local item5 = jianbians10[value60] item5(jianbians10, GradientDrawable.LINEAR_GRADIENT) local jianbians11 = jianbians jianbians11:setColors({ 4286224292, 4286224292 }) local jianbians12 = jianbians jianbians12:setStroke(2, "0xeeFFffff") t9s = jianbians function _ENV.t9() beij = luajava.new(GradientDrawable) local beij2 = beij beij2:setCornerRadius(15) local beij3 = beij local value4 = "setGradientType" local item = beij3[value4] item(beij3, GradientDrawable.LINEAR_GRADIENT) local beij4 = beij beij4:setColors({ 2147483648, 2147483648 }) local beij5 = beij beij5:setStroke(2, "0xffffffff") return beij end t3s = jianbians local tbl5 = { GradientDrawable, color = "#87000000", cornerRadius = 15 } t4s = luajava.loadlayout(tbl5) t5s = jianbians local tbl6 = { GradientDrawable, color = "#87000000", cornerRadius = 15 } t6s = luajava.loadlayout(tbl6) function _ENV.getSelector3() selector = luajava.getStateListDrawable() local selector2 = selector local value4 = "addState" selector2[value4](selector2, { result.R.attr.state_pressed }, t4s) local selector3 = selector local value9 = "addState" local item = selector3[value9] local tbl = {} local state_pressed = result.R.attr.state_pressed tbl[1] = -state_pressed item(selector3, tbl, t9s) return selector end function _ENV.getSelector4() selector = luajava.getStateListDrawable() local selector2 = selector local value4 = "addState" selector2[value4](selector2, { result.R.attr.state_checked }, slcte) local selector3 = selector local value9 = "addState" local item = selector3[value9] local tbl = {} local state_checked = result.R.attr.state_checked tbl[1] = -state_checked item(selector3, tbl, slctf) return selector end function _ENV.getSelector() beij = luajava.new(GradientDrawable) local beij2 = beij beij2:setCornerRadius(15) local beij3 = beij local value4 = "setGradientType" local item = beij3[value4] item(beij3, GradientDrawable.LINEAR_GRADIENT) local beij4 = beij beij4:setColors({ 0, 0 }) selector = luajava.getStateListDrawable() local selector2 = selector local value9 = "addState" selector2[value9](selector2, { result.R.attr.state_pressed }, luajava.loadlayout({ GradientDrawable, color = "#1A000000" })) local selector3 = selector local value18 = "addState" local item2 = selector3[value18] local tbl = {} local state_pressed = result.R.attr.state_pressed tbl[1] = -state_pressed item2(selector3, tbl, beij) return selector end function _ENV.getSelector2() selector = luajava.getStateListDrawable() local selector2 = selector local value4 = "addState" selector2[value4](selector2, { result.R.attr.state_pressed }, slctd) local selector3 = selector local value9 = "addState" local item = selector3[value9] local tbl = {} local state_pressed = result.R.attr.state_pressed tbl[1] = -state_pressed item(selector3, tbl, slctc) return selector end function _ENV.getcolor(a) a[1] = tonumber(math.ceil(a[1] * 2.6, 0, 5)) if a[1] > 255 then a[1] = "0xff" else a[1] = "0x" .. string.format("%x", a[1]) end for i = 1, 3 do a[i + 1] = string.format("%x", a[i + 1]) if string.len(a[i + 1]) == 1 then a[i + 1] = "0" .. a[i + 1] end end local item = a[1] local item2 = a[2] local item3 = a[3] local item4 = a[4] return item .. item2 .. item3 .. item4 end jianbian = luajava.new(GradientDrawable) local jianbian3 = jianbian jianbian3:setCornerRadius(15) local jianbian4 = jianbian local value73 = "setGradientType" local item6 = jianbian4[value73] item6(jianbian4, GradientDrawable.LINEAR_GRADIENT) local value75 = nil YoYoImpl = luajava.getYoYoImpl() function AZ2.menu(a) if #_ENV["è\143\156å\141\149é\128\137项"] > #a then gg.alert("错误:菜单配置表少于菜单导航栏数量") return false end value75 = true local value = "cebian" local Shimmer2 = { LinearLayout, id = "侧边", visibility = "gone", background = getVerticalBG({ 2147483648, 2147483648 }, 55, 2, 4294967295), layout_height = "188dp", layout_width = "90dp", orientation = "vertical", gravity = "center_vertical|center_horizontal" } _ENV[value] = Shimmer2 local value92 = 1 local _ENV2 = _ENV["è\143\156å\141\149é\128\137项"] for i = value92, #_ENV2 do local tbl3 = { LinearLayout, id = "jm" .. i, elevation = "5dp", layout_height = "39dp", layout_width = "80dp", layout_marginBottom = "8dp", layout_marginTop = "8dp", onClick = function() _ENV["å\136\135æ\141¢"](i) AZ2.controlBig(_ENV["jm" .. i], 100) end, background = getSelector(), { TextView, Typeface = result4, id = "jm" .. i .. "tu", text = _ENV["è\143\156å\141\149é\128\137项"][i], gravity = "center", layout_height = "29dp", layout_width = "match_parent" } } _ENV["jm" .. i] = luajava.loadlayout(tbl3) cebian[#cebian + 1] = _ENV["jm" .. i] if i ~= #_ENV["è\143\156å\141\149é\128\137项"] then cebian[#cebian + 1] = { Space, layout_height = "8dp", layout_width = "match_parent" } end end cebian = luajava.loadlayout(cebian) local value93 = 1 local _ENV3 = _ENV["è\143\156å\141\149é\128\137项"] for i2 = value93, #_ENV3 do local tbl4 = { ScrollView, fillViewport = "true", id = "layout" .. i2, visibility = "gone", layout_width = "234dp", layout_height = "202dp", paddingLeft = "5dp", paddingTop = "5dp", orientation = "horizontal", { LinearLayout, id = "layoutm" .. i2, background = getVerticalBG({ 2147483648, 2147483648 }, 55, 2, 4294967295), gravity = "top", paddingLeft = "8dp", padding = "8dp", layout_width = "228dp", layout_height = "202dp", orientation = "vertical" } } _ENV["layout" .. i2] = luajava.loadlayout(tbl4) end local tbl = { LinearLayout, id = "yjttkx", visibility = "gone", layout_width = "match_parent", layout_height = "35dp", gravity = "center", orientation = "horizontal", background = getVerticalBG({ 2147483648, 2147483648 }, 55, 2, 4294967295), { ShimmerTextView, Typeface = result4, layout_width = "wrap_content", layout_height = "match_parent", gravity = "center", text = "恋念全防", textSize = "20sp", textColor = "#FFFFFF", reflectionColor = "#808080", shimmerEnable = "true" } } local result = luajava.loadlayout(tbl) gnlist = { LinearLayout, orientation = "vertical", { LinearLayout, layout_width = "match_parent", paddingLeft = "5dp", result } } local value94 = 1 local _ENV4 = _ENV["è\143\156å\141\149é\128\137项"] for i3 = value94, #_ENV4 do gnlist[#gnlist + 1] = _ENV["layout" .. i3] end beij = luajava.new(GradientDrawable) local beij3 = beij beij3:setCornerRadius(15) local beij4 = beij local value23 = "setGradientType" local item = beij4[value23] item(beij4, GradientDrawable.LINEAR_GRADIENT) beij4:setColors({ 2147483648, 2147483648 }) beij4:setStroke(0, "0xaa000000") gnlistbg = beij local function fn15(a) if _ENV[a] == nil then return false end local b = _ENV[a] local d if b then d = b:isShown() else d = false end if d == true then return true end return false end function _ENV["å\136\135æ\141¢"](a) local b = "layout" for i = 1, #_ENV["è\143\156å\141\149é\128\137项"] do local c = b .. i if fn15(c) then _ENV[c]:setVisibility(8) end end local c = "layout" .. a if fn15(c) then _ENV[c]:setVisibility(0) end end function _ENV.æ\152¾ç¤º() if value75 then local layoutParams = getLayoutParams() local layout = { LinearLayout, layout_height = "match_parent", layout_width = "match_parent", gravity = "center|center_vertical", background = getVerticalBG({ 1082130432, 1082130432 }, 0, 0, 0), { LinearLayout, orientation = "horizontal", layout_width = "match_parent", layout_height = "wrap_content", { LinearLayout, layout_width = "92dp", layout_height = "match_parent", cebian }, { LinearLayout, orientation = "vertical", layout_width = "match_parent", layout_height = "wrap_content", gnlist } } } local layout2 = luajava.loadlayout(layout) local value53 = "addView" local item = window[value53] item(window, layout2, layoutParams) local value55 = "setOnKeyListener" local item2 = layout2[value55] item2(layout2, luajava.createProxy("android.view.View$OnKeyListener", { onKey = function(a, b, c) if c == 4 and b:getAction() == 1 then layout2:setVisibility(8) return true end return false end })) layout2:setOnTouchListener(luajava.createProxy("android.view.View$OnTouchListener", { onTouch = function(a, b) if b:getAction() == 4 then layout2:setVisibility(8) return true end return false end })) layout2:setVisibility(0) local value70 = "toggleBarButton" local result = gg[value70](gg, "show", "go") end end function _ENV.æ\152¾ç¤º2() local layoutParams = getLayoutParams() local layout = { LinearLayout, layout_height = "match_parent", layout_width = "match_parent", gravity = "center|center_vertical", background = getVerticalBG({ 1082130432, 1082130432 }, 0, 0, 0), { LinearLayout, orientation = "horizontal", layout_width = "match_parent", layout_height = "wrap_content", { LinearLayout, layout_width = "92dp", layout_height = "match_parent", cebian }, { LinearLayout, orientation = "vertical", layout_width = "match_parent", layout_height = "wrap_content", gnlist } } } local layout2 = luajava.loadlayout(layout) local value53 = "addView" local item = window[value53] item(window, layout2, layoutParams) local value55 = "setOnKeyListener" local item2 = layout2[value55] item2(layout2, luajava.createProxy("android.view.View$OnKeyListener", { onKey = function(a, b, c) if c == 4 and b:getAction() == 1 then layout2:setVisibility(8) return true end return false end })) layout2:setOnTouchListener(luajava.createProxy("android.view.View$OnTouchListener", { onTouch = function(a, b) if b:getAction() == 4 then layout2:setVisibility(8) return true end return false end })) layout2:setVisibility(0) local value70 = "toggleBarButton" local result = gg[value70](gg, "show", "go") end _ENV["è\143\156å\141\149é\128\137项"] = { "功能", "关于" } _ENV["å\136\135æ\141¢"](1) _ENV.æ\152¾ç¤º() end -- end of fn12 -- ========== 主程序 ========== -- 检查更新 local result3 = fn6() if result3 then local notice = result3.notice local value2 if notice then value2 = notice else value2 = "" end if value2 ~= "" then gg.alert([[公告 ]] .. value2, "确定") end if result3 and not (result3.need_update ~= true and result3.need_update ~= "true") then if result3.force_update ~= 1 and result3.force_update ~= "1" then ok2 = false else ok2 = true end latest_version = result3.latest_version if latest_version then value3 = latest_version else value3 = "" end update_log = result3.update_log if update_log then value4 = update_log else value4 = "" end update_url = result3.update_url if update_url then value5 = update_url else value5 = "" end result4 = tonumber(result3.update_method) if result4 then updateMethod = result4 else updateMethod = CONFIG.updateMethod end ok = "发现新版本 v" .. value3 if value4 == "" then ok3 = ok else ok3 = ok .. [[ 更新内容: ]] .. value4 end if value5 == "" then gg.alert(ok3, "确定") elseif ok2 then if updateMethod == 1 then local function fn10(a) gg.toast("正在云更恋念脚本...") local pcall2 = pcall local gg2 = gg local result3, value16 = pcall2(gg2.makeRequest, a) if result3 and value16 then local type2 = type local value3 if type2(value16) == "table" then local body = value16.body if body then value3 = body else local content = value16.content if content then value3 = content else local item = value16[1] if item then value3 = item else value3 = value16 end end end else value3 = value16 end if value3 and value3 ~= "" then local result4, value17 = load(value3) if result4 then gg.toast("执行远程脚本...") local result5, value18 = pcall(result4) if result5 then return true end local result = tostring(value18) gg.toast("脚本执行失败: " .. result) return false end local result2 = tostring(value17) gg.toast("脚本加载失败: " .. result2) return false end gg.toast("脚本内容为空") return false end gg.toast("下载失败") return false end fn10(value5) os.exit() goto L49 end if updateMethod == 2 then local function fn11(a) gg.copyText(a) gg.alert([[链接已复制到剪贴板 请自行打开浏览器粘贴访问]], "确定") end fn11(value5) os.exit() goto L49 end result5 = gg.choice({ "远程脚本更新", "浏览器下载" }, nil, ok3 .. [[ 此为强制更新,必须更新]]) if result5 == 1 then local function fn10(a) gg.toast("正在云更恋念脚本...") local pcall2 = pcall local gg2 = gg local result3, value16 = pcall2(gg2.makeRequest, a) if result3 and value16 then local type2 = type local value3 if type2(value16) == "table" then local body = value16.body if body then value3 = body else local content = value16.content if content then value3 = content else local item = value16[1] if item then value3 = item else value3 = value16 end end end else value3 = value16 end if value3 and value3 ~= "" then local result4, value17 = load(value3) if result4 then gg.toast("执行远程脚本...") local result5, value18 = pcall(result4) if result5 then return true end local result = tostring(value18) gg.toast("脚本执行失败: " .. result) return false end local result2 = tostring(value17) gg.toast("脚本加载失败: " .. result2) return false end gg.toast("脚本内容为空") return false end gg.toast("下载失败")