View difference between Paste ID: ra3tXRgU and DE1SzCmC

-local eaiIiiIlIl11lIiI1liII = assert local ealIIIil1II1ilI1l1I1l = select local eai1ilIl1iIlil111Illi = tonumber local ealIl11iliI1I1Il1lllliI = unpack local ealIl1Ii1IiiIiI1iI1I11l = pcall local eaIlllli111llliIll1li = setfenv local eailI1liiIiiiIii11I1i = setmetatable local eal11il1lIIl11lI1llIl = type local eallIiIiII1IIll1lI1I1 = getfenv local eaill1iIIi1llIliiIlil = tostring local ealIllli1iliiII1iliI1II = error local eaIIi1l1iIIiIiIllI1ll = string.sub local eai1I1iIlI1i11ll1lil1 = string.byte local eaiIliIiIilI1IiIiIII1 = string.char local ealliIiilI1Iil111lliI = string.rep local eai1iIlIi1Il1II1lliii = string.gsub local eal1ii11lliIIIIiii1II = string.match local ealiIIll1lIiIIl1l1I11 = eai1I1iIlI1i11ll1lil1("V", 1) local ealIiiil1lIIIIIi1111I, ealIil11ililIi1lI1l11 = #{4434}, #{ 3491, 4598, 5324, 3371, 2500, 2971, 456, 3451, 854, 2486, 1101, 4178, 2064, 2357, 1562, 6701, 6022, 6605, 1706, 2465, 614, 1732, 1286 } + ealiIIll1lIiIIl1l1I11 + 130962 local eaIl11liil1liIi1lliii = {} local ealIl1lIllili1Ill1iii1I = 1 local function eal1ilill111iiIl111I1(eal1III1illIi11I1i1lI, ealI111l1Ill1I1I11iiI) local eaIlIiiii11l1ll1iIIiI eal1III1illIi11I1i1lI = eai1iIlIi1Il1II1lliii(eaIIi1l1iIIiIiIllI1ll(eal1III1illIi11I1i1lI, 5), "..", function(eaIlIIi11I1lIi1lIilii) if eai1I1iIlI1i11ll1lil1(eaIlIIi11I1lIi1lIilii, 2) == 72 then eaIlIiiii11l1ll1iIIiI = eai1ilIl1iIlil111Illi(eaIIi1l1iIIiIiIllI1ll(eaIlIIi11I1lIi1lIilii, 1, 1)) return "" else local ealIllIlI1Il11il111llii = eaiIliIiIilI1IiIiIII1(eai1ilIl1iIlil111Illi(eaIlIIi11I1lIi1lIilii, 16)) if eaIlIiiii11l1ll1iIIiI then local eaiIiiilIl1ll11IlIiII = ealliIiilI1Iil111lliI(ealIllIlI1Il11il111llii, eaIlIiiii11l1ll1iIIiI) eaIlIiiii11l1ll1iIIiI = nil return eaiIiiilIl1ll11IlIiII else return ealIllIlI1Il11il111llii end end end) local function ealllIIl11iIliliillil() local ealIll11lIll11I1lII1I1I = eai1I1iIlI1i11ll1lil1(eal1III1illIi11I1i1lI, ealIl1lIllili1Ill1iii1I, ealIl1lIllili1Ill1iii1I) ealIl1lIllili1Ill1iii1I = ealIl1lIllili1Ill1iii1I + 1 return ealIll11lIll11I1lII1I1I end local function ealIlililiIIIIi1lIliI1I() local ealIll11lIll11I1lII1I1I, ealIllIlI1Il11il111llii, eaiIiiilIl1ll11IlIiII, eallIll11IiiilIl11lII = eai1I1iIlI1i11ll1lil1(eal1III1illIi11I1i1lI, ealIl1lIllili1Ill1iii1I, ealIl1lIllili1Ill1iii1I + 3) ealIl1lIllili1Ill1iii1I = ealIl1lIllili1Ill1iii1I + 4 return eallIll11IiiilIl11lII * 16777216 + eaiIiiilIl1ll11IlIiII * 65536 + ealIllIlI1Il11il111llii * 256 + ealIll11lIll11I1lII1I1I end local function ealIlil1iil11IilI1IIIII(eaIliIIl1III11II1llii, ealIli1l111iIililiii1li, ealII1iIlIiIliiii1lli) if ealII1iIlIiIliiii1lli then local eaI1Ilill1Iil11illI11, ealIlIilIIlillll1iIilll = 0, 0 for eaIIl1iIiI11iiIIIiii1 = ealIli1l111iIililiii1li, ealII1iIlIiIliiii1lli do eaI1Ilill1Iil11illI11 = eaI1Ilill1Iil11illI11 + 2 ^ ealIlIilIIlillll1iIilll * ealIlil1iil11IilI1IIIII(eaIliIIl1III11II1llii, eaIIl1iIiI11iiIIIiii1) ealIlIilIIlillll1iIilll = ealIlIilIIlillll1iIilll + 1 end return eaI1Ilill1Iil11illI11 else local eaIlIll1l1iiIIiIIlIil = 2 ^ (ealIli1l111iIililiii1li - 1) return eaIlIll1l1iiIIiIIlIil <= eaIliIIl1III11II1llii % (eaIlIll1l1iiIIiIIlIil + eaIlIll1l1iiIIiIIlIil) and 1 or 0 end end local function ealIllII1iil1iIiiIlIiII() local ealIll11lIll11I1lII1I1I, ealIllIlI1Il11il111llii = ealIlililiIIIIi1lIliI1I(), ealIlililiIIIIi1lIliI1I() if ealIll11lIll11I1lII1I1I == 0 and ealIllIlI1Il11il111llii == 0 then return 0 end return (-2 * ealIlil1iil11IilI1IIIII(ealIllIlI1Il11il111llii, 32) + 1) * 2 ^ (ealIlil1iil11IilI1IIIII(ealIllIlI1Il11il111llii, 21, 31) - 1023) * ((ealIlil1iil11IilI1IIIII(ealIllIlI1Il11il111llii, 1, 20) * 4294967296 + ealIll11lIll11I1lII1I1I) / 4503599627370496 + 1) end local function ealIll11iIIiiIiIil11iII(eaiIIi1l1IllII1IIiII1) local ealIli1iiiliI1I1iiI1ll1 = { eai1I1iIlI1i11ll1lil1(eal1III1illIi11I1i1lI, ealIl1lIllili1Ill1iii1I, ealIl1lIllili1Ill1iii1I + 3) } ealIl1lIllili1Ill1iii1I = ealIl1lIllili1Ill1iii1I + 4 local ealllIIlliiIIiII1II1l = { nil, nil, nil, nil, nil, nil, nil, nil } for eaIIl1iIiI11iiIIIiii1 = 1, 8 do ealllIIlliiIIiII1II1l[eaIIl1iIiI11iiIIIiii1] = ealIlil1iil11IilI1IIIII(eaiIIi1l1IllII1IIiII1, eaIIl1iIiI11iiIIIiii1) end local ealIlIIiiiIIiil1i1111il = "" for eaIIl1iIiI11iiIIIiii1 = 1, 4 do local eaI1Ilill1Iil11illI11, ealIlIilIIlillll1iIilll = 0, 0 for ealIllII1lIl1iiiliIliI1 = 1, 8 do local eaili1i1l1I1lIlIl1lI1 = ealIlil1iil11IilI1IIIII(ealIli1iiiliI1I1iiI1ll1[eaIIl1iIiI11iiIIIiii1], ealIllII1lIl1iiiliIliI1) if ealllIIlliiIIiII1II1l[ealIllII1lIl1iiiliIliI1] == 1 then eaili1i1l1I1lIlIl1lI1 = eaili1i1l1I1lIlIl1lI1 == 1 and 0 or 1 end eaI1Ilill1Iil11illI11 = eaI1Ilill1Iil11illI11 + 2 ^ ealIlIilIIlillll1iIilll * eaili1i1l1I1lIlIl1lI1 ealIlIilIIlillll1iIilll = ealIlIilIIlillll1iIilll + 1 end ealIlIIiiiIIiil1i1111il = ealIlIIiiiIIiil1i1111il .. ealIlIIiiiIIiil1i1111il.char(eaI1Ilill1Iil11illI11) end local ealIll11lIll11I1lII1I1I, ealIllIlI1Il11il111llii, eaiIiiilIl1ll11IlIiII, eallIll11IiiilIl11lII = eai1I1iIlI1i11ll1lil1(ealIlIIiiiIIiil1i1111il, 1, 4) return eallIll11IiiilIl11lII * 16777216 + eaiIiiilIl1ll11IlIiII * 65536 + ealIllIlI1Il11il111llii * 256 + ealIll11lIll11I1lII1I1I end local function eai11i1ii1II11I1iIi1I(eaiIIi1l1IllII1IIiII1) local ealIllIIi1l1lIlil1I1l = ealIlililiIIIIi1lIliI1I() ealIl1lIllili1Ill1iii1I = ealIl1lIllili1Ill1iii1I + ealIllIIi1l1lIlil1I1l local ealllIIlliiIIiII1II1l = { nil, nil, nil, nil, nil, nil, nil, nil } for eaIIl1iIiI11iiIIIiii1 = 1, 8 do ealllIIlliiIIiII1II1l[eaIIl1iIiI11iiIIIiii1] = ealIlil1iil11IilI1IIIII(eaiIIi1l1IllII1IIiII1, eaIIl1iIiI11iiIIIiii1) end local ealIlIIiiiIIiil1i1111il = "" for eaIIl1iIiI11iiIIIiii1 = 1, ealIllIIi1l1lIlil1I1l do local eaI1Ilill1Iil11illI11, ealIlIilIIlillll1iIilll = 0, 0 for ealIllII1lIl1iiiliIliI1 = 1, 8 do local eaili1i1l1I1lIlIl1lI1 = ealIlil1iil11IilI1IIIII(eai1I1iIlI1i11ll1lil1(eal1III1illIi11I1i1lI, ealIl1lIllili1Ill1iii1I - ealIllIIi1l1lIlil1I1l + eaIIl1iIiI11iiIIIiii1 - 1), ealIllII1lIl1iiiliIliI1) if ealllIIlliiIIiII1II1l[ealIllII1lIl1iiiliIliI1] == 1 then eaili1i1l1I1lIlIl1lI1 = eaili1i1l1I1lIlIl1lI1 == 1 and 0 or 1 end eaI1Ilill1Iil11illI11 = eaI1Ilill1Iil11illI11 + 2 ^ ealIlIilIIlillll1iIilll * eaili1i1l1I1lIlIl1lI1 ealIlIilIIlillll1iIilll = ealIlIilIIlillll1iIilll + 1 end ealIlIIiiiIIiil1i1111il = ealIlIIiiiIIiil1i1111il .. ealIlIIiiiIIiil1i1111il.char(eaI1Ilill1Iil11illI11) end return ealIlIIiiiIIiil1i1111il end local eai11ll1IIiliI1ii1lIi = ealllIIl11iIliliillil() local eai1Iii1I1l1I11li1lIl = ealllIIl11iIliliillil() local function ealIlllli11ll1IliI11I1l() local ealIlIl1IIi111l1111i1II = { [71754] = {}, [92566] = {}, [107141] = {}, [85701] = {} } ealllIIl11iIliliillil() local eaililllIII1111111iII = ealIlililiIIIIi1lIliI1I() - (#{ 3457, 2793, 4265, 6283, 3448, 2384, 4530, 416, 6807, 5936, 1703, 5188, 5965, 2175, 543, 38, 3926, 1530, 2422, 6827, 4495, 3235, 3467, 2008 } + ealiIIll1lIiIIl1l1I11 + 133654) for eaIIl1iIiI11iiIIIiii1 = ealIiiil1lIIIIIi1111I, eaililllIII1111111iII do local eaII1liIliilIiiIii1I1 = {} local eal11il1lIIl11lI1llIl = ealllIIl11iIliliillil() if eal11il1lIIl11lI1llIl == #{ 611, 6760, 6746, 198, 650, 6639, 1436, 2827, 5060, 6713, 2886, 3975, 1302, 3260, 6893, 5035, 1957 } then eaII1liIliilIiiIii1I1[12660] = #{ 2008, 5016, 3571, 1579, 5725, 6034, 6099, 6317, 5802, 5654, 1601, 6872, 6056, 6230, 2542, 1761, 3750, 5647, 1390, 1559, 3374, 4966 } + ealiIIll1lIiIIl1l1I11 + 14708 == #{ 5380, 1771, 1417, 6876, 425, 542, 5730, 2164, 4739, 5318, 2023, 4077, 3088, 4486, 1707, 3458, 3948, 2387, 511, 5437, 6803, 1850, 6687, 893 } + ealiIIll1lIiIIl1l1I11 + 53329 end if eal11il1lIIl11lI1llIl == #{ 3286, 2052, 6705, 4588, 6030, 3481, 2516, 6683, 6240, 1940, 1173, 4258, 5637, 620, 1545, 4522, 759, 3864, 5492, 1142, 3952, 974 } + ealiIIll1lIiIIl1l1I11 + 133 then eaII1liIliilIiiIii1I1[12660] = #{ 5747, 4244, 5898, 5002, 5108, 4351, 1975, 3825, 5, 6844, 4794, 6846, 457, 4489, 4648, 4133, 4948, 3245, 6153, 4874, 3190, 1724, 6719, 3330 } + ealiIIll1lIiIIl1l1I11 + 19841 == #{ 5747, 4244, 5898, 5002, 5108, 4351, 1975, 3825, 5, 6844, 4794, 6846, 457, 4489, 4648, 4133, 4948, 3245, 6153, 4874, 3190, 1724, 6719, 3330 } + ealiIIll1lIiIIl1l1I11 + 19841 end if eal11il1lIIl11lI1llIl == #{ 3331, 3013, 2578, 5325, 6382, 4183, 5149, 3520, 5005, 6664, 4582, 2046, 5217, 1538, 6910, 4158, 3170, 6864, 5794, 5129, 6043, 1855, 552 } + ealiIIll1lIiIIl1l1I11 + 38 then eaII1liIliilIiiIii1I1[12660] = ealIllII1iil1iIiiIlIiII() + ealIllII1iil1iIiiIlIiII() end if eal11il1lIIl11lI1llIl == #{ 2914, 3216, 3301, 1067, 3930, 1182, 5463, 1807, 6802, 5507, 6543, 3928, 5238, 596, 4109, 2651, 3534, 4620, 111, 6887, 4403, 5981 } + ealiIIll1lIiIIl1l1I11 + -52 then eaII1liIliilIiiIii1I1[12660] = ealllIIl11iIliliillil() end if eal11il1lIIl11lI1llIl == #{ 6638, 425, 4671, 3190, 693, 4863, 997, 4884, 6288, 3138, 5694, 3059, 2509, 246, 3710, 370, 4562, 4864, 6872, 1382, 1953, 662 } + ealiIIll1lIiIIl1l1I11 + 67 then eaII1liIliilIiiIii1I1[12660] = ealllIIl11iIliliillil() + ealIlililiIIIIi1lIliI1I() + ealIllII1iil1iIiiIlIiII() end if eal11il1lIIl11lI1llIl == #{ 5224, 1502, 2879, 2925, 2324, 2862, 5580, 5814, 372, 2492, 2497, 5246, 704, 1039, 2049, 3749, 1237, 4514, 601, 317 } + ealiIIll1lIiIIl1l1I11 + -76 then eaII1liIliilIiiIii1I1[12660] = ealIllII1iil1iIiiIlIiII() end if eal11il1lIIl11lI1llIl == #{ 4607, 5015, 4096, 5764, 4031, 83, 4572, 722, 6008, 5772, 3013, 4145, 1723, 5726, 3, 4491, 5117, 3577, 6659, 5941, 5756, 2768 } + ealiIIll1lIiIIl1l1I11 + 125 then eaII1liIliilIiiIii1I1[12660] = ealIllII1iil1iIiiIlIiII() + ealIllII1iil1iIiiIlIiII() end if eal11il1lIIl11lI1llIl == #{ 6046, 430, 693, 4979, 366, 6699, 5305, 1236, 421, 1089, 3310, 2220, 1147, 25, 3188, 2781, 5754, 5681, 5953, 6523, 4550, 4930, 1290, 4841 } + ealiIIll1lIiIIl1l1I11 + -31 then eaII1liIliilIiiIii1I1[12660] = eai11i1ii1II11I1iIi1I(eai11ll1IIiliI1ii1lIi) end if eal11il1lIIl11lI1llIl == #{ 1171, 6405, 2291, 3499 } then eaII1liIliilIiiIii1I1[12660] = ealllIIl11iIliliillil() + ealIlililiIIIIi1lIliI1I() + ealIllII1iil1iIiiIlIiII() end ealIlIl1IIi111l1111i1II[85701][eaIIl1iIiI11iiIIIiii1 - ealIiiil1lIIIIIi1111I] = eaII1liIliilIiiIii1I1 end ealIlIl1IIi111l1111i1II[18519] = ealllIIl11iIliliillil() ealIlililiIIIIi1lIliI1I() ealllIIl11iIliliillil() local eaililllIII1111111iII = ealIlililiIIIIi1lIliI1I() - (#{ 4780, 6088, 642, 58, 3716, 1595, 1193, 4617, 2754, 6260, 1035, 2245, 977, 4845, 4180, 4455, 6949, 4365, 2872, 1934 } + ealiIIll1lIiIIl1l1I11 + 133674) for eaIIl1iIiI11iiIIIiii1 = ealIiiil1lIIIIIi1111I, eaililllIII1111111iII do local eai1lll1liilIllllliI1 = {} local eaIliI1l1III11IIIl1iI = ealIll11iIIiiIiIil11iII(eai1Iii1I1l1I11li1lIl) eai1lll1liilIllllliI1[42229] = ealIlil1iil11IilI1IIIII(eaIliI1l1III11IIIl1iI, #{3089}, #{ 3787, 5255, 2541, 208, 6086, 3740, 5979, 5045, 3195, 503, 151, 779, 1719, 4342, 1253, 5763, 5513, 6251 }) eai1lll1liilIllllliI1[43892] = ealIlil1iil11IilI1IIIII(eaIliI1l1III11IIIl1iI, #{ 4137, 2400, 5377, 4296, 2391, 386, 4329, 5387, 3223, 917, 1414, 5502, 6861, 3029, 6142, 4349, 5132, 54, 2925 }, #{ 6728, 4390, 255, 3353, 4095, 5135, 6212, 5996, 5691, 2875, 2886, 4351, 1898, 3519, 2845, 908, 6327, 2747, 4941, 384, 3228, 2116, 504, 34 } + ealiIIll1lIiIIl1l1I11 + -84) eai1lll1liilIllllliI1[92248] = ealIlil1iil11IilI1IIIII(eaIliI1l1III11IIIl1iI, #{5737}, #{ 5328, 1036, 5900, 6527, 822, 2531, 2146, 2351, 6796 }) eai1lll1liilIllllliI1[43212] = ealIlil1iil11IilI1IIIII(eaIliI1l1III11IIIl1iI, #{ 742, 1832, 4245, 4637, 1073, 5053, 3855, 4629, 2437, 6322, 4863, 2183, 33, 316, 2077, 1109, 4762, 6563, 2300, 6160, 4402 } + ealiIIll1lIiIIl1l1I11 + -80, #{ 1588, 5995, 6783, 3397, 1945, 2630, 4146, 3429, 2589, 3873, 6428, 5907, 195, 4878, 6656, 5789, 3098, 1436, 3594, 6942, 3004, 2981, 3096 } + ealiIIll1lIiIIl1l1I11 + -77) eai1lll1liilIllllliI1[99507] = ealIlil1iil11IilI1IIIII(eaIliI1l1III11IIIl1iI, #{ 1516, 618, 1746, 3724, 6022, 4627, 6734, 2329, 751, 3272 }, #{ 5709, 1229, 432, 4732, 183, 6035, 1459, 3599, 6725, 6716, 3717, 4053, 5692, 6882, 6301, 1676, 1212, 6905 }) eai1lll1liilIllllliI1[133222] = ealIlil1iil11IilI1IIIII(eaIliI1l1III11IIIl1iI, #{4922}, #{ 642, 1133, 3690, 5365, 2370, 3751, 5325, 2973, 4558 }) ealIlIl1IIi111l1111i1II[92566][eaIIl1iIiI11iiIIIiii1] = eai1lll1liilIllllliI1 end ealIlililiIIIIi1lIliI1I() ealIlIl1IIi111l1111i1II[78849] = ealllIIl11iIliliillil() local eaililllIII1111111iII = ealIlililiIIIIi1lIliI1I() for eaIIl1iIiI11iiIIIiii1 = ealIiiil1lIIIIIi1111I, eaililllIII1111111iII do ealIlIl1IIi111l1111i1II[107141][eaIIl1iIiI11iiIIIiii1 - ealIiiil1lIIIIIi1111I] = ealIlllli11ll1IliI11I1l() end ealIlililiIIIIi1lIliI1I() ealIlililiIIIIi1lIliI1I() ealllIIl11iIliliillil() local eaililllIII1111111iII = ealIlililiIIIIi1lIliI1I() for eaIIl1iIiI11iiIIIiii1 = ealIiiil1lIIIIIi1111I, eaililllIII1111111iII do ealIlIl1IIi111l1111i1II[71754][eaIIl1iIiI11iiIIIiii1] = ealIlililiIIIIi1lIliI1I() end ealllIIl11iIliliillil() ealIlIl1IIi111l1111i1II[110398] = ealllIIl11iIliliillil() return ealIlIl1IIi111l1111i1II end local function eaIIliIIIIll11IlIliiI(ealIlIl1IIi111l1111i1II, ealI111l1Ill1I1I11iiI, eal111llIlIll11I1lI1I) local eall1Il11IiIl1l1liI1l, ealIiiIiiiIll1ilIiI1l = -1, -1 local eaI1ll111l1i1i1ill11l = ealIlIl1IIi111l1111i1II[92566] local ealIlli1i11iIilIil1I1Ii = eailI1liiIiiiIii11I1i({}, { __index = function(eail111iiiI1lilIIliII, eaIiIllllliI1IliIIlll) local ealIlIIiiiIIiil1i1111il = ealIlIl1IIi111l1111i1II[85701][eaIiIllllliI1IliIIlll] if eaIIi1l1iIIiIiIllI1ll(eal11il1lIIl11lI1llIl(ealIlIIiiiIIiil1i1111il[12660]), 1, 1) == "s" then return { [12660] = eaIIi1l1iIIiIiIllI1ll(ealIlIIiiiIIiil1i1111il[12660], 6) } end return ealIlIIiiiIIiil1i1111il end }) local ealIliiiiiiiil1IIiiiliI = 18519 local ealiI1iilIii1l1I1Illi = ealIlIl1IIi111l1111i1II[107141] local ealllIlil1ll1I1iilIII = 12660 local eaiil11illIIli1iIlIIl = ealIlIl1IIi111l1111i1II[110398] local eaIlIllIIiIli1liii11I = 43212 local eaIllI1iIliiiIiliiIIl = ealIlIl1IIi111l1111i1II[71754] local eaIiliililIlil1iiI1I1 = 92248 local function ealIll11IiiIiIlll11iII1(...) local ealllili1lIiIIii1llIl = 0 local eaIi1lll11I1ilIl1i1iI = { ealIl11iliI1I1Il1lllliI({}, 1, ealIlIl1IIi111l1111i1II[78849]) } local eaI1ilIi11iilIIII1lil = 1 local eallIiI1iil1liil1iiii = {} local ealIll1lIIiIiIlI1l1llI1 = {} local ealIil1II1iil1IlIiIII = 1 local ealI111l1Ill1I1I11iiI = eallIiIiII1IIll1lI1I1() local ealIliIli1llI1illIiiIil = { ... } local ealliIlii1il1Ii11Il1l = #ealIliIli1llI1illIiiIil - 1 for eaIIl1iIiI11iiIIIiii1 = 0, ealliIlii1il1Ii11Il1l do if eaIIl1iIiI11iiIIIiii1 < eaiil11illIIli1iIlIIl then eaIi1lll11I1ilIl1i1iI[eaIIl1iIiI11iiIIIiii1] = ealIliIli1llI1illIiiIil[eaIIl1iIiI11iiIIIiii1 + 1] end end local function ealIIIIIIl1llIli1lili(...) local eaiIiiilIl1ll11IlIiII = ealIIIil1II1ilI1l1I1l("#", ...) local eail111iiiI1lilIIliII = { ... } return eaiIiiilIl1ll11IlIiII, eail111iiiI1lilIIliII end local function eaIIiililIlilIll1i11I() while true do local ealIlillill1111Iill11ii = eaI1ll111l1i1i1ill11l[eaI1ilIi11iilIIII1lil] local ealIlIilil1IiiIIlliilli = ealIlillill1111Iill11ii[43212] eaI1ilIi11iilIIII1lil = eaI1ilIi11iilIIII1lil + 1 local eailI1II1l1i11iiiili1 = ealIlillill1111Iill11ii[99507] local ealIliilIlli1liI1I1iI11 = ealIlillill1111Iill11ii[42229] - ealIil11ililIi1lI1l11 local ealI11I1IiIiIilli1ili = ealIlillill1111Iill11ii[42229] local eaI1ii1l11lliiiIii1II = ealIlillill1111Iill11ii[43892] local eai11liI1iilIli1lllll = ealIlillill1111Iill11ii[92248] if ealIlIilil1IiiIIlliilli < 7 then if ealIlIilil1IiiIIlliilli < 3 then if ealIlIilil1IiiIIlliilli >= 1 then if ealIlIilil1IiiIIlliilli == 2 then if eai11liI1iilIli1lllll > 255 then eai11liI1iilIli1lllll = ealIlli1i11iIilIil1I1Ii[eai11liI1iilIli1lllll - 256][ealllIlil1ll1I1iilIII] else eai11liI1iilIli1lllll = eaIi1lll11I1ilIl1i1iI[eai11liI1iilIli1lllll] end if eailI1II1l1i11iiiili1 > 255 then eailI1II1l1i11iiiili1 = ealIlli1i11iIilIil1I1Ii[eailI1II1l1i11iiiili1 - 256][ealllIlil1ll1I1iilIII] else eailI1II1l1i11iiiili1 = eaIi1lll11I1ilIl1i1iI[eailI1II1l1i11iiiili1] end eaIi1lll11I1ilIl1i1iI[eaI1ii1l11lliiiIii1II] = eai11liI1iilIli1lllll * eailI1II1l1i11iiiili1 else eaI1ilIi11iilIIII1lil = eaI1ilIi11iilIIII1lil + ealIliilIlli1liI1I1iI11 end else eaIi1lll11I1ilIl1i1iI[eaI1ii1l11lliiiIii1II] = ealIlli1i11iIilIil1I1Ii[ealI11I1IiIiIilli1ili][ealllIlil1ll1I1iilIII] end elseif ealIlIilil1IiiIIlliilli >= 5 then if ealIlIilil1IiiIIlliilli ~= 6 then ealI111l1Ill1I1I11iiI[ealIlli1i11iIilIil1I1Ii[ealI11I1IiIiIilli1ili][ealllIlil1ll1I1iilIII]] = eaIi1lll11I1ilIl1i1iI[eaI1ii1l11lliiiIii1II] else local ealIll1liIl1l1ilIi1iilI = eaIi1lll11I1ilIl1i1iI[eai11liI1iilIli1lllll] for eaIIl1iIiI11iiIIIiii1 = eai11liI1iilIli1lllll + 1, eailI1II1l1i11iiiili1 do ealIll1liIl1l1ilIi1iilI = ealIll1liIl1l1ilIi1iilI .. eaIi1lll11I1ilIl1i1iI[eaIIl1iIiI11iiIIIiii1] end eaIi1lll11I1ilIl1i1iI[eaI1ii1l11lliiiIii1II] = ealIll1liIl1l1ilIi1iilI end elseif ealIlIilil1IiiIIlliilli ~= 4 then local eaiilllIIiI1I1lilIIll = ealiI1iilIii1l1I1Illi[ealI11I1IiIiIilli1ili] local eaI1lIilli11IIIl1iiIi = {} if eaiilllIIiI1I1lilIIll[ealIliiiiiiiil1IIiiiliI] > 0 then do local ealIiilIil1Ii11i1ilii = {} eaI1lIilli11IIIl1iiIi = eailI1liiIiiiIii11I1i({}, { __index = function(eail111iiiI1lilIIliII, eaIiIllllliI1IliIIlll) local eaiii1iIl1l11IlliIlIi = ealIiilIil1Ii11i1ilii[eaIiIllllliI1IliIIlll] return eaiii1iIl1l11IlliIlIi[1][eaiii1iIl1l11IlliIlIi[2]] end, __newindex = function(eail111iiiI1lilIIliII, eaIiIllllliI1IliIIlll, eailiII1Ill1IiIlllIiI) local eaiii1iIl1l11IlliIlIi = ealIiilIil1Ii11i1ilii[eaIiIllllliI1IliIIlll] eaiii1iIl1l11IlliIlIi[1][eaiii1iIl1l11IlliIlIi[2]] = eailiII1Ill1IiIlllIiI end }) for eaIIl1iIiI11iiIIIiii1 = 1, eaiilllIIiI1I1lilIIll[ealIliiiiiiiil1IIiiiliI] do local ealllllllilIlllIillii = eaI1ll111l1i1i1ill11l[eaI1ilIi11iilIIII1lil] if ealllllllilIlllIillii[eaIlIllIIiIli1liii11I] == eall1Il11IiIl1l1liI1l then ealIiilIil1Ii11i1ilii[eaIIl1iIiI11iiIIIiii1 - 1] = { eaIi1lll11I1ilIl1i1iI, ealllllllilIlllIillii[eaIiliililIlil1iiI1I1] } elseif ealllllllilIlllIillii[eaIlIllIIiIli1liii11I] == ealIiiIiiiIll1ilIiI1l then ealIiilIil1Ii11i1ilii[eaIIl1iIiI11iiIIIiii1 - 1] = { eal111llIlIll11I1lI1I, ealllllllilIlllIillii[eaIiliililIlil1iiI1I1] } end eaI1ilIi11iilIIII1lil = eaI1ilIi11iilIIII1lil + 1 end eallIiI1iil1liil1iiii[#eallIiI1iil1liil1iiii + 1] = ealIiilIil1Ii11i1ilii end end local eaiii1l1ili1I1I1I1Il1 = eaIIliIIIIll11IlIliiI(eaiilllIIiI1I1lilIIll, ealI111l1Ill1I1I11iiI, eaI1lIilli11IIIl1iiIi) eaIi1lll11I1ilIl1i1iI[eaI1ii1l11lliiiIii1II] = eaiii1l1ili1I1I1I1Il1 elseif eailI1II1l1i11iiiili1 == 29 then eaI1ilIi11iilIIII1lil = eaI1ilIi11iilIIII1lil - 1 eaI1ll111l1i1i1ill11l[eaI1ilIi11iilIIII1lil] = { [43212] = 12, [43892] = (eaI1ii1l11lliiiIii1II - 62) % 256, [92248] = (eai11liI1iilIli1lllll - 62) % 256, [42229] = 0 } else eaIi1lll11I1ilIl1i1iI[eaI1ii1l11lliiiIii1II] = not eaIi1lll11I1ilIl1i1iI[eai11liI1iilIli1lllll] end elseif ealIlIilil1IiiIIlliilli < 10 then if ealIlIilil1IiiIIlliilli < 8 then eaIi1lll11I1ilIl1i1iI[eaI1ii1l11lliiiIii1II] = ealI111l1Ill1I1I11iiI[ealIlli1i11iIilIil1I1Ii[ealI11I1IiIiIilli1ili][ealllIlil1ll1I1iilIII]] elseif ealIlIilil1IiiIIlliilli == 9 then local ealIlIIIIII1IIl1iilll1i, ealIllIlllli1iI11ll1IiI if eai11liI1iilIli1lllll ~= 1 then if eai11liI1iilIli1lllll ~= 0 then ealIllIlllli1iI11ll1IiI = eaI1ii1l11lliiiIii1II + eai11liI1iilIli1lllll - 1 else ealIllIlllli1iI11ll1IiI = ealllili1lIiIIii1llIl end ealIllIlllli1iI11ll1IiI, ealIlIIIIII1IIl1iilll1i = ealIIIIIIl1llIli1lili(eaIi1lll11I1ilIl1i1iI[eaI1ii1l11lliiiIii1II](ealIl11iliI1I1Il1lllliI(eaIi1lll11I1ilIl1i1iI, eaI1ii1l11lliiiIii1II + 1, ealIllIlllli1iI11ll1IiI))) else ealIllIlllli1iI11ll1IiI, ealIlIIIIII1IIl1iilll1i = ealIIIIIIl1llIli1lili(eaIi1lll11I1ilIl1i1iI[eaI1ii1l11lliiiIii1II]()) end eaIi1lll11I1ilIl1i1iI = ealIlIIIIII1IIl1iilll1i return true, 1, ealIllIlllli1iI11ll1IiI else if eai11liI1iilIli1lllll > 255 then eai11liI1iilIli1lllll = ealIlli1i11iIilIil1I1Ii[eai11liI1iilIli1lllll - 256][ealllIlil1ll1I1iilIII] else eai11liI1iilIli1lllll = eaIi1lll11I1ilIl1i1iI[eai11liI1iilIli1lllll] end if eailI1II1l1i11iiiili1 > 255 then eailI1II1l1i11iiiili1 = ealIlli1i11iIilIil1I1Ii[eailI1II1l1i11iiiili1 - 256][ealllIlil1ll1I1iilIII] else eailI1II1l1i11iiiili1 = eaIi1lll11I1ilIl1i1iI[eailI1II1l1i11iiiili1] end eaIi1lll11I1ilIl1i1iI[eaI1ii1l11lliiiIii1II] = eai11liI1iilIli1lllll - eailI1II1l1i11iiiili1 end elseif ealIlIilil1IiiIIlliilli >= 12 then if ealIlIilil1IiiIIlliilli ~= 13 then if eai11liI1iilIli1lllll == 1 then return true end local ealIllIlllli1iI11ll1IiI = eaI1ii1l11lliiiIii1II + eai11liI1iilIli1lllll - 2 if eai11liI1iilIli1lllll == 0 then ealIllIlllli1iI11ll1IiI = ealllili1lIiIIii1llIl end return true, eaI1ii1l11lliiiIii1II, ealIllIlllli1iI11ll1IiI else eaIi1lll11I1ilIl1i1iI[eaI1ii1l11lliiiIii1II] = eai11liI1iilIli1lllll ~= 0 if eailI1II1l1i11iiiili1 ~= 0 then eaI1ilIi11iilIIII1lil = eaI1ilIi11iilIIII1lil + 1 end end elseif ealIlIilil1IiiIIlliilli == 11 then local ealIlIIIIII1IIl1iilll1i, ealIllIlllli1iI11ll1IiI, eaIIiililIlilIll1i11I if eai11liI1iilIli1lllll ~= 1 then if eai11liI1iilIli1lllll ~= 0 then ealIllIlllli1iI11ll1IiI = eaI1ii1l11lliiiIii1II + eai11liI1iilIli1lllll - 1 else ealIllIlllli1iI11ll1IiI = ealllili1lIiIIii1llIl end ealIllIlllli1iI11ll1IiI, ealIlIIIIII1IIl1iilll1i = ealIIIIIIl1llIli1lili(eaIi1lll11I1ilIl1i1iI[eaI1ii1l11lliiiIii1II](ealIl11iliI1I1Il1lllliI(eaIi1lll11I1ilIl1i1iI, eaI1ii1l11lliiiIii1II + 1, ealIllIlllli1iI11ll1IiI))) else ealIllIlllli1iI11ll1IiI, ealIlIIIIII1IIl1iilll1i = ealIIIIIIl1llIli1lili(eaIi1lll11I1ilIl1i1iI[eaI1ii1l11lliiiIii1II]()) end if eailI1II1l1i11iiiili1 ~= 1 then if eailI1II1l1i11iiiili1 ~= 0 then ealIllIlllli1iI11ll1IiI = eaI1ii1l11lliiiIii1II + eailI1II1l1i11iiiili1 - 2 else ealIllIlllli1iI11ll1IiI = ealIllIlllli1iI11ll1IiI + eaI1ii1l11lliiiIii1II end eaIIiililIlilIll1i11I = 0 for eaIIl1iIiI11iiIIIiii1 = eaI1ii1l11lliiiIii1II, ealIllIlllli1iI11ll1IiI do eaIIiililIlilIll1i11I = eaIIiililIlilIll1i11I + 1 eaIi1lll11I1ilIl1i1iI[eaIIl1iIiI11iiIIIiii1] = ealIlIIIIII1IIl1iilll1i[eaIIiililIlilIll1i11I] end end ealllili1lIiIIii1llIl = ealIllIlllli1iI11ll1IiI - 1 else for eaIIl1iIiI11iiIIIiii1 = eaI1ii1l11lliiiIii1II, eai11liI1iilIli1lllll do eaIi1lll11I1ilIl1i1iI[eaIIl1iIiI11iiIIIiii1] = nil end end end end local eail1lli11I1i1iilIIII, ealIlIIiiiIIiil1i1111il, ealIlI1lIi11i1llIili1Ii, eaIi1lIIl1li1iiI11iil = ealIl1Ii1IiiIiI1iI1I11l(eaIIiililIlilIll1i11I) if eail1lli11I1i1iilIIII then if ealIlI1lIi11i1llIili1Ii then return ealIl11iliI1I1Il1lllliI(eaIi1lll11I1ilIl1i1iI, ealIlI1lIi11i1llIili1Ii, eaIi1lIIl1li1iiI11iil) end else local eaIl1l1Illi11iilI1lil = eai1iIlIi1Il1II1lliii("Luraph Script:" .. (eaIllI1iIliiiIiliiIIl[eaI1ilIi11iilIIII1lil - 1] or "") .. ": " .. eaill1iIIi1llIliiIlil(ealIlIIiiiIIiil1i1111il), "[^:]+:%d*: ", function(eaIlIIi11I1lIi1lIilii) if not eal1ii11lliIIIIiii1II(eaIlIIi11I1lIi1lIilii, "Luraph Script:%d") then return "" end end) ealIllli1iliiII1iliI1II(eaIl1l1Illi11iilI1lil, 0) end end eaIlllli111llliIll1li(ealIll11IiiIiIlll11iII1, ealI111l1Ill1I1I11iiI) return ealIll11IiiIiIlll11iII1 end local eaIi1I1ilIllIlil1lIIl = ealIlllli11ll1IliI11I1l() return eaIIliIIIIll11IlIliiI(eaIi1I1ilIllIlil1lIIl, ealI111l1Ill1I1I11iiI)() end eal1ilill111iiIl111I1("LPH!744D6A850A02001E5H00E4944000A89F5B62509B0A02002H4D4F494C2H4D413H4D413H4D593H4D514C2H4D613H4D7DC72F133C00013H0079880A02004F053H005H741E5H00E494404F0A3H005H7404061D1A004F0C3H005H74121500541A1D13007A99006B7DA80A02004C4D4F492H4F4D617277B55D4C4D4F493H4D414C2H4D514F2H4D512H4D4F494C2H4D514E4D494DB8B24C49794C4D65B1B24C498B3FE84C8F7A1C47C19791544225DF405B338B69A3C98C6F96508179496E8A3A024H0020136014E0AD3D45660D7H00013H00019H006H00019H002H00019H006H006B001B4ADE7AB5F1EE46234H00E900", eallIiIiII1IIll1lI1I1())
+local unpack = unpack or table.unpack
 
 os.unloadAPI("backpack")
 
 local args = {...}
 
 local opwords = {
 	install = true,
 	remove = true,
 	update = true,
 	["install-help"] = true,
 	["remove-help"] = true,
 	["update-help"] = true,
 	list = true,
 	search = true,
 	bootstrap = true,
 }
 
 local argwords = {
 	fetch = true,
 	force = true,
 	auto = true,
 	--target = 1,
 }
 
 if #args < 1 or (not opwords[args[1]] and not argwords[args[1]]) then
 	io.write("Usage:\n")
 	io.write("packman [options] install <package name[s]>\n")
 	io.write("packman [options] update <package name[s]>\n")
 	io.write("packman [options] remove <package name[s]>\n")
 	io.write("packman [options] list [pattern]\n")
 	io.write("packman [options] search [pattern]\n")
 	io.write("packman bootstrap\n")
 	io.write("packman [options] install-help <package name[s]>\n")
 	io.write("packman [options] update-help <package name[s]>\n")
 	io.write("packman [options] remove-help <package name[s]>\n")
 	io.write("\n")
 	io.write("Options:\n")
 	io.write("fetch\n")
 	io.write("  Update repository and package lists before performing operations (can be used without an operation)\n")
 	io.write("force\n")
 	io.write("  Force requested operation, even if it appears to be unnecessary; answer all questions with yes\n")
 	io.write("auto\n")
 	io.write("  Automatically answer yes when manipulating packages\n")
 	--io.write("target <directory>\n")
 	--io.write("  Set root directory to install packages in\n")
 	return
 end
 
 local config = {}
 
 function loadConfig()
 	local path = "/etc/packman/packman.conf"
 	--load a configuration file, given a fully-resolved path and an optional environment.
 	if not fs.exists(path) or fs.isDir(path) then return nil, "not a file" end
 	local env
 	if not _env then
 		--if we were not provided an environment, create one.
 		env = setmetatable({}, {__index = _G})
 	else
 		env = _env
 	end
 	local fn, err = loadfile(path)
 	if fn then
 		setfenv(fn, env)
 		local success, err = pcall(fn)
 		if success then
 			--strip the metatable from the environment before returning it.
 			config = setmetatable(env, {})
 		else
 			return nil, err
 		end
 	else
 		return nil, err
 	end
 end
 
 function saveConfig()
 	local path = "/etc/packman/packman.conf"
 	if not config or type(config) ~= "table" then return nil, "Not a configuration" end
 	local handle = io.open(path, "w")
 	if handle then
 		for k, v in pairs(config) do
 			local success, str = pcall(textutils.serialize, v)
 			if success then
 				handle:write(k.." = "..str.."\n\n")
 			end
 		end
 		handle:close()
 	else
 		return nil, "Could not write configuration."
 	end
 end
 
 loadConfig()
 
 local mode = ""
 local forced = false
 local target = "/"
 local fetch = false
 local auto = false
 local argState = nil
 local argCount = 0
 local operation = {options = {}, arguments = {}}
 
 --lower all arguments
 for i = 1, #args do
 	args[i] = string.lower(args[i])
 	if argState == nil and args[i] == "fetch" then fetch = true end
 	if argState == nil and args[i] == "force" then forced = true end
 	if argState == nil and args[i] == "auto" then auto = true end
 
 	if argwords[args[i]] and type(argwords[args[i]]) == "number" then
 		operation.options[args[i]] = {}
 		argState = args[i]
 		argCount = argwords[args[i]]
 	elseif opwords[args[i]] then
 		mode = args[i]
 		if mode == "bootstrap" then fetch = false break end
 		argState = "arguments"
 		argCount = 0
 	elseif argState and argCount > 0 then
 		--option arguments
 		table.insert(operation.options[argState], args[i])
 		argCount = argCount - 1
 		if argCount == 0 then argState = nil end
 	elseif argState == "arguments" then
 		--operation arguments
 		table.insert(operation.arguments, args[i])
 	end
 end
 
 if operation.options.target then
 	target = operation.options.target[1]
 end
 
 local function resetScreen()
 	term.setTextColor(colors.white)
 	term.setBackgroundColor(colors.black)
 end
 
 local function printError(errorText)
 	if term.isColor() then term.setTextColor(colors.red) end
 	io.write(errorText.."\n")
 	term.setTextColor(colors.white)
 	error()
 end
 
 local function printWarning(warningText)
 	if term.isColor() then term.setTextColor(colors.yellow) end
 	io.write(warningText.."\n")
 	term.setTextColor(colors.white)
 end
 
 local function printInformation(infoText)
 	if term.isColor() then term.setTextColor(colors.lime) end
 	io.write(infoText.."\n")
 	term.setTextColor(colors.white)
 end
 
 local function getUserInput(default)
 	if auto then
 		return default
 	else
 		return io.read()
 	end
 end
 
 local function loadPackageAPI()
 	if not backpack then if shell.resolveProgram("backpack") then os.loadAPI(shell.resolveProgram("backpack")) elseif fs.exists("usr/apis/backpack") then os.loadAPI("usr/apis/backpack") elseif not (fetch or mode == "bootstrap") then error("Could not load backpack API!") end end
 
 	if backpack then
 		resetScreen()
 		io.write("Loading database...\n")
 		backpack.installRoot = target
 
 		local co = coroutine.create(backpack.load)
 		local event, filter, passback = {}
 		while true do
 			if (filter and (filter == event[1] or event[1] == "terminate")) or not filter then
 				passback = {coroutine.resume(co, unpack(event))}
 			end
 			if passback[1] == false then printWarning(passback[2]) end
 			if coroutine.status(co) == "dead" then break end
 			filter = nil
 			if passback and passback[1] and passback[2] then
 				filter = passback[2]
 			end
 			event = {os.pullEventRaw()}
 			if event[1] == "package_status" then
 				if event[2] == "info" then
 					printInformation(event[3])
 				elseif event[2] == "warning" then
 					printWarning(event[3])
 				elseif event[2] == "error" then
 					printError(event[3])
 				end
 			end
 		end
 	end
 end
 
 loadPackageAPI()
 
 local categoryList = {}
 local categorySorted = {}
 
 if fetch then
 	local queue
 	if backpack then
 		queue = backpack.newTransactionQueue("main/backpack")
 	end
 	io.write("Fetching Repository List\n")
 	local repolistContent = ""
 	remoteHandle = http.get("https://raw.githubusercontent.com/lyqyd/cc-packman/master/repolist")
 	if remoteHandle then
 		repolistContent = remoteHandle.readAll()
 		if queue then
 			queue:makeDir("/etc")
 			queue:addFile("/etc/repolist", repolistContent)
 		else
 			local fileHandle = io.open("/etc/repolist", "w")
 			if fileHandle then
 				fileHandle:write(repolistContent)
 				fileHandle:close()
 			else
 				printWarning("Could not write file /etc/repolist")
 			end
 		end
 		remoteHandle.close()
 	else
 		printWarning("Could not retrieve remote file.")
 	end
 
 	if fs.exists("/etc/custom-repolist") then
 		local fileHandle = io.open("/etc/custom-repolist", "r")
 		if fileHandle then
 			repolistContent = repolistContent.."\n"..fileHandle:read("*a")
 			fileHandle:close()
 		end
 	end
 
 	if repolistContent then
 		if queue then
 			queue:makeDir("/etc/repositories")
 		else
 			if not fs.exists("/etc/repositories") then fs.makeDir("/etc/repositories") end
 		end
 
 		for line in string.gmatch(repolistContent, "([^\n]+)\n?") do
 			local file, url = string.match(line, "^(%S*)%s*(.*)")
 			if file and url then
 				io.write("Fetching Repository: "..file.."\n")
 				local remoteHandle = http.get(url)
 				if remoteHandle then
 					if queue then
 						queue:addFile(fs.combine("/etc/repositories", file), remoteHandle.readAll())
 					else
 						local fileHandle = io.open(fs.combine("/etc/repositories", file), "w")
 						if fileHandle then
 							fileHandle:write(remoteHandle.readAll())
 							fileHandle:close()
 						else
 							printWarning("Could not write file: "..fs.combine("/etc/repositories", file))
 						end
 					end
 					remoteHandle.close()
 				else
 					printWarning("Could not retrieve remote file: "..file)
 				end
 			end
 		end
 	end
 
 	if queue then
 		queue:finish()
 	end
 
 	fetch = false
 
 	if #mode > 0 then
 		--reload backpack API.
 		os.unloadAPI("backpack")
 		loadPackageAPI()
 	end
 end
 
 if #mode > 0 and backpack then
 	for n, v in pairs(backpack.list) do
 		if v.category then
 			for category in pairs(v.category) do
 				if not categoryList[category] then
 					categoryList[category] = {[n] = true}
 					table.insert(categorySorted, category)
 				else
 					categoryList[category][n] = true
 				end
 			end
 		end
 	end
 	table.sort(categorySorted)
 
 	local badPackages = {}
 	--flesh out dependencies
 	for pName, pData in pairs(backpack.list) do
 		if pData.dependencies then
 			dependencies, errmsg = backpack.findDependencies(pName, {})
 			if not dependencies then
 				--if dependencies could not be resolved, remove the backpack.
 				printWarning("Could not resolve dependency on "..errmsg.." in package "..pName)
 				table.insert(badPackages, pName)
 			else
 				pData.dependencies = dependencies
 			end
 		end
 	end
 	--actual package removal and short-name lookup cleanup.
 	for _, pack in pairs(badPackages) do
 		local entry = backpack.list[pack]
 		local name = entry.name
 		local others, key = false
 		for k, v in pairs(backpack.list[name]) do
 			if v == entry then
 				key = k
 			else
 				others = true
 			end
 		end
 		if others then
 			backpack.list[name][key] = nil
 		else
 			backpack.list[name] = nil
 		end
 		backpack.list[pack] = nil
 	end
 end
 
 local function lookupPackage(name, installedOnly)
 	if backpack.list[name] and not backpack.list[name].dependencies then
 		local options = {}
 		if installedOnly and backpack.installed[name] then
 			for name, pack in pairs(backpack.installed[name]) do
 				table.insert(options, name)
 			end
 		elseif installedOnly then
 			--using installedOnly, but no packages of that name are installed.
 			return false
 		else
 			for name, pack in pairs(backpack.list[name]) do
 				table.insert(options, name)
 			end
 		end
 		if #options > 1 then
 			io.write("Package "..name.." is ambiguous.\n")
 			for i = 1, #options do
 				write(tostring(i)..": "..options[i].."  ")
 			end
 			io.write("\n")
 			io.write("Select option: \n")
 			local selection = getUserInput("1")
 			if tonumber(selection) and options[tonumber(selection)] then
 				return options[tonumber(selection)].."/"..name
 			end
 		elseif #options == 1 then
 			return options[1].."/"..name
 		else
 			return false
 		end
 	elseif backpack.list[name] then
 		--since it must have a dependencies table, the name is already fully unique.
 		return name
 	else
 		return false
 	end
 end
 
 local function raw_package_operation(name, funcName)
 	local pack = backpack.list[name]
 	if not pack then return nil, "No such package" end
 	local co = coroutine.create(function() return pack[funcName](pack, getfenv()) end)
 	local event, filter, passback = {}
 	while true do
 		if (filter and (filter == event[1] or event[1] == "terminate")) or not filter then
 			passback = {coroutine.resume(co, unpack(event))}
 		end
 		if passback[1] == false then printWarning(passback[2]) end
 		if coroutine.status(co) == "dead" then return unpack(passback, 2) end
 		filter = nil
 		if passback and passback[1] and passback[2] then
 			filter = passback[2]
 		end
 		event = {os.pullEventRaw()}
 		if event[1] == "package_status" then
 			if event[2] == "info" then
 				printInformation(event[3])
 			elseif event[2] == "warning" then
 				printWarning(event[3])
 			elseif event[2] == "error" then
 				printError(event[3])
 			end
 		end
 	end
 end
 
 local function install(name)
 	if config.manageHelp then
 		return raw_package_operation(name, "installFiles") and raw_package_operation(name, "installHelp") and raw_package_operation(name, "finalizeInstall")
 	else
 		return raw_package_operation(name, "install")
 	end
 end
 
 local function installHelp(name)
 	return raw_package_operation(name, "installHelp")
 end
 
 local function remove(name)
 	if config.manageHelp then
 		return raw_package_operation(name, "removeHelp") and raw_package_operation(name, "remove")
 	else
 		return raw_package_operation(name, "remove")
 	end
 end
 
 local function removeHelp(name)
 	return raw_package_operation(name, "removeHelp")
 end
 
 local function upgrade(name)
 	if config.manageHelp then
 		return raw_package_operation(name, "upgradeFiles") and raw_package_operation(name, "upgradeHelp") and raw_package_operation(name, "finalizeUpgrade")
 	else
 		return raw_package_operation(name, "upgrade")
 	end
 end
 
 local function upgradeHelp(name)
 	return raw_package_operation(name, "upgradeHelp")
 end
 
 if mode == "bootstrap" then
 	--initial setup, results in main/packman and main/backpack packages being installed
 	if not backpack or backpack.list["main/packman"] == nil then
 		--grab the backpack API, since we have no transaction queue yet.
 		io.write("Updating Backpack API\n")
 		remoteHandle = http.get("https://raw.githubusercontent.com/lyqyd/cc-packman/master/backpack")
 		local apiContents = ""
 		if remoteHandle then
 			if not fs.exists("/usr/apis") then fs.makeDir("/usr/apis") end
 			local fileHandle = io.open("/usr/apis/backpack", "w")
 			if fileHandle then
 				apiContents = remoteHandle.readAll()
 				fileHandle:write(apiContents)
 				fileHandle:close()
 			else
 				printWarning("Could not write file /usr/apis/backpack")
 			end
 			remoteHandle.close()
 		else
 			printWarning("Could not retrieve remote file.")
 		end
 
 		io.write("Fetching main package list\n")
 		remoteHandle = http.get("https://raw.githubusercontent.com/lyqyd/cc-packman/master/packlist")
 		local packlistContents = ""
 		if remoteHandle then
 			if not fs.exists("/etc/repositories") then fs.makeDir("/etc/repositories") end
 			local fileHandle = io.open("/etc/repositories/main", "w")
 			if fileHandle then
 				packlistContents = remoteHandle.readAll()
 				fileHandle:write(packlistContents)
 				fileHandle:close()
 			else
 				printWarning("Could not write file /etc/repositories/main")
 			end
 			remoteHandle.close()
 		else
 			printWarning("Could not retrieve remote file.")
 		end
 
 		os.unloadAPI("backpack")
 		loadPackageAPI()
 		if not backpack then printError("Backpack API required for bootstrap!") end
 
 		--re-do the file writes for the files above so they end up in the package file list.
 		local queue = backpack.newTransactionQueue("main/backpack")
 		queue:makeDir("/usr")
 		queue:makeDir("/usr/apis")
 		queue:addFile("/usr/apis/backpack", apiContents)
 		queue:makeDir("/etc")
 		queue:makeDir("/etc/repositories")
 		queue:addFile("/etc/repositories/main", packlistContents)
 		queue:finish()
 	end
 
 	backpack.list["main/packman"]:install(getfenv())
 
 	--reload backpack API.
 	os.unloadAPI("backpack")
 	loadPackageAPI()
 
 	config.manageHelp = false
 	saveConfig()
 elseif mode == "install" then
 	if #operation.arguments >= 1 then
 		local installList = {}
 		for packageNumber, packageName in ipairs(operation.arguments) do
 			local result = lookupPackage(packageName)
 			if not result then
 				printWarning("Could not install package "..packageName..".")
 			else
 				for k,v in pairs(backpack.list[result].dependencies) do
 					if not backpack.installed[k] then
 						installList[k] = true
 					else
 						if k == result then
 							printInformation("Package "..k.." already installed")
 						else
 							printInformation("Dependency "..k.." already installed")
 						end
 					end
 				end
 			end
 		end
 		local installString = ""
 		for k, v in pairs(installList) do
 			installString = installString..k.." "
 		end
 		if #installString > 0 then
 			if not forced then
 				io.write("The following packages will be installed: "..installString.."\n")
 				io.write("Continue? (Y/n)\n")
 				local input = getUserInput("y")
 				if string.sub(input:lower(), 1, 1) == "n" then
 					return true
 				end
 			end
 			for packageName in pairs(installList) do
 				if not install(packageName) then
 					printWarning("Could not "..mode.." package "..packageName)
 				end
 			end
 		end
 	end
 elseif mode == "update" then
 	local updateList = {}
 	local installList = {}
 	if #operation.arguments >= 1 then
 		for _, name in ipairs(operation.arguments) do
 			local result = lookupPackage(name, true)
 			if result then
 				table.insert(updateList, result)
 			end
 		end
 	else
 		for k, v in pairs(backpack.installed) do
 			if v.files then
 				--filters out the disambiguation entries.
 				table.insert(updateList, k)
 				for name, info in pairs(backpack.list[k].dependencies) do
 					if not backpack.installed[name] then
 						installList[name] = true
 					end
 				end
 			end
 		end
 	end
 	local installString = ""
 	for k, v in pairs(installList) do
 		installString = installString..k.." "
 	end
 	if not forced then
 		for i = #updateList, 1, -1 do
 			if backpack.installed[updateList[i]].version == backpack.list[updateList[i]].version then
 				table.remove(updateList, i)
 			end
 		end
 	end
 	if #updateList > 0 or #installString > 0 then
 		local updateString = ""
 		for i = 1, #updateList do
 			updateString = updateString..updateList[i].." "
 		end
 		if not forced then
 			io.write("The following packages will be updated: "..updateString.."\n")
 			if #installString > 0 then
 				io.write("The following packages will also be installed: "..installString.."\n")
 			end
 			io.write("Continue? (Y/n)\n")
 			local input = getUserInput("y")
 			if string.sub(input:lower(), 1, 1) == "n" then
 				return true
 			end
 		end
 		local failureCount = 0
 		for packageName in pairs(installList) do
 			if not install(packageName) then
 				printWarning("Could not install package "..packageName)
 			end
 		end
 		for _, packageName in pairs(updateList) do
 			if not upgrade(packageName) then
 				printWarning("Package "..packageName.." failed to update.")
 				failureCount = failureCount + 1
 			end
 		end
 		if failureCount > 0 then
 			printWarning(failureCount.." packages failed to update.")
 		else
 			printInformation("Update complete!")
 		end
 	else
 		io.write("Nothing to do!\n")
 		return true
 	end
 elseif mode == "remove" then
 	if #operation.arguments >= 1 then
 		local packageList = {}
 		for _, name in ipairs(operation.arguments) do
 			local result = lookupPackage(name, true)
 			if result then
 				table.insert(packageList, result)
 			end
 		end
 		dependeesList = {}
 		--find packages which depend on the packages we are removing.
 		for pName, pData in pairs(backpack.installed) do
 			if pData.version then
 				if not packageList[pName] then
 					for dName in pairs(backpack.list[pName].dependencies) do
 						for _, packName in pairs(packageList) do
 							if packName == dName then
 								dependeesList[pName] = true
 								break
 							end
 						end
 						if dependeesList[pName] then
 							break
 						end
 					end
 				end
 			end
 		end
 		local removeString = ""
 		local dependeesString = ""
 		for i = 1, #packageList do
 			removeString = removeString..packageList[i].." "
 			if dependeesList[packageList[i]] then
 				dependeesList[packageList[i]] = nil
 			end
 		end
 		for dName in pairs(dependeesList) do
 			dependeesString = dependeesString..dName.." "
 		end
 		if #removeString > 0 then
 			if not forced then
 				io.write("The following packages will be removed: "..removeString.."\n")
 				if #dependeesString > 0 then
 					io.write("The following packages will also be removed due to missing dependencies: "..dependeesString.."\n")
 				end
 				io.write("Continue? (y/N)\n")
 				local input = getUserInput("y")
 				if string.sub(input:lower(), 1, 1) ~= "y" then
 					return true
 				end
 			end
 			for pName in pairs(dependeesList) do
 				printInformation("Removing "..pName)
 				remove(pName)
 			end
 			for _, pName in pairs(packageList) do
 				printInformation("Removing "..pName)
 				remove(pName)
 			end
 		else
 			io.write("Nothing to do!\n")
 		end
 	end
 elseif mode == "install-help" then
 	if #operation.arguments >= 1 then
 		local installString = ""
 		for packageNumber, packageName in ipairs(operation.arguments) do
 			local result = lookupPackage(packageName)
 			if not result then
 				printWarning("Could not find package "..packageName..".")
 			else
 				installString = installString..result.." "
 			end
 		end
 		if #installString > 0 then
 			if not forced then
 				io.write("The following packages' help files will be installed: "..installString.."\n")
 				io.write("Continue? (Y/n)\n")
 				local input = getUserInput("y")
 				if string.sub(input:lower(), 1, 1) == "n" then
 					return true
 				end
 			end
 			for packageName in string.gmatch(installString, "%S+") do
 				if not installHelp(packageName) then
 					printWarning("Could not install help files for package "..packageName)
 				end
 			end
 		end
 	end
 elseif mode == "upgrade-help" then
 	if #operation.arguments >= 1 then
 		local upgradeString = ""
 		for packageNumber, packageName in ipairs(operation.arguments) do
 			local result = lookupPackage(packageName)
 			if not result then
 				printWarning("Could not find package "..packageName..".")
 			else
 				upgradeString = upgradeString..result.." "
 			end
 		end
 		if #upgradeString > 0 then
 			if not forced then
 				io.write("The following packages' help files will be installed: "..upgradeString.."\n")
 				io.write("Continue? (Y/n)\n")
 				local input = getUserInput("y")
 				if string.sub(input:lower(), 1, 1) == "n" then
 					return true
 				end
 			end
 			for packageName in string.gmatch(upgradeString, "%S+") do
 				if not installHelp(packageName) then
 					printWarning("Could not install help files for package "..packageName)
 				end
 			end
 		end
 	end
 elseif mode == "remove-help" then
 	if #operation.arguments >= 1 then
 		local removeString = ""
 		for _, name in ipairs(operation.arguments) do
 			local result = lookupPackage(name, true)
 			if not result then
 				printWarning("Could not find package "..name)
 			else
 				removeString = removeString..result.." "
 			end
 		end
 		if #removeString > 0 then
 			if not forced then
 				io.write("The following packages' help files will be removed: "..removeString.."\n")
 				io.write("Continue? (y/N)\n")
 				local input = getUserInput("y")
 				if string.sub(input:lower(), 1, 1) ~= "y" then
 					return true
 				end
 			end
 			for packageName in string.gmatch(removeString, "%S+") do
 				printInformation("Removing help files for package "..packageName)
 				removeHelp(packageName)
 			end
 		else
 			io.write("Nothing to do!\n")
 		end
 	end
 elseif mode == "list" then
 	--list all installed packages
 	local match = ".*"
 	if #operation.arguments == 1 then
 		--list with matching.
 		match = operation.arguments[1]
 	end
 	for name, info in pairs(backpack.installed) do
 		if info.version then
 			if string.match(name, match) then
 				io.write(name.." "..info.version.."\n")
 			end
 		end
 	end
 elseif mode == "search" then
 	--search all available packages
 	local match = ".*"
 	if #operation.arguments == 1 then
 		--search using a match
 		match = operation.arguments[1]
 	end
 	for name, info in pairs(backpack.list) do
 		if info.version then
 			if string.match(name, match) then
 				io.write((backpack.installed[name] and "I " or "A " )..name.." "..info.version.."\n")
 			end
 		end
 	end
 end