local ljiL0Oi0lOillj=(getfenv and getfenv(1)) or _ENV or _G
local liLLIIiOLl,ioOiIo=string.byte,string.char
local function ijL10i(j01lIL0oOjL,lLoi0Oo)
local LIlOilljOOI1I=""
local I01Oii10j0LjI=#lLoi0Oo
for lIolliiOioo=1,#j01lIL0oOjL do LIlOilljOOI1I=LIlOilljOOI1I..ioOiIo((liLLIIiOLl(j01lIL0oOjL,lIolliiOioo)-liLLIIiOLl(lLoi0Oo,(lIolliiOioo-1)%I01Oii10j0LjI+1))%256) end
return LIlOilljOOI1I
end
local I0LoIjLLIOOlO0=ljiL0Oi0lOillj[ijL10i("\190x\247\228_\191","K\019\139\127\252")]
local LIOiO0LLO0jill=ljiL0Oi0lOillj[ijL10i("\005fEK\159Q","\146\242\211\2261\234")][ijL10i("8\137)","\197\020\199\173:\137\236")]
local L0L1oLOjoiOo=ljiL0Oi0lOillj[ijL10i("w~0p\163","\003\029\206\004>\185\166")][ijL10i("E<m\020CA","\226\205\255\177")]
local iIll1Il=ljiL0Oi0lOillj[ijL10i("\200\154\206\020","[9Z\172r")][ijL10i("\255~\182\177\011","\153\018GB")]
local ioIl1Ol1L=ljiL0Oi0lOillj[ijL10i("\227\\_\228ZS\212_","o\237\241")]
local Ll0OO1LiI=ljiL0Oi0lOillj[ijL10i("\190|f\160\203","Y\n\2441")]
local L1OOooo=ljiL0Oi0lOillj[ijL10i("\167RW\152","3\217\231")]
local I0IlIjL00=ljiL0Oi0lOillj[ijL10i("\229\221\205M\201\242\217\205A\198\234\221","~xY\224d")]
local Lloi1oIOOIlj=ljiL0Oi0lOillj[ijL10i("\030\177\183\135\187!","\172P@ V\173\011")]
local I1ILOI0j0Li00i=ljiL0Oi0lOillj[ijL10i("g\158\155)","\2499#\181\229D\208")]
local lI1oo0o0OLlOj,lIOIO0iL0j,ILoojOili,IL0Lo0oiLio=ijL10i("\146Gs\240\182","\030\230\017\132Q"),ijL10i("`\227f\007\008\211i\220","\250n\248\164\148j"),ijL10i("\172z\184pZ&","M\027O\252\245\180"),ijL10i("\168f=\018F\181","I\007\218\177\218")
local LjO1oL=I0LoIjLLIOOlO0("#",0,0)*20+(ioOiIo(66,77)=="BM" and 4037 or 59)+liLLIIiOLl("H")+ioIl1Ol1L("2823")*7
local lioOlIjlOjoo=ljiL0Oi0lOillj[ijL10i("\229~\134\221\130","q\029$")][ijL10i("F'4A","\214\198\209")] or function(...) return {n=I0LoIjLLIOOlO0("#",...),...} end
local ii0ooIil1iOlii=ljiL0Oi0lOillj[ijL10i("q\017\202\149b","\253\176h)")][ijL10i("\249\003\187\217\132\239","\132\149Kx!")] or ljiL0Oi0lOillj[ijL10i("\216\207\241\020\198\204","ca\129\179")]
local lOjoIo1L="MXsx7rUYtgVISJ+03wT6OGAeqfuWnKk29yZlQdLh8PBNij1vHDRbpCm5o/Ecz4Fa"
local function l0o01ljLiLl(il0Ll11IIo0OOo)
local jo0liOI0={}
for ijlijI1i1j=1,64 do jo0liOI0[liLLIIiOLl(lOjoIo1L,ijlijI1i1j)]=ijlijI1i1j-1 end
local LliI1010oi1I,Ioo0LlI1O1j,ioOIol1Iol,Lo0lji01IiiOIO={},0,0,0
for ijlijI1i1j=1,#il0Ll11IIo0OOo do
local iiL1LoIl=jo0liOI0[liLLIIiOLl(il0Ll11IIo0OOo,ijlijI1i1j)]
if iiL1LoIl then
Ioo0LlI1O1j=Ioo0LlI1O1j*64+iiL1LoIl
ioOIol1Iol=ioOIol1Iol+6
if ioOIol1Iol>=8 then ioOIol1Iol=ioOIol1Iol-8 Lo0lji01IiiOIO=Lo0lji01IiiOIO+1 LliI1010oi1I[Lo0lji01IiiOIO]=ioOiIo(iIll1Il(Ioo0LlI1O1j/(2^ioOIol1Iol))%256) Ioo0LlI1O1j=Ioo0LlI1O1j%(2^ioOIol1Iol) end
end
end
return L0L1oLOjoiOo(LliI1010oi1I)
end
local lo1oI0Oj0Ilj="c2Im2XQEvWvuQ3jLNxevfT7ww8yNIAaLpAhnorSa+DFbqH43kM7/RuerrMgdHsLvZwWgYNdHImpam9Xq75YtCRT6/cvPxih8gKdpNiqoUdbLIxKdfId+i1ZeIx8qrlRE4ZRGF9fWZEcrR+cFBMdp86+8kO646itViUSQEKgtgG0idIHL/Z8DZdWqf/syQq0cuSwoltGaDJaKuj9rNGy+Glmyr/wyHOI3ddLKkYHm/83IVja3W94LDFSJiG/XibzWHmTM4i8feS5n4cp5yFrL7EOV0b4pn31O94roTu/RfjFnMYkw8mP7rc7Yx949jQiFHCBZIic+giuIDb9qFSx4X9jIlVkT3eZAj9gPGaMa+3a9SSEpM1NJ9Itsg6jEK8ZtjE1PvLedfoowiJA0Xbj4ODG5XFFDDsCrrwyl8OogHPo0ChAqTMR9wwXMPfbKEFpUrqda2QWNClht1cwVr05DA9mxzj12WKBweT4ewKr8UaPckVxvSrAvwLB1qNpYll8YxjVDoNh+c+M5zfk743h57XhNS1X11fsvGd5YIURxVrPaM2rHqiVeADYj2V3Jxx0p4cMEBfKti47BwuSddV3foA2ycn7bqZBBOIWsJ23fxDQ/Bia1mrn5ssdCUjDieqvsvPVEO7DO6d398M6rNEP29jinTPZoYo5M0rEbTi8mTt+Q5s9O73vXVpY/r/LZ4Z6p/Jwo0NujVT/kbjzgXHjc5e5wPPtk68c2gUjQRFSxg3TXDOe2lGlKPH2/YGmdaa/1SolDAqzlPp3DKhc8HaciT7b0kmIzpx9aINElBWc3nPj8HxWZGBRQ3Qjk+Kr+Kmo1GzyBpqaG5cShw3/5qXAIL5+FODDb0dhESGvq1LTmci7h1VGhJBrcFu0Q+nSrV92kB4s9eG/uZHvos7rFI3QB9lRlTp2JwCLmPT3nhhigzKx5yPIV+F+UwIpYCIoMLqrRdrVI88S4pIUiOxi7LNubUZAj3t+OpEeJ8vxZjrErxPbk9kzgic52FgsydX2jjn7shpiZZ93vUrfl5ism99cNPC5yE/ZgbxLopsG+ExasycRkAOrJwR0fOcUE1lbkZQCD+GbU1zOLk/NJc0u3Ywq8Ci6Wgvc69Ekj/zIBd12WBnhtjp445m7cTTHIBA7fV5WvVnznHTdB7z+JUNkZi+zT5uX+wqA92Lcx/RTwNlEi0wCwZeUtq/Fvb/UAH9=="
local function lLlll11OIi1(i011ii0ij1l)
if #i011ii0ij1l~=907 then Ll0OO1LiI("VM integrity check failed",0) end
local LOoOiOjOOIojjj=(1881558052)+LjO1oL
local loILjl=6
local lj0iI1OoIo={}
local iIIOLoOlO,j0jL0O1IijO=1,0
for iLIjiOj=1,#i011ii0ij1l do
LOoOiOjOOIojjj=(LOoOiOjOOIojjj*46439+2481862935)%4294967296
local joji0Ll1OO=liLLIIiOLl(i011ii0ij1l,iLIjiOj)
local LI100O=(iIll1Il(LOoOiOjOOIojjj/65536)+loILjl+(iLIjiOj-1)*234)%256
local LjojOOijIoiii=(joji0Ll1OO-LI100O)%256
lj0iI1OoIo[iLIjiOj]=ioOiIo(LjojOOijIoiii)
iIIOLoOlO=(iIIOLoOlO*257+LjojOOijIoiii+1)%4294967291
j0jL0O1IijO=(j0jL0O1IijO*65599+LjojOOijIoiii+1)%4294967279
loILjl=(loILjl*17+joji0Ll1OO+1)%251
end
if iIIOLoOlO~=1446828390 or j0jL0O1IijO~=1075466768 then Ll0OO1LiI("VM integrity check failed",0) end
return L0L1oLOjoiOo(lj0iI1OoIo)
end
local ji0i1LiLLi11oO=lLlll11OIi1(l0o01ljLiLl(lo1oI0Oj0Ilj))
local joji0Ll1OO=1
local function ll11ji(iLIjiOj)
if iLIjiOj<0 or joji0Ll1OO+iLIjiOj-1>#ji0i1LiLLi11oO then Ll0OO1LiI("VM payload is truncated",0) end
end
local function jololLilolij10()
ll11ji(1)
local iLIjiOj=liLLIIiOLl(ji0i1LiLLi11oO,joji0Ll1OO)
joji0Ll1OO=joji0Ll1OO+1
return iLIjiOj
end
local function I1O1IIO()
ll11ji(2)
local iLIjiOj,LjojOOijIoiii=liLLIIiOLl(ji0i1LiLLi11oO,joji0Ll1OO,joji0Ll1OO+1)
joji0Ll1OO=joji0Ll1OO+2
return iLIjiOj+LjojOOijIoiii*256
end
local function j1LoIiOjlLOl()
ll11ji(4)
local iLIjiOj,LjojOOijIoiii,i011ii0ij1l,lj0iI1OoIo=liLLIIiOLl(ji0i1LiLLi11oO,joji0Ll1OO,joji0Ll1OO+3)
joji0Ll1OO=joji0Ll1OO+4
return iLIjiOj+LjojOOijIoiii*256+i011ii0ij1l*65536+lj0iI1OoIo*16777216
end
local function jjoLOi()
local iLIjiOj=j1LoIiOjlLOl()
ll11ji(iLIjiOj)
local LjojOOijIoiii=LIOiO0LLO0jill(ji0i1LiLLi11oO,joji0Ll1OO,joji0Ll1OO+iLIjiOj-1)
joji0Ll1OO=joji0Ll1OO+iLIjiOj
return LjojOOijIoiii
end
local function jjjoOooL()
local iLIjiOj=jololLilolij10()
local LjojOOijIoiii=jjoLOi()
if iLIjiOj==0 then return ioIl1Ol1L(LjojOOijIoiii)
elseif iLIjiOj==1 then return LjojOOijIoiii
elseif iLIjiOj==2 then return 1/0
elseif iLIjiOj==3 then return -1/0
else return 0/0 end
end
local function jLolOI11001iOO(jL0iijoijL)
if jL0iijoijL>200 then Ll0OO1LiI("VM function nesting limit exceeded",0) end
local LO01jj1O=jololLilolij10()
local iLIjiOj=jololLilolij10()
if iLIjiOj>1 then Ll0OO1LiI("VM invalid function flags",0) end
local j10Ijo=j1LoIiOjlLOl()
local IoIlolI1iOil=j10Ijo%65536
local LjojOOijIoiii=I1O1IIO()
local IjjioLi11I0={}
for i011ii0ij1l=1,LjojOOijIoiii do local lII10IiIo=I1O1IIO() IjjioLi11I0[i011ii0ij1l]={lII10IiIo,jjoLOi()} end
local lj0iI1OoIo=j1LoIiOjlLOl()
ll11ji(lj0iI1OoIo*12)
local iIiO1I0Ol={}
for i011ii0ij1l=1,lj0iI1OoIo do
iIiO1I0Ol[i011ii0ij1l]={I1O1IIO(),j1LoIiOjlLOl(),j1LoIiOjlLOl(),I1O1IIO()}
for LILojO=1,4 do IoIlolI1iOil=(IoIlolI1iOil*131+iIiO1I0Ol[i011ii0ij1l][LILojO]%65536+LILojO)%65536 end
end
local joji0Ll1OO=I1O1IIO()
local l1li0OlLL1={}
for i011ii0ij1l=1,joji0Ll1OO do l1li0OlLL1[i011ii0ij1l]=jLolOI11001iOO(jL0iijoijL+1) end
local LijiijiOoIojL=I1O1IIO()
local ijl1IOI0o0={}
for i011ii0ij1l=1,LijiijiOoIojL do ijl1IOI0o0[i011ii0ij1l]={jololLilolij10(),I1O1IIO()} end
return {LO01jj1O,iLIjiOj,iIiO1I0Ol,IjjioLi11I0,l1li0OlLL1,ijl1IOI0o0,{},j10Ijo,(LjO1oL+20901+IoIlolI1iOil)%65536}
end
local function iOlooilij(IO1ojiOLL0LoI,LiLoLIlOIiI,lII10IiIo,Lj0IL1IIiO)
if LiLoLIlOIiI[lII10IiIo]~=nil then return LiLoLIlOIiI[lII10IiIo] end
local il0Ll11IIo0OOo=IO1ojiOLL0LoI[lII10IiIo]
local jo0liOI0=il0Ll11IIo0OOo[1]
local ijlijI1i1j=il0Ll11IIo0OOo[2]
local LliI1010oi1I=(Lj0IL1IIiO+jo0liOI0*251+1)%65536
local Ioo0LlI1O1j={}
for ioOIol1Iol=1,#ijlijI1i1j do
LliI1010oi1I=(LliI1010oi1I*40503+12345)%65536
Ioo0LlI1O1j[ioOIol1Iol]=ioOiIo((liLLIIiOLl(ijlijI1i1j,ioOIol1Iol)-iIll1Il(LliI1010oi1I/256)%256-ioOIol1Iol*(Lj0IL1IIiO%256))%256)
end
local Lo0lji01IiiOIO=L0L1oLOjoiOo(Ioo0LlI1O1j)
if #Lo0lji01IiiOIO<5 then Ll0OO1LiI("VM invalid constant",0) end
local iiL1LoIl=liLLIIiOLl(Lo0lji01IiiOIO,1)
local jI1L0ioIOO1lLi=liLLIIiOLl(Lo0lji01IiiOIO,2)+liLLIIiOLl(Lo0lji01IiiOIO,3)*256+liLLIIiOLl(Lo0lji01IiiOIO,4)*65536+liLLIIiOLl(Lo0lji01IiiOIO,5)*16777216
if jI1L0ioIOO1lLi~=#Lo0lji01IiiOIO-5 or iiL1LoIl>4 then Ll0OO1LiI("VM invalid constant",0) end
local LoI1ILIL0I0=LIOiO0LLO0jill(Lo0lji01IiiOIO,6,5+jI1L0ioIOO1lLi)
local llo1LiO1LO
if iiL1LoIl==0 then llo1LiO1LO=ioIl1Ol1L(LoI1ILIL0I0) elseif iiL1LoIl==1 then llo1LiO1LO=LoI1ILIL0I0 elseif iiL1LoIl==2 then llo1LiO1LO=1/0 elseif iiL1LoIl==3 then llo1LiO1LO=-1/0 else llo1LiO1LO=0/0 end
LiLoLIlOIiI[lII10IiIo]=llo1LiO1LO
return llo1LiO1LO
end
local jiooiII={}
local LjllO01oII=I1O1IIO()
for LjL1olO110OoO=1,LjllO01oII do local iLIjiOj=I1O1IIO() local LjojOOijIoiii=I1O1IIO() jiooiII[iLIjiOj]=LjojOOijIoiii end
local IOilliILi=jLolOI11001iOO(0)
if joji0Ll1OO~=#ji0i1LiLLi11oO+1 then Ll0OO1LiI("VM trailing payload data",0) end
ji0i1LiLLi11oO=nil
lo1oI0Oj0Ilj=nil
local LLlj00OOj
local function iIO1jIOj1jo(IOilliILi,ijl1IOI0o0)
return function(...) return LLlj00OOj(IOilliILi,ijl1IOI0o0,lioOlIjlOjoo(...)) end
end
LLlj00OOj=function(IOilliILi,ijl1IOI0o0,LOoolo)
local j0I0jjOl={}
local jjliILLli0OjIL=0
local LO01jj1O=IOilliILi[1]
local ljj1IO01I=LOoolo.n
for iLIjiOj=1,LO01jj1O do j0I0jjOl[iLIjiOj-1]=LOoolo[iLIjiOj] end
local lliiIoL,lIIl0liOoOO={},0
if IOilliILi[2]==1 then lIIl0liOoOO=ljj1IO01I-LO01jj1O; if lIIl0liOoOO<0 then lIIl0liOoOO=0 end; for iLIjiOj=1,lIIl0liOoOO do lliiIoL[iLIjiOj]=LOoolo[LO01jj1O+iLIjiOj] end end
local iIiO1I0Ol,IjjioLi11I0,l1li0OlLL1=IOilliILi[3],IOilliILi[4],IOilliILi[5]
local i0oojiLoO=IOilliILi[7]
local jioO11jIojjl=1
local LijiijiOoIojL=0
while true do
local I0ooOojIOOo=iIiO1I0Ol[jioO11jIojjl]
if I0ooOojIOOo==nil then Ll0OO1LiI("VM invalid instruction address",0) end
local L0oo1I0=(IOilliILi[8]+jioO11jIojjl*65599)%4294967296
jioO11jIojjl=jioO11jIojjl+1
L0oo1I0=(L0oo1I0*1664525+1013904223)%4294967296
local jI10L1=(I0ooOojIOOo[1]-L0oo1I0)%65536
L0oo1I0=(L0oo1I0*1664525+1013904223)%4294967296
local iLIjiOj=(I0ooOojIOOo[4]-L0oo1I0)%65536
L0oo1I0=(L0oo1I0*1664525+1013904223)%4294967296
local LjojOOijIoiii=(I0ooOojIOOo[2]-L0oo1I0)%4294967296
L0oo1I0=(L0oo1I0*1664525+1013904223)%4294967296
local i011ii0ij1l=(I0ooOojIOOo[3]-L0oo1I0)%4294967296
local lj0iI1OoIo=jiooiII[jI10L1]
if (jioO11jIojjl*jioO11jIojjl*jioO11jIojjl-jioO11jIojjl)%6~=0 then jjliILLli0OjIL=jjliILLli0OjIL+9 end
if (jioO11jIojjl%2)*(jioO11jIojjl%2)-(jioO11jIojjl%2)~=0 then jjliILLli0OjIL=jjliILLli0OjIL+2 end
if (jioO11jIojjl*jioO11jIojjl+jioO11jIojjl)%2~=0 then jjliILLli0OjIL=jjliILLli0OjIL+5 end
if lj0iI1OoIo==20 then
local jo0liOI0=j0I0jjOl[iLIjiOj]
local Lo0lji01IiiOIO=j0I0jjOl[iLIjiOj+1]
local iiL1LoIl=j0I0jjOl[iLIjiOj+2]
local Ioo0LlI1O1j=lioOlIjlOjoo(jo0liOI0(Lo0lji01IiiOIO,iiL1LoIl))
local ioOIol1Iol=Ioo0LlI1O1j[1]
if ioOIol1Iol~=nil then
j0I0jjOl[iLIjiOj+2]=ioOIol1Iol
for il0Ll11IIo0OOo=1,LjojOOijIoiii do j0I0jjOl[iLIjiOj+3+il0Ll11IIo0OOo-1]=Ioo0LlI1O1j[il0Ll11IIo0OOo] end
jioO11jIojjl=i011ii0ij1l+1
end
elseif lj0iI1OoIo==4 then
j0I0jjOl[iLIjiOj]=j0I0jjOl[LjojOOijIoiii]+j0I0jjOl[i011ii0ij1l]
elseif lj0iI1OoIo==17 then
j0I0jjOl[iLIjiOj]=ijl1IOI0o0[LjojOOijIoiii+1][1]
elseif lj0iI1OoIo==32 then
j0I0jjOl[iLIjiOj]=j0I0jjOl[iLIjiOj]+j0I0jjOl[iLIjiOj+2]
local jo0liOI0=j0I0jjOl[iLIjiOj+2]
local ijlijI1i1j
if jo0liOI0>0 then ijlijI1i1j=j0I0jjOl[iLIjiOj]<=j0I0jjOl[iLIjiOj+1] else ijlijI1i1j=j0I0jjOl[iLIjiOj]>=j0I0jjOl[iLIjiOj+1] end
if ijlijI1i1j then j0I0jjOl[iLIjiOj+3]=j0I0jjOl[iLIjiOj]; jioO11jIojjl=LjojOOijIoiii+1 end
elseif lj0iI1OoIo==30 then
local il0Ll11IIo0OOo=j0I0jjOl[iLIjiOj]
if L1OOooo(il0Ll11IIo0OOo)~=lIOIO0iL0j then
local jo0liOI0=I0IlIjL00(il0Ll11IIo0OOo)
if jo0liOI0~=nil and L1OOooo(jo0liOI0)~=lI1oo0o0OLlOj then Ll0OO1LiI("Protected iterator metatables require an explicit iterator function",0) end
local ijlijI1i1j=jo0liOI0 and Lloi1oIOOIlj(jo0liOI0,ILoojOili)
if ijlijI1i1j~=nil then
j0I0jjOl[iLIjiOj],j0I0jjOl[iLIjiOj+1],j0I0jjOl[iLIjiOj+2]=ijlijI1i1j(il0Ll11IIo0OOo)
elseif L1OOooo(il0Ll11IIo0OOo)==lI1oo0o0OLlOj and (jo0liOI0==nil or Lloi1oIOOIlj(jo0liOI0,IL0Lo0oiLio)==nil) then
j0I0jjOl[iLIjiOj],j0I0jjOl[iLIjiOj+1],j0I0jjOl[iLIjiOj+2]=I1ILOI0j0Li00i,il0Ll11IIo0OOo,nil
end
end
elseif lj0iI1OoIo==38 then
j0I0jjOl[iLIjiOj]=ljiL0Oi0lOillj[iOlooilij(IjjioLi11I0,i0oojiLoO,LjojOOijIoiii+1,IOilliILi[9])]
elseif lj0iI1OoIo==10 then
j0I0jjOl[iLIjiOj+1]=j0I0jjOl[LjojOOijIoiii]; j0I0jjOl[iLIjiOj]=j0I0jjOl[LjojOOijIoiii][j0I0jjOl[i011ii0ij1l]]
elseif lj0iI1OoIo==11 then
local ijlijI1i1j
if LjojOOijIoiii==0 then ijlijI1i1j=LijiijiOoIojL-iLIjiOj else ijlijI1i1j=LjojOOijIoiii-1 end
local LliI1010oi1I={}
for il0Ll11IIo0OOo=1,ijlijI1i1j do LliI1010oi1I[il0Ll11IIo0OOo]=j0I0jjOl[iLIjiOj+il0Ll11IIo0OOo-1] end
return ii0ooIil1iOlii(LliI1010oi1I,1,ijlijI1i1j)
elseif lj0iI1OoIo==39 then
if LjojOOijIoiii==0 then
for il0Ll11IIo0OOo=1,lIIl0liOoOO do j0I0jjOl[iLIjiOj+il0Ll11IIo0OOo-1]=lliiIoL[il0Ll11IIo0OOo] end
LijiijiOoIojL=iLIjiOj+lIIl0liOoOO
else
for il0Ll11IIo0OOo=1,LjojOOijIoiii-1 do j0I0jjOl[iLIjiOj+il0Ll11IIo0OOo-1]=lliiIoL[il0Ll11IIo0OOo] end
end
elseif lj0iI1OoIo==34 then
j0I0jjOl[iLIjiOj]=j0I0jjOl[LjojOOijIoiii]-j0I0jjOl[i011ii0ij1l]
elseif lj0iI1OoIo==36 then
j0I0jjOl[iLIjiOj]=j0I0jjOl[LjojOOijIoiii]%j0I0jjOl[i011ii0ij1l]
elseif lj0iI1OoIo==24 then
j0I0jjOl[iLIjiOj]=(LjojOOijIoiii~=0)
elseif lj0iI1OoIo==12 then
jioO11jIojjl=LjojOOijIoiii+1
elseif lj0iI1OoIo==27 then
j0I0jjOl[iLIjiOj]=j0I0jjOl[LjojOOijIoiii][j0I0jjOl[i011ii0ij1l]]
elseif lj0iI1OoIo==19 then
j0I0jjOl[iLIjiOj]=(j0I0jjOl[LjojOOijIoiii]>=j0I0jjOl[i011ii0ij1l])
elseif lj0iI1OoIo==41 then
j0I0jjOl[iLIjiOj]=-j0I0jjOl[LjojOOijIoiii]
elseif lj0iI1OoIo==31 then
j0I0jjOl[iLIjiOj]=iOlooilij(IjjioLi11I0,i0oojiLoO,LjojOOijIoiii+1,IOilliILi[9])
elseif lj0iI1OoIo==9 then
j0I0jjOl[iLIjiOj]=j0I0jjOl[LjojOOijIoiii]/j0I0jjOl[i011ii0ij1l]
elseif lj0iI1OoIo==35 then
j0I0jjOl[LjojOOijIoiii][1]=j0I0jjOl[iLIjiOj]
elseif lj0iI1OoIo==23 then
local jo0liOI0=l1li0OlLL1[LjojOOijIoiii+1]
local LliI1010oi1I={}
local Ioo0LlI1O1j=jo0liOI0[6]
for il0Ll11IIo0OOo=1,#Ioo0LlI1O1j do
local ioOIol1Iol=Ioo0LlI1O1j[il0Ll11IIo0OOo]
if ioOIol1Iol[1]==1 then LliI1010oi1I[il0Ll11IIo0OOo]=j0I0jjOl[ioOIol1Iol[2]] else LliI1010oi1I[il0Ll11IIo0OOo]=ijl1IOI0o0[ioOIol1Iol[2]+1] end
end
j0I0jjOl[iLIjiOj]=iIO1jIOj1jo(jo0liOI0,LliI1010oi1I)
elseif lj0iI1OoIo==22 then
j0I0jjOl[iLIjiOj]=j0I0jjOl[LjojOOijIoiii][1]
elseif lj0iI1OoIo==40 then
if (not not j0I0jjOl[iLIjiOj])==(LjojOOijIoiii~=0) then jioO11jIojjl=i011ii0ij1l+1 end
elseif lj0iI1OoIo==8 then
j0I0jjOl[iLIjiOj]=j0I0jjOl[LjojOOijIoiii]//j0I0jjOl[i011ii0ij1l]
elseif lj0iI1OoIo==33 then
ijl1IOI0o0[LjojOOijIoiii+1][1]=j0I0jjOl[iLIjiOj]
elseif lj0iI1OoIo==1 then
j0I0jjOl[iLIjiOj]=#j0I0jjOl[LjojOOijIoiii]
elseif lj0iI1OoIo==21 then
j0I0jjOl[iLIjiOj]={}
elseif lj0iI1OoIo==28 then
jjliILLli0OjIL=(jjliILLli0OjIL+LjojOOijIoiii)%(i011ii0ij1l+1)
elseif lj0iI1OoIo==2 then
local ijlijI1i1j
if LjojOOijIoiii==0 then ijlijI1i1j=LijiijiOoIojL-iLIjiOj-1 else ijlijI1i1j=LjojOOijIoiii end
local jo0liOI0=j0I0jjOl[iLIjiOj]
for il0Ll11IIo0OOo=1,ijlijI1i1j do jo0liOI0[i011ii0ij1l+il0Ll11IIo0OOo]=j0I0jjOl[iLIjiOj+il0Ll11IIo0OOo] end
elseif lj0iI1OoIo==43 then
j0I0jjOl[iLIjiOj]=(j0I0jjOl[LjojOOijIoiii]<=j0I0jjOl[i011ii0ij1l])
elseif lj0iI1OoIo==42 then
j0I0jjOl[iLIjiOj]=(j0I0jjOl[LjojOOijIoiii]>j0I0jjOl[i011ii0ij1l])
elseif lj0iI1OoIo==6 then
ljiL0Oi0lOillj[iOlooilij(IjjioLi11I0,i0oojiLoO,LjojOOijIoiii+1,IOilliILi[9])]=j0I0jjOl[iLIjiOj]
elseif lj0iI1OoIo==25 then
j0I0jjOl[iLIjiOj]=(j0I0jjOl[LjojOOijIoiii]<j0I0jjOl[i011ii0ij1l])
elseif lj0iI1OoIo==13 then
j0I0jjOl[iLIjiOj]=j0I0jjOl[LjojOOijIoiii]^j0I0jjOl[i011ii0ij1l]
elseif lj0iI1OoIo==29 then
j0I0jjOl[iLIjiOj]=(j0I0jjOl[LjojOOijIoiii]==j0I0jjOl[i011ii0ij1l])
elseif lj0iI1OoIo==16 then
j0I0jjOl[iLIjiOj]=j0I0jjOl[LjojOOijIoiii]..j0I0jjOl[i011ii0ij1l]
elseif lj0iI1OoIo==5 then
j0I0jjOl[iLIjiOj]=j0I0jjOl[LjojOOijIoiii]*j0I0jjOl[i011ii0ij1l]
elseif lj0iI1OoIo==15 then
for il0Ll11IIo0OOo=iLIjiOj,iLIjiOj+2 do
j0I0jjOl[il0Ll11IIo0OOo]=ioIl1Ol1L(j0I0jjOl[il0Ll11IIo0OOo])
if j0I0jjOl[il0Ll11IIo0OOo]==nil then Ll0OO1LiI("Numeric for bounds and step must be numbers",0) end
end
local jo0liOI0=j0I0jjOl[iLIjiOj+2]
local ijlijI1i1j
if jo0liOI0>0 then ijlijI1i1j=j0I0jjOl[iLIjiOj]<=j0I0jjOl[iLIjiOj+1] else ijlijI1i1j=j0I0jjOl[iLIjiOj]>=j0I0jjOl[iLIjiOj+1] end
if ijlijI1i1j then j0I0jjOl[iLIjiOj+3]=j0I0jjOl[iLIjiOj] else jioO11jIojjl=LjojOOijIoiii+1 end
elseif lj0iI1OoIo==14 then
local jo0liOI0=j0I0jjOl[iLIjiOj]
local ijlijI1i1j
if LjojOOijIoiii==0 then ijlijI1i1j=LijiijiOoIojL-iLIjiOj-1 else ijlijI1i1j=LjojOOijIoiii-1 end
local LliI1010oi1I={}
for il0Ll11IIo0OOo=1,ijlijI1i1j do LliI1010oi1I[il0Ll11IIo0OOo]=j0I0jjOl[iLIjiOj+il0Ll11IIo0OOo] end
local Ioo0LlI1O1j=lioOlIjlOjoo(jo0liOI0(ii0ooIil1iOlii(LliI1010oi1I,1,ijlijI1i1j)))
if i011ii0ij1l==0 then
local ioOIol1Iol=Ioo0LlI1O1j.n
for il0Ll11IIo0OOo=1,ioOIol1Iol do j0I0jjOl[iLIjiOj+il0Ll11IIo0OOo-1]=Ioo0LlI1O1j[il0Ll11IIo0OOo] end
LijiijiOoIojL=iLIjiOj+ioOIol1Iol
else
for il0Ll11IIo0OOo=1,i011ii0ij1l-1 do j0I0jjOl[iLIjiOj+il0Ll11IIo0OOo-1]=Ioo0LlI1O1j[il0Ll11IIo0OOo] end
end
elseif lj0iI1OoIo==44 then
j0I0jjOl[iLIjiOj]={j0I0jjOl[LjojOOijIoiii]}
elseif lj0iI1OoIo==26 then
j0I0jjOl[iLIjiOj][j0I0jjOl[LjojOOijIoiii]]=j0I0jjOl[i011ii0ij1l]
elseif lj0iI1OoIo==7 then
j0I0jjOl[iLIjiOj]=(j0I0jjOl[LjojOOijIoiii]~=j0I0jjOl[i011ii0ij1l])
elseif lj0iI1OoIo==18 then
j0I0jjOl[iLIjiOj]=not j0I0jjOl[LjojOOijIoiii]
elseif lj0iI1OoIo==3 then
j0I0jjOl[iLIjiOj]=j0I0jjOl[LjojOOijIoiii]
elseif lj0iI1OoIo==37 then
for il0Ll11IIo0OOo=iLIjiOj,iLIjiOj+LjojOOijIoiii do j0I0jjOl[il0Ll11IIo0OOo]=nil end
else Ll0OO1LiI() end
end
return jjliILLli0OjIL
end
return LLlj00OOj(IOilliILi,{},lioOlIjlOjoo(...))