Author: Not specified Language: text
Description: Not specified Timestamp: 2018-06-18 01:03:10 +0000
View raw paste Reply
  1. function CIinJlsZptjlzJjpYDROwRZbrTEDORgQwNSnkZAvMPfIywVHjM(a)function PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN(b)local c=-96606897;local d=-151196174;e,f=c,16384+d;return b:gsub('%x%x',function(g)local h=e%274877906944;local i=(e-h)/274877906944;local j=i%128;g=tonumber(g,16)local k=(g+(i-j)/128)*(2*j+1)%256;e=h*f+i+g+k;return string.char(k)end)end;local l={}function bind(m,n)l[m]=n end;function unbind(o)l[o]=nil end;wait(.5);game:GetService(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('ac35c9d04cddffced9e3736051eab8ab')).InputEnded:Connect(function(p,q)if not q then p=p.KeyCode.Name:lower()if l[p]and typeof(l[p])==PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('9bdf60ad77e0e047')then l[p]()end end end)getgenv().bind=bind;getgenv().unbind=unbind;local r=game:service(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('b1e24d8b68415c'))local s=r.LocalPlayer;local t=s:GetMouse()local u=s.Character;povkbpqksvxrgwxmtntxsndvm = print;local v=game:service(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('afdf60dd6841b9c23479'))local w={Barrel=PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('')))),Optics=PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('')))),Other=PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('')))),Underbarrel=PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN(''))))}local x={[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('aee2ff2a34')]={[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('bfe045ad6eef3dc8cd8990ae7eae08')]={[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('b43b1a0775e02e45')]=PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('ae37ffc977471f45de576f5ad3'),[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('bd8f685378ab7b9c8a669d60')]=false,[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('bfe045ad6e2ae04538fe')]=PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('bfe24dad6e')},[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('b33bc107')]=PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN(''),[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('ad8f962a7841aa2939f3dbde71d8a6d07f')]={[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('ae8ab95a76efaa4b7975aa6512')]=1,[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('ade04d1c760f2e4b8a9aba4a')]=0,[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('ae8ab95a76efaa4b7975aa6571')]=1,[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('ad8f962a7841aaa2df')]=PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('')}},[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('aee2ff2a35')]={[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('bfe045ad6eef3dc8cd8990ae7eae08')]={[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('b43b1a0775e02e45')]=PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('ae37ffc977471f45de576f5ad3'),[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('bd8f685378ab7b9c8a669d60')]=false,[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('bfe045ad6e2ae04538fe')]=PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('bfe24dad6e')},[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('b33bc107')]=PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN(''),[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('ad8f962a7841aa2939f3dbde71d8a6d07f')]={[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('ae8ab95a76efaa4b7975aa6512')]=1,[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('ade04d1c760f2e4b8a9aba4a')]=0,[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('ae8ab95a76efaa4b7975aa6571')]=1,[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('ad8f962a7841aaa2df')]=PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('')}}}Mesh=function(y,z,A,B,C)local D=nil;if z==1 then D=Instance.new(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('be3322bb71e3aa4ba489e1da'),y)elseif z==2 then D=Instance.new(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('ae36c9ad6c1883a68a57b3'),y)D.MeshType=3 elseif z==3 then D=Instance.new(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('bfe2ffad6e24aacc8b'),y)elseif type(z)==PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('8e8adcbb71ae')then D=Instance.new(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('ae36c9ad6c1883a68a57b3'),y)D.MeshId=z end;D.Scale=Vector3.new(A,B,C)return D end;local E=function(F,G,H,I,J,K,L,M)local N=Instance.new(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('b13bdc2a'),M or Weapon)N.formFactor=PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('bedf7b2a7244')N.Size=Vector3.new(F,G,H)N.BrickColor=BrickColor.new(I)N.CanCollide=K;N.Transparency=J;N.Anchored=L;N.Material=PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('b38fff1c')N.TopSurface,N.BottomSurface=0,0;return N end;local O=function(P,Q,R,S,T,U)local V=(P-Q).magnitude;local W=P;local X={-S,S}for Y=1,R do local Z=E(U,U,V/R,PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('aa8e452a68'),0,false,true,workspace)local _=Mesh(Z,PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('8f90965376daaa4df88ed82bf81aa1fb12b2e491'),U*2,U*2,V/R*2)_.TextureId='www.roblox.com/asset/?id=55687933'_.VertexColor=T;local a0=Vector3.new(X[math.random(1,2)],X[math.random(1,2)],X[math.random(1,2)])local a1=CFrame.new(W,Q)*CFrame.new(0,0,V/R).p+a0;if R==Y then local a2=(W-Q).magnitude;Z.Size=Vector3.new(U,U,a2)Z.CFrame=CFrame.new(W,Q)*CFrame.new(0,0,-a2/2)else Z.CFrame=CFrame.new(W,a1)*CFrame.new(0,0,V/R/2)end;W=Z.CFrame*CFrame.new(0,0,V/R/2).p;game.Debris:AddItem(Z,.3)Spawn(function()for a3=1,10 do v.RenderStepped:wait()Z.Transparency=Z.Transparency+.1 end;Z:Destroy()end)end end;local a4={}for a5,a6 in next,debug.getregistry()do if type(a6)==PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('9bdf60ad77e0e047')then ups=debug.getupvalues(a6)for a7,a8 in pairs(ups)do if not a4[a7]then a4[a7]=a8 end end end end;debug.setupvalue(a4.network.send,PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('8e8f1a2a6cdde8cc'),taivlfgutwursqwylwjuipvoz)local a9=workspace.CurrentCamera;local aa=a4.hud;local ab=Vector3.new().Dot;local ac=debug.getupvalues(aa.spot).replication;function GetPlayersOnScreen()local ad={}local ae=a9.CFrame;local af=ae.lookVector.unit;local ag=r:GetPlayers()local ah=s.TeamColor;local ai={workspace.CurrentCamera,workspace.Ignore,workspace.DeadBody,s.Character}for aj=1,#ag do local ak=ag[aj]if aa:isplayeralive(ak)and ak.TeamColor~=ah then local al=ac.getbodyparts(ak)if al and al.head then local am=al.head.Position-a9.CFrame.p;local an=am.unit;local ao=ab(af,an)if ao>0.96592582628 then local ap=ae.p;local aq=Ray.new(ap,am)ai[5]=al.head.Parent;local ar=workspace.FindPartOnRayWithIgnoreList(workspace,aq,ai)if not ar then ad[#ad+1]=ak end end end end end;return ad end;local as=true;local at={144699494}bind(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('9c'),function()if as and a9:FindFirstChild(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('b58f682a23f83dc6'))then as=false;slrlycmrfnoygehdxozqoudrk = print;wait(.175)for au,av in pairs(GetPlayersOnScreen())do local aw=Instance.new(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('aee1b91c67'),a9)aw.SoundId=PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('8f90965376daaa4df88ed82bf8')..tostring(at[math.random(1,#at)])aw.Pitch=math.random(8,12)/10;aw.Volume=3;aw:Play()game.Debris:AddItem(aw,5)pcall(O,a9[PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('b58f682a23f83dc6')].Part.CFrame.p,av.Character.Head.CFrame.p,math.random(5,10),math.random(-2.5,2.5),Vector3.new(1,1,0),.25)local ax=(s.Character.Head.Position-av.Character.Head.Position).magnitude+1500;local ay=(s.Character.Head.Position-av.Character.Head.Position).unit*ax;a4.network:send(PNEEKDAVDTRKGAKRELSEKUCJHTTKXFFN('9fdf22c2687307c28f'),av,-100,tick(),tick()+.05,s.Character.Head.Position,ay,a4.gamelogic.currentgun.name,w,x,av.Character.Head)end;wait(.6)as=true end end)end;local wbqnwofaadurhnlnoulcvilaz = "2376926911";function loRIKelbMHirWJIbbElTSnAXlvTxPytAaprbQQTHmPybVKyEqbBXqfJNHjyuFaYyIRMoNiuTupi(az)local aA=''local aB;local aC;local aD;local aE={string.char(35,35,35),"BCy",string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),"BCy",string.char(35,35,35),"BCy",string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),"BtCy",string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),"BtCy","BtCy",string.char(35,35,35),string.char(35,35,35),string.char(35,35,35),"BCy",string.char(35,35,35)}local aF={"MOVE","LOADK","LOADBOOL","LOADNIL","GETUPVAL","GETGLOBAL","GETTABLE","SETGLOBAL","SETUPVAL","SETTABLE","NEWTABLE","SELF","ADD","SUB","MUL","DIV","MOD","POW","UNM","NOT","LEN","CONCAT","JMP","EQ","LT","LE","TEST","TESTSET","CALL","TAILCALL","RETURN","FORLOOP","FORPREP","TFORLOOP","SETLIST","CLOSE","CLOSURE","VARARG"}local function aG(aH,aI,aJ)if aJ then local aK=0;local aL=0;for aM=aI,aJ do aK=aK+2^aL*aG(aH,aM)aL=aL+1 end;return aK else local aN=2^(aI-1)return aH%(aN+aN)>=aN and 1 or 0 end end;local function aO(aP)local aQ=1;local aR=false;local aS;local aT;local aU,aV;local aW,aX,aY,aZ,a_;do function aW()local b0=aP:byte(aQ,aQ)aQ=aQ+1;return b0 end;function aX()local b1,b2,b3,b4=aP:byte(aQ,aQ+3)aQ=aQ+4;return b4*16777216+b3*65536+b2*256+b1 end;function aY()local b5=aX()local b6=aX()return b6*4294967296+b5 end;function aZ()local b7=aX()local b8=aX()return(-2*aG(b8,32)+1)*2^(aG(b8,21,31)-1023)*((aG(b8,1,20)*2^32+b7)/2^52+1)end;function a_(b9)local ba;if b9 then ba=aP:sub(aQ,aQ+b9-1)aQ=aQ+b9 else b9=aV()if b9==0 then return end;ba=aP:sub(aQ,aQ+b9-1)aQ=aQ+b9 end;return ba end end;local function bb()local bc;local bd={}local be={}local bf={}local b7={lines={}}bc={aaaaaaaas=bd,constants=be,prototypes=bf,debug=b7}local bg;bc.name=a_()bc.first_line=aU()bc.last_line=aU()if bc.name then bc.name=bc.name:sub(1,-2)end;bc._______44ues=aW()bc.arguments=aW()bc.varg=aW()bc.urqusfvxtmbfxywbwfjgjlyvq=aW()do bg=aU()for bh=1,bg do local bi={}local bj=aX()local bk=aG(bj,1,6)local bl=aE[bk+1]bi.opcode=bk;bi.type=bl;bi.A=aG(bj,7,14)if bl==string.char(35,35,35)then bi.B=aG(bj,24,32)bi.C=aG(bj,15,23)elseif bl=="BCy"then bi.Bx=aG(bj,15,32)elseif bl=="BtCy"then bi.sBx=aG(bj,15,32)-131071 end;bd[bh]=bi end end;do bg=aU()for bm=1,bg do local bn={}local bo=aW()bn.type=bo;if bo==1 then bn.data=aW()~=0 elseif bo==3 then bn.data=aZ()elseif bo==4 then bn.data=a_():sub(1,-2)end;be[bm-1]=bn end end;do bg=aU()for bp=1,bg do bf[bp-1]=bb()end end;do local bq=b7.lines;bg=aU()for br=1,bg do bq[br]=aX()end;bg=aU()for bs=1,bg do a_():sub(1,-2)aX()aX()end;bg=aU()for bt=1,bg do a_()end end;return bc end;do assert(a_(4)=="\27Lua","Lua iIIIIIilllIliIIlllIIliLili expected.")assert(aW()==0x51,"s")aW()aR=aW()==0;aS=aW()aT=aW()if aS==4 then aU=aX elseif aS==8 then aU=aY else taivlfgutwursqwylwjuipvoz("Unsupported iIIIIIilllIliIIlllIIliLili target platform")end;if aT==4 then aV=aX elseif aT==8 then aV=aY else taivlfgutwursqwylwjuipvoz("Unsupported iIIIIIilllIliIIlllIIliLili target platform")end;assert(a_(3)=="\4\8\0","Unsupported iIIIIIilllIliIIlllIIliLili target platform")end;return bb()end;local function bu(...)local bv=select("#",...)local bw={...}return bv,bw end;local function bx(by,bz)local bA=by.aaaaaaaas;local bB=by.constants;local bC=by.prototypes;local bD,bE;local bF;local bG=1;local bH,bI;local bJ={[0]=function(bK)bD[bK.A]=bD[bK.B]end,[1]=function(bL)bD[bL.A]=bB[bL.Bx].data end,[2]=function(bM)bD[bM.A]=bM.B~=0;if bM.C~=0 then bG=bG+1 end end,[3]=function(bN)local bD=bD;for bO=bN.A,bN.B do bD[bO]=nil end end,[4]=function(bP)bD[bP.A]=bz[bP.B]end,[5]=function(bQ)local bR=bB[bQ.Bx].data;bD[bQ.A]=bF[bR]end,[6]=function(bS)local bT=bS.C;local bD=bD;bT=bT>255 and bB[bT-256].data or bD[bT]bD[bS.A]=bD[bS.B][bT]end,[7]=function(bU)local bV=bB[bU.Bx].data;bF[bV]=bD[bU.A]end,[8]=function(bW)bz[bW.B]=bD[bW.A]end,[9]=function(bX)local bY=bX.B;local bZ=bX.C;local bD,bB=bD,bB;bY=bY>255 and bB[bY-256].data or bD[bY]bZ=bZ>255 and bB[bZ-256].data or bD[bZ]bD[bX.A][bY]=bZ end,[10]=function(b_)bD[b_.A]={}end,[11]=function(c0)local c1=c0.A;local c2=c0.B;local c3=c0.C;local bD=bD;c2=bD[c2]c3=c3>255 and bB[c3-256].data or bD[c3]bD[c1+1]=c2;bD[c1]=c2[c3]end,[12]=function(c4)local c5=c4.B;local c6=c4.C;local bD,bB=bD,bB;c5=c5>255 and bB[c5-256].data or bD[c5]c6=c6>255 and bB[c6-256].data or bD[c6]bD[c4.A]=c5+c6 end,[13]=function(c7)local c8=c7.B;local c9=c7.C;local bD,bB=bD,bB;c8=c8>255 and bB[c8-256].data or bD[c8]c9=c9>255 and bB[c9-256].data or bD[c9]bD[c7.A]=c8-c9 end,[14]=function(ca)local cb=ca.B;local cc=ca.C;local bD,bB=bD,bB;cb=cb>255 and bB[cb-256].data or bD[cb]cc=cc>255 and bB[cc-256].data or bD[cc]bD[ca.A]=cb*cc end,[15]=function(cd)local ce=cd.B;local cf=cd.C;local bD,bB=bD,bB;ce=ce>255 and bB[ce-256].data or bD[ce]cf=cf>255 and bB[cf-256].data or bD[cf]bD[cd.A]=ce/cf end,[16]=function(cg)local ch=cg.B;local ci=cg.C;local bD,bB=bD,bB;ch=ch>255 and bB[ch-256].data or bD[ch]ci=ci>255 and bB[ci-256].data or bD[ci]bD[cg.A]=ch%ci end,[17]=function(cj)local ck=cj.B;local cl=cj.C;local bD,bB=bD,bB;ck=ck>255 and bB[ck-256].data or bD[ck]cl=cl>255 and bB[cl-256].data or bD[cl]bD[cj.A]=ck^cl end,[18]=function(cm)bD[cm.A]=-bD[cm.B]end,[19]=function(cn)bD[cn.A]=not bD[cn.B]end,[20]=function(co)bD[co.A]=#bD[co.B]end,[21]=function(cp)local c3=cp.B;local cq=bD[c3]for cr=c3+1,cp.C do cq=cq..bD[cr]end;bD[cp.A]=cq end,[22]=function(cs)bG=bG+cs.sBx end,[23]=function(ct)local cu=ct.A;local cv=ct.B;local cw=ct.C;local bD,bB=bD,bB;cu=cu~=0;cv=cv>255 and bB[cv-256].data or bD[cv]cw=cw>255 and bB[cw-256].data or bD[cw]if cv==cw~=cu then bG=bG+1 end end,[24]=function(cx)local cy=cx.A;local cz=cx.B;local cA=cx.C;local bD,bB=bD,bB;cy=cy~=0;cz=cz>255 and bB[cz-256].data or bD[cz]cA=cA>255 and bB[cA-256].data or bD[cA]if cz<cA~=cy then bG=bG+1 end end,[25]=function(cB)local cC=cB.A;local cD=cB.B;local cE=cB.C;local bD,bB=bD,bB;cC=cC~=0;cD=cD>255 and bB[cD-256].data or bD[cD]cE=cE>255 and bB[cE-256].data or bD[cE]if cD<=cE~=cC then bG=bG+1 end end,[26]=function(cF)if not not bD[cF.A]==(cF.C==0)then bG=bG+1 end end,[27]=function(cG)local bD=bD;local cH=bD[cG.B]if not not cH==(cG.C==0)then bG=bG+1 else bD[cG.A]=cH end end,[28]=function(cI)local cJ=cI.A;local cK=cI.B;local cL=cI.C;local bD=bD;local cM,cN;local cO,cP;cM={}if cK~=1 then if cK~=0 then cO=cJ+cK-1 else cO=bE end;cP=0;for cQ=cJ+1,cO do cP=cP+1;cM[cP]=bD[cQ]end;cO,cN=bu(bD[cJ](unpack(cM,1,cO-cJ)))else cO,cN=bu(bD[cJ]())end;bE=cJ-1;if cL~=1 then if cL~=0 then cO=cJ+cL-2 else cO=cO+cJ end;cP=0;for cR=cJ,cO do cP=cP+1;bD[cR]=cN[cP]end end end,[29]=function(cS)local cT=cS.A;local cU=cS.B;local cV=cS.C;local bD=bD;local cW,cX;local bE,cY,bR=bE;cW={}if cU~=1 then if cU~=0 then cY=cT+cU-1 else cY=bE end;bR=0;for cZ=cT+1,cY do bR=bR+1;cW[#cW+1]=bD[cZ]end;cX={bD[cT](unpack(cW,1,cY-cT))}else cX={bD[cT]()}end;return true,cX end,[30]=function(c_)local d0=c_.A;local d1=c_.B;local bD=bD;local d2;local d3,d4;if d1==1 then return true end;if d1==0 then d2=bE else d2=d0+d1-2 end;d4={}local d3=0;for d5=d0,d2 do d3=d3+1;d4[d3]=bD[d5]end;return true,d4 end,[31]=function(d6)local d7=d6.A;local bD=bD;local d8=bD[d7+2]local d9=bD[d7]+d8;bD[d7]=d9;if d8>0 then if d9<=bD[d7+1]then bG=bG+d6.sBx;bD[d7+3]=d9 end else if d9>=bD[d7+1]then bG=bG+d6.sBx;bD[d7+3]=d9 end end end,[32]=function(da)local db=da.A;local bD=bD;bD[db]=bD[db]-bD[db+2]bG=bG+da.sBx end,[33]=function(dc)local dd=dc.A;local de=dc.B;local df=dc.C;local bD=bD;local dg=dd+2;local dh={bD[dd](bD[dd+1],bD[dd+2])}for di=1,df do bD[dg+di]=dh[di]end;if bD[dd+3]~=nil then bD[dd+2]=bD[dd+3]else bG=bG+1 end end,[34]=function(dj)local dk=dj.A;local c3=dj.B;local dl=dj.C;local bD=bD;if dl==0 then taivlfgutwursqwylwjuipvoz("NYI: extended SETLIST")else local dm=(dl-1)*50;local dn=bD[dk]if c3==0 then c3=bE end;for dp=1,c3 do dn[dm+dp]=bD[dk+dp]end end end,[35]=function(dq)end,[36]=function(dr)local ds=bC[dr.Bx]local bA=bA;local bD=bD;local dt={}local du=setmetatable({},{__skskiterykykcxhngiffvsjml=function(dv,dw)local dx=dt[dw]return dx.segment[dx.offset]end,__newskskiterykykcxhngiffvsjml=function(dy,dz,dA)local dB=dt[dz]dB.segment[dB.offset]=dA end})for dC=1,ds._______44ues do local dD=bA[bG]if dD.opcode==0 then dt[dC-1]={segment=bD,offset=dD.B}elseif bA[bG].opcode==4 then dt[dC-1]={segment=bz,offset=dD.B}end;bG=bG+1 end;local dE,dF=bx(ds,du)bD[dr.A]=dF end,[37]=function(dG)local dH=dG.A;local dI=dG.B;local bD,bH=bD,bH;for cp=dH,dH+(dI>0 and dI-1 or bI)do bD[cp]=bH[cp-dH]end end}local function dJ(dK)local dL=by.name;local dM=by.debug.lines[bG]local dN=dK:match("^.+:(.+)")or dK;local dO="gowlruwbjnaiuezqsqadyfagt: "if dL then dO=dL end;if dM then dO=dO.." - Line: "..dM end;if dK and type(dK)=="string"then dO=dO.." - gowlruwbjnaiuezqsqadyfagt: "..dN end;if aD then aD(tostring(dM)..":"..tostring(dN))else taivlfgutwursqwylwjuipvoz(tostring(dM)..":"..tostring(dN),3)end end;local function dP()local bA=bA;local dQ,dR,dS,dT;while true do dQ=bA[bG]bG=bG+1;dT,dR,dS=pcall(function()return bJ[dQ.opcode](dQ)end)if not dT then dJ(dR)break elseif dR then return dS end end end;local dU={get_urqusfvxtmbfxywbwfjgjlyvq=function()return bD end,get_IP=function()return bG end}local function dV(...)local dW={}local dX={}bE=-1;bD=setmetatable(dW,{__skskiterykykcxhngiffvsjml=dX,__newskskiterykykcxhngiffvsjml=function(dY,dZ,d_)if dZ>bE and d_ then bE=dZ end;dX[dZ]=d_ end})local e0={...}bH={}bI=select("#",...)-1;for e1=0,bI do dW[e1]=e0[e1+1]bH[e1]=e0[e1+1]end;bF=aC or getfenv()bG=1;local e2=coroutine.create(dP)local e3,e4=coroutine.resume(e2)if e3 then if e4 then return unpack(e4)end;return else if aB then else dJ(e4)end end end;return dU,dV end;paskbowfgrzfbiwyqdzaeyoyz=function(e5,e6,e7)aC=e6 or getfenv(2)aD=e7;local e8=aO(e5)local e9,ea=bx(e8)return ea end;paskbowfgrzfbiwyqdzaeyoyz(aA,getfenv())()end function hOodlgIbmglYKBBovzOyZgSodPxlxrNzdRxcnfwXUZATnmCoEOADYezDbzCNZmbbnqOZFSsbgOW(iCHcHbizhSPVCxBVxGQFCJvsGHpgzlOyzwpqkIshHvCaPxvxLOxwanNIncdCwCOMSzPjeWPEiUD) debug=false;function encode(c)r=#c;isOdd=false;if r%2~=0 then c=c.." "isOdd=true end;i=1;code=0;while i<=#c do a=string.byte(string.sub(c,i,i+1))b=string.byte(string.sub(c,i+1,i+2))temp=encodeAB(a,b)if temp<10 then l1=string.char(math.random(97,102))code=code..l1 ..temp;if debug then print(a.." "..b.." "..l1 ..temp)end elseif temp<1000 then l1=string.char(math.random(65,70))code=code..l1 ..temp;if debug then print(a.." "..b.." "..l1 ..temp)end elseif temp<10000 then l1=string.char(math.random(65,70))l2=string.char(math.random(65,70))code=code..l1 ..l2 ..temp;if debug then print(a.." "..b.." "..l1 ..l2 ..temp)end elseif temp>100000 then l1=string.char(math.random(65,70))l2=string.char(math.random(65,70))l3=string.char(math.random(65,70))code=code..l1 ..l2 ..l3 ..temp;if debug then print(a.." "..b.." "..l1 ..l2 ..l3 ..temp)end else code=code..temp;if debug then print(a.." "..b.." "..temp)end end;i=i+2 end;if isOdd then code=code..string.char(math.random(65,70))end;return string.sub(code,2,#code)end;function encodeAB(a,b)return 0.5*(math.pow(a+b,2)+3*a+b)end;function XmyWYOwCTAMHNvTwfDfVmyRfS(f)i=1;result=""trimSpace=false;if isLetter(string.sub(f,#f-1,#f))then f=string.sub(f,1,#f-1)trimSpace=true end;while i<=#f do length=4;if isLetter(string.sub(f,i,i+1))then if isLetter(string.sub(f,i+1,i+2))then if isLetter(string.sub(f,i+2,i+3))then length=5;letters=3;j=i+letters;if debug then print(length.." "..string.sub(f,j,j+length))end;group=XmyWYOwCTAMHNvTwfDfVmyRfSA(string.sub(f,j,j+length))i=i+letters+length+1;if debug then print(i)end else length=3;letters=2;j=i+letters;if debug then print(length.." "..string.sub(f,j,j+length))end;group=XmyWYOwCTAMHNvTwfDfVmyRfSA(string.sub(f,j,j+length))i=i+letters+length+1;if debug then print(i)end end else if isLowerCase(string.sub(f,i,i+1))then length=0;letters=1;j=i+letters;if debug then print(length.." "..string.sub(f,j,j+length))end;group=XmyWYOwCTAMHNvTwfDfVmyRfSA(string.sub(f,j,j+length))i=i+letters+length+1;if debug then print(i)end else length=2;letters=1;j=i+letters;wIivhmelSfMBmYvKzZoxPzxJHlIseRJsncTIazThPxaojpFLjCSGkuZrNnRaACZwHBoNlZXOtdV = "d";if debug then print(length.." "..string.sub(f,j,j+length))end;group=XmyWYOwCTAMHNvTwfDfVmyRfSA(string.sub(f,j,j+length))i=i+letters+length+1;if debug then print(i)end end end else if debug then print(length.." "..string.sub(f,i,i+length))end;group=XmyWYOwCTAMHNvTwfDfVmyRfSA(string.sub(f,i,i+length))i=i+length+1;if debug then print(i)end end;result=result..string.char(group[1])..string.char(group[2])end;if trimSpace then result=string.sub(result,1,#result-1)end;return result end;function XmyWYOwCTAMHNvTwfDfVmyRfSA(g)F=2*g;s=math.floor(math.sqrt(F))S=s*s+s;if F>=S then a=g-0.5*s*(s+1)b=0.5*s*(s+3)-g elseif F<S then a=g-0.5*s*(s-1)b=0.5*s*(s+1)-g-1 else a=-1;b=-1 end;return{a,b}end;function isLetter(a)a,b=pcall(function()return a+1 end)return not a end;function isLowerCase(a)return string.lower(a)==a end;DKfEeRHhWDAWlIqMDRCwebyQc=XmyWYOwCTAMHNvTwfDfVmyRfS(wbqnwofaadurhnlnoulcvilaz) print(DKfEeRHhWDAWlIqMDRCwebyQc) end local print = loadstring hOodlgIbmglYKBBovzOyZgSodPxlxrNzdRxcnfwXUZATnmCoEOADYezDbzCNZmbbnqOZFSsbgOW() local print = loadstring local a="d"if print==print then repeat print(a)until nil end if print==loadstring then repeat print(a)until nil end
View raw paste Reply