--Xuri Obfuscation: Version 1.0 / #92 _ScriptSecured,XuriObfuscation,__5,__1 = 'xuri#3520' local __425=loadstring local _83=getfenv; local _819=string.gsub; local _96=string.reverse; local __198=math.huge; local __1670=table.concat; local _243=true; local ___833=false; local k='xuri made this'; return(function(...)local x={"\078\078\106\115\110\099\100\078\089\105\061\061","\099\079\109\114\101\089\043\078\065\119\061\061";"\085\103\061\061";"\102\074\105\068\077\097\054\099\111\105\061\061","\083\108\106\087\105\114\085\056\050\105\061\061","\049\069\085\116\072\109\101\118\107\074\055\049\071\109\043\047\104\052\065\119\056\117\114\052\084\090\070\086\075\066\054\120\107\050\106\068\097\054\108\118\049\083\075\118\113\050\088\070\086\047\085\106\065\066\107\097\108\082\073\083\114\048\085\047\076\070\049\121\119\108\104\048\105\086\119\117\111\072\089\077\043\112\114\081\117\109\118\074\077\054\104\070\109\065\122\052\084\100\076\077\105\049\073\088","\078\081\082\069\111\122\122\112\082\105\061\061";"\116\052\073\061";"\075\066\076\106\075\119\061\061";"\078\052\081\112\070\120\075\105\090\120\117\080\069\112\065\079\068\083\088\115","\069\084\117\071","\070\050\117\106\069\120\075\100","\115\052\065\081\069\050\074\100\068\077\061\061";"\075\084\080\118\079\086\103\048\119\086\100\100\043\084\078\106\078\084\119\061";"\078\065\102\079\108\118\084\115\089\054\056\119\054\078\106\078\074\067\079\079\082\071\104\051\114\116\077\080\056\084\069\116\051\087\115\072\106\078\115\086\100\108\043\071\069\055\072\049\122\108\086\065\075\051\053\120\057\103\103\066\076\110\086\052\105\104\115\074\065\079\076\071\049\105\073\099\120\043\106\051\078\090\088\072\086\088\118\097\082\083\117\077\119\055\102\103\052\069\070\061";"\069\043\076\048\079\077\061\061","\086\099\050\054\072\082\072\048\106\082\122\117\086\068\085\078\076\116\083\048\103\043\103\068\120\077\120\111\104\051\097\047\110\068\089\114\120\114\087\113\076\108\081\079\078\056\055\083\065\117\052\112\071\066\112\106\075\051\089\102\071\098\080\107\077\102\117\048\105\056\068\107\103\070\104\050\107\102\088\107\087\117\115\118\070\084\065\118\110\056\085\053\109\115\055\108\053\103\061\061","\088\084\076\057\069\084\090\061";"\103\084\069\108\049\076\100\090\048\074\105\053\057\057\049\067\108\047\105\079\068\116\083\120\089\082\055\108\055\120\121\050\103\056\084\089\084\120\105\078\084\073\118\076\103\069\119\110\067\077\101\101\118\043\086\072\067\080\088\105\089\077\089\121\073\048\057\082\056\099\072\051\109\098\114\107\103\101\109\073\079\047\066\112\111\104\047\105\111\073\051\101\074\086\109\052\053\048\097\078\068\109\103\119";"\115\052\065\049\075\043\104\061";"\085\057\103\100\075\054\073\081\085\103\061\061","\113\066\065\071\113\066\076\048","\070\050\076\071\075\084\065\106";"\088\051\117\084\079\051\075\085\078\107\088\084\088\084\076\090";"\115\052\065\083\113\105\061\061","\090\066\076\117\068\090\073\072\119\119\061\061";"\069\084\065\114\075\118\078\048\070\050\100\071\075\105\061\061","\075\066\052\114\088\084\078\073";"\115\052\065\106\075\115\074\114\088\084\076\057\069\084\090\061";"\113\083\100\048\075\119\061\061";"\097\118\074\048\070\112\088\100\088\077\061\061";"\113\066\114\114\070\103\061\061","\075\050\102\109\069\120\101\061","\117\084\076\106\070\084\117\072\101\112\074\100\088\084\117\107\088\084\117\051\101\119\061\061";"\070\118\080\081\069\083\119\061","\066\085\071\083\069\054\115\113\114\083\071\106\100\086\111\050\048\109\057\079\099\085\083\103\070\112\109\119\103\072\056\082\051\082\065\065\073\090\116\118\086\105\097\114\052\047\053\081\114\090\109\103\082\079\066\081\097\081\065\090\100\054\057\098\067\071\076\087\121\055\120\108\074\103\111\112\067\053\057\070\072\117\090\119\114\118\052\073\050\068\067\111\120\069\077\087","\070\066\117\048\069\043\117\048\113\115\074\114\113\050\102\100";"\089\050\050\053\114\107\069\070\103\081\082\122\071\105\061\061","","\070\120\074\072\079\043\108\083";"\053\116\114\100\088\083\088\113\053\105\061\061","\103\090\120\082\110\109\118\074\099\080\074\065\112\083\054\070\082\099\118\047\104\101\065\088\099\053\043\074\111\085\115\107\111\113\070\070\080\088\057\085\108\057\077\116\113\119\100\098\089\055\055\110\089\049\107\065\057\067\118\047\122\107\067\107\107\118\065\073\054\090\116\104\052\075\099\114\117\072\116\072\107\118\112\051\052\088\043\066\113\117\055\080\069\099\090\101\050\108\084\056\076\105\061\061";"\088\043\108\105\113\043\078\089","\116\086\080\078\079\050\075\100\090\066\100\085\075\090\081\047\074\066\053\061"}local function X(X)return x[X-20658]end for X,c in ipairs({{1;44},{1,14};{15,44}})do while c[1]<c[2]do x[c[1]],x[c[2]],c[1],c[2]=x[c[2]],x[c[1]],c[1]+1,c[2]-1 end end do local X=string.char local c=string.sub local m=table.insert local o={b=60,c=58;["\056"]=3,D=30,["\054"]=2;M=0,["\055"]=62,r=33;["\052"]=53;S=39,L=5;["\057"]=34;i=48,B=54;["\048"]=52,h=56,U=14;Z=20;N=13;v=7;O=26,C=10;["\051"]=36,H=50,["\049"]=44;I=40;w=16,W=11,s=23;A=61;X=29;q=24;n=31;["\047"]=15,x=55;["\050"]=38,P=9,R=59;m=47,d=37,u=21;o=1,T=6,G=46,F=28;l=57;["\053"]=12,g=32,J=17,y=63,p=4,V=51,Y=43;K=25,["\043"]=22;z=42;f=49,e=8,t=19;Q=41;a=18;j=45,E=27;k=35}local G=x local Y=math.floor local Z=type local r=table.concat local k=string.len for x=1,#G,1 do local v=G[x]if Z(v)=="\115\116\114\105\110\103"then local Z=k(v)local E={}local q=1 local l=0 local D=0 while q<=Z do local x=c(v,q,q)local G=o[x]if G then l=l+G*64^(3-D)D=D+1 if D==4 then D=0 local x=Y(l/65536)local c=Y((l%65536)/256)local o=l%256 m(E,X(x,c,o))l=0 end elseif x=="\061"then m(E,X(Y(l/65536)))if q>=Z or c(v,q+1,q+1)~="\061"then m(E,X(Y((l%65536)/256)))end break end q=q+1 end G[x]=r(E)end end end do local x=true local c=string[X(20700)]local m=function()error(X(20662))end local o=false local G=pcall(function()o=true end)and o local Y=math[X(20695)]local Z=table[X(20694)]local r=table and table[X(20671)]or unpack local k=Y(3,65)local v=0 local E=0 local q={pcall(function()local x=15116238-X(20698)^13110161 return X(20680)/x end)}local l=q[2]local D=tonumber((c(tostring(l),X(20693)))())for m=1,k,1 do local o=math[X(20695)](1,100)local G=Y(0,255)local Z=Y(1,o)local q=Y(1,2)==1 local b=l:gsub(X(20693),X(20675)..(tostring(Y(0,10000))..X(20675)))local g={pcall(function()if Y(1,2)==1 or m==k then local m=tonumber((c(tostring(({pcall(function()local x=14340022-X(20682)^3499115 return X(20669)/x end)})[2]),X(20693)))())x=x and D==m end if q then error(b,0)end local v={}for x=1,o,1 do v[x]=Y(0,255)end v[Z]=G return r(v)end)}if q then x=x and(g[1]==false and g[2]==b)else x=x and g[1]v=(v+g[Z+1])%256 E=(E+G)%256 end end x=x and v==E if x then else repeat return(function()while true do l1,l2=l2,l1 m()end end)()until true while true do l2=Y(1,6)if l2>2 then l2=tostring(l1)else l1=l2 end end return end end return(function(x,m,o,G,Y,Z,r,k,v,J,c,b,g,E,l,i,D,q)q,D,E,b,g,v,k,J,c,l,i=0,function(x)local X,c=1,x[1]while c do v[c],X=v[c]-1,X+1 if v[c]==0 then v[c],k[c]=nil,nil end c=x[X]end end,function()q=q+1 v[q]=1 return q end,function(x)v[x]=v[x]-1 if 0==v[x]then v[x],k[x]=nil,nil end end,function(x,X)local m=l(X)local o=function(...)return c(x,{...},X,m)end return o end,{},{},function(x,X)local m=l(X)local o=function()return c(x,{},X,m)end return o end,function(c,o,G,Y)local q,C,O,B,p,I,n,K,l,F,v,j,e,R,D,g,s,h,r,L,t,W,P while c do if c<7610567 then if c<4162409 then if c<3564985 then if c<3114356 then if c<2165847 then c={}B=X(20668)k[G[2]]=c r=k[G[3]]c=3105374 g=35184372088832 D=r r=q%g k[G[4]]=r p=255 n=q%p p=2 g=n+p k[G[5]]=g W=1 p=x[B]B=X(20683)n=p[B]p=n(v)n=X(20667)s=W W=0 l[q]=n K=p n=221 h=s<W B=1 W=B-s else W=W+s O=not h B=W<=K B=O and B O=W>=K O=h and O B=O or B O=14096303 c=B and O B=15422935 c=c or B end else if c<3187004 then D=X(20699)n=X(20681)c=x[D]W=31267242373567 g=x[n]K=X(20691)B=q(K,W)p=l[B]B=X(20659)B=g[B]n={B(g,p)}D=c(m(n))c=D()c=12358009 else n=X(20690)v=o r=nil B=E()c=nil D=X(20688)q=c l=r r=x[D]D=X(20661)c=r[D]g=X(20688)D=E()k[D]=c r=x[g]g=X(20695)c=r[g]r=x[n]g=c n=X(20684)I=256 p=X(20668)c=r[n]s=E()r=x[p]p=X(20660)n=c c=r[p]p=c c=0 k[B]=c K=E()c=2 k[K]=c c={}W=c c={}k[s]=c c=0 C=I h=c I=1 c={}e=I r=1 I=0 P=e<I I=r-e O=c c=7775469 end end else if c<3803710 then if c<3689353 then j=I c=j O[j]=c j=nil c=7775469 else q=k[G[3]]l=181 v=q*l q=257 c=14541756 r=v%q k[G[3]]=r end else r=#O I=0 c=r==I c=c and 15371734 or 6355138 end end else if c<6047629 then if c<5402637 then if c<4706929 then r={q}c=x[X(20686)]else v=k[G[1]]r=#v v=0 c=r==v c=c and 7561959 or 5414565 end else if c<5734933 then l=X(20690)c=x[X(20696)]q=x[l]l=X(20684)v=q[l]l=k[G[1]]q={v(l)}r={m(q)}else c=k[G[1]]v=o[1]l=c q=o[2]c=l[q]c=c and 13559198 or 2157633 end end else if c<7558328 then if c<6793719 then I=#O r=1 c=g(r,I)I=c c=n(O,I)C=c P=1 c=k[s]I=nil e=C-P r=p(e)c[C]=r c=3813492 C=nil else K=2 q=k[G[3]]l=32 v=q%l s=13 D=k[G[4]]p=k[G[2]]I=k[G[3]]O=I-v I=32 h=O/I W=s-h B=K^W n=p/B g=D(n)D=4294967296 l=g%D B=1 g=2 D=g^v q=l/D s=256 D=k[G[4]]p=q%B B=4294967296 n=p*B g=D(n)D=k[G[4]]n=D(q)v=nil l=g+n K=256 g=65536 D=l%g p=65536 n=l-D g=n/p c=5414565 p=256 n=D%p B=D-n p=B/K D=nil K=256 B=g%K l=nil W=g-B K=W/s q=nil W={n,p;B,K}g=nil p=nil n=nil K=nil B=nil k[G[1]]=W end else l=245 q=k[G[2]]v=q*l q=10721639311105 r=v+q v=35184372088832 c=r%v q=1 k[G[2]]=c c=3722353 v=k[G[3]]r=v~=q end end end else if c<12550356 then if c<9092810 then if c<8129084 then if c<7726705 then n=c h=X(20676)O=15037139400372 W=X(20681)K=x[W]s=q(h,O)W=l[s]B=K[W]K=4442272183 p=B==K g=p c=p and 15336916 or 9720105 else j=not P I=I+e r=I<=C r=j and r j=I>=C j=P and j r=j or r j=3650671 c=r and j r=11246423 c=c or r end else if c<8816665 then W=19080974517610 K=X(20670)D=X(20699)c=x[D]n=X(20681)g=x[n]B=q(K,W)p=l[B]B=X(20659)B=g[B]n={B(g,p)}D=c(m(n))c=D()c=12358009 else s=10576679741050 B=X(20681)p=x[B]W=X(20673)K=q(W,s)B=l[K]n=p[B]p=2753915549 g=n==p D=g c=g and 15062988 or 7724268 end end else if c<12211763 then if c<10427483 then W=X(20681)K=x[W]h=X(20679)O=6864640973049 s=q(h,O)W=l[s]B=K[W]K=7449423635 p=B==K c=15336916 g=p else I=0 r=#O c=r==I c=6355138 end else c=x[X(20672)]l=nil q=nil r={}end end else if c<15185226 then if c<14240065 then if c<13738326 then c=4578443 else j=X(20668)P=x[j]j=X(20702)e=P[j]B=W c=3105374 P=e(v,B)e=k[G[6]]j=e()C=P+j j=1 I=C+n C=256 O=I%C n=O B=nil C=l[q]P=n+j e=D[P]I=C..e l[q]=I end else if c<14821214 then q=k[G[3]]l=1 v=q~=l c=v and 7033047 or 3722353 else c=D and 3174497 or 12358009 end end else if c<15384842 then if c<15354840 then c=n D=g c=15062988 else C=E()t=X(20701)I=E()c={}k[I]=c P={}p=nil c=J(4851348,{I,B,K,D})k[C]=c h=nil r=X(20665)R=nil c={}p=X(20666)D=b(D)e=E()k[e]=c g=nil F=X(20685)n=nil W=nil c=x[r]L=k[e]j={[F]=L,[t]=R}r=c(P,j)l=r c=i(5882035,{e,I;s;B;K;C})C=b(C)I=b(I)e=b(e)D=X(20663)B=b(B)W=10965386143716 O=nil K=b(K)s=b(s)B=32874682939288 q=c K=X(20677)c=x[D]n=q(p,B)g=l[n]D=c(g)D=X(20663)c=x[D]p=X(20681)n=x[p]B=q(K,W)K=X(20687)p=l[B]W=14651654321485 g=n[p]D=c(g)D=X(20699)n=X(20681)c=x[D]g=x[n]B=q(K,W)p=l[B]K=X(20689)B=X(20659)B=g[B]n={B(g,p)}D=c(m(n))c=D()W=32048950277271 D=X(20699)n=X(20681)c=x[D]g=x[n]B=q(K,W)p=l[B]B=X(20659)K=X(20678)B=g[B]n={B(g,p)}W=33216143259862 D=c(m(n))c=D()D=X(20699)c=x[D]n=X(20681)g=x[n]B=q(K,W)p=l[B]B=X(20659)B=g[B]n={B(g,p)}W=34004293811124 D=c(m(n))c=D()K=X(20664)D=X(20699)c=x[D]n=X(20681)g=x[n]B=q(K,W)p=l[B]B=X(20659)B=g[B]K=683994415741 n={B(g,p)}D=c(m(n))B=X(20674)c=D()n=X(20681)g=x[n]p=q(B,K)n=l[p]D=g[n]g=13772394625 c=D==g c=c and 8208122 or 9040660 end else n=nil c=4578443 D=nil p=nil end end end end end c=#Y return m(r)end,function(x)for X=1,#x,1 do v[x[X]]=1+v[x[X]]end if o then local c=o(true)local m=Y(c)m[X(20685)],m[X(20697)],m[X(20692)]=x,D,function()return-3494379 end return c else return G({},{[X(20697)]=D,[X(20685)]=x;[X(20692)]=function()return-3494379 end})end end,function(x,X)local m=l(X)local o=function(o,G,Y)return c(x,{o,G,Y},X,m)end return o end return(g(3205218,{}))(m(r))end)(getfenv and getfenv()or _ENV,unpack or table[X(20671)],newproxy,setmetatable,getmetatable,select,{...})end)(...)
Write, Run & Share Lua code online using OneCompiler's Lua online compiler for free. It's one of the robust, feature-rich online compilers for Lua language, running the latest Lua version 5.4. Getting started with the OneCompiler's Lua editor is easy and fast. The editor shows sample boilerplate code when you choose language as Lua and start coding.
OneCompiler's Lua online editor supports stdin and users can give inputs to programs using the STDIN textbox under the I/O tab. Following is a sample Lua program which takes name as input and prints hello message with your name.
name = io.read("*a")
print ("Hello ", name)
Lua is a light weight embeddable scripting language which is built on top of C. It is used in almost all kind of applications like games, web applications, mobile applications, image processing etc. It's a very powerful, fast, easy to learn, open-source scripting language.
-- global variables
a = 10
-- local variables
local x = 30
Value Type | Description |
---|---|
number | Represents numbers |
string | Represents text |
nil | Differentiates values whether it has data or not |
boolean | Value can be either true or false |
function | Represents a sub-routine |
userdata | Represents arbitary C data |
thread | Represents independent threads of execution. |
table | Can hold any value except nil |
While is also used to iterate a set of statements based on a condition. Usually while is preferred when number of iterations are not known in advance.
while(condition)
do
--code
end
Repeat-Until is also used to iterate a set of statements based on a condition. It is very similar to Do-While, it is mostly used when you need to execute the statements atleast once.
repeat
--code
until( condition )
For loop is used to iterate a set of statements based on a condition.
for init,max/min value, increment
do
--code
end
Function is a sub-routine which contains set of statements. Usually functions are written when multiple calls are required to same set of statements which increase re-usuability and modularity.
optional_function_scope function function_name( argument1, argument2, argument3........, argumentn)
--code
return params with comma seperated
end