Advertisement
NukeVsCity

Untitled

Apr 20th, 2023
882
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 10.58 KB | None | 0 0
  1. -- Decompiled with the Synapse X Luau decompiler.
  2.  
  3. local v1 = game.JobId;
  4. if #v1 == 0 then
  5.     v1 = "00000000-0000-0000-0000-000000000000";
  6. end;
  7. local u1 = { {}, {} };
  8. local u2 = { {}, {}, {}, {} };
  9. local u3 = { "BindableEvent", "BindableFunction", "BindableEvent", "BindableFunction" };
  10. local function u4(p1, p2, p3)
  11.     local v2 = u2[p1];
  12.     local v3 = v2[p2];
  13.     if not v3 and p3 then
  14.         v3 = Instance.new(u3[p1]);
  15.         v3.Parent = script;
  16.         v2[p2] = v3;
  17.     end;
  18.     return v3;
  19. end;
  20. local function u5(p4, p5)
  21.     assert(typeof(p4) == "number");
  22.     assert(typeof(p5) == "string");
  23.     local v4 = u1[p4];
  24.     local v5 = v4[p5];
  25.     if not v5 then
  26.         v5 = (function(p6)
  27.             local v6 = nil;
  28.             local v7 = nil;
  29.             local v8 = nil;
  30.             local v9 = nil;
  31.             local v10 = nil;
  32.             local function v11(p7, p8, p9, p10)
  33.                 return bit32.lshift(p7, 24) + bit32.lshift(p8, 16) + bit32.lshift(p9, 8) + p10;
  34.             end;
  35.             local function v12(p11, p12, p13, p14)
  36.                 if p11 <= 19 then
  37.                     return bit32.bxor(p14, (bit32.band(p12, (bit32.bxor(p13, p14)))));
  38.                 end;
  39.                 if p11 <= 39 then
  40.                     return bit32.bxor(p12, p13, p14);
  41.                 end;
  42.                 if not (p11 <= 59) then
  43.                     return bit32.bxor(p12, p13, p14);
  44.                 end;
  45.                 return bit32.bor(bit32.band(p12, (bit32.bor(p13, p14))), (bit32.band(p13, p14)));
  46.             end;
  47.             local function v13(p15)
  48.                 if p15 <= 19 then
  49.                     return 1518500249;
  50.                 end;
  51.                 if p15 <= 39 then
  52.                     return 1859775393;
  53.                 end;
  54.                 if p15 <= 59 then
  55.                     return 2400959708;
  56.                 end;
  57.                 return 3395469782;
  58.             end;
  59.             local v14 = #p6 * 8;
  60.             local v15 = v14 + 8;
  61.             local v16 = 4;
  62.             p6 = p6 .. string.char(128);
  63.             while (v15 + 64) % 512 ~= 0 do
  64.                 v16 = v16 + 1;
  65.                 v15 = v15 + 8;         
  66.             end;
  67.             p6 = p6 .. string.rep("\000", v16);
  68.             p6 = p6 .. string.char((function(p16)
  69.                 return bit32.extract(p16, 24, 8), bit32.extract(p16, 16, 8), bit32.extract(p16, 8, 8), bit32.extract(p16, 0, 8);
  70.             end)(v14));
  71.             v6 = 1732584193;
  72.             v7 = 4023233417;
  73.             v8 = 2562383102;
  74.             v9 = 271733878;
  75.             v10 = 3285377520;
  76.             local v17 = {};
  77.             for v18 = 1, #p6, 64 do
  78.                 local v19 = nil;
  79.                 local v20 = nil;
  80.                 local v21 = nil;
  81.                 local v22 = nil;
  82.                 local v23 = nil;
  83.                 local v24 = v18;
  84.                 for v25 = 0, 15 do
  85.                     v17[v25] = v11(string.byte(p6, v24, v24 + 3));
  86.                     v24 = v24 + 4;
  87.                 end;
  88.                 for v26 = 16, 79 do
  89.                     v17[v26] = bit32.lrotate(bit32.bxor(v17[v26 - 3], v17[v26 - 8], v17[v26 - 14], v17[v26 - 16]), 1);
  90.                 end;
  91.                 v23 = v6;
  92.                 v22 = v7;
  93.                 v21 = v8;
  94.                 v20 = v9;
  95.                 v19 = v10;
  96.                 for v27 = 0, 79 do
  97.                     v19 = v20;
  98.                     v20 = v21;
  99.                     v21 = bit32.lrotate(v22, 30);
  100.                     v22 = v23;
  101.                     v23 = (bit32.lrotate(v23, 5) + v12(v27, v22, v21, v20) + v19 + v17[v27] + v13(v27)) % 4294967296;
  102.                 end;
  103.                 v6 = (v6 + local v28) % 4294967296;
  104.                 v7 = (v7 + local v29) % 4294967296;
  105.                 v8 = (v8 + local v30) % 4294967296;
  106.                 v9 = (v9 + local v31) % 4294967296;
  107.                 v10 = (v10 + local v32) % 4294967296;
  108.             end;
  109.             return string.format("%08x%08x%08x%08x%08x", local v33, local v34, local v35, local v36, local v37):reverse():sub(5, 36);
  110.         end)("Network3/" .. "/" .. v1 .. "/" .. p4 .. "/" .. p5);
  111.         v4[p5] = v5;
  112.     end;
  113.     return v5;
  114. end;
  115. local u6 = { {}, {} };
  116. local l__ReplicatedStorage__7 = game:GetService("ReplicatedStorage");
  117. local u8 = { "RemoteEvent", "RemoteFunction" };
  118. local u9 = { function(p17, p18)
  119.         local v38 = u4(1, p17, false);
  120.         if v38 then
  121.             p18.OnClientEvent:Connect(function(...)
  122.                 v38:Fire(...);
  123.             end);
  124.         end;
  125.         local v39 = u4(3, p17, false);
  126.         if not v39 then
  127.             return;
  128.         end;
  129.         v39.Event:Connect(function(...)
  130.             p18:FireServer(...);
  131.         end);
  132.     end, function(p19, p20)
  133.         local v40 = u4(2, p19, false);
  134.         if v40 then
  135.             function p20.OnClientInvoke(...)
  136.                 return v40:Invoke(...);
  137.             end;
  138.         end;
  139.         local v41 = u4(4, p19, false);
  140.         if not v41 then
  141.             return;
  142.         end;
  143.         function v41.OnInvoke(...)
  144.             return p20:InvokeServer(...);
  145.         end;
  146.     end };
  147. local function u10(p21, p22)
  148.     local v42 = u6[p21];
  149.     local v43 = v42[p22];
  150.     if not v43 then
  151.         v43 = l__ReplicatedStorage__7:FindFirstChild(p22);
  152.         if not v43 then
  153.             return nil;
  154.         end;
  155.         v43.Name = u8[p21];
  156.         v42[p22] = v43;
  157.         u9[p21](p22, v43);
  158.     end;
  159.     return v43;
  160. end;
  161. local v44 = {};
  162. local u11 = game:GetService("RunService"):IsStudio();
  163. local function u12(p23)
  164.     local v45 = nil;
  165.     local v46, v47, v48 = ipairs({ function()
  166.             if pcall(settings) then
  167.                 return "pcall(settings)";
  168.             end;
  169.             return nil;
  170.         end, function()
  171.             local u13 = { game:GetService("ReplicatedFirst"), game:GetService("ReplicatedStorage"), game:GetService("Players"), game:GetService("Workspace") };
  172.             local u14 = nil;
  173.             local v49, v50 = pcall(function()
  174.                 local v51 = rawget(getfenv(6), "script");
  175.                 assert(typeof(v51) == "Instance");
  176.                 assert(v51:IsA("ModuleScript") or (v51:IsA("Script") or v51:IsA("LocalScript")));
  177.                 local v52 = false;
  178.                 local v53, v54, v55 = ipairs(u13);
  179.                 while true do
  180.                     v53(v54, v55);
  181.                     if not v53 then
  182.                         break;
  183.                     end;
  184.                     v55 = v53;
  185.                     if v54:IsAncestorOf(v51) then
  186.                         v52 = true;
  187.                         break;
  188.                     end;               
  189.                 end;
  190.                 if v52 then
  191.                     return nil;
  192.                 end;
  193.                 u14 = string.format("callerScript:badpath:'%s'", v51:GetFullName());
  194.                 return nil;
  195.             end);
  196.             if not v49 and not u14 then
  197.                 u14 = string.format("callerScript:err:'%s'", tostring(v50));
  198.             end;
  199.             return nil;
  200.         end, function()
  201.             local v56 = debug.info(4, "s");
  202.             if v56 == nil then
  203.                 return "callerScriptName:nil";
  204.             end;
  205.             if v56 ~= "" and v56 ~= "[C]" then
  206.                 return nil;
  207.             end;
  208.             return string.format("callerScriptName:'%s'", v56);
  209.         end, function()
  210.             local v57 = 0;
  211.             while true do
  212.                 local v58, v59 = pcall(getfenv, v57);
  213.                 if not v58 then
  214.                     break;
  215.                 end;
  216.                 if typeof(v59) == "table" and v59.getgenv ~= nil then
  217.                     return "getgenv";
  218.                 end;
  219.                 v57 = v57 + 1;         
  220.             end;
  221.             return nil;
  222.         end });
  223.     while true do
  224.         v46(v47, v48);
  225.         if not v46 then
  226.             break;
  227.         end;
  228.         v48 = v46;
  229.         v45 = v47();
  230.         if v45 then
  231.             break;
  232.         end;   
  233.     end;
  234.     if v45 == nil then
  235.         return true;
  236.     end;
  237.     local v60 = string.format("Debug|%s|%s '%s' [%s]: %s", "Network", tostring(debug.info(2, "n")), tostring(v45), tostring(p23), tostring(debug.traceback()));
  238.     if u11 or not pcall(_G.Blunder, Enum.MessageType.MessageWarning, v60) then
  239.         warn(v60);
  240.     end;
  241.     return false;
  242. end;
  243. local function u15(p24)
  244.     return u10(1, u5(1, p24));
  245. end;
  246. local function u16(p25)
  247.     return u4(3, u5(1, p25), true);
  248. end;
  249. function v44.Fire(p26, ...)
  250.     if not u12(p26) then
  251.         return;
  252.     end;
  253.     local v61 = u15(p26);
  254.     if v61 then
  255.         task.spawn(function(...)
  256.             v61:FireServer(...);
  257.         end, ...);
  258.         return;
  259.     end;
  260.     local u17 = u16(p26);
  261.     task.spawn(function(...)
  262.         u17:Fire(...);
  263.     end, ...);
  264. end;
  265. local function u18(p27)
  266.     return u4(1, u5(1, p27), true);
  267. end;
  268. function v44.Fired(p28)
  269.     if not u12(p28) then
  270.         return Instance.new("BindableEvent").Event;
  271.     end;
  272.     local v62 = u15(p28);
  273.     if v62 then
  274.         return v62.OnClientEvent;
  275.     end;
  276.     return u18(p28).Event;
  277. end;
  278. local function u19(p29)
  279.     return u10(2, u5(2, p29));
  280. end;
  281. local function u20(p30)
  282.     return u4(4, u5(2, p30), true);
  283. end;
  284. function v44.Invoke(p31, ...)
  285.     if not u12(p31) then
  286.         return;
  287.     end;
  288.     local v63 = u19(p31);
  289.     if v63 then
  290.         return v63:InvokeServer(...);
  291.     end;
  292.     return u20(p31):Invoke(...);
  293. end;
  294. local function u21(p32)
  295.     return u4(2, u5(2, p32), true);
  296. end;
  297. function v44.Invoked(p33)
  298.     local v64 = nil;
  299.     if not u12(p33) then
  300.         return Instance.new("BindableFunction");
  301.     end;
  302.     if not u4(2, u5(2, p33), false) then
  303.         v64 = u19(p33);
  304.         if not v64 then
  305.             return u21(p33);
  306.         end;
  307.     else
  308.         return u21(p33);
  309.     end;
  310.     local v65 = {};
  311.     function v65.__newindex(p34, p35, p36)
  312.         if p35 == "OnInvoke" then
  313.             p35 = "OnClientInvoke";
  314.         elseif p35 == "OnClientInvoke" then
  315.             error(string.format("%s is not a valid member of BindableFunction \"BindableFunction\"", tostring(p35)));
  316.         end;
  317.         v64[p35] = p36;
  318.     end;
  319.     function v65.__index(p37, p38)
  320.         if p38 == "OnInvoke" then
  321.             p38 = "OnClientInvoke";
  322.         elseif p38 == "OnClientInvoke" then
  323.             error(string.format("%s is not a valid member of BindableFunction \"BindableFunction\"", tostring(p38)));
  324.         end;
  325.         return v64[p38];
  326.     end;
  327.     return setmetatable({}, v65);
  328. end;
  329. local function v66(p39)
  330.     for v67, v68 in pairs(u6) do
  331.         if p39:IsA(u8[v67]) then
  332.             local l__Name__69 = p39.Name;
  333.             if v68[l__Name__69] == nil then
  334.                 v68[l__Name__69] = p39;
  335.                 p39.Name = u8[v67];
  336.                 u9[v67](l__Name__69, p39);
  337.                 return;
  338.             else
  339.                 return;
  340.             end;
  341.         end;
  342.     end;
  343. end;
  344. l__ReplicatedStorage__7.ChildAdded:Connect(v66);
  345. local v70, v71, v72 = ipairs(l__ReplicatedStorage__7:GetChildren());
  346. while true do
  347.     v70(v71, v72);
  348.     if not v70 then
  349.         break;
  350.     end;
  351.     v72 = v70;
  352.     v66(v71);
  353. end;
  354. table.freeze(v44);
  355. task.spawn(function(p40)
  356.     local v73 = table.clone(p40);
  357.     setmetatable(v73, nil);
  358.     local function v74(p41, p42)
  359.         if p41 ~= p42 then
  360.             if typeof(p41) ~= "table" or typeof(p42) ~= "table" then
  361.                 return false;
  362.             end;
  363.             for v75, v76 in next, p42 do
  364.                 if rawget(p41, v75) ~= v76 then
  365.                     return false;
  366.                 end;
  367.             end;
  368.         end;
  369.         return true;
  370.     end;
  371.     while v74(getmetatable(p40), getmetatable(p40) and table.clone(local v77)) and v74(p40, v73) do
  372.         task.wait(math.random() * 15 + 1); 
  373.     end;
  374.     (function(p43)
  375.         if u11 or not pcall(_G.Blunder, Enum.MessageType.MessageWarning, p43) then
  376.             warn(p43);
  377.         end;
  378.     end)("ExternalModification : Network");
  379. end, v44);
  380. local function u22(p44)
  381.  
  382. end;
  383. task.spawn(function(p45)
  384.     local v78 = p45();
  385.     local v79 = table.clone(v78);
  386.     setmetatable(v79, nil);
  387.     local v80 = getmetatable(v78) and table.clone(v80);
  388.     local function v81(p46, p47)
  389.         if p46 ~= p47 then
  390.             if typeof(p46) ~= "table" or typeof(p47) ~= "table" then
  391.                 return false;
  392.             end;
  393.             for v82, v83 in next, p47 do
  394.                 if rawget(p46, v82) ~= v83 then
  395.                     return false;
  396.                 end;
  397.             end;
  398.         end;
  399.         return true;
  400.     end;
  401.     while true do
  402.         local v84 = p45();
  403.         if not v81(getmetatable(v84), v80) then
  404.             break;
  405.         end;
  406.         if not v81(v84, v79) then
  407.             break;
  408.         end;
  409.         task.wait(math.random() * 15 + 1); 
  410.     end;
  411.     (function(p48)
  412.         if u11 or not pcall(_G.Blunder, Enum.MessageType.MessageWarning, p48) then
  413.             warn(p48);
  414.         end;
  415.     end)("ExternalModification : Network Env");
  416. end, function()
  417.     return { false, false, u11, false, false, u22, v1, l__ReplicatedStorage__7, 1, 2, u1, 1, 2, 3, 4, u2, u3, u4, u18, u16, u21, u20, u9, u6, u8, u10, u15, u19, u12, v66 };
  418. end);
  419. return (function(p49)
  420.     local v85 = {};
  421.     function v85.__index(p50, p51)
  422.         return p49[p51];
  423.     end;
  424.     function v85.__newindex(p52, p53, p54)
  425.  
  426.     end;
  427.     v85.__metatable = {};
  428.     return setmetatable({}, v85);
  429. end)(v44);
  430.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement