shkong/Grasscutter_Resources
1
0
Fork 0
mirror of https://github.com/Koko-boya/Grasscutter_Resources synced 2024-01-31 23:23:19 +08:00
Code Issues Projects Releases Wiki Activity
Grasscutter_Resources/Resources/Scripts/LuaDebug.lua
memetrollsXD 840d79ff09 Add scripts
2022-04-29 16:40:51 +02:00

4506 lines
99 KiB
Lua
Raw Permalink Blame History

local L0_1, L1_1, L2_1, L3_1, L4_1, L5_1, L6_1, L7_1, L8_1, L9_1, L10_1, L11_1, L12_1, L13_1, L14_1, L15_1, L16_1, L17_1, L18_1, L19_1, L20_1, L21_1, L22_1, L23_1, L24_1, L25_1, L26_1, L27_1, L28_1, L29_1, L30_1, L31_1, L32_1, L33_1, L34_1, L35_1, L36_1, L37_1, L38_1, L39_1, L40_1, L41_1, L42_1, L43_1, L44_1, L45_1, L46_1, L47_1, L48_1, L49_1, L50_1, L51_1, L52_1, L53_1, L54_1, L55_1, L56_1, L57_1, L58_1, L59_1, L60_1, L61_1, L62_1, L63_1, L64_1, L65_1, L66_1, L67_1, L68_1, L69_1, L70_1, L71_1, L72_1, L73_1, L74_1, L75_1, L76_1, L77_1, L78_1, L79_1, L80_1, L81_1, L82_1, L83_1, L84_1, L85_1, L86_1, L87_1, L88_1, L89_1, L90_1, L91_1, L92_1, L93_1, L94_1, L95_1, L96_1, L97_1, L98_1, L99_1, L100_1
L0_1 = nil
L1_1 = nil
L2_1 = require
L3_1 = nil
L4_1 = nil
L5_1 = loadstring
if L5_1 then
L4_1 = loadstring
else
L4_1 = load
end
L5_1 = setfenv
if not L5_1 then
function L6_1(A0_2, A1_2)
local L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2
L2_2 = 1
while true do
L3_2 = debug
L3_2 = L3_2.getupvalue
L4_2 = A0_2
L5_2 = L2_2
L3_2 = L3_2(L4_2, L5_2)
if L3_2 == "_ENV" then
L4_2 = debug
L4_2 = L4_2.upvaluejoin
L5_2 = A0_2
L6_2 = L2_2
function L7_2()
local L0_3, L1_3
L0_3 = A1_2
return L0_3
end
L8_2 = 1
L4_2(L5_2, L6_2, L7_2, L8_2)
break
elseif not L3_2 then
break
end
L2_2 = L2_2 + 1
end
return A0_2
end
L5_1 = L6_1
end
L6_1 = {}
L7_1 = nil
L8_1 = LuaDebugTool
if L8_1 then
L7_1 = LuaDebugTool
else
L8_1 = CS
if L8_1 then
L8_1 = CS
L8_1 = L8_1.LuaDebugTool
if L8_1 then
L8_1 = CS
L7_1 = L8_1.LuaDebugTool
end
end
end
L8_1 = L7_1
L9_1 = L4_1
L10_1 = debug
L10_1 = L10_1.getinfo
function L11_1()
local L0_2, L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2
L0_2 = _G
L1_2 = require
L2_2 = "string"
L1_2 = L1_2(L2_2)
L2_2 = require
L3_2 = "math"
L2_2 = L2_2(L3_2)
L3_2 = require
L4_2 = "socket.core"
L3_2 = L3_2(L4_2)
L4_2 = L3_2
function L5_2(A0_3, A1_3, A2_3, A3_3)
local L4_3, L5_3, L6_3, L7_3, L8_3, L9_3
L4_3 = L3_2.connect
L5_3 = A0_3
L6_3 = A1_3
L7_3 = A2_3
L8_3 = A3_3
L9_3 = "inet"
return L4_3(L5_3, L6_3, L7_3, L8_3, L9_3)
end
L4_2.connect4 = L5_2
function L5_2(A0_3, A1_3, A2_3, A3_3)
local L4_3, L5_3, L6_3, L7_3, L8_3, L9_3
L4_3 = L3_2.connect
L5_3 = A0_3
L6_3 = A1_3
L7_3 = A2_3
L8_3 = A3_3
L9_3 = "inet6"
return L4_3(L5_3, L6_3, L7_3, L8_3, L9_3)
end
L4_2.connect6 = L5_2
L5_2 = L4_2.connect
if not L5_2 then
function L5_2(A0_3, A1_3, A2_3, A3_3)
local L4_3, L5_3, L6_3, L7_3, L8_3, L9_3, L10_3
L4_3 = L3_2.tcp
L4_3, L5_3 = L4_3()
if not L4_3 then
L6_3 = nil
L7_3 = L5_3
return L6_3, L7_3
end
if A2_3 then
L7_3 = L4_3
L6_3 = L4_3.bind
L8_3 = A2_3
L9_3 = A3_3
L10_3 = -1
L6_3, L7_3 = L6_3(L7_3, L8_3, L9_3, L10_3)
if not L6_3 then
L8_3 = nil
L9_3 = L7_3
return L8_3, L9_3
end
end
L7_3 = L4_3
L6_3 = L4_3.connect
L8_3 = A0_3
L9_3 = A1_3
L6_3, L7_3 = L6_3(L7_3, L8_3, L9_3)
if not L6_3 then
L8_3 = nil
L9_3 = L7_3
return L8_3, L9_3
end
return L4_3
end
L4_2.connect = L5_2
end
function L5_2(A0_3, A1_3, A2_3)
local L3_3, L4_3, L5_3, L6_3, L7_3, L8_3, L9_3, L10_3, L11_3, L12_3, L13_3, L14_3, L15_3
if A0_3 == "*" then
A0_3 = "0.0.0.0"
end
L3_3 = L3_2.dns
L3_3 = L3_3.getaddrinfo
L4_3 = A0_3
L3_3, L4_3 = L3_3(L4_3)
if not L3_3 then
L5_3 = nil
L6_3 = L4_3
return L5_3, L6_3
end
L5_3 = nil
L6_3 = nil
L4_3 = "no info on address"
L7_3 = L0_2.ipairs
L8_3 = L3_3
L7_3, L8_3, L9_3 = L7_3(L8_3)
for L10_3, L11_3 in L7_3, L8_3, L9_3 do
L12_3 = L11_3.family
if L12_3 == "inet" then
L12_3 = L3_2.tcp4
L12_3, L13_3 = L12_3()
L4_3 = L13_3
L5_3 = L12_3
else
L12_3 = L3_2.tcp6
L12_3, L13_3 = L12_3()
L4_3 = L13_3
L5_3 = L12_3
end
if not L5_3 then
L12_3 = nil
L13_3 = L4_3
return L12_3, L13_3
end
L13_3 = L5_3
L12_3 = L5_3.setoption
L14_3 = "reuseaddr"
L15_3 = true
L12_3(L13_3, L14_3, L15_3)
L13_3 = L5_3
L12_3 = L5_3.bind
L14_3 = L11_3.addr
L15_3 = A1_3
L12_3, L13_3 = L12_3(L13_3, L14_3, L15_3)
L4_3 = L13_3
L6_3 = L12_3
if not L6_3 then
L13_3 = L5_3
L12_3 = L5_3.close
L12_3(L13_3)
else
L13_3 = L5_3
L12_3 = L5_3.listen
L14_3 = A2_3
L12_3, L13_3 = L12_3(L13_3, L14_3)
L4_3 = L13_3
L6_3 = L12_3
if not L6_3 then
L13_3 = L5_3
L12_3 = L5_3.close
L12_3(L13_3)
else
return L5_3
end
end
end
L7_3 = nil
L8_3 = L4_3
return L7_3, L8_3
end
L4_2.bind = L5_2
L5_2 = L4_2.newtry
L5_2 = L5_2()
L4_2.try = L5_2
function L5_2(A0_3)
local L1_3
function L1_3(A0_4, A1_4, A2_4)
local L3_4, L4_4, L5_4, L6_4, L7_4
L3_4 = L0_2.type
L4_4 = A0_4
L3_4 = L3_4(L4_4)
if L3_4 ~= "string" then
L3_4 = "default"
L4_4 = A0_4
A2_4 = A1_4
A1_4 = L4_4
A0_4 = L3_4
end
L3_4 = A0_4 or L3_4
if not A0_4 then
L3_4 = "nil"
end
L3_4 = A0_3[L3_4]
if not L3_4 then
L4_4 = L0_2.error
L5_4 = "unknown key ("
L6_4 = L0_2.tostring
L7_4 = A0_4
L6_4 = L6_4(L7_4)
L7_4 = ")"
L5_4 = L5_4 .. L6_4 .. L7_4
L6_4 = 3
L4_4(L5_4, L6_4)
else
L4_4 = L3_4
L5_4 = A1_4
L6_4 = A2_4
return L4_4(L5_4, L6_4)
end
end
return L1_3
end
L4_2.choose = L5_2
L5_2 = {}
L6_2 = {}
L4_2.sourcet = L5_2
L4_2.sinkt = L6_2
L4_2.BLOCKSIZE = 2048
function L7_2(A0_3)
local L1_3, L2_3, L3_3, L4_3
L1_3 = L0_2.setmetatable
L2_3 = {}
function L3_3()
local L0_4, L1_4
L0_4 = A0_3
L1_4 = L0_4
L0_4 = L0_4.getfd
return L0_4(L1_4)
end
L2_3.getfd = L3_3
function L3_3()
local L0_4, L1_4
L0_4 = A0_3
L1_4 = L0_4
L0_4 = L0_4.dirty
return L0_4(L1_4)
end
L2_3.dirty = L3_3
L3_3 = {}
function L4_3(A0_4, A1_4, A2_4)
local L3_4, L4_4, L5_4
if not A1_4 then
L3_4 = A0_3
L4_4 = L3_4
L3_4 = L3_4.close
L3_4(L4_4)
L3_4 = 1
return L3_4
else
L3_4 = A0_3
L4_4 = L3_4
L3_4 = L3_4.send
L5_4 = A1_4
return L3_4(L4_4, L5_4)
end
end
L3_3.__call = L4_3
return L1_3(L2_3, L3_3)
end
L6_2["close-when-done"] = L7_2
function L7_2(A0_3)
local L1_3, L2_3, L3_3, L4_3
L1_3 = L0_2.setmetatable
L2_3 = {}
function L3_3()
local L0_4, L1_4
L0_4 = A0_3
L1_4 = L0_4
L0_4 = L0_4.getfd
return L0_4(L1_4)
end
L2_3.getfd = L3_3
function L3_3()
local L0_4, L1_4
L0_4 = A0_3
L1_4 = L0_4
L0_4 = L0_4.dirty
return L0_4(L1_4)
end
L2_3.dirty = L3_3
L3_3 = {}
function L4_3(A0_4, A1_4, A2_4)
local L3_4, L4_4, L5_4
if A1_4 then
L3_4 = A0_3
L4_4 = L3_4
L3_4 = L3_4.send
L5_4 = A1_4
return L3_4(L4_4, L5_4)
else
L3_4 = 1
return L3_4
end
end
L3_3.__call = L4_3
return L1_3(L2_3, L3_3)
end
L6_2["keep-open"] = L7_2
L7_2 = L6_2["keep-open"]
L6_2.default = L7_2
L7_2 = L4_2.choose
L8_2 = L6_2
L7_2 = L7_2(L8_2)
L4_2.sink = L7_2
function L7_2(A0_3, A1_3)
local L2_3, L3_3, L4_3, L5_3
L2_3 = L0_2.setmetatable
L3_3 = {}
function L4_3()
local L0_4, L1_4
L0_4 = A0_3
L1_4 = L0_4
L0_4 = L0_4.getfd
return L0_4(L1_4)
end
L3_3.getfd = L4_3
function L4_3()
local L0_4, L1_4
L0_4 = A0_3
L1_4 = L0_4
L0_4 = L0_4.dirty
return L0_4(L1_4)
end
L3_3.dirty = L4_3
L4_3 = {}
function L5_3()
local L0_4, L1_4, L2_4, L3_4, L4_4, L5_4
L0_4 = A1_3
if L0_4 <= 0 then
L0_4 = nil
return L0_4
end
L0_4 = L2_2.min
L1_4 = L3_2.BLOCKSIZE
L2_4 = A1_3
L0_4 = L0_4(L1_4, L2_4)
L1_4 = A0_3
L2_4 = L1_4
L1_4 = L1_4.receive
L3_4 = L0_4
L1_4, L2_4 = L1_4(L2_4, L3_4)
if L2_4 then
L3_4 = nil
L4_4 = L2_4
return L3_4, L4_4
end
L3_4 = A1_3
L4_4 = L1_2.len
L5_4 = L1_4
L4_4 = L4_4(L5_4)
L3_4 = L3_4 - L4_4
A1_3 = L3_4
return L1_4
end
L4_3.__call = L5_3
return L2_3(L3_3, L4_3)
end
L5_2["by-length"] = L7_2
function L7_2(A0_3)
local L1_3, L2_3, L3_3, L4_3, L5_3
L1_3 = nil
L2_3 = L0_2.setmetatable
L3_3 = {}
function L4_3()
local L0_4, L1_4
L0_4 = A0_3
L1_4 = L0_4
L0_4 = L0_4.getfd
return L0_4(L1_4)
end
L3_3.getfd = L4_3
function L4_3()
local L0_4, L1_4
L0_4 = A0_3
L1_4 = L0_4
L0_4 = L0_4.dirty
return L0_4(L1_4)
end
L3_3.dirty = L4_3
L4_3 = {}
function L5_3()
local L0_4, L1_4, L2_4, L3_4, L4_4
L0_4 = L1_3
if L0_4 then
L0_4 = nil
return L0_4
end
L0_4 = A0_3
L1_4 = L0_4
L0_4 = L0_4.receive
L2_4 = L3_2.BLOCKSIZE
L0_4, L1_4, L2_4 = L0_4(L1_4, L2_4)
if not L1_4 then
return L0_4
elseif L1_4 == "closed" then
L3_4 = A0_3
L4_4 = L3_4
L3_4 = L3_4.close
L3_4(L4_4)
L3_4 = 1
L1_3 = L3_4
return L2_4
else
L3_4 = nil
L4_4 = L1_4
return L3_4, L4_4
end
end
L4_3.__call = L5_3
return L2_3(L3_3, L4_3)
end
L5_2["until-closed"] = L7_2
L7_2 = L5_2["until-closed"]
L5_2.default = L7_2
L7_2 = L4_2.choose
L8_2 = L5_2
L7_2 = L7_2(L8_2)
L4_2.source = L7_2
return L4_2
end
function L12_1()
local L0_2, L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2, L15_2, L16_2, L17_2, L18_2, L19_2, L20_2
L0_2 = require
L1_2 = "math"
L0_2 = L0_2(L1_2)
L1_2 = require
L2_2 = "string"
L1_2 = L1_2(L2_2)
L2_2 = require
L3_2 = "table"
L2_2 = L2_2(L3_2)
L3_2 = nil
L4_2 = {}
L5_2 = {}
L6_2 = {}
L4_2.EMPTY_ARRAY = L6_2
L6_2 = {}
L4_2.EMPTY_OBJECT = L6_2
L6_2 = nil
L7_2 = nil
L8_2 = nil
L9_2 = nil
L10_2 = nil
L11_2 = nil
L12_2 = nil
L13_2 = nil
L14_2 = nil
L15_2 = nil
function L16_2(A0_3)
local L1_3, L2_3, L3_3, L4_3, L5_3, L6_3, L7_3, L8_3, L9_3, L10_3, L11_3, L12_3, L13_3, L14_3, L15_3, L16_3
if A0_3 == nil then
L1_3 = "null"
return L1_3
end
L1_3 = type
L2_3 = A0_3
L1_3 = L1_3(L2_3)
if L1_3 == "string" then
L2_3 = "\""
L3_3 = L5_2.encodeString
L4_3 = A0_3
L3_3 = L3_3(L4_3)
L4_3 = "\""
L2_3 = L2_3 .. L3_3 .. L4_3
return L2_3
end
if L1_3 == "number" or L1_3 == "boolean" then
L2_3 = tostring
L3_3 = A0_3
return L2_3(L3_3)
end
if L1_3 == "table" then
L2_3 = {}
L3_3 = L14_2
L4_3 = A0_3
L3_3, L4_3 = L3_3(L4_3)
if L3_3 then
L5_3 = 1
L6_3 = L4_3
L7_3 = 1
for L8_3 = L5_3, L6_3, L7_3 do
L9_3 = L2_2.insert
L10_3 = L2_3
L11_3 = L4_2.encode
L12_3 = A0_3[L8_3]
L11_3, L12_3, L13_3, L14_3, L15_3, L16_3 = L11_3(L12_3)
L9_3(L10_3, L11_3, L12_3, L13_3, L14_3, L15_3, L16_3)
end
else
L5_3 = pairs
L6_3 = A0_3
L5_3, L6_3, L7_3 = L5_3(L6_3)
for L8_3, L9_3 in L5_3, L6_3, L7_3 do
L10_3 = L15_2
L11_3 = L8_3
L10_3 = L10_3(L11_3)
if L10_3 then
L10_3 = L15_2
L11_3 = L9_3
L10_3 = L10_3(L11_3)
if L10_3 then
L10_3 = L2_2.insert
L11_3 = L2_3
L12_3 = "\""
L13_3 = L5_2.encodeString
L14_3 = L8_3
L13_3 = L13_3(L14_3)
L14_3 = "\":"
L15_3 = L4_2.encode
L16_3 = L9_3
L15_3 = L15_3(L16_3)
L12_3 = L12_3 .. L13_3 .. L14_3 .. L15_3
L10_3(L11_3, L12_3)
end
end
end
end
if L3_3 then
L5_3 = "["
L6_3 = L2_2.concat
L7_3 = L2_3
L8_3 = ","
L6_3 = L6_3(L7_3, L8_3)
L7_3 = "]"
L5_3 = L5_3 .. L6_3 .. L7_3
return L5_3
else
L5_3 = "{"
L6_3 = L2_2.concat
L7_3 = L2_3
L8_3 = ","
L6_3 = L6_3(L7_3, L8_3)
L7_3 = "}"
L5_3 = L5_3 .. L6_3 .. L7_3
return L5_3
end
end
if L1_3 == "function" then
L2_3 = L4_2.null
if A0_3 == L2_3 then
L2_3 = "null"
return L2_3
end
end
L2_3 = assert
L3_3 = false
L4_3 = "encode attempt to encode unsupported type "
L5_3 = L1_3
L6_3 = ":"
L7_3 = tostring
L8_3 = A0_3
L7_3 = L7_3(L8_3)
L4_3 = L4_3 .. L5_3 .. L6_3 .. L7_3
L2_3(L3_3, L4_3)
end
L4_2.encode = L16_2
function L16_2(A0_3, A1_3)
local L2_3, L3_3, L4_3, L5_3, L6_3, L7_3
if not A1_3 or not A1_3 then
A1_3 = 1
end
L2_3 = L12_2
L3_3 = A0_3
L4_3 = A1_3
L2_3 = L2_3(L3_3, L4_3)
A1_3 = L2_3
L2_3 = assert
L3_3 = L1_2.len
L4_3 = A0_3
L3_3 = L3_3(L4_3)
L3_3 = A1_3 <= L3_3
L4_3 = "Unterminated JSON encoded object found at position in ["
L5_3 = A0_3
L6_3 = "]"
L4_3 = L4_3 .. L5_3 .. L6_3
L2_3(L3_3, L4_3)
L2_3 = L1_2.sub
L3_3 = A0_3
L4_3 = A1_3
L5_3 = A1_3
L2_3 = L2_3(L3_3, L4_3, L5_3)
if L2_3 == "{" then
L3_3 = L10_2
L4_3 = A0_3
L5_3 = A1_3
return L3_3(L4_3, L5_3)
end
if L2_3 == "[" then
L3_3 = L6_2
L4_3 = A0_3
L5_3 = A1_3
return L3_3(L4_3, L5_3)
end
L3_3 = L1_2.find
L4_3 = "+-0123456789.e"
L5_3 = L2_3
L6_3 = 1
L7_3 = true
L3_3 = L3_3(L4_3, L5_3, L6_3, L7_3)
if L3_3 then
L3_3 = L9_2
L4_3 = A0_3
L5_3 = A1_3
return L3_3(L4_3, L5_3)
end
if L2_3 == "\"" or L2_3 == "'" then
L3_3 = L11_2
L4_3 = A0_3
L5_3 = A1_3
return L3_3(L4_3, L5_3)
end
L3_3 = L1_2.sub
L4_3 = A0_3
L5_3 = A1_3
L6_3 = A1_3 + 1
L3_3 = L3_3(L4_3, L5_3, L6_3)
if L3_3 == "/*" then
L3_3 = L4_2.decode
L4_3 = A0_3
L5_3 = L7_2
L6_3 = A0_3
L7_3 = A1_3
L5_3, L6_3, L7_3 = L5_3(L6_3, L7_3)
return L3_3(L4_3, L5_3, L6_3, L7_3)
end
L3_3 = L8_2
L4_3 = A0_3
L5_3 = A1_3
return L3_3(L4_3, L5_3)
end
L4_2.decode = L16_2
function L16_2()
local L0_3, L1_3
L0_3 = L4_2.null
return L0_3
end
L4_2.null = L16_2
function L16_2(A0_3, A1_3)
local L2_3, L3_3, L4_3, L5_3, L6_3, L7_3, L8_3, L9_3
L2_3 = {}
L3_3 = L1_2.len
L4_3 = A0_3
L3_3 = L3_3(L4_3)
L4_3 = assert
L5_3 = L1_2.sub
L6_3 = A0_3
L7_3 = A1_3
L8_3 = A1_3
L5_3 = L5_3(L6_3, L7_3, L8_3)
L5_3 = L5_3 == "["
L6_3 = "decode_scanArray called but array does not start at position "
L7_3 = A1_3
L8_3 = " in string:\n"
L9_3 = A0_3
L6_3 = L6_3 .. L7_3 .. L8_3 .. L9_3
L4_3(L5_3, L6_3)
A1_3 = A1_3 + 1
repeat
L4_3 = L12_2
L5_3 = A0_3
L6_3 = A1_3
L4_3 = L4_3(L5_3, L6_3)
A1_3 = L4_3
L4_3 = assert
L5_3 = L3_3 >= A1_3
L6_3 = "JSON String ended unexpectedly scanning array."
L4_3(L5_3, L6_3)
L4_3 = L1_2.sub
L5_3 = A0_3
L6_3 = A1_3
L7_3 = A1_3
L4_3 = L4_3(L5_3, L6_3, L7_3)
if L4_3 == "]" then
L5_3 = L2_3
L6_3 = A1_3 + 1
return L5_3, L6_3
end
if L4_3 == "," then
L5_3 = L12_2
L6_3 = A0_3
L7_3 = A1_3 + 1
L5_3 = L5_3(L6_3, L7_3)
A1_3 = L5_3
end
L5_3 = assert
L6_3 = L3_3 >= A1_3
L7_3 = "JSON String ended unexpectedly scanning array."
L5_3(L6_3, L7_3)
L5_3 = L4_2.decode
L6_3 = A0_3
L7_3 = A1_3
L5_3, L6_3 = L5_3(L6_3, L7_3)
A1_3 = L6_3
L3_2 = L5_3
L5_3 = L2_2.insert
L6_3 = L2_3
L7_3 = L3_2
L5_3(L6_3, L7_3)
L5_3 = false
until L5_3
end
L6_2 = L16_2
function L16_2(A0_3, A1_3)
local L2_3, L3_3, L4_3, L5_3, L6_3
L2_3 = assert
L3_3 = L1_2.sub
L4_3 = A0_3
L5_3 = A1_3
L6_3 = A1_3 + 1
L3_3 = L3_3(L4_3, L5_3, L6_3)
L3_3 = L3_3 == "/*"
L4_3 = "decode_scanComment called but comment does not start at position "
L5_3 = A1_3
L4_3 = L4_3 .. L5_3
L2_3(L3_3, L4_3)
L2_3 = L1_2.find
L3_3 = A0_3
L4_3 = "*/"
L5_3 = A1_3 + 2
L2_3 = L2_3(L3_3, L4_3, L5_3)
L3_3 = assert
L4_3 = L2_3 ~= nil
L5_3 = "Unterminated comment in string at "
L6_3 = A1_3
L5_3 = L5_3 .. L6_3
L3_3(L4_3, L5_3)
L3_3 = L2_3 + 2
return L3_3
end
L7_2 = L16_2
function L16_2(A0_3, A1_3)
local L2_3, L3_3, L4_3, L5_3, L6_3, L7_3, L8_3, L9_3, L10_3, L11_3, L12_3, L13_3
L2_3 = {}
L2_3["true"] = true
L2_3["false"] = false
L2_3.null = nil
L3_3 = {}
L4_3 = "true"
L5_3 = "false"
L6_3 = "null"
L3_3[1] = L4_3
L3_3[2] = L5_3
L3_3[3] = L6_3
L4_3 = pairs
L5_3 = L3_3
L4_3, L5_3, L6_3 = L4_3(L5_3)
for L7_3, L8_3 in L4_3, L5_3, L6_3 do
L9_3 = L1_2.sub
L10_3 = A0_3
L11_3 = A1_3
L12_3 = L1_2.len
L13_3 = L8_3
L12_3 = L12_3(L13_3)
L12_3 = A1_3 + L12_3
L12_3 = L12_3 - 1
L9_3 = L9_3(L10_3, L11_3, L12_3)
if L9_3 == L8_3 then
L9_3 = L2_3[L8_3]
L10_3 = L1_2.len
L11_3 = L8_3
L10_3 = L10_3(L11_3)
L10_3 = A1_3 + L10_3
return L9_3, L10_3
end
end
L4_3 = assert
L5_3 = nil
L6_3 = "Failed to scan constant from string "
L7_3 = A0_3
L8_3 = " at starting position "
L9_3 = A1_3
L6_3 = L6_3 .. L7_3 .. L8_3 .. L9_3
L4_3(L5_3, L6_3)
end
L8_2 = L16_2
function L16_2(A0_3, A1_3)
local L2_3, L3_3, L4_3, L5_3, L6_3, L7_3, L8_3, L9_3, L10_3, L11_3, L12_3, L13_3, L14_3
L2_3 = A1_3 + 1
L3_3 = L1_2.len
L4_3 = A0_3
L3_3 = L3_3(L4_3)
L4_3 = "+-0123456789.e"
while true do
L5_3 = L1_2.find
L6_3 = L4_3
L7_3 = L1_2.sub
L8_3 = A0_3
L9_3 = L2_3
L10_3 = L2_3
L7_3 = L7_3(L8_3, L9_3, L10_3)
L8_3 = 1
L9_3 = true
L5_3 = L5_3(L6_3, L7_3, L8_3, L9_3)
if not (L5_3 and L2_3 <= L3_3) then
break
end
L2_3 = L2_3 + 1
end
L5_3 = "return "
L6_3 = L1_2.sub
L7_3 = A0_3
L8_3 = A1_3
L9_3 = L2_3 - 1
L6_3 = L6_3(L7_3, L8_3, L9_3)
L5_3 = L5_3 .. L6_3
L6_3 = L9_1
L7_3 = L5_3
L6_3 = L6_3(L7_3)
L7_3 = assert
L8_3 = L6_3
L9_3 = "Failed to scan number [ "
L10_3 = L5_3
L11_3 = "] in JSON string at position "
L12_3 = A1_3
L13_3 = " : "
L14_3 = L2_3
L9_3 = L9_3 .. L10_3 .. L11_3 .. L12_3 .. L13_3 .. L14_3
L7_3(L8_3, L9_3)
L7_3 = L6_3
L7_3 = L7_3()
L8_3 = L2_3
return L7_3, L8_3
end
L9_2 = L16_2
function L16_2(A0_3, A1_3)
local L2_3, L3_3, L4_3, L5_3, L6_3, L7_3, L8_3, L9_3, L10_3, L11_3
L2_3 = {}
L3_3 = L1_2.len
L4_3 = A0_3
L3_3 = L3_3(L4_3)
L4_3 = nil
L5_3 = nil
L6_3 = assert
L7_3 = L1_2.sub
L8_3 = A0_3
L9_3 = A1_3
L10_3 = A1_3
L7_3 = L7_3(L8_3, L9_3, L10_3)
L7_3 = L7_3 == "{"
L8_3 = "decode_scanObject called but object does not start at position "
L9_3 = A1_3
L10_3 = " in string:\n"
L11_3 = A0_3
L8_3 = L8_3 .. L9_3 .. L10_3 .. L11_3
L6_3(L7_3, L8_3)
A1_3 = A1_3 + 1
repeat
L6_3 = L12_2
L7_3 = A0_3
L8_3 = A1_3
L6_3 = L6_3(L7_3, L8_3)
A1_3 = L6_3
L6_3 = assert
L7_3 = L3_3 >= A1_3
L8_3 = "JSON string ended unexpectedly while scanning object."
L6_3(L7_3, L8_3)
L6_3 = L1_2.sub
L7_3 = A0_3
L8_3 = A1_3
L9_3 = A1_3
L6_3 = L6_3(L7_3, L8_3, L9_3)
if L6_3 == "}" then
L7_3 = L2_3
L8_3 = A1_3 + 1
return L7_3, L8_3
end
if L6_3 == "," then
L7_3 = L12_2
L8_3 = A0_3
L9_3 = A1_3 + 1
L7_3 = L7_3(L8_3, L9_3)
A1_3 = L7_3
end
L7_3 = assert
L8_3 = L3_3 >= A1_3
L9_3 = "JSON string ended unexpectedly scanning object."
L7_3(L8_3, L9_3)
L7_3 = L4_2.decode
L8_3 = A0_3
L9_3 = A1_3
L7_3, L8_3 = L7_3(L8_3, L9_3)
A1_3 = L8_3
L4_3 = L7_3
L7_3 = assert
L8_3 = L3_3 >= A1_3
L9_3 = "JSON string ended unexpectedly searching for value of key "
L10_3 = L4_3
L9_3 = L9_3 .. L10_3
L7_3(L8_3, L9_3)
L7_3 = L12_2
L8_3 = A0_3
L9_3 = A1_3
L7_3 = L7_3(L8_3, L9_3)
A1_3 = L7_3
L7_3 = assert
L8_3 = L3_3 >= A1_3
L9_3 = "JSON string ended unexpectedly searching for value of key "
L10_3 = L4_3
L9_3 = L9_3 .. L10_3
L7_3(L8_3, L9_3)
L7_3 = assert
L8_3 = L1_2.sub
L9_3 = A0_3
L10_3 = A1_3
L11_3 = A1_3
L8_3 = L8_3(L9_3, L10_3, L11_3)
L8_3 = L8_3 == ":"
L9_3 = "JSON object key-value assignment mal-formed at "
L10_3 = A1_3
L9_3 = L9_3 .. L10_3
L7_3(L8_3, L9_3)
L7_3 = L12_2
L8_3 = A0_3
L9_3 = A1_3 + 1
L7_3 = L7_3(L8_3, L9_3)
A1_3 = L7_3
L7_3 = assert
L8_3 = L3_3 >= A1_3
L9_3 = "JSON string ended unexpectedly searching for value of key "
L10_3 = L4_3
L9_3 = L9_3 .. L10_3
L7_3(L8_3, L9_3)
L7_3 = L4_2.decode
L8_3 = A0_3
L9_3 = A1_3
L7_3, L8_3 = L7_3(L8_3, L9_3)
A1_3 = L8_3
L5_3 = L7_3
L2_3[L4_3] = L5_3
L7_3 = false
until L7_3
end
L10_2 = L16_2
L16_2 = {}
L16_2["\\t"] = "\t"
L16_2["\\f"] = "\f"
L16_2["\\r"] = "\r"
L16_2["\\n"] = "\n"
L16_2["\\b"] = "\b"
L17_2 = setmetatable
L18_2 = L16_2
L19_2 = {}
function L20_2(A0_3, A1_3)
local L2_3, L3_3, L4_3
L2_3 = L1_2.sub
L3_3 = A1_3
L4_3 = 2
return L2_3(L3_3, L4_3)
end
L19_2.__index = L20_2
L17_2(L18_2, L19_2)
function L17_2(A0_3, A1_3)
local L2_3, L3_3, L4_3, L5_3, L6_3, L7_3, L8_3, L9_3, L10_3, L11_3, L12_3, L13_3, L14_3, L15_3, L16_3, L17_3, L18_3
L2_3 = assert
L3_3 = A1_3
L4_3 = "decode_scanString(..) called without start position"
L2_3(L3_3, L4_3)
L2_3 = L1_2.sub
L3_3 = A0_3
L4_3 = A1_3
L5_3 = A1_3
L2_3 = L2_3(L3_3, L4_3, L5_3)
L3_3 = assert
L4_3 = L2_3 == "\"" or L2_3 == "'"
L5_3 = "decode_scanString called for a non-string"
L3_3(L4_3, L5_3)
L3_3 = {}
L4_3 = A1_3
L5_3 = A1_3
while true do
L6_3 = L1_2.find
L7_3 = A0_3
L8_3 = L2_3
L9_3 = L5_3 + 1
L6_3 = L6_3(L7_3, L8_3, L9_3)
L7_3 = L5_3 + 1
if L6_3 == L7_3 then
break
end
L6_3 = L5_3
L7_3 = L1_2.find
L8_3 = A0_3
L9_3 = "\\."
L10_3 = L5_3 + 1
L7_3, L8_3 = L7_3(L8_3, L9_3, L10_3)
L5_3 = L8_3
L4_3 = L7_3
L7_3 = L1_2.find
L8_3 = A0_3
L9_3 = L2_3
L10_3 = L6_3 + 1
L7_3, L8_3 = L7_3(L8_3, L9_3, L10_3)
if not L4_3 or L4_3 > L7_3 then
L9_3 = L7_3
L5_3 = L8_3 - 1
L4_3 = L9_3
end
L9_3 = L2_2.insert
L10_3 = L3_3
L11_3 = L1_2.sub
L12_3 = A0_3
L13_3 = L6_3 + 1
L14_3 = L4_3 - 1
L11_3, L12_3, L13_3, L14_3, L15_3, L16_3, L17_3, L18_3 = L11_3(L12_3, L13_3, L14_3)
L9_3(L10_3, L11_3, L12_3, L13_3, L14_3, L15_3, L16_3, L17_3, L18_3)
L9_3 = L1_2.sub
L10_3 = A0_3
L11_3 = L4_3
L12_3 = L5_3
L9_3 = L9_3(L10_3, L11_3, L12_3)
if L9_3 == "\\u" then
L9_3 = L1_2.sub
L10_3 = A0_3
L11_3 = L5_3 + 1
L12_3 = L5_3 + 4
L9_3 = L9_3(L10_3, L11_3, L12_3)
L5_3 = L5_3 + 4
L10_3 = tonumber
L11_3 = L9_3
L12_3 = 16
L10_3 = L10_3(L11_3, L12_3)
L11_3 = assert
L12_3 = L10_3
L13_3 = "String decoding failed: bad Unicode escape "
L14_3 = L9_3
L15_3 = " at position "
L16_3 = L4_3
L17_3 = " : "
L18_3 = L5_3
L13_3 = L13_3 .. L14_3 .. L15_3 .. L16_3 .. L17_3 .. L18_3
L11_3(L12_3, L13_3)
L11_3 = nil
if L10_3 < 128 then
L12_3 = L1_2.char
L13_3 = L10_3 % 128
L12_3 = L12_3(L13_3)
L11_3 = L12_3
elseif L10_3 < 2048 then
L12_3 = L1_2.char
L13_3 = L0_2.floor
L14_3 = L10_3 / 64
L13_3 = L13_3(L14_3)
L13_3 = L13_3 % 32
L13_3 = 192 + L13_3
L14_3 = L10_3 % 64
L14_3 = 128 + L14_3
L12_3 = L12_3(L13_3, L14_3)
L11_3 = L12_3
else
L12_3 = L1_2.char
L13_3 = L0_2.floor
L14_3 = L10_3 / 4096
L13_3 = L13_3(L14_3)
L13_3 = L13_3 % 16
L13_3 = 224 + L13_3
L14_3 = L0_2.floor
L15_3 = L10_3 / 64
L14_3 = L14_3(L15_3)
L14_3 = L14_3 % 64
L14_3 = 128 + L14_3
L15_3 = L10_3 % 64
L15_3 = 128 + L15_3
L12_3 = L12_3(L13_3, L14_3, L15_3)
L11_3 = L12_3
end
L12_3 = L2_2.insert
L13_3 = L3_3
L14_3 = L11_3
L12_3(L13_3, L14_3)
else
L9_3 = L2_2.insert
L10_3 = L3_3
L11_3 = L1_2.sub
L12_3 = A0_3
L13_3 = L4_3
L14_3 = L5_3
L11_3 = L11_3(L12_3, L13_3, L14_3)
L11_3 = L16_2[L11_3]
L9_3(L10_3, L11_3)
end
end
L6_3 = L2_2.insert
L7_3 = L3_3
L8_3 = L1_2.sub
L9_3 = L5_3
L10_3 = L5_3 + 1
L8_3, L9_3, L10_3, L11_3, L12_3, L13_3, L14_3, L15_3, L16_3, L17_3, L18_3 = L8_3(L9_3, L10_3)
L6_3(L7_3, L8_3, L9_3, L10_3, L11_3, L12_3, L13_3, L14_3, L15_3, L16_3, L17_3, L18_3)
L6_3 = assert
L7_3 = L1_2.find
L8_3 = A0_3
L9_3 = L2_3
L10_3 = L5_3 + 1
L7_3 = L7_3(L8_3, L9_3, L10_3)
L8_3 = "String decoding failed: missing closing "
L9_3 = L2_3
L10_3 = " at position "
L11_3 = L5_3
L12_3 = "(for string at position "
L13_3 = A1_3
L14_3 = ")"
L8_3 = L8_3 .. L9_3 .. L10_3 .. L11_3 .. L12_3 .. L13_3 .. L14_3
L6_3(L7_3, L8_3)
L6_3 = L2_2.concat
L7_3 = L3_3
L8_3 = ""
L6_3 = L6_3(L7_3, L8_3)
L7_3 = L5_3 + 2
return L6_3, L7_3
end
L11_2 = L17_2
function L17_2(A0_3, A1_3)
local L2_3, L3_3, L4_3, L5_3, L6_3, L7_3, L8_3, L9_3
L2_3 = " \n\r\t"
L3_3 = L1_2.len
L4_3 = A0_3
L3_3 = L3_3(L4_3)
while true do
L4_3 = L1_2.find
L5_3 = L2_3
L6_3 = L1_2.sub
L7_3 = A0_3
L8_3 = A1_3
L9_3 = A1_3
L6_3 = L6_3(L7_3, L8_3, L9_3)
L7_3 = 1
L8_3 = true
L4_3 = L4_3(L5_3, L6_3, L7_3, L8_3)
if not (L4_3 and A1_3 <= L3_3) then
break
end
A1_3 = A1_3 + 1
end
return A1_3
end
L12_2 = L17_2
L17_2 = {}
L17_2["\""] = "\\\""
L17_2["\\"] = "\\\\"
L17_2["/"] = "\\/"
L17_2["\b"] = "\\b"
L17_2["\f"] = "\\f"
L17_2["\n"] = "\\n"
L17_2["\r"] = "\\r"
L17_2["\t"] = "\\t"
function L18_2(A0_3)
local L1_3, L2_3, L3_3, L4_3, L5_3
L1_3 = tostring
L2_3 = A0_3
L1_3 = L1_3(L2_3)
L3_3 = L1_3
L2_3 = L1_3.gsub
L4_3 = "."
function L5_3(A0_4)
local L1_4
L1_4 = L17_2[A0_4]
return L1_4
end
return L2_3(L3_3, L4_3, L5_3)
end
L5_2.encodeString = L18_2
function L18_2(A0_3)
local L1_3, L2_3, L3_3, L4_3, L5_3, L6_3, L7_3, L8_3, L9_3
L1_3 = L4_2.EMPTY_ARRAY
if A0_3 == L1_3 then
L1_3 = true
L2_3 = 0
return L1_3, L2_3
end
L1_3 = L4_2.EMPTY_OBJECT
if A0_3 == L1_3 then
L1_3 = false
return L1_3
end
L1_3 = 0
L2_3 = pairs
L3_3 = A0_3
L2_3, L3_3, L4_3 = L2_3(L3_3)
for L5_3, L6_3 in L2_3, L3_3, L4_3 do
L7_3 = type
L8_3 = L5_3
L7_3 = L7_3(L8_3)
if L7_3 == "number" then
L7_3 = L0_2.floor
L8_3 = L5_3
L7_3 = L7_3(L8_3)
if L7_3 == L5_3 and 1 <= L5_3 then
L7_3 = L15_2
L8_3 = L6_3
L7_3 = L7_3(L8_3)
if not L7_3 then
L7_3 = false
return L7_3
end
L7_3 = L0_2.max
L8_3 = L1_3
L9_3 = L5_3
L7_3 = L7_3(L8_3, L9_3)
L1_3 = L7_3
end
elseif L5_3 == "n" then
L7_3 = A0_3.n
if not L7_3 then
L7_3 = #A0_3
end
if L6_3 ~= L7_3 then
L7_3 = false
return L7_3
end
else
L7_3 = L15_2
L8_3 = L6_3
L7_3 = L7_3(L8_3)
if L7_3 then
L7_3 = false
return L7_3
end
end
end
L2_3 = true
L3_3 = L1_3
return L2_3, L3_3
end
L14_2 = L18_2
function L18_2(A0_3)
local L1_3, L2_3
L1_3 = type
L2_3 = A0_3
L1_3 = L1_3(L2_3)
L2_3 = L1_3 == "string" or L1_3 == "boolean" or L1_3 == "number" or L1_3 == "nil" or L1_3 == "table"
return L2_3
end
L15_2 = L18_2
return L4_2
end
L13_1 = print
L14_1 = nil
L15_1 = nil
L16_1 = L12_1
L16_1 = L16_1()
L17_1 = {}
L18_1 = {}
L17_1.fileMaps = L18_1
L17_1.Run = true
L17_1.StepIn = false
L17_1.StepInLevel = 0
L17_1.StepNext = false
L17_1.StepNextLevel = 0
L17_1.StepOut = false
L18_1 = {}
L17_1.breakInfos = L18_1
L17_1.runTimeType = nil
L17_1.isHook = true
L18_1 = {}
L17_1.pathCachePaths = L18_1
L17_1.isProntToConsole = 1
L17_1.isFoxGloryProject = false
L17_1.isDebugPrint = true
L17_1.hookType = "lrc"
L17_1.currentFileName = ""
L17_1.currentTempFunc = nil
L18_1 = {}
L17_1.splitFilePaths = L18_1
L17_1.DebugLuaFie = ""
L17_1.version = "1.0.7"
L18_1 = nil
L19_1 = coroutine
L19_1 = L19_1.resume
L20_1 = coroutine
function L21_1(A0_2, ...)
local L1_2, L2_2, L3_2, L4_2
L1_2 = L17_1.isHook
if L1_2 then
L1_2 = coroutine
L1_2 = L1_2.status
L2_2 = A0_2
L1_2 = L1_2(L2_2)
if L1_2 ~= "dead" then
L1_2 = debug
L1_2 = L1_2.sethook
L2_2 = A0_2
L3_2 = L18_1
L4_2 = "lrc"
L1_2(L2_2, L3_2, L4_2)
end
end
L1_2 = L19_1
L2_2 = A0_2
L3_2, L4_2 = ...
return L1_2(L2_2, L3_2, L4_2)
end
L20_1.resume = L21_1
L20_1 = {}
L20_1.S2C_SetBreakPoints = 1
L20_1.C2S_SetBreakPoints = 2
L20_1.S2C_RUN = 3
L20_1.C2S_HITBreakPoint = 4
L20_1.S2C_ReqVar = 5
L20_1.C2S_ReqVar = 6
L20_1.S2C_NextRequest = 7
L20_1.C2S_NextResponse = 8
L20_1.C2S_NextResponseOver = 9
L20_1.S2C_StepInRequest = 10
L20_1.C2S_StepInResponse = 11
L20_1.S2C_StepOutRequest = 12
L20_1.C2S_StepOutResponse = 13
L20_1.C2S_LuaPrint = 14
L20_1.S2C_LoadLuaScript = 16
L20_1.C2S_SetSocketName = 17
L20_1.C2S_LoadLuaScript = 18
L20_1.C2S_DebugXpCall = 20
L20_1.S2C_DebugClose = 21
L17_1.event = L20_1
function L20_1(...)
local L0_2, L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2
L0_2 = L17_1.isProntToConsole
if L0_2 ~= 1 then
L0_2 = L17_1.isProntToConsole
if L0_2 ~= 3 then
goto lbl_10
end
end
L0_2 = L13_1
L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2 = ...
L0_2(L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2)
::lbl_10::
L0_2 = L17_1.isProntToConsole
if L0_2 ~= 1 then
L0_2 = L17_1.isProntToConsole
if L0_2 ~= 2 then
goto lbl_62
end
end
L0_2 = L14_1
if L0_2 then
L0_2 = {}
L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2 = ...
L0_2[1] = L1_2
L0_2[2] = L2_2
L0_2[3] = L3_2
L0_2[4] = L4_2
L0_2[5] = L5_2
L0_2[6] = L6_2
L0_2[7] = L7_2
L0_2[8] = L8_2
L0_2[9] = L9_2
L1_2 = ""
L2_2 = #L0_2
if L2_2 == 0 then
L2_2 = {}
L3_2 = "nil"
L2_2[1] = L3_2
L0_2 = L2_2
end
L2_2 = pairs
L3_2 = L0_2
L2_2, L3_2, L4_2 = L2_2(L3_2)
for L5_2, L6_2 in L2_2, L3_2, L4_2 do
L7_2 = L1_2
L8_2 = tostring
L9_2 = L6_2
L8_2 = L8_2(L9_2)
L9_2 = "\t"
L1_2 = L7_2 .. L8_2 .. L9_2
end
L2_2 = {}
L3_2 = L17_1.event
L3_2 = L3_2.C2S_LuaPrint
L2_2.event = L3_2
L3_2 = {}
L4_2 = L6_1.encode
L5_2 = L1_2
L4_2 = L4_2(L5_2)
L3_2.msg = L4_2
L3_2.type = 1
L2_2.data = L3_2
L3_2 = L16_1.encode
L4_2 = L2_2
L3_2 = L3_2(L4_2)
L4_2 = L14_1
L5_2 = L4_2
L4_2 = L4_2.send
L6_2 = L3_2
L7_2 = "__debugger_k0204__"
L6_2 = L6_2 .. L7_2
L4_2(L5_2, L6_2)
end
::lbl_62::
end
print = L20_1
function L20_1(...)
local L0_2, L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2
L0_2 = L17_1.isProntToConsole
if L0_2 ~= 1 then
L0_2 = L17_1.isProntToConsole
if L0_2 ~= 3 then
goto lbl_10
end
end
L0_2 = L13_1
L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2 = ...
L0_2(L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2)
::lbl_10::
L0_2 = L17_1.isProntToConsole
if L0_2 ~= 1 then
L0_2 = L17_1.isProntToConsole
if L0_2 ~= 2 then
goto lbl_62
end
end
L0_2 = L14_1
if L0_2 then
L0_2 = {}
L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2 = ...
L0_2[1] = L1_2
L0_2[2] = L2_2
L0_2[3] = L3_2
L0_2[4] = L4_2
L0_2[5] = L5_2
L0_2[6] = L6_2
L0_2[7] = L7_2
L0_2[8] = L8_2
L0_2[9] = L9_2
L1_2 = ""
L2_2 = #L0_2
if L2_2 == 0 then
L2_2 = {}
L3_2 = "nil"
L2_2[1] = L3_2
L0_2 = L2_2
end
L2_2 = pairs
L3_2 = L0_2
L2_2, L3_2, L4_2 = L2_2(L3_2)
for L5_2, L6_2 in L2_2, L3_2, L4_2 do
L7_2 = L1_2
L8_2 = tostring
L9_2 = L6_2
L8_2 = L8_2(L9_2)
L9_2 = "\t"
L1_2 = L7_2 .. L8_2 .. L9_2
end
L2_2 = {}
L3_2 = L17_1.event
L3_2 = L3_2.C2S_LuaPrint
L2_2.event = L3_2
L3_2 = {}
L4_2 = L6_1.encode
L5_2 = L1_2
L4_2 = L4_2(L5_2)
L3_2.msg = L4_2
L3_2.type = 2
L2_2.data = L3_2
L3_2 = L16_1.encode
L4_2 = L2_2
L3_2 = L3_2(L4_2)
L4_2 = L14_1
L5_2 = L4_2
L4_2 = L4_2.send
L6_2 = L3_2
L7_2 = "__debugger_k0204__"
L6_2 = L6_2 .. L7_2
L4_2(L5_2, L6_2)
end
::lbl_62::
end
luaIdePrintWarn = L20_1
function L20_1(...)
local L0_2, L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2
L0_2 = L17_1.isProntToConsole
if L0_2 ~= 1 then
L0_2 = L17_1.isProntToConsole
if L0_2 ~= 3 then
goto lbl_10
end
end
L0_2 = L13_1
L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2 = ...
L0_2(L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2)
::lbl_10::
L0_2 = L17_1.isProntToConsole
if L0_2 ~= 1 then
L0_2 = L17_1.isProntToConsole
if L0_2 ~= 2 then
goto lbl_62
end
end
L0_2 = L14_1
if L0_2 then
L0_2 = {}
L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2 = ...
L0_2[1] = L1_2
L0_2[2] = L2_2
L0_2[3] = L3_2
L0_2[4] = L4_2
L0_2[5] = L5_2
L0_2[6] = L6_2
L0_2[7] = L7_2
L0_2[8] = L8_2
L0_2[9] = L9_2
L1_2 = ""
L2_2 = #L0_2
if L2_2 == 0 then
L2_2 = {}
L3_2 = "nil"
L2_2[1] = L3_2
L0_2 = L2_2
end
L2_2 = pairs
L3_2 = L0_2
L2_2, L3_2, L4_2 = L2_2(L3_2)
for L5_2, L6_2 in L2_2, L3_2, L4_2 do
L7_2 = L1_2
L8_2 = tostring
L9_2 = L6_2
L8_2 = L8_2(L9_2)
L9_2 = "\t"
L1_2 = L7_2 .. L8_2 .. L9_2
end
L2_2 = {}
L3_2 = L17_1.event
L3_2 = L3_2.C2S_LuaPrint
L2_2.event = L3_2
L3_2 = {}
L4_2 = L6_1.encode
L5_2 = L1_2
L4_2 = L4_2(L5_2)
L3_2.msg = L4_2
L3_2.type = 3
L2_2.data = L3_2
L3_2 = L16_1.encode
L4_2 = L2_2
L3_2 = L3_2(L4_2)
L4_2 = L14_1
L5_2 = L4_2
L4_2 = L4_2.send
L6_2 = L3_2
L7_2 = "__debugger_k0204__"
L6_2 = L6_2 .. L7_2
L4_2(L5_2, L6_2)
end
::lbl_62::
end
luaIdePrintErr = L20_1
function L20_1(A0_2, A1_2)
local L2_2, L3_2, L4_2, L5_2, L6_2
L2_2 = string
L2_2 = L2_2.find
L3_2 = A0_2
L4_2 = A1_2
L5_2 = 1
L2_2 = L2_2(L3_2, L4_2, L5_2)
while L2_2 do
L3_2 = string
L3_2 = L3_2.find
L4_2 = A0_2
L5_2 = A1_2
L6_2 = L2_2 + 1
L3_2 = L3_2(L4_2, L5_2, L6_2)
if not L3_2 then
break
end
L2_2 = L3_2
end
return L2_2
end
function L21_1(A0_2)
local L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2
L1_2 = string
L1_2 = L1_2.find
L2_2 = A0_2
L3_2 = "/%.%./"
L1_2, L2_2 = L1_2(L2_2, L3_2)
if L1_2 then
L3_2 = string
L3_2 = L3_2.sub
L4_2 = A0_2
L5_2 = 1
L6_2 = L1_2 - 1
L3_2 = L3_2(L4_2, L5_2, L6_2)
L4_2 = L20_1
L5_2 = L3_2
L6_2 = "/"
L4_2 = L4_2(L5_2, L6_2)
L5_2 = string
L5_2 = L5_2.sub
L6_2 = L3_2
L7_2 = 1
L8_2 = L4_2 - 1
L5_2 = L5_2(L6_2, L7_2, L8_2)
L3_2 = L5_2
L5_2 = string
L5_2 = L5_2.sub
L6_2 = A0_2
L7_2 = L2_2
L5_2 = L5_2(L6_2, L7_2)
L6_2 = L3_2
L7_2 = L5_2
A0_2 = L6_2 .. L7_2
L6_2 = L21_1
L7_2 = A0_2
L6_2 = L6_2(L7_2)
A0_2 = L6_2
return A0_2
else
return A0_2
end
end
function L22_1(A0_2)
local L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2, L15_2, L16_2, L17_2
L1_2 = nil
L2_2 = nil
L4_2 = A0_2
L3_2 = A0_2.gsub
L5_2 = "\\"
L6_2 = "/"
L3_2 = L3_2(L4_2, L5_2, L6_2)
A0_2 = L3_2
L4_2 = A0_2
L3_2 = A0_2.gsub
L5_2 = "//"
L6_2 = "/"
L3_2 = L3_2(L4_2, L5_2, L6_2)
A0_2 = L3_2
L4_2 = A0_2
L3_2 = A0_2.gsub
L5_2 = "/./"
L6_2 = "/"
L3_2 = L3_2(L4_2, L5_2, L6_2)
A0_2 = L3_2
L4_2 = A0_2
L3_2 = A0_2.find
L5_2 = "@"
L3_2 = L3_2(L4_2, L5_2)
if L3_2 == 1 then
L4_2 = A0_2
L3_2 = A0_2.sub
L5_2 = 2
L3_2 = L3_2(L4_2, L5_2)
A0_2 = L3_2
end
L4_2 = A0_2
L3_2 = A0_2.find
L5_2 = "%./"
L3_2 = L3_2(L4_2, L5_2)
if L3_2 == 1 then
L5_2 = A0_2
L4_2 = A0_2.sub
L6_2 = 3
L4_2 = L4_2(L5_2, L6_2)
A0_2 = L4_2
end
L4_2 = L21_1
L5_2 = A0_2
L4_2 = L4_2(L5_2)
A0_2 = L4_2
L4_2 = string
L4_2 = L4_2.len
L5_2 = A0_2
L4_2 = L4_2(L5_2)
L5_2 = {}
L6_2 = ".lua"
L7_2 = ".txt.lua"
L8_2 = ".txt"
L9_2 = ".bytes"
L5_2[1] = L6_2
L5_2[2] = L7_2
L5_2[3] = L8_2
L5_2[4] = L9_2
L6_2 = table
L6_2 = L6_2.sort
L7_2 = L5_2
function L8_2(A0_3, A1_3)
local L2_3, L3_3, L4_3
L2_3 = string
L2_3 = L2_3.len
L3_3 = A0_3
L2_3 = L2_3(L3_3)
L3_3 = string
L3_3 = L3_3.len
L4_3 = A1_3
L3_3 = L3_3(L4_3)
L2_3 = L2_3 > L3_3
return L2_3
end
L6_2(L7_2, L8_2)
L6_2 = {}
L7_2 = ipairs
L8_2 = L5_2
L7_2, L8_2, L9_2 = L7_2(L8_2)
for L10_2, L11_2 in L7_2, L8_2, L9_2 do
L12_2 = table
L12_2 = L12_2.insert
L13_2 = L6_2
L14_2 = string
L14_2 = L14_2.len
L15_2 = L11_2
L14_2, L15_2, L16_2, L17_2 = L14_2(L15_2)
L12_2(L13_2, L14_2, L15_2, L16_2, L17_2)
end
L7_2 = string
L7_2 = L7_2.len
L8_2 = A0_2
L7_2 = L7_2(L8_2)
L8_2 = ipairs
L9_2 = L5_2
L8_2, L9_2, L10_2 = L8_2(L9_2)
for L11_2, L12_2 in L8_2, L9_2, L10_2 do
L13_2 = string
L13_2 = L13_2.sub
L14_2 = A0_2
L15_2 = L6_2[L11_2]
L15_2 = L7_2 - L15_2
L15_2 = L15_2 + 1
L13_2 = L13_2(L14_2, L15_2)
if L13_2 == L12_2 then
L14_2 = string
L14_2 = L14_2.sub
L15_2 = A0_2
L16_2 = 1
L17_2 = L6_2[L11_2]
L17_2 = L7_2 - L17_2
L14_2 = L14_2(L15_2, L16_2, L17_2)
A0_2 = L14_2
break
end
end
L8_2 = L20_1
L9_2 = A0_2
L10_2 = "/"
L8_2 = L8_2(L9_2, L10_2)
if L8_2 then
L9_2 = string
L9_2 = L9_2.sub
L10_2 = A0_2
L11_2 = L8_2 + 1
L9_2 = L9_2(L10_2, L11_2)
L1_2 = L9_2
L9_2 = string
L9_2 = L9_2.sub
L10_2 = A0_2
L11_2 = 1
L12_2 = L8_2
L9_2 = L9_2(L10_2, L11_2, L12_2)
L2_2 = L9_2
L9_2 = L2_2
L10_2 = L1_2
A0_2 = L9_2 .. L10_2
else
L9_2 = L20_1
L10_2 = A0_2
L11_2 = "%."
L9_2 = L9_2(L10_2, L11_2)
L8_2 = L9_2
if not L8_2 then
L1_2 = A0_2
L2_2 = ""
else
L9_2 = string
L9_2 = L9_2.sub
L10_2 = A0_2
L11_2 = 1
L12_2 = L8_2
L9_2 = L9_2(L10_2, L11_2, L12_2)
L2_2 = L9_2
L10_2 = L2_2
L9_2 = L2_2.gsub
L11_2 = "%."
L12_2 = "/"
L9_2 = L9_2(L10_2, L11_2, L12_2)
L2_2 = L9_2
L9_2 = string
L9_2 = L9_2.sub
L10_2 = A0_2
L11_2 = L8_2 + 1
L9_2 = L9_2(L10_2, L11_2)
L1_2 = L9_2
L9_2 = L2_2
L10_2 = L1_2
A0_2 = L9_2 .. L10_2
end
end
L9_2 = A0_2
L10_2 = L2_2
L11_2 = L1_2
return L9_2, L10_2, L11_2
end
function L23_1(A0_2, A1_2)
local L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2
L2_2 = tostring
L3_2 = A0_2
L2_2 = L2_2(L3_2)
A0_2 = L2_2
L2_2 = tostring
L3_2 = A1_2
L2_2 = L2_2(L3_2)
A1_2 = L2_2
if A1_2 == "" then
L2_2 = false
return L2_2
end
L2_2 = 0
L3_2 = {}
function L4_2()
local L0_3, L1_3, L2_3, L3_3, L4_3
L0_3 = string
L0_3 = L0_3.find
L1_3 = A0_2
L2_3 = A1_2
L3_3 = L2_2
L4_3 = true
return L0_3(L1_3, L2_3, L3_3, L4_3)
end
L5_2 = nil
L6_2 = nil
for L7_2, L8_2 in L4_2, L5_2, L6_2 do
L9_2 = table
L9_2 = L9_2.insert
L10_2 = L3_2
L11_2 = string
L11_2 = L11_2.sub
L12_2 = A0_2
L13_2 = L2_2
L14_2 = L7_2 - 1
L11_2, L12_2, L13_2, L14_2 = L11_2(L12_2, L13_2, L14_2)
L9_2(L10_2, L11_2, L12_2, L13_2, L14_2)
L2_2 = L8_2 + 1
end
L4_2 = table
L4_2 = L4_2.insert
L5_2 = L3_2
L6_2 = string
L6_2 = L6_2.sub
L7_2 = A0_2
L8_2 = L2_2
L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2 = L6_2(L7_2, L8_2)
L4_2(L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2)
return L3_2
end
function L24_1(A0_2)
local L1_2, L2_2, L3_2, L4_2
L1_2 = string
L1_2 = L1_2.gsub
L2_2 = A0_2
L3_2 = "^[ \t\n\r]+"
L4_2 = ""
L1_2 = L1_2(L2_2, L3_2, L4_2)
A0_2 = L1_2
L1_2 = string
L1_2 = L1_2.gsub
L2_2 = A0_2
L3_2 = "[ \t\n\r]+$"
L4_2 = ""
return L1_2(L2_2, L3_2, L4_2)
end
function L25_1(A0_2, A1_2, A2_2)
local L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2
L3_2 = type
L4_2 = A2_2
L3_2 = L3_2(L4_2)
if L3_2 ~= "number" then
A2_2 = 3
end
L3_2 = {}
L4_2 = {}
function L5_2(A0_3)
local L1_3, L2_3, L3_3
L1_3 = type
L2_3 = A0_3
L1_3 = L1_3(L2_3)
if L1_3 == "string" then
L1_3 = "\""
L2_3 = A0_3
L3_3 = "\""
A0_3 = L1_3 .. L2_3 .. L3_3
end
L1_3 = tostring
L2_3 = A0_3
return L1_3(L2_3)
end
L6_2 = L23_1
L7_2 = debug
L7_2 = L7_2.traceback
L8_2 = ""
L9_2 = 2
L7_2 = L7_2(L8_2, L9_2)
L8_2 = "\n"
L6_2 = L6_2(L7_2, L8_2)
L7_2 = print
L8_2 = "dump from: "
L9_2 = L24_1
L10_2 = L6_2[3]
L9_2 = L9_2(L10_2)
L8_2 = L8_2 .. L9_2
L7_2(L8_2)
function L7_2(A0_3, A1_3, A2_3, A3_3, A4_3)
local L5_3, L6_3, L7_3, L8_3, L9_3, L10_3, L11_3, L12_3, L13_3, L14_3, L15_3, L16_3, L17_3, L18_3, L19_3, L20_3
if not A1_3 then
A1_3 = "<var>"
end
L5_3 = ""
L6_3 = type
L7_3 = A4_3
L6_3 = L6_3(L7_3)
if L6_3 == "number" then
L6_3 = string
L6_3 = L6_3.rep
L7_3 = " "
L8_3 = string
L8_3 = L8_3.len
L9_3 = L5_2
L10_3 = A1_3
L9_3, L10_3, L11_3, L12_3, L13_3, L14_3, L15_3, L16_3, L17_3, L18_3, L19_3, L20_3 = L9_3(L10_3)
L8_3 = L8_3(L9_3, L10_3, L11_3, L12_3, L13_3, L14_3, L15_3, L16_3, L17_3, L18_3, L19_3, L20_3)
L8_3 = A4_3 - L8_3
L6_3 = L6_3(L7_3, L8_3)
L5_3 = L6_3
end
L6_3 = type
L7_3 = A0_3
L6_3 = L6_3(L7_3)
if L6_3 ~= "table" then
L6_3 = L4_2
L6_3 = #L6_3
L6_3 = L6_3 + 1
L7_3 = string
L7_3 = L7_3.format
L8_3 = "%s%s%s = %s"
L9_3 = A2_3
L10_3 = L5_2
L11_3 = A1_3
L10_3 = L10_3(L11_3)
L11_3 = L5_3
L12_3 = L5_2
L13_3 = A0_3
L12_3, L13_3, L14_3, L15_3, L16_3, L17_3, L18_3, L19_3, L20_3 = L12_3(L13_3)
L7_3 = L7_3(L8_3, L9_3, L10_3, L11_3, L12_3, L13_3, L14_3, L15_3, L16_3, L17_3, L18_3, L19_3, L20_3)
L4_2[L6_3] = L7_3
else
L6_3 = L3_2[A0_3]
if L6_3 then
L6_3 = L4_2
L6_3 = #L6_3
L6_3 = L6_3 + 1
L7_3 = string
L7_3 = L7_3.format
L8_3 = "%s%s%s = *REF*"
L9_3 = A2_3
L10_3 = A1_3
L11_3 = L5_3
L7_3 = L7_3(L8_3, L9_3, L10_3, L11_3)
L4_2[L6_3] = L7_3
else
L3_2[A0_3] = true
L6_3 = A2_2
if A3_3 > L6_3 then
L6_3 = L4_2
L6_3 = #L6_3
L6_3 = L6_3 + 1
L7_3 = string
L7_3 = L7_3.format
L8_3 = "%s%s = *MAX NESTING*"
L9_3 = A2_3
L10_3 = A1_3
L7_3 = L7_3(L8_3, L9_3, L10_3)
L4_2[L6_3] = L7_3
else
L6_3 = L4_2
L6_3 = #L6_3
L6_3 = L6_3 + 1
L7_3 = string
L7_3 = L7_3.format
L8_3 = "%s%s = {"
L9_3 = A2_3
L10_3 = L5_2
L11_3 = A1_3
L10_3, L11_3, L12_3, L13_3, L14_3, L15_3, L16_3, L17_3, L18_3, L19_3, L20_3 = L10_3(L11_3)
L7_3 = L7_3(L8_3, L9_3, L10_3, L11_3, L12_3, L13_3, L14_3, L15_3, L16_3, L17_3, L18_3, L19_3, L20_3)
L4_2[L6_3] = L7_3
L6_3 = A2_3
L7_3 = " "
L6_3 = L6_3 .. L7_3
L7_3 = {}
L8_3 = 0
L9_3 = {}
L10_3 = pairs
L11_3 = A0_3
L10_3, L11_3, L12_3 = L10_3(L11_3)
for L13_3, L14_3 in L10_3, L11_3, L12_3 do
L15_3 = #L7_3
L15_3 = L15_3 + 1
L7_3[L15_3] = L13_3
L15_3 = L5_2
L16_3 = L13_3
L15_3 = L15_3(L16_3)
L16_3 = string
L16_3 = L16_3.len
L17_3 = L15_3
L16_3 = L16_3(L17_3)
if L8_3 < L16_3 then
L8_3 = L16_3
end
L9_3[L13_3] = L14_3
end
L10_3 = table
L10_3 = L10_3.sort
L11_3 = L7_3
function L12_3(A0_4, A1_4)
local L2_4, L3_4, L4_4
L2_4 = type
L3_4 = A0_4
L2_4 = L2_4(L3_4)
if L2_4 == "number" then
L2_4 = type
L3_4 = A1_4
L2_4 = L2_4(L3_4)
if L2_4 == "number" then
L2_4 = A0_4 < A1_4
return L2_4
end
else
L2_4 = tostring
L3_4 = A0_4
L2_4 = L2_4(L3_4)
L3_4 = tostring
L4_4 = A1_4
L3_4 = L3_4(L4_4)
L2_4 = L2_4 < L3_4
return L2_4
end
end
L10_3(L11_3, L12_3)
L10_3 = ipairs
L11_3 = L7_3
L10_3, L11_3, L12_3 = L10_3(L11_3)
for L13_3, L14_3 in L10_3, L11_3, L12_3 do
L15_3 = L7_2
L16_3 = L9_3[L14_3]
L17_3 = L14_3
L18_3 = L6_3
L19_3 = A3_3 + 1
L20_3 = L8_3
L15_3(L16_3, L17_3, L18_3, L19_3, L20_3)
end
L10_3 = L4_2
L10_3 = #L10_3
L10_3 = L10_3 + 1
L11_3 = string
L11_3 = L11_3.format
L12_3 = "%s}"
L13_3 = A2_3
L11_3 = L11_3(L12_3, L13_3)
L4_2[L10_3] = L11_3
end
end
end
end
L8_2 = L7_2
L9_2 = A0_2
L10_2 = A1_2
L11_2 = "- "
L12_2 = 1
L8_2(L9_2, L10_2, L11_2, L12_2)
L8_2 = ipairs
L9_2 = L4_2
L8_2, L9_2, L10_2 = L8_2(L9_2)
for L11_2, L12_2 in L8_2, L9_2, L10_2 do
L13_2 = print
L14_2 = L12_2
L13_2(L14_2)
end
end
function L26_1(A0_2, A1_2)
local L2_2, L3_2, L4_2, L5_2, L6_2
L2_2 = type
L3_2 = A1_2
L2_2 = L2_2(L3_2)
L3_2 = ""
if L2_2 ~= "table" then
L4_2 = tostring
L5_2 = A1_2
L4_2 = L4_2(L5_2)
L3_2 = L4_2
L4_2 = L6_1.encode
L5_2 = L3_2
L4_2 = L4_2(L5_2)
L3_2 = L4_2
else
L4_2 = L17_1.isFoxGloryProject
if L4_2 then
L4_2 = L6_1.encode
L5_2 = "table"
L4_2 = L4_2(L5_2)
L3_2 = L4_2
else
L4_2 = xpcall
function L5_2()
local L0_3, L1_3
L0_3 = tostring
L1_3 = A1_2
L0_3 = L0_3(L1_3)
L3_2 = L0_3
L0_3 = L6_1.encode
L1_3 = L3_2
L0_3 = L0_3(L1_3)
L3_2 = L0_3
end
function L6_2(A0_3)
local L1_3, L2_3
L1_3 = L6_1.encode
L2_3 = "table"
L1_3 = L1_3(L2_3)
L3_2 = L1_3
end
L4_2, L5_2 = L4_2(L5_2, L6_2)
end
end
L4_2 = {}
L4_2.name = A0_2
L4_2.valueType = L2_2
L4_2.valueStr = L3_2
return L4_2
end
function L27_1(A0_2)
local L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2
L1_2 = 1
L2_2 = {}
while true do
L3_2 = debug
L3_2 = L3_2.getlocal
L4_2 = A0_2
L5_2 = L1_2
L3_2, L4_2 = L3_2(L4_2, L5_2)
if not L3_2 then
break
end
if L3_2 ~= "(*temporary)" then
L2_2[L3_2] = L4_2
end
L1_2 = L1_2 + 1
end
L3_2 = L10_1
L4_2 = A0_2
L5_2 = "f"
L3_2 = L3_2(L4_2, L5_2)
L3_2 = L3_2.func
L1_2 = 1
L4_2 = {}
while L3_2 do
L5_2 = debug
L5_2 = L5_2.getupvalue
L6_2 = L3_2
L7_2 = L1_2
L5_2, L6_2 = L5_2(L6_2, L7_2)
if not L5_2 then
break
end
if L5_2 == "_ENV" then
L4_2._ENV_ = L6_2
else
L4_2[L5_2] = L6_2
end
L1_2 = L1_2 + 1
end
L5_2 = {}
L5_2.locals = L2_2
L5_2.ups = L4_2
return L5_2
end
function L28_1(A0_2, A1_2)
local L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2, L15_2, L16_2, L17_2, L18_2, L19_2, L20_2
L2_2 = {}
L3_2 = {}
L4_2 = {}
L5_2 = {}
L6_2 = 0
L7_2 = A0_2
L8_2 = 100
L9_2 = 1
for L10_2 = L7_2, L8_2, L9_2 do
L11_2 = L10_1
L12_2 = L10_2
L11_2 = L11_2(L12_2)
L12_2 = true
if L10_2 == A0_2 then
L13_2 = L11_2.source
L15_2 = L13_2
L14_2 = L13_2.find
L16_2 = L17_1.DebugLuaFie
L14_2 = L14_2(L15_2, L16_2)
if L14_2 then
return
end
if L13_2 == "=[C]" then
L12_2 = false
end
end
if not L11_2 then
break
end
if L12_2 then
L13_2 = L22_1
L14_2 = L11_2.source
L13_2, L14_2, L15_2 = L13_2(L14_2)
L16_2 = {}
L16_2.src = L13_2
L17_2 = L11_2.name
L16_2.scoreName = L17_2
L17_2 = L11_2.currentline
L16_2.currentline = L17_2
L17_2 = L11_2.linedefined
L16_2.linedefined = L17_2
L17_2 = L11_2.what
L16_2.what = L17_2
L17_2 = L11_2.namewhat
L16_2.nameWhat = L17_2
L6_2 = L10_2
L17_2 = L27_1
L18_2 = L10_2 + 1
L17_2 = L17_2(L18_2)
L18_2 = table
L18_2 = L18_2.insert
L19_2 = L3_2
L20_2 = L16_2
L18_2(L19_2, L20_2)
L18_2 = table
L18_2 = L18_2.insert
L19_2 = L4_2
L20_2 = L17_2
L18_2(L19_2, L20_2)
L18_2 = table
L18_2 = L18_2.insert
L19_2 = L5_2
L20_2 = L11_2.func
L18_2(L19_2, L20_2)
end
L13_2 = L11_2.what
if L13_2 == "main" then
break
end
end
L7_2 = {}
L7_2.stack = L3_2
L7_2.vars = L4_2
L7_2.funcs = L5_2
L8_2 = {}
L9_2 = L7_2.stack
L8_2.stack = L9_2
L9_2 = L7_2.vars
L8_2.vars = L9_2
L9_2 = L7_2.funcs
L8_2.funcs = L9_2
L8_2.event = A1_2
L9_2 = L7_2.funcs
L9_2 = #L9_2
L8_2.funcsLength = L9_2
L9_2 = L8_2.funcs
L9_2 = L9_2[1]
L17_1.currentTempFunc = L9_2
return L8_2
end
L0_1 = L28_1
L28_1 = nil
function L29_1()
local L0_2, L1_2, L2_2, L3_2, L4_2, L5_2
L0_2 = jit
if L0_2 then
L0_2 = L17_1.debugLuaType
if L0_2 ~= "jit" then
L0_2 = "\229\189\147\229\137\141luajit\231\137\136\230\156\172\228\184\186: "
L1_2 = jit
L1_2 = L1_2.version
L2_2 = " \232\175\183\228\189\191\231\148\168LuaDebugjit \232\191\155\232\161\140\232\176\131\232\175\149!"
L0_2 = L0_2 .. L1_2 .. L2_2
L1_2 = print
L2_2 = L0_2
L1_2(L2_2)
end
end
L0_2 = L15_1
if L0_2 then
L0_2 = L15_1
L1_2 = L0_2
L0_2 = L0_2.receive
L0_2, L1_2 = L0_2(L1_2)
if L0_2 then
L2_2 = L16_1.decode
L3_2 = L0_2
L2_2 = L2_2(L3_2)
L3_2 = L2_2.event
L4_2 = L17_1.event
L4_2 = L4_2.S2C_SetBreakPoints
if L3_2 == L4_2 then
L3_2 = L28_1
L4_2 = L2_2.data
L3_2(L4_2)
else
L3_2 = L2_2.event
L4_2 = L17_1.event
L4_2 = L4_2.S2C_LoadLuaScript
if L3_2 == L4_2 then
L3_2 = L3_1
L4_2 = L2_2.data
L5_2 = false
L3_2(L4_2, L5_2)
end
end
end
end
end
function L30_1(A0_2)
local L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2
L1_2 = L17_1.splitFilePaths
L1_2 = L1_2[A0_2]
if L1_2 then
L1_2 = L17_1.splitFilePaths
L1_2 = L1_2[A0_2]
return L1_2
end
L1_2 = 0
L2_2 = {}
function L3_2()
local L0_3, L1_3, L2_3, L3_3, L4_3
L0_3 = string
L0_3 = L0_3.find
L1_3 = A0_2
L2_3 = "/"
L3_3 = L1_2
L4_3 = true
return L0_3(L1_3, L2_3, L3_3, L4_3)
end
L4_2 = nil
L5_2 = nil
for L6_2, L7_2 in L3_2, L4_2, L5_2 do
L8_2 = string
L8_2 = L8_2.sub
L9_2 = A0_2
L10_2 = L1_2
L11_2 = L6_2 - 1
L8_2 = L8_2(L9_2, L10_2, L11_2)
L9_2 = table
L9_2 = L9_2.insert
L10_2 = L2_2
L11_2 = L8_2
L9_2(L10_2, L11_2)
L1_2 = L7_2 + 1
end
L3_2 = string
L3_2 = L3_2.sub
L4_2 = A0_2
L5_2 = L1_2
L3_2 = L3_2(L4_2, L5_2)
L4_2 = table
L4_2 = L4_2.insert
L5_2 = L2_2
L6_2 = L3_2
L4_2(L5_2, L6_2)
L4_2 = L17_1.splitFilePaths
L4_2[A0_2] = L2_2
return L2_2
end
function L31_1(A0_2)
local L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2, L15_2, L16_2
L1_2 = L17_1.breakInfos
L2_2 = ipairs
L3_2 = A0_2
L2_2, L3_2, L4_2 = L2_2(L3_2)
for L5_2, L6_2 in L2_2, L3_2, L4_2 do
L7_2 = string
L7_2 = L7_2.lower
L8_2 = L6_2.fileName
L7_2 = L7_2(L8_2)
L6_2.fileName = L7_2
L7_2 = string
L7_2 = L7_2.lower
L8_2 = L6_2.serverPath
L7_2 = L7_2(L8_2)
L6_2.serverPath = L7_2
L7_2 = L6_2.fileName
L7_2 = L1_2[L7_2]
if not L7_2 then
L8_2 = L6_2.fileName
L9_2 = {}
L1_2[L8_2] = L9_2
L8_2 = L6_2.fileName
L7_2 = L1_2[L8_2]
end
L8_2 = L6_2.breakDatas
if L8_2 then
L8_2 = L6_2.breakDatas
L8_2 = #L8_2
if L8_2 ~= 0 then
goto lbl_35
end
end
L8_2 = L6_2.serverPath
L7_2[L8_2] = nil
goto lbl_90
::lbl_35::
L8_2 = L6_2.serverPath
L8_2 = L7_2[L8_2]
if not L8_2 then
L9_2 = {}
L10_2 = L30_1
L11_2 = L6_2.serverPath
L10_2 = L10_2(L11_2)
L9_2.pathNames = L10_2
L10_2 = {}
L9_2.hitCounts = L10_2
L8_2 = L9_2
L9_2 = L6_2.serverPath
L7_2[L9_2] = L8_2
end
L9_2 = {}
L10_2 = ipairs
L11_2 = L6_2.breakDatas
L10_2, L11_2, L12_2 = L10_2(L11_2)
for L13_2, L14_2 in L10_2, L11_2, L12_2 do
L15_2 = L14_2.line
L9_2[L15_2] = L14_2
L15_2 = L14_2.hitCondition
if L15_2 then
L15_2 = L14_2.hitCondition
if L15_2 ~= "" then
L15_2 = tonumber
L16_2 = L14_2.hitCondition
L15_2 = L15_2(L16_2)
L14_2.hitCondition = L15_2
end
else
L14_2.hitCondition = 0
end
L15_2 = L8_2.hitCounts
L16_2 = L14_2.line
L15_2 = L15_2[L16_2]
if not L15_2 then
L15_2 = L8_2.hitCounts
L16_2 = L14_2.line
L15_2[L16_2] = 0
end
end
L8_2.lines = L9_2
L10_2 = pairs
L11_2 = L8_2.hitCounts
L10_2, L11_2, L12_2 = L10_2(L11_2)
for L13_2, L14_2 in L10_2, L11_2, L12_2 do
L15_2 = L9_2[L13_2]
if not L15_2 then
L15_2 = L8_2.hitCounts
L15_2[L13_2] = nil
end
end
::lbl_90::
L8_2 = 0
L9_2 = pairs
L10_2 = L7_2
L9_2, L10_2, L11_2 = L9_2(L10_2)
for L12_2, L13_2 in L9_2, L10_2, L11_2 do
L8_2 = L8_2 + 1
end
if L8_2 == 0 then
L9_2 = L6_2.fileName
L1_2[L9_2] = nil
end
end
L2_2 = false
L3_2 = pairs
L4_2 = L1_2
L3_2, L4_2, L5_2 = L3_2(L4_2)
for L6_2, L7_2 in L3_2, L4_2, L5_2 do
L2_2 = true
break
end
if L2_2 then
L3_2 = L17_1.isHook
if not L3_2 then
L3_2 = debug
L3_2 = L3_2.sethook
L4_2 = L18_1
L5_2 = "lrc"
L3_2(L4_2, L5_2)
end
L17_1.isHook = true
else
L3_2 = L17_1.isHook
if L3_2 then
L3_2 = debug
L3_2 = L3_2.sethook
L3_2()
end
L17_1.isHook = false
end
end
L28_1 = L31_1
function L31_1(A0_2)
local L1_2
L1_2 = L17_1.breakInfos
L1_2 = L1_2[A0_2]
return L1_2
end
L32_1 = "192.168.1.102"
L33_1 = 7003
function L34_1(A0_2, A1_2, A2_2)
local L3_2, L4_2, L5_2, L6_2, L7_2, L8_2
L3_2 = {}
L3_2.event = A1_2
L3_2.data = A2_2
L4_2 = L16_1.encode
L5_2 = L3_2
L4_2 = L4_2(L5_2)
L6_2 = A0_2
L5_2 = A0_2.send
L7_2 = L4_2
L8_2 = "__debugger_k0204__"
L7_2 = L7_2 .. L8_2
L5_2(L6_2, L7_2)
end
function L35_1(A0_2, A1_2, A2_2)
local L3_2, L4_2, L5_2, L6_2
function L3_2()
local L0_3, L1_3, L2_3, L3_3, L4_3, L5_3, L6_3, L7_3, L8_3
L0_3 = {}
L1_3 = A1_2[1]
L1_3 = L1_3.locals
L2_3 = A1_2[1]
L2_3 = L2_3.ups
if L2_3 then
L3_3 = pairs
L4_3 = L2_3
L3_3, L4_3, L5_3 = L3_3(L4_3)
for L6_3, L7_3 in L3_3, L4_3, L5_3 do
L0_3[L6_3] = L7_3
end
end
if L1_3 then
L3_3 = pairs
L4_3 = L1_3
L3_3, L4_3, L5_3 = L3_3(L4_3)
for L6_3, L7_3 in L3_3, L4_3, L5_3 do
L0_3[L6_3] = L7_3
end
end
L3_3 = setmetatable
L4_3 = L0_3
L5_3 = {}
L6_3 = _G
L5_3.__index = L6_3
L3_3(L4_3, L5_3)
L3_3 = L9_1
L4_3 = "return "
L5_3 = A0_2
L4_3 = L4_3 .. L5_3
L3_3 = L3_3(L4_3)
L4_3 = L5_1
L5_3 = L3_3
L6_3 = L0_3
L4_3(L5_3, L6_3)
L4_3 = L3_3
return L4_3()
end
L4_2 = xpcall
L5_2 = L3_2
function L6_2(A0_3)
local L1_3, L2_3
L1_3 = print
L2_3 = A0_3
L1_3(L2_3)
end
L4_2, L5_2 = L4_2(L5_2, L6_2)
if L4_2 and L5_2 then
L6_2 = A2_2
L6_2()
end
end
debugger_conditionStr = L35_1
function L35_1(A0_2, A1_2)
local L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2
function L2_2()
local L0_3, L1_3, L2_3, L3_3, L4_3, L5_3, L6_3, L7_3, L8_3, L9_3, L10_3, L11_3, L12_3
L0_3 = A0_2.luastr
L1_3 = A1_2
if L1_3 then
L1_3 = {}
L2_3 = _G
L1_3._G = L2_3
L2_3 = A0_2.frameId
L2_3 = L2_3 + 1
L3_3 = L17_1.currentDebuggerData
L3_3 = L3_3.funcs
L3_3 = L3_3[L2_3]
L4_3 = L17_1.currentDebuggerData
L4_3 = L4_3.vars
L4_3 = L4_3[L2_3]
L5_3 = L4_3.locals
L6_3 = L4_3.ups
L7_3 = pairs
L8_3 = L6_3
L7_3, L8_3, L9_3 = L7_3(L8_3)
for L10_3, L11_3 in L7_3, L8_3, L9_3 do
L1_3[L10_3] = L11_3
end
L7_3 = pairs
L8_3 = L5_3
L7_3, L8_3, L9_3 = L7_3(L8_3)
for L10_3, L11_3 in L7_3, L8_3, L9_3 do
L1_3[L10_3] = L11_3
end
L7_3 = setmetatable
L8_3 = L1_3
L9_3 = {}
L10_3 = _G
L9_3.__index = L10_3
L7_3(L8_3, L9_3)
L7_3 = L9_1
L8_3 = L0_3
L7_3 = L7_3(L8_3)
L8_3 = L5_1
L9_3 = L7_3
L10_3 = L1_3
L8_3(L9_3, L10_3)
L8_3 = L7_3
L8_3()
else
L1_3 = L9_1
L2_3 = L0_3
L1_3 = L1_3(L2_3)
L2_3 = L1_3
L2_3()
end
end
L3_2 = xpcall
L4_2 = L2_2
function L5_2(A0_3)
local L1_3, L2_3
L1_3 = print
L2_3 = A0_3
L1_3(L2_3)
end
L3_2, L4_2 = L3_2(L4_2, L5_2)
if L3_2 then
L5_2 = L34_1
L6_2 = L14_1
L7_2 = L17_1.event
L7_2 = L7_2.C2S_LoadLuaScript
L8_2 = {}
L8_2.msg = "\230\137\167\232\161\140\228\187\163\231\160\129\230\136\144\229\138\159"
L5_2(L6_2, L7_2, L8_2)
if A1_2 then
L5_2 = L34_1
L6_2 = L14_1
L7_2 = L17_1.event
L7_2 = L7_2.C2S_HITBreakPoint
L8_2 = L17_1.currentDebuggerData
L8_2 = L8_2.stack
L5_2(L6_2, L7_2, L8_2)
end
else
L5_2 = L34_1
L6_2 = L14_1
L7_2 = L17_1.event
L7_2 = L7_2.C2S_LoadLuaScript
L8_2 = {}
L8_2.msg = "\229\138\160\232\189\189\228\187\163\231\160\129\229\164\177\232\180\165"
L5_2(L6_2, L7_2, L8_2)
end
end
L3_1 = L35_1
function L35_1(A0_2)
local L1_2, L2_2, L3_2, L4_2
L1_2 = string
L1_2 = L1_2.lower
L2_2 = A0_2
L1_2 = L1_2(L2_2)
A0_2 = L1_2
L1_2 = L17_1.pathCachePaths
L1_2 = L1_2[A0_2]
if L1_2 then
L1_2 = L17_1.pathCachePaths
L1_2 = L1_2[A0_2]
L17_1.currentLineFile = L1_2
L1_2 = L17_1.pathCachePaths
L1_2 = L1_2[A0_2]
return L1_2
end
L1_2 = L22_1
L2_2 = A0_2
L1_2, L2_2, L3_2 = L1_2(L2_2)
L17_1.currentLineFile = L1_2
L4_2 = L17_1.pathCachePaths
L4_2[A0_2] = L3_2
return L3_2
end
function L36_1(A0_2, A1_2)
local L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2
L2_2 = L8_1.getUserDataInfo
L3_2 = A1_2
L2_2 = L2_2(L3_2)
L3_2 = {}
L4_2 = tolua
if L4_2 then
L4_2 = tolua
L4_2 = L4_2.getpeer
if L4_2 then
L4_2 = tolua
L4_2 = L4_2.getpeer
L5_2 = A1_2
L4_2 = L4_2(L5_2)
if L4_2 then
L5_2 = pairs
L6_2 = L4_2
L5_2, L6_2, L7_2 = L5_2(L6_2)
for L8_2, L9_2 in L5_2, L6_2, L7_2 do
L10_2 = L26_1
L11_2 = L8_2
L12_2 = L9_2
L10_2 = L10_2(L11_2, L12_2)
L11_2 = table
L11_2 = L11_2.insert
L12_2 = L3_2
L13_2 = L10_2
L11_2(L12_2, L13_2)
end
end
end
end
L4_2 = 1
L5_2 = L2_2.Count
L6_2 = 1
for L7_2 = L4_2, L5_2, L6_2 do
L8_2 = L7_2 - 1
L8_2 = L2_2[L8_2]
L9_2 = {}
L10_2 = L8_2.name
L9_2.name = L10_2
L10_2 = L8_2.valueType
L9_2.valueType = L10_2
L10_2 = L6_1.encode
L11_2 = L8_2.valueStr
L10_2 = L10_2(L11_2)
L9_2.valueStr = L10_2
L10_2 = L8_2.isValue
L9_2.isValue = L10_2
L9_2.csharp = true
L10_2 = table
L10_2 = L10_2.insert
L11_2 = L3_2
L12_2 = L9_2
L10_2(L11_2, L12_2)
end
return L3_2
end
function L37_1(A0_2, A1_2)
local L2_2, L3_2, L4_2, L5_2
L2_2 = nil
L3_2 = xpcall
function L4_2()
local L0_3, L1_3, L2_3, L3_3
L0_3 = L9_1
L1_3 = "return "
L2_3 = A1_2
L1_3 = L1_3 .. L2_3
L0_3 = L0_3(L1_3)
L1_3 = L5_1
L2_3 = L0_3
L3_3 = A0_2
L1_3(L2_3, L3_3)
L1_3 = L0_3
L1_3 = L1_3()
L2_2 = L1_3
end
function L5_2(A0_3)
local L1_3, L2_3, L3_3
L1_3 = print
L2_3 = A0_3
L3_3 = "====>"
L1_3(L2_3, L3_3)
L1_3 = nil
L2_2 = L1_3
end
L3_2, L4_2 = L3_2(L4_2, L5_2)
return L2_2
end
function L38_1(A0_2, A1_2, A2_2)
local L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2
L3_2 = ""
L4_2 = A2_2
L5_2 = #A1_2
L6_2 = 1
for L7_2 = L4_2, L5_2, L6_2 do
L8_2 = A1_2[L7_2]
if L8_2 == "[metatable]" then
elseif L7_2 == A2_2 then
L9_2 = string
L9_2 = L9_2.find
L10_2 = L8_2
L11_2 = "%."
L9_2 = L9_2(L10_2, L11_2)
if L9_2 then
if L3_2 == "" then
L7_2 = A2_2 + 1
A0_2 = A0_2[L8_2]
end
L9_2 = #A1_2
if L7_2 >= L9_2 then
L9_2 = A2_2
L10_2 = A0_2
return L9_2, L10_2
end
L9_2 = L38_1
L10_2 = A0_2
L11_2 = A1_2
L12_2 = L7_2
return L9_2(L10_2, L11_2, L12_2)
else
L3_2 = L8_2
end
else
L9_2 = string
L9_2 = L9_2.find
L10_2 = L8_2
L11_2 = "%["
L9_2 = L9_2(L10_2, L11_2)
if L9_2 then
L9_2 = L3_2
L10_2 = L8_2
L3_2 = L9_2 .. L10_2
else
L9_2 = type
L10_2 = L8_2
L9_2 = L9_2(L10_2)
if L9_2 == "string" then
L9_2 = L3_2
L10_2 = "[\""
L11_2 = L8_2
L12_2 = "\"]"
L3_2 = L9_2 .. L10_2 .. L11_2 .. L12_2
else
L9_2 = L3_2
L10_2 = "["
L11_2 = L8_2
L12_2 = "]"
L3_2 = L9_2 .. L10_2 .. L11_2 .. L12_2
end
end
end
end
L4_2 = L37_1
L5_2 = A0_2
L6_2 = L3_2
L4_2 = L4_2(L5_2, L6_2)
L5_2 = #A1_2
L6_2 = L4_2
return L5_2, L6_2
end
function L39_1(A0_2, A1_2, A2_2)
local L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2
L3_2 = A2_2[A1_2]
L4_2 = L8_1.getCSharpValue
L5_2 = A0_2
L6_2 = L3_2
L4_2 = L4_2(L5_2, L6_2)
if L4_2 then
L5_2 = #A2_2
if A1_2 == L5_2 then
L5_2 = #A2_2
L6_2 = L4_2
return L5_2, L6_2
else
L5_2 = L39_1
L6_2 = L4_2
L7_2 = A1_2 + 1
L8_2 = A2_2
L5_2, L6_2 = L5_2(L6_2, L7_2, L8_2)
if not L6_2 then
L7_2 = {}
L8_2 = L5_2
L9_2 = #A2_2
L10_2 = 1
for L11_2 = L8_2, L9_2, L10_2 do
L12_2 = table
L12_2 = L12_2.insert
L13_2 = L7_2
L14_2 = A2_2[L11_2]
L12_2(L13_2, L14_2)
end
L8_2 = debugger_searchVarByKeys
L9_2 = A0_2
L10_2 = searckKeys
L11_2 = 1
L8_2, L9_2 = L8_2(L9_2, L10_2, L11_2)
L10_2 = L8_2
L11_2 = L9_2
return L10_2, L11_2
else
L7_2 = L5_2
L8_2 = L6_2
return L7_2, L8_2
end
end
else
L5_2 = A1_2
L6_2 = L4_2
return L5_2, L6_2
end
end
function L40_1(A0_2, A1_2, A2_2)
local L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2
L3_2 = L38_1
L4_2 = A0_2
L5_2 = A2_2
L6_2 = 1
L3_2, L4_2 = L3_2(L4_2, L5_2, L6_2)
L5_2 = L8_1
if not L5_2 then
L5_2 = L3_2
L6_2 = L4_2
return L5_2, L6_2
end
if L4_2 then
L5_2 = #A1_2
if L3_2 == L5_2 then
L5_2 = L3_2
L6_2 = L4_2
return L5_2, L6_2
else
L5_2 = ""
L6_2 = #A1_2
L7_2 = L3_2 + 1
L8_2 = L39_1
L9_2 = L4_2
L10_2 = L7_2
L11_2 = A1_2
L8_2, L9_2 = L8_2(L9_2, L10_2, L11_2)
L10_2 = L8_2
L11_2 = L9_2
return L10_2, L11_2
end
else
L5_2 = {}
L6_2 = 1
L7_2 = #A2_2
L7_2 = L7_2 - 1
L8_2 = 1
for L9_2 = L6_2, L7_2, L8_2 do
L10_2 = table
L10_2 = L10_2.insert
L11_2 = L5_2
L12_2 = A1_2[L9_2]
L10_2(L11_2, L12_2)
end
L6_2 = #L5_2
if L6_2 == 0 then
L6_2 = #A1_2
L7_2 = nil
return L6_2, L7_2
end
L6_2 = L40_1
L7_2 = A0_2
L8_2 = A1_2
L9_2 = L5_2
return L6_2(L7_2, L8_2, L9_2)
end
end
function L41_1(A0_2, A1_2, A2_2, A3_2, A4_2, A5_2, A6_2)
local L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2, L15_2, L16_2, L17_2
L7_2 = ipairs
L8_2 = A6_2
L7_2, L8_2, L9_2 = L7_2(L8_2)
for L10_2, L11_2 in L7_2, L8_2, L9_2 do
if A1_2 == L11_2 then
return A2_2
end
end
L7_2 = table
L7_2 = L7_2.insert
L8_2 = A6_2
L9_2 = A1_2
L7_2(L8_2, L9_2)
L7_2 = pairs
L8_2 = A1_2
L7_2, L8_2, L9_2 = L7_2(L8_2)
for L10_2, L11_2 in L7_2, L8_2, L9_2 do
L12_2 = nil
L13_2 = type
L14_2 = L10_2
L13_2 = L13_2(L14_2)
if L13_2 == "string" then
L13_2 = xpcall
function L14_2()
local L0_3, L1_3
L0_3 = L10_2
L0_3 = A0_2[L0_3]
L12_2 = L0_3
end
function L15_2(A0_3)
local L1_3
L1_3 = nil
L12_2 = L1_3
end
L13_2(L14_2, L15_2)
if L12_2 == nil then
L13_2 = xpcall
function L14_2()
local L0_3, L1_3, L2_3
L0_3 = string
L0_3 = L0_3.find
L1_3 = L10_2
L2_3 = "__"
L0_3 = L0_3(L1_3, L2_3)
if L0_3 then
L0_3 = L11_2
L12_2 = L0_3
end
end
function L15_2(A0_3)
local L1_3
L1_3 = nil
L12_2 = L1_3
end
L13_2(L14_2, L15_2)
end
end
if L12_2 then
L13_2 = L26_1
L14_2 = L10_2
L15_2 = L12_2
L13_2 = L13_2(L14_2, L15_2)
L14_2 = table
L14_2 = L14_2.insert
L15_2 = A2_2
L16_2 = L13_2
L14_2(L15_2, L16_2)
L14_2 = #A2_2
if 10 < L14_2 then
L14_2 = L34_1
L15_2 = A3_2
L16_2 = L17_1.event
L16_2 = L16_2.C2S_ReqVar
L17_2 = {}
L17_2.variablesReference = A4_2
L17_2.debugSpeedIndex = A5_2
L17_2.vars = A2_2
L17_2.isComplete = 0
L14_2(L15_2, L16_2, L17_2)
L14_2 = {}
A2_2 = L14_2
end
end
end
L7_2 = getmetatable
L8_2 = A1_2
L7_2 = L7_2(L8_2)
if L7_2 then
L8_2 = L41_1
L9_2 = A0_2
L10_2 = L7_2
L11_2 = A2_2
L12_2 = A3_2
L13_2 = A4_2
L14_2 = A5_2
L15_2 = A6_2
return L8_2(L9_2, L10_2, L11_2, L12_2, L13_2, L14_2, L15_2)
else
return A2_2
end
end
function L42_1(A0_2, A1_2, A2_2, A3_2, A4_2, A5_2)
local L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2, L15_2
if A5_2 == "userdata" then
L6_2 = tolua
if L6_2 then
L6_2 = tolua
L6_2 = L6_2.getpeer
if L6_2 then
L6_2 = tolua
L6_2 = L6_2.getpeer
L7_2 = A0_2
L6_2 = L6_2(L7_2)
A0_2 = L6_2
end
else
return A1_2
end
end
if A0_2 == nil then
return A1_2
end
L6_2 = pairs
L7_2 = A0_2
L6_2, L7_2, L8_2 = L6_2(L7_2)
for L9_2, L10_2 in L6_2, L7_2, L8_2 do
L11_2 = L26_1
L12_2 = L9_2
L13_2 = L10_2
L11_2 = L11_2(L12_2, L13_2)
L12_2 = table
L12_2 = L12_2.insert
L13_2 = A1_2
L14_2 = L11_2
L12_2(L13_2, L14_2)
L12_2 = #A1_2
if 10 < L12_2 then
L12_2 = L34_1
L13_2 = A2_2
L14_2 = L17_1.event
L14_2 = L14_2.C2S_ReqVar
L15_2 = {}
L15_2.variablesReference = A3_2
L15_2.debugSpeedIndex = A4_2
L15_2.vars = A1_2
L15_2.isComplete = 0
L12_2(L13_2, L14_2, L15_2)
L12_2 = {}
A1_2 = L12_2
end
end
return A1_2
end
function L43_1(A0_2, A1_2, A2_2, A3_2)
local L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2, L15_2, L16_2, L17_2, L18_2
L4_2 = {}
L5_2 = {}
L6_2 = type
L7_2 = A0_2
L6_2 = L6_2(L7_2)
L7_2 = {}
L8_2 = nil
if L6_2 == "userdata" then
L9_2 = tolua
if L9_2 then
L9_2 = tolua
L9_2 = L9_2.getpeer
if L9_2 then
L9_2 = getmetatable
L10_2 = A0_2
L9_2 = L9_2(L10_2)
L8_2 = L9_2
L9_2 = L42_1
L10_2 = A0_2
L11_2 = L4_2
L12_2 = A1_2
L13_2 = A2_2
L14_2 = A3_2
L15_2 = L6_2
L9_2 = L9_2(L10_2, L11_2, L12_2, L13_2, L14_2, L15_2)
L4_2 = L9_2
end
end
L9_2 = L8_1
if L9_2 then
L9_2 = L36_1
L10_2 = A1_2
L11_2 = A0_2
L12_2 = A2_2
L13_2 = A3_2
L9_2 = L9_2(L10_2, L11_2, L12_2, L13_2)
L10_2 = ipairs
L11_2 = L9_2
L10_2, L11_2, L12_2 = L10_2(L11_2)
for L13_2, L14_2 in L10_2, L11_2, L12_2 do
L15_2 = L14_2.valueType
if L15_2 == "System.Byte[]" then
L15_2 = L14_2.name
L15_2 = A0_2[L15_2]
if L15_2 then
L15_2 = type
L16_2 = L14_2.name
L16_2 = A0_2[L16_2]
L15_2 = L15_2(L16_2)
if L15_2 == "string" then
L15_2 = {}
L16_2 = L14_2.name
L15_2.name = L16_2
L15_2.valueType = "string"
L16_2 = L6_1.encode
L17_2 = L14_2.name
L17_2 = A0_2[L17_2]
L16_2 = L16_2(L17_2)
L15_2.valueStr = L16_2
L16_2 = table
L16_2 = L16_2.insert
L17_2 = L4_2
L18_2 = L15_2
L16_2(L17_2, L18_2)
end
end
else
L15_2 = table
L15_2 = L15_2.insert
L16_2 = L4_2
L17_2 = L14_2
L15_2(L16_2, L17_2)
end
L15_2 = #L4_2
if 10 < L15_2 then
L15_2 = L34_1
L16_2 = A1_2
L17_2 = L17_1.event
L17_2 = L17_2.C2S_ReqVar
L18_2 = {}
L18_2.variablesReference = A2_2
L18_2.debugSpeedIndex = A3_2
L18_2.vars = L4_2
L18_2.isComplete = 0
L15_2(L16_2, L17_2, L18_2)
L15_2 = {}
L4_2 = L15_2
end
end
L10_2 = getmetatable
L11_2 = A0_2
L10_2 = L10_2(L11_2)
L8_2 = L10_2
end
else
L9_2 = getmetatable
L10_2 = A0_2
L9_2 = L9_2(L10_2)
L8_2 = L9_2
L9_2 = L42_1
L10_2 = A0_2
L11_2 = L4_2
L12_2 = A1_2
L13_2 = A2_2
L14_2 = A3_2
L15_2 = L6_2
L9_2 = L9_2(L10_2, L11_2, L12_2, L13_2, L14_2, L15_2)
L4_2 = L9_2
end
if L8_2 then
L9_2 = L41_1
L10_2 = A0_2
L11_2 = L8_2
L12_2 = L4_2
L13_2 = A1_2
L14_2 = A2_2
L15_2 = A3_2
L16_2 = {}
L9_2 = L9_2(L10_2, L11_2, L12_2, L13_2, L14_2, L15_2, L16_2)
L4_2 = L9_2
end
L9_2 = L34_1
L10_2 = A1_2
L11_2 = L17_1.event
L11_2 = L11_2.C2S_ReqVar
L12_2 = {}
L12_2.variablesReference = A2_2
L12_2.debugSpeedIndex = A3_2
L12_2.vars = L4_2
L12_2.isComplete = 1
L9_2(L10_2, L11_2, L12_2)
end
function L44_1(A0_2, A1_2)
local L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2
L2_2 = A0_2.variablesReference
L3_2 = A0_2.debugSpeedIndex
L4_2 = {}
function L5_2()
local L0_3, L1_3, L2_3, L3_3, L4_3, L5_3, L6_3, L7_3, L8_3, L9_3, L10_3, L11_3, L12_3
L0_3 = A0_2.frameId
L1_3 = A0_2.type
L2_3 = A0_2.keys
L3_3 = nil
if L1_3 == 1 then
L4_3 = L17_1.currentDebuggerData
L4_3 = L4_3.vars
L5_3 = L0_3 + 1
L3_3 = L4_3[L5_3]
L3_3 = L3_3.locals
elseif L1_3 == 2 then
L4_3 = L17_1.currentDebuggerData
L4_3 = L4_3.vars
L5_3 = L0_3 + 1
L3_3 = L4_3[L5_3]
L3_3 = L3_3.ups
elseif L1_3 == 3 then
L3_3 = _G
end
L4_3 = #L2_3
if L4_3 == 0 then
L4_3 = L43_1
L5_3 = L3_3
L6_3 = A1_2
L7_3 = L2_2
L8_3 = L3_2
L4_3(L5_3, L6_3, L7_3, L8_3)
return
end
L4_3 = L40_1
L5_3 = L3_3
L6_3 = L2_3
L7_3 = L2_3
L4_3, L5_3 = L4_3(L5_3, L6_3, L7_3)
if L5_3 then
L6_3 = type
L7_3 = L5_3
L6_3 = L6_3(L7_3)
if L6_3 == "table" or L6_3 == "userdata" then
L7_3 = L43_1
L8_3 = L5_3
L9_3 = A1_2
L10_3 = L2_2
L11_3 = L3_2
L7_3(L8_3, L9_3, L10_3, L11_3)
else
if L6_3 == "function" then
L7_3 = tostring
L8_3 = L5_3
L7_3 = L7_3(L8_3)
L5_3 = L7_3
end
L7_3 = L34_1
L8_3 = A1_2
L9_3 = L17_1.event
L9_3 = L9_3.C2S_ReqVar
L10_3 = {}
L11_3 = L2_2
L10_3.variablesReference = L11_3
L11_3 = L3_2
L10_3.debugSpeedIndex = L11_3
L11_3 = L6_1.encode
L12_3 = L5_3
L11_3 = L11_3(L12_3)
L10_3.vars = L11_3
L10_3.isComplete = 1
L10_3.varType = L6_3
L7_3(L8_3, L9_3, L10_3)
end
else
L6_3 = L34_1
L7_3 = A1_2
L8_3 = L17_1.event
L8_3 = L8_3.C2S_ReqVar
L9_3 = {}
L10_3 = L2_2
L9_3.variablesReference = L10_3
L10_3 = L3_2
L9_3.debugSpeedIndex = L10_3
L10_3 = {}
L9_3.vars = L10_3
L9_3.isComplete = 1
L9_3.varType = "nil"
L6_3(L7_3, L8_3, L9_3)
end
end
L6_2 = xpcall
L7_2 = L5_2
function L8_2(A0_3)
local L1_3, L2_3, L3_3, L4_3, L5_3, L6_3, L7_3, L8_3, L9_3, L10_3, L11_3, L12_3, L13_3
L1_3 = L34_1
L2_3 = A1_2
L3_3 = L17_1.event
L3_3 = L3_3.C2S_ReqVar
L4_3 = {}
L5_3 = L2_2
L4_3.variablesReference = L5_3
L5_3 = L3_2
L4_3.debugSpeedIndex = L5_3
L5_3 = {}
L6_3 = {}
L6_3.name = "error"
L6_3.valueType = "string"
L7_3 = L6_1.encode
L8_3 = "\230\151\160\230\179\149\232\142\183\229\143\150\229\177\158\230\128\167\229\128\188:"
L9_3 = A0_3
L10_3 = "->"
L11_3 = debug
L11_3 = L11_3.traceback
L12_3 = ""
L13_3 = 2
L11_3 = L11_3(L12_3, L13_3)
L8_3 = L8_3 .. L9_3 .. L10_3 .. L11_3
L7_3 = L7_3(L8_3)
L6_3.valueStr = L7_3
L6_3.isValue = false
L5_3[1] = L6_3
L4_3.vars = L5_3
L4_3.isComplete = 1
L1_3(L2_3, L3_3, L4_3)
end
L6_2(L7_2, L8_2)
end
function L45_1()
local L0_2, L1_2
L17_1.Run = false
L17_1.StepIn = false
L17_1.StepNext = false
L17_1.StepOut = false
L17_1.StepNextLevel = 0
end
function L46_1(A0_2)
local L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2
A0_2 = L14_1
L1_2 = nil
L2_2 = {}
L3_2 = nil
while true do
L5_2 = A0_2
L4_2 = A0_2.receive
L4_2, L5_2 = L4_2(L5_2)
if L5_2 == "closed" then
L6_2 = debug
L6_2 = L6_2.sethook
L6_2()
L6_2 = coroutine
L6_2 = L6_2.yield
L6_2()
end
if L4_2 then
L6_2 = L16_1.decode
L7_2 = L4_2
L6_2 = L6_2(L7_2)
L7_2 = L6_2.event
L8_2 = L6_2.data
L9_2 = L17_1.event
L9_2 = L9_2.S2C_DebugClose
if L7_2 == L9_2 then
L9_2 = debug
L9_2 = L9_2.sethook
L9_2()
L9_2 = coroutine
L9_2 = L9_2.yield
L9_2()
else
L9_2 = L17_1.event
L9_2 = L9_2.S2C_SetBreakPoints
if L7_2 == L9_2 then
function L9_2()
local L0_3, L1_3
L0_3 = L28_1
L1_3 = L8_2
L0_3(L1_3)
end
L10_2 = xpcall
L11_2 = L9_2
function L12_2(A0_3)
local L1_3, L2_3
L1_3 = print
L2_3 = A0_3
L1_3(L2_3)
end
L10_2(L11_2, L12_2)
else
L9_2 = L17_1.event
L9_2 = L9_2.S2C_RUN
if L7_2 == L9_2 then
L9_2 = L8_2.runTimeType
L17_1.runTimeType = L9_2
L9_2 = L8_2.isProntToConsole
L17_1.isProntToConsole = L9_2
L9_2 = L8_2.isFoxGloryProject
L17_1.isFoxGloryProject = L9_2
L9_2 = L45_1
L9_2()
L17_1.Run = true
L9_2 = coroutine
L9_2 = L9_2.yield
L9_2 = L9_2()
L17_1.currentDebuggerData = L9_2
L10_2 = L34_1
L11_2 = A0_2
L12_2 = L9_2.event
L13_2 = {}
L14_2 = L9_2.stack
L13_2.stack = L14_2
L10_2(L11_2, L12_2, L13_2)
else
L9_2 = L17_1.event
L9_2 = L9_2.S2C_ReqVar
if L7_2 == L9_2 then
L9_2 = L44_1
L10_2 = L8_2
L11_2 = A0_2
L9_2(L10_2, L11_2)
else
L9_2 = L17_1.event
L9_2 = L9_2.S2C_NextRequest
if L7_2 == L9_2 then
L9_2 = L45_1
L9_2()
L17_1.StepNext = true
L17_1.StepNextLevel = 0
L9_2 = coroutine
L9_2 = L9_2.yield
L9_2 = L9_2()
L17_1.currentDebuggerData = L9_2
L10_2 = L34_1
L11_2 = A0_2
L12_2 = L9_2.event
L13_2 = {}
L14_2 = L9_2.stack
L13_2.stack = L14_2
L10_2(L11_2, L12_2, L13_2)
else
L9_2 = L17_1.event
L9_2 = L9_2.S2C_StepInRequest
if L7_2 == L9_2 then
L9_2 = L45_1
L9_2()
L17_1.StepIn = true
L9_2 = coroutine
L9_2 = L9_2.yield
L9_2 = L9_2()
L17_1.currentDebuggerData = L9_2
L10_2 = L34_1
L11_2 = A0_2
L12_2 = L9_2.event
L13_2 = {}
L14_2 = L9_2.stack
L13_2.stack = L14_2
L14_2 = L9_2.eventType
L13_2.eventType = L14_2
L10_2(L11_2, L12_2, L13_2)
else
L9_2 = L17_1.event
L9_2 = L9_2.S2C_StepOutRequest
if L7_2 == L9_2 then
L9_2 = L45_1
L9_2()
L17_1.StepOut = true
L9_2 = coroutine
L9_2 = L9_2.yield
L9_2 = L9_2()
L17_1.currentDebuggerData = L9_2
L10_2 = L34_1
L11_2 = A0_2
L12_2 = L9_2.event
L13_2 = {}
L14_2 = L9_2.stack
L13_2.stack = L14_2
L14_2 = L9_2.eventType
L13_2.eventType = L14_2
L10_2(L11_2, L12_2, L13_2)
else
L9_2 = L17_1.event
L9_2 = L9_2.S2C_LoadLuaScript
if L7_2 == L9_2 then
L9_2 = L3_1
L10_2 = L8_2
L11_2 = true
L9_2(L10_2, L11_2)
end
end
end
end
end
end
end
end
end
end
end
L47_1 = coroutine
L47_1 = L47_1.create
L48_1 = L46_1
L47_1 = L47_1(L48_1)
L1_1 = L47_1
function L47_1(A0_2, A1_2)
local L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2, L15_2, L16_2, L17_2, L18_2, L19_2, L20_2, L21_2, L22_2
L2_2 = L17_1.isHook
if not L2_2 then
return
end
L2_2 = L17_1.Run
if L2_2 then
if A0_2 == "line" then
L2_2 = false
L3_2 = pairs
L4_2 = L17_1.breakInfos
L3_2, L4_2, L5_2 = L3_2(L4_2)
for L6_2, L7_2 in L3_2, L4_2, L5_2 do
L8_2 = pairs
L9_2 = L7_2
L8_2, L9_2, L10_2 = L8_2(L9_2)
for L11_2, L12_2 in L8_2, L9_2, L10_2 do
L13_2 = L12_2.lines
if L13_2 then
L13_2 = L12_2.lines
L13_2 = L13_2[A1_2]
if L13_2 then
L2_2 = true
break
end
end
end
if L2_2 then
break
end
end
if not L2_2 then
return
end
else
L17_1.currentFileName = nil
L17_1.currentTempFunc = nil
return
end
end
L2_2 = L17_1.StepOut
if L2_2 then
if A0_2 == "line" or A0_2 == "call" then
return
end
L2_2 = L10_1
L3_2 = 2
L4_2 = "f"
L2_2 = L2_2(L3_2, L4_2)
L2_2 = L2_2.func
L3_2 = L17_1.currentDebuggerData
L3_2 = L3_2.funcsLength
if L3_2 == 1 then
L3_2 = L45_1
L3_2()
L17_1.Run = true
else
L3_2 = L17_1.currentDebuggerData
L3_2 = L3_2.funcs
L3_2 = L3_2[2]
if L3_2 == L2_2 then
L3_2 = L0_1
L4_2 = 3
L5_2 = L17_1.event
L5_2 = L5_2.C2S_StepInResponse
L3_2 = L3_2(L4_2, L5_2)
L4_2 = L19_1
L5_2 = L1_1
L6_2 = L3_2
L4_2(L5_2, L6_2)
end
end
return
end
L2_2 = nil
if A0_2 == "call" then
L3_2 = L17_1.Run
if not L3_2 then
L3_2 = L17_1.StepNextLevel
L3_2 = L3_2 + 1
L17_1.StepNextLevel = L3_2
end
L3_2 = L10_1
L4_2 = 2
L5_2 = "S"
L3_2 = L3_2(L4_2, L5_2)
L4_2 = L3_2.source
L6_2 = L4_2
L5_2 = L4_2.find
L7_2 = L17_1.DebugLuaFie
L5_2 = L5_2(L6_2, L7_2)
if L5_2 or L4_2 == "=[C]" then
return
end
L5_2 = L35_1
L6_2 = L4_2
L5_2 = L5_2(L6_2)
L2_2 = L5_2
L17_1.currentFileName = L2_2
elseif A0_2 == "return" or A0_2 == "tail return" then
L3_2 = L17_1.Run
if not L3_2 then
L3_2 = L17_1.StepNextLevel
L3_2 = L3_2 - 1
L17_1.StepNextLevel = L3_2
end
L17_1.currentFileName = nil
elseif A0_2 == "line" then
L3_2 = false
L4_2 = nil
L5_2 = L17_1.currentFileName
if not L5_2 then
L5_2 = L10_1
L6_2 = 2
L7_2 = "S"
L5_2 = L5_2(L6_2, L7_2)
L4_2 = L5_2
L5_2 = L4_2.source
if L5_2 ~= "=[C]" then
L7_2 = L5_2
L6_2 = L5_2.find
L8_2 = L17_1.DebugLuaFie
L6_2 = L6_2(L7_2, L8_2)
if not L6_2 then
goto lbl_138
end
end
do return end
::lbl_138::
L6_2 = L35_1
L7_2 = L5_2
L6_2 = L6_2(L7_2)
L2_2 = L6_2
L17_1.currentFileName = L2_2
end
L2_2 = L17_1.currentFileName
L5_2 = L17_1.breakInfos
L5_2 = L5_2[L2_2]
L6_2 = nil
if L5_2 then
L7_2 = false
L8_2 = pairs
L9_2 = L5_2
L8_2, L9_2, L10_2 = L8_2(L9_2)
for L11_2, L12_2 in L8_2, L9_2, L10_2 do
L13_2 = L12_2.lines
if L13_2 then
L14_2 = L13_2[A1_2]
if L14_2 then
L7_2 = true
break
end
end
end
if L7_2 then
L8_2 = L4_2
if not L8_2 then
L9_2 = L10_1
L10_2 = 2
L9_2 = L9_2(L10_2)
L8_2 = L9_2
end
L9_2 = L30_1
L10_2 = L17_1.currentLineFile
L9_2 = L9_2(L10_2)
L10_2 = {}
L11_2 = nil
L12_2 = pairs
L13_2 = L5_2
L12_2, L13_2, L14_2 = L12_2(L13_2)
for L15_2, L16_2 in L12_2, L13_2, L14_2 do
L17_2 = L16_2.lines
L18_2 = L16_2.pathNames
L11_2 = L16_2.hitCounts
if L17_2 then
L19_2 = L17_2[A1_2]
if L19_2 then
L6_2 = L17_2[A1_2]
L10_2[L15_2] = 0
L19_2 = #L9_2
L20_2 = #L18_2
while true do
L21_2 = L18_2[L20_2]
L22_2 = L9_2[L19_2]
if L21_2 ~= L22_2 then
break
end
L21_2 = L10_2[L15_2]
L21_2 = L21_2 + 1
L10_2[L15_2] = L21_2
L20_2 = L20_2 - 1
L19_2 = L19_2 - 1
if L20_2 <= 0 or L19_2 <= 0 then
break
end
end
end
else
L6_2 = nil
end
end
L12_2 = ""
L13_2 = 0
L14_2 = pairs
L15_2 = L10_2
L14_2, L15_2, L16_2 = L14_2(L15_2)
for L17_2, L18_2 in L14_2, L15_2, L16_2 do
if L18_2 > L13_2 then
L13_2 = L18_2
L12_2 = L17_2
end
end
L14_2 = #L9_2
if (L14_2 == 1 or 1 < L14_2 and 1 < L13_2) and L12_2 ~= "" then
L15_2 = L6_2.hitCondition
L16_2 = L6_2.line
L16_2 = L11_2[L16_2]
L16_2 = L16_2 + 1
L17_2 = L6_2.line
L11_2[L17_2] = L16_2
if L15_2 <= L16_2 then
L3_2 = true
end
end
end
end
L7_2 = L17_1.StepIn
if L7_2 then
L7_2 = L0_1
L8_2 = 3
L9_2 = L17_1.event
L9_2 = L9_2.C2S_NextResponse
L7_2 = L7_2(L8_2, L9_2)
if L7_2 then
L8_2 = L7_2.funcs
L8_2 = L8_2[1]
L17_1.currentTempFunc = L8_2
L8_2 = L19_1
L9_2 = L1_1
L10_2 = L7_2
L8_2(L9_2, L10_2)
return
end
end
L7_2 = L17_1.StepNext
if L7_2 then
L7_2 = L17_1.StepNextLevel
if L7_2 <= 0 then
L7_2 = L0_1
L8_2 = 3
L9_2 = L17_1.event
L9_2 = L9_2.C2S_NextResponse
L7_2 = L7_2(L8_2, L9_2)
if L7_2 then
L8_2 = L7_2.funcs
L8_2 = L8_2[1]
L17_1.currentTempFunc = L8_2
L8_2 = L19_1
L9_2 = L1_1
L10_2 = L7_2
L8_2(L9_2, L10_2)
return
end
end
end
if L3_2 then
L7_2 = L0_1
L8_2 = 3
L9_2 = L17_1.event
L9_2 = L9_2.C2S_HITBreakPoint
L7_2 = L7_2(L8_2, L9_2)
if L6_2 then
L8_2 = L6_2.condition
if L8_2 then
L8_2 = debugger_conditionStr
L9_2 = L6_2.condition
L10_2 = L7_2.vars
function L11_2()
local L0_3, L1_3, L2_3
L0_3 = L19_1
L1_3 = L1_1
L2_3 = L7_2
L0_3(L1_3, L2_3)
end
L8_2(L9_2, L10_2, L11_2)
end
else
L8_2 = L19_1
L9_2 = L1_1
L10_2 = L7_2
L8_2(L9_2, L10_2)
end
end
end
end
L18_1 = L47_1
function L47_1()
local L0_2, L1_2, L2_2, L3_2
L0_2 = L0_1
L1_2 = 4
L2_2 = L17_1.event
L2_2 = L2_2.C2S_HITBreakPoint
L0_2 = L0_2(L1_2, L2_2)
L1_2 = L19_1
L2_2 = L1_1
L3_2 = L0_2
L1_2(L2_2, L3_2)
end
function L48_1()
local L0_2, L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2
L0_2 = L22_1
L1_2 = L10_1
L2_2 = 1
L1_2 = L1_2(L2_2)
L1_2 = L1_2.source
L0_2, L1_2, L2_2 = L0_2(L1_2)
L17_1.DebugLuaFie = L2_2
L3_2 = L11_1
L3_2 = L3_2()
L4_2 = print
L5_2 = L32_1
L4_2(L5_2)
L4_2 = print
L5_2 = L33_1
L4_2(L5_2)
L4_2 = L3_2.connect
L5_2 = L32_1
L6_2 = L33_1
L4_2 = L4_2(L5_2, L6_2)
L14_1 = L4_2
if L4_2 then
L5_2 = L11_1
L5_2 = L5_2()
L3_2 = L5_2
L5_2 = L3_2.connect
L6_2 = L32_1
L7_2 = L33_1
L5_2 = L5_2(L6_2, L7_2)
L15_1 = L5_2
L5_2 = L15_1
if L5_2 then
L5_2 = L15_1
L6_2 = L5_2
L5_2 = L5_2.settimeout
L7_2 = 0
L5_2(L6_2, L7_2)
L5_2 = L34_1
L6_2 = L15_1
L7_2 = L17_1.event
L7_2 = L7_2.C2S_SetSocketName
L8_2 = {}
L8_2.name = "breakPointSocket"
L5_2(L6_2, L7_2, L8_2)
L5_2 = L34_1
L6_2 = L4_2
L7_2 = L17_1.event
L7_2 = L7_2.C2S_SetSocketName
L8_2 = {}
L8_2.name = "mainSocket"
L9_2 = L17_1.version
L8_2.version = L9_2
L5_2(L6_2, L7_2, L8_2)
L5_2 = xpcall
function L6_2()
local L0_3, L1_3, L2_3
L0_3 = debug
L0_3 = L0_3.sethook
L1_3 = L18_1
L2_3 = "lrc"
L0_3(L1_3, L2_3)
end
function L7_2(A0_3)
local L1_3, L2_3, L3_3
L1_3 = print
L2_3 = "error:"
L3_3 = A0_3
L1_3(L2_3, L3_3)
end
L5_2(L6_2, L7_2)
L5_2 = jit
if L5_2 then
L5_2 = L17_1.debugLuaType
if L5_2 ~= "jit" then
L5_2 = print
L6_2 = "error======================================================"
L5_2(L6_2)
L5_2 = "\229\189\147\229\137\141luajit\231\137\136\230\156\172\228\184\186: "
L6_2 = jit
L6_2 = L6_2.version
L7_2 = " \232\175\183\228\189\191\231\148\168LuaDebugjit \232\191\155\232\161\140\232\176\131\232\175\149!"
L5_2 = L5_2 .. L6_2 .. L7_2
L6_2 = print
L7_2 = L5_2
L6_2(L7_2)
end
end
L5_2 = L19_1
L6_2 = L1_1
L7_2 = L4_2
L5_2(L6_2, L7_2)
end
end
end
function L49_1(A0_2, A1_2)
local L2_2, L3_2, L4_2
if not A0_2 then
L2_2 = print
L3_2 = "error host nil"
L2_2(L3_2)
end
if not A1_2 then
L2_2 = print
L3_2 = "error prot nil"
L2_2(L3_2)
end
L2_2 = type
L3_2 = A0_2
L2_2 = L2_2(L3_2)
if L2_2 ~= "string" then
L2_2 = print
L3_2 = "error host not string"
L2_2(L3_2)
end
L2_2 = type
L3_2 = A1_2
L2_2 = L2_2(L3_2)
if L2_2 ~= "number" then
L2_2 = print
L3_2 = "error host not number"
L2_2(L3_2)
end
L32_1 = A0_2
L33_1 = A1_2
L2_2 = xpcall
L3_2 = L48_1
function L4_2(A0_3)
local L1_3, L2_3
L1_3 = print
L2_3 = A0_3
L1_3(L2_3)
end
L2_2(L3_2, L4_2)
L2_2 = L29_1
L3_2 = L47_1
return L2_2, L3_2
end
StartDebug = L49_1
L49_1 = string
L50_1 = {}
L51_1 = "A"
L52_1 = "B"
L53_1 = "C"
L54_1 = "D"
L55_1 = "E"
L56_1 = "F"
L57_1 = "G"
L58_1 = "H"
L59_1 = "I"
L60_1 = "J"
L61_1 = "K"
L62_1 = "L"
L63_1 = "M"
L64_1 = "N"
L65_1 = "O"
L66_1 = "P"
L67_1 = "Q"
L68_1 = "R"
L69_1 = "S"
L70_1 = "T"
L71_1 = "U"
L72_1 = "V"
L73_1 = "W"
L74_1 = "X"
L75_1 = "Y"
L76_1 = "Z"
L77_1 = "a"
L78_1 = "b"
L79_1 = "c"
L80_1 = "d"
L81_1 = "e"
L82_1 = "f"
L83_1 = "g"
L84_1 = "h"
L85_1 = "i"
L86_1 = "j"
L87_1 = "k"
L88_1 = "l"
L89_1 = "m"
L90_1 = "n"
L91_1 = "o"
L92_1 = "p"
L93_1 = "q"
L94_1 = "r"
L95_1 = "s"
L96_1 = "t"
L97_1 = "u"
L98_1 = "v"
L99_1 = "w"
L100_1 = "x"
L50_1[1] = L51_1
L50_1[2] = L52_1
L50_1[3] = L53_1
L50_1[4] = L54_1
L50_1[5] = L55_1
L50_1[6] = L56_1
L50_1[7] = L57_1
L50_1[8] = L58_1
L50_1[9] = L59_1
L50_1[10] = L60_1
L50_1[11] = L61_1
L50_1[12] = L62_1
L50_1[13] = L63_1
L50_1[14] = L64_1
L50_1[15] = L65_1
L50_1[16] = L66_1
L50_1[17] = L67_1
L50_1[18] = L68_1
L50_1[19] = L69_1
L50_1[20] = L70_1
L50_1[21] = L71_1
L50_1[22] = L72_1
L50_1[23] = L73_1
L50_1[24] = L74_1
L50_1[25] = L75_1
L50_1[26] = L76_1
L50_1[27] = L77_1
L50_1[28] = L78_1
L50_1[29] = L79_1
L50_1[30] = L80_1
L50_1[31] = L81_1
L50_1[32] = L82_1
L50_1[33] = L83_1
L50_1[34] = L84_1
L50_1[35] = L85_1
L50_1[36] = L86_1
L50_1[37] = L87_1
L50_1[38] = L88_1
L50_1[39] = L89_1
L50_1[40] = L90_1
L50_1[41] = L91_1
L50_1[42] = L92_1
L50_1[43] = L93_1
L50_1[44] = L94_1
L50_1[45] = L95_1
L50_1[46] = L96_1
L50_1[47] = L97_1
L50_1[48] = L98_1
L50_1[49] = L99_1
L50_1[50] = L100_1
L51_1 = "y"
L52_1 = "z"
L53_1 = "0"
L54_1 = "1"
L55_1 = "2"
L56_1 = "3"
L57_1 = "4"
L58_1 = "5"
L59_1 = "6"
L60_1 = "7"
L61_1 = "8"
L62_1 = "9"
L63_1 = "+"
L64_1 = "/"
L50_1[51] = L51_1
L50_1[52] = L52_1
L50_1[53] = L53_1
L50_1[54] = L54_1
L50_1[55] = L55_1
L50_1[56] = L56_1
L50_1[57] = L57_1
L50_1[58] = L58_1
L50_1[59] = L59_1
L50_1[60] = L60_1
L50_1[61] = L61_1
L50_1[62] = L62_1
L50_1[63] = L63_1
L50_1[64] = L64_1
L6_1.__code = L50_1
L50_1 = {}
L6_1.__decode = L50_1
L50_1 = pairs
L51_1 = L6_1.__code
L50_1, L51_1, L52_1 = L50_1(L51_1)
for L53_1, L54_1 in L50_1, L51_1, L52_1 do
L55_1 = L6_1.__decode
L56_1 = L49_1.byte
L57_1 = L54_1
L58_1 = 1
L56_1 = L56_1(L57_1, L58_1)
L57_1 = L53_1 - 1
L55_1[L56_1] = L57_1
end
function L50_1(A0_2)
local L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2, L15_2, L16_2, L17_2, L18_2, L19_2
L1_2 = L49_1.len
L2_2 = A0_2
L1_2 = L1_2(L2_2)
L2_2 = L1_2 % 3
L1_2 = L1_2 - L2_2
L3_2 = {}
L4_2 = 1
L5_2 = 1
L6_2 = L1_2
L7_2 = 3
for L8_2 = L5_2, L6_2, L7_2 do
L9_2 = L49_1.byte
L10_2 = A0_2
L11_2 = L8_2
L9_2 = L9_2(L10_2, L11_2)
L10_2 = L49_1.byte
L11_2 = A0_2
L12_2 = L8_2 + 1
L10_2 = L10_2(L11_2, L12_2)
L11_2 = L49_1.byte
L12_2 = A0_2
L13_2 = L8_2 + 2
L11_2 = L11_2(L12_2, L13_2)
L12_2 = L9_2 * 65536
L13_2 = L10_2 * 256
L12_2 = L12_2 + L13_2
L12_2 = L12_2 + L11_2
L13_2 = 1
L14_2 = 4
L15_2 = 1
for L16_2 = L13_2, L14_2, L15_2 do
L17_2 = math
L17_2 = L17_2.floor
L18_2 = 4 - L16_2
L18_2 = L18_2 * 6
L18_2 = 2 ^ L18_2
L18_2 = L12_2 / L18_2
L17_2 = L17_2(L18_2)
L18_2 = L17_2 % 64
L18_2 = L18_2 + 1
L19_2 = L6_1.__code
L19_2 = L19_2[L18_2]
L3_2[L4_2] = L19_2
L4_2 = L4_2 + 1
end
end
if L2_2 == 1 then
L5_2 = L6_1.__left1
L6_2 = L3_2
L7_2 = L4_2
L8_2 = A0_2
L9_2 = L1_2
L5_2(L6_2, L7_2, L8_2, L9_2)
elseif L2_2 == 2 then
L5_2 = L6_1.__left2
L6_2 = L3_2
L7_2 = L4_2
L8_2 = A0_2
L9_2 = L1_2
L5_2(L6_2, L7_2, L8_2, L9_2)
end
L5_2 = table
L5_2 = L5_2.concat
L6_2 = L3_2
return L5_2(L6_2)
end
L6_1.encode = L50_1
function L50_1(A0_2, A1_2, A2_2, A3_2)
local L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2
L4_2 = L49_1.byte
L5_2 = A2_2
L6_2 = A3_2 + 1
L4_2 = L4_2(L5_2, L6_2)
L4_2 = L4_2 * 1024
L5_2 = L49_1.byte
L6_2 = A2_2
L7_2 = A3_2 + 2
L5_2 = L5_2(L6_2, L7_2)
L5_2 = L5_2 * 4
L6_2 = L4_2 + L5_2
L7_2 = math
L7_2 = L7_2.floor
L8_2 = L6_2 / 4096
L7_2 = L7_2(L8_2)
L8_2 = L7_2 % 64
L8_2 = L8_2 + 1
L9_2 = L6_1.__code
L9_2 = L9_2[L8_2]
A0_2[A1_2] = L9_2
L9_2 = math
L9_2 = L9_2.floor
L10_2 = L6_2 / 64
L9_2 = L9_2(L10_2)
L10_2 = L9_2 % 64
L8_2 = L10_2 + 1
L10_2 = A1_2 + 1
L11_2 = L6_1.__code
L11_2 = L11_2[L8_2]
A0_2[L10_2] = L11_2
L10_2 = L6_2 % 64
L8_2 = L10_2 + 1
L10_2 = A1_2 + 2
L11_2 = L6_1.__code
L11_2 = L11_2[L8_2]
A0_2[L10_2] = L11_2
L10_2 = A1_2 + 3
A0_2[L10_2] = "="
end
L6_1.__left2 = L50_1
function L50_1(A0_2, A1_2, A2_2, A3_2)
local L4_2, L5_2, L6_2, L7_2, L8_2
L4_2 = L49_1.byte
L5_2 = A2_2
L6_2 = A3_2 + 1
L4_2 = L4_2(L5_2, L6_2)
L4_2 = L4_2 * 16
L5_2 = math
L5_2 = L5_2.floor
L6_2 = L4_2 / 64
L5_2 = L5_2(L6_2)
L6_2 = L5_2 % 64
L6_2 = L6_2 + 1
L7_2 = L6_1.__code
L7_2 = L7_2[L6_2]
A0_2[A1_2] = L7_2
L7_2 = L4_2 % 64
L6_2 = L7_2 + 1
L7_2 = A1_2 + 1
L8_2 = L6_1.__code
L8_2 = L8_2[L6_2]
A0_2[L7_2] = L8_2
L7_2 = A1_2 + 2
A0_2[L7_2] = "="
L7_2 = A1_2 + 3
A0_2[L7_2] = "="
end
L6_1.__left1 = L50_1
function L50_1(A0_2)
local L1_2, L2_2, L3_2, L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2, L14_2, L15_2, L16_2, L17_2, L18_2
L1_2 = L49_1.len
L2_2 = A0_2
L1_2 = L1_2(L2_2)
L2_2 = 0
L3_2 = L49_1.sub
L4_2 = A0_2
L5_2 = L1_2 - 1
L3_2 = L3_2(L4_2, L5_2)
if L3_2 == "==" then
L2_2 = 2
L1_2 = L1_2 - 4
else
L3_2 = L49_1.sub
L4_2 = A0_2
L5_2 = L1_2
L3_2 = L3_2(L4_2, L5_2)
if L3_2 == "=" then
L2_2 = 1
L1_2 = L1_2 - 4
end
end
L3_2 = {}
L4_2 = 1
L5_2 = L6_1.__decode
L6_2 = 1
L7_2 = L1_2
L8_2 = 4
for L9_2 = L6_2, L7_2, L8_2 do
L10_2 = L49_1.byte
L11_2 = A0_2
L12_2 = L9_2
L10_2 = L10_2(L11_2, L12_2)
L10_2 = L5_2[L10_2]
L11_2 = L49_1.byte
L12_2 = A0_2
L13_2 = L9_2 + 1
L11_2 = L11_2(L12_2, L13_2)
L11_2 = L5_2[L11_2]
L12_2 = L49_1.byte
L13_2 = A0_2
L14_2 = L9_2 + 2
L12_2 = L12_2(L13_2, L14_2)
L12_2 = L5_2[L12_2]
L13_2 = L49_1.byte
L14_2 = A0_2
L15_2 = L9_2 + 3
L13_2 = L13_2(L14_2, L15_2)
L13_2 = L5_2[L13_2]
L14_2 = L10_2 * 262144
L15_2 = L11_2 * 4096
L14_2 = L14_2 + L15_2
L15_2 = L12_2 * 64
L14_2 = L14_2 + L15_2
L14_2 = L14_2 + L13_2
L15_2 = L49_1.char
L16_2 = L14_2 % 256
L15_2 = L15_2(L16_2)
L16_2 = math
L16_2 = L16_2.floor
L17_2 = L14_2 / 256
L16_2 = L16_2(L17_2)
L14_2 = L16_2
L16_2 = L49_1.char
L17_2 = L14_2 % 256
L16_2 = L16_2(L17_2)
L17_2 = math
L17_2 = L17_2.floor
L18_2 = L14_2 / 256
L17_2 = L17_2(L18_2)
L14_2 = L17_2
L17_2 = L49_1.char
L18_2 = L14_2 % 256
L17_2 = L17_2(L18_2)
L3_2[L4_2] = L17_2
L17_2 = L4_2 + 1
L3_2[L17_2] = L16_2
L17_2 = L4_2 + 2
L3_2[L17_2] = L15_2
L4_2 = L4_2 + 3
end
if L2_2 == 1 then
L6_2 = L6_1.__decodeLeft1
L7_2 = L3_2
L8_2 = L4_2
L9_2 = A0_2
L10_2 = L1_2
L6_2(L7_2, L8_2, L9_2, L10_2)
elseif L2_2 == 2 then
L6_2 = L6_1.__decodeLeft2
L7_2 = L3_2
L8_2 = L4_2
L9_2 = A0_2
L10_2 = L1_2
L6_2(L7_2, L8_2, L9_2, L10_2)
end
L6_2 = table
L6_2 = L6_2.concat
L7_2 = L3_2
return L6_2(L7_2)
end
L6_1.decode = L50_1
function L50_1(A0_2, A1_2, A2_2, A3_2)
local L4_2, L5_2, L6_2, L7_2, L8_2, L9_2, L10_2, L11_2, L12_2, L13_2
L4_2 = L6_1.__decode
L5_2 = L49_1.byte
L6_2 = A2_2
L7_2 = A3_2 + 1
L5_2 = L5_2(L6_2, L7_2)
L5_2 = L4_2[L5_2]
L6_2 = L49_1.byte
L7_2 = A2_2
L8_2 = A3_2 + 2
L6_2 = L6_2(L7_2, L8_2)
L6_2 = L4_2[L6_2]
L7_2 = L49_1.byte
L8_2 = A2_2
L9_2 = A3_2 + 3
L7_2 = L7_2(L8_2, L9_2)
L7_2 = L4_2[L7_2]
L8_2 = L5_2 * 4096
L9_2 = L6_2 * 64
L8_2 = L8_2 + L9_2
L8_2 = L8_2 + L7_2
L9_2 = math
L9_2 = L9_2.floor
L10_2 = L8_2 / 1024
L9_2 = L9_2(L10_2)
L9_2 = L9_2 % 256
L10_2 = math
L10_2 = L10_2.floor
L11_2 = L8_2 / 4
L10_2 = L10_2(L11_2)
L10_2 = L10_2 % 256
L11_2 = L49_1.char
L12_2 = L9_2
L11_2 = L11_2(L12_2)
A0_2[A1_2] = L11_2
L11_2 = A1_2 + 1
L12_2 = L49_1.char
L13_2 = L10_2
L12_2 = L12_2(L13_2)
A0_2[L11_2] = L12_2
end
L6_1.__decodeLeft1 = L50_1
function L50_1(A0_2, A1_2, A2_2, A3_2)
local L4_2, L5_2, L6_2, L7_2, L8_2, L9_2
L4_2 = L6_1.__decode
L5_2 = L49_1.byte
L6_2 = A2_2
L7_2 = A3_2 + 1
L5_2 = L5_2(L6_2, L7_2)
L5_2 = L4_2[L5_2]
L6_2 = L49_1.byte
L7_2 = A2_2
L8_2 = A3_2 + 2
L6_2 = L6_2(L7_2, L8_2)
L6_2 = L4_2[L6_2]
L7_2 = L5_2 * 64
L7_2 = L7_2 + L6_2
L8_2 = math
L8_2 = L8_2.floor
L9_2 = L7_2 / 16
L8_2 = L8_2(L9_2)
L7_2 = L8_2
L8_2 = L49_1.char
L9_2 = L7_2
L8_2 = L8_2(L9_2)
A0_2[A1_2] = L8_2
end
L6_1.__decodeLeft2 = L50_1
L50_1 = StartDebug
return L50_1
Reference in New Issue View Git Blame Copy Permalink