local _ _ = function() local joop = 2302 return function(hi) local d = 100 hi = 1021 local a, b, c a, b, c, d = 1, 2, 3, 4 local hello hello[232], (5 + 5)[121], hello, x[99] = 100, 200, 300, 400 joop = 12 end end local joop = 2345 local a, b if hello then a, b = "hello", nil else a, b = "nothing", "yeah" end if hello then if yeah then a, b = "one", "two" else a, b = "mmhh", nil end else print("the other") a, b = "nothing", "yeah" end local c, d if true then c, d = 1, 2 end local x do local f = getHandler() if f then do f() x = 123 end end end return _(function() setmetatable(a, (function() print(123) return { } end)()) do local a, b if "a" == c then do local _obj_0 = tb a, b = _obj_0[1], _obj_0[2] end elseif "b" == c then do local _obj_0 = f() a, b = _obj_0[1], _obj_0[2] end end end if x then a[#a + 1] = 1 else a[#a + 1] = 2 end do local a if x then do local _exp_0 = y if 1 == _exp_0 then do local _obj_0, _obj_1 = f() b[#b + 1] = _obj_1 a = _obj_0 end end end end end do local a local b if x then do local _obj_0, _obj_1 = f() a = _obj_0 b = _obj_1[1] end else a = 123 b = tb[1] end end do local a, c if x then do local _exp_0 = y if 1 == _exp_0 then do local _obj_0, _obj_1, _obj_2, _obj_3 = f() b[#b + 1] = _obj_1 a, c, getmetatable(d).__add = _obj_0, _obj_2, _obj_3 end end end elseif x2 then if y2 then do local _obj_0, _obj_1, _obj_2, _obj_3 = f1() b[#b + 1] = _obj_1 a, c, getmetatable(d).__add = _obj_0, _obj_2, _obj_3 end end else print("hello") do print(123) do local _obj_0, _obj_1, _obj_2 = f2() b[#b + 1] = _obj_0 a, c, getmetatable(d).__add = 1, _obj_1, _obj_2 end end end end do local a = 0 local b = 0 local c = 0 local d = 0 end do local a = f() local b = a local c = a local d = a end do local e = tab local a = e[1] local b = e.b c.d = e end do local val = 123 local a = val local b = val local c = val end return nil end)