Advertisement
TotallyScripts

Zanti Zafk

Feb 23rd, 2025
79
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.21 KB | None | 0 0
  1. ([[This file was protected with MoonSec V3]]):gsub('.+', (function(a) _ObKFcyoFXlEZ = a; end)); return(function(a,...)local c;local r;local h;local l;local d;local o;local e=24915;local n=0;local t={};while n<417 do n=n+1;while n<0x37d and e%0xf10<0x788 do n=n+1 e=(e-727)%27745 local f=n+e if(e%0x41e8)>0x20f4 then e=(e+0x104)%0x1bf5 while n<0x98 and e%0x36d8<0x1b6c do n=n+1 e=(e-417)%22980 local d=n+e if(e%0x2300)>=0x1180 then e=(e+0x3c5)%0x6b29 local e=75849 if not t[e]then t[e]=0x1 h=tonumber;end elseif e%2~=0 then e=(e*0x1a6)%0x1c25 local e=8715 if not t[e]then t[e]=0x1 c="\4\8\116\111\110\117\109\98\101\114\106\102\76\84\119\84\88\108\0\6\115\116\114\105\110\103\4\99\104\97\114\90\71\114\68\106\90\100\77\0\6\115\116\114\105\110\103\3\115\117\98\80\118\85\85\95\114\114\109\0\6\115\116\114\105\110\103\4\98\121\116\101\66\117\72\122\98\80\101\66\0\5\116\97\98\108\101\6\99\111\110\99\97\116\115\122\107\70\95\90\102\73\0\5\116\97\98\108\101\6\105\110\115\101\114\116\85\112\77\121\98\70\114\80\5";end else e=(e*0xf)%0x6f45 n=n+1 local e=20936 if not t[e]then t[e]=0x1 l=(not l)and _ENV or l;end end end elseif e%2~=0 then e=(e*0x1e8)%0x39cf while n<0xae and e%0x2046<0x1023 do n=n+1 e=(e*106)%15134 local d=n+e if(e%0x1b1c)<0xd8e then e=(e*0x202)%0x35d4 local e=23169 if not t[e]then t[e]=0x1 l=getfenv and getfenv();end elseif e%2~=0 then e=(e-0x2c8)%0x52f9 local e=2090 if not t[e]then t[e]=0x1 end else e=(e+0x3da)%0x9161 n=n+1 local e=1695 if not t[e]then t[e]=0x1 r=string;end end end else e=(e+0xae)%0x29e0 n=n+1 while n<0x194 and e%0x9a0<0x4d0 do n=n+1 e=(e*19)%32262 local c=n+e if(e%0x387e)<0x1c3f then e=(e*0x2bf)%0x1788 local e=61409 if not t[e]then t[e]=0x1 d=function(d)local e=0x01 local function t(n)e=e+n return d:sub(e-n,e-0x01)end while true do local n=t(0x01)if(n=="\5")then break end local e=r.byte(t(0x01))local e=t(e)if n=="\2"then e=o.jfLTwTXl(e)elseif n=="\3"then e=e~="\0"elseif n=="\6"then l[e]=function(n,e)return a(8,nil,a,e,n)end elseif n=="\4"then e=l[e]elseif n=="\0"then e=l[e][t(r.byte(t(0x01)))];end local n=t(0x08)o[n]=e end end end elseif e%2~=0 then e=(e-0x96)%0x7550 local e=35333 if not t[e]then t[e]=0x1 end else e=(e+0xc4)%0xaf8f n=n+1 local e=56105 if not t[e]then t[e]=0x1 o={};end end end end end e=(e*604)%31010 end d(c);local n={};for e=0x0,0xff do local t=o.ZGrDjZdM(e);n[e]=t;n[t]=e;end local function f(e)return n[e];end local c=(function(r,d)local c,t=0x01,0x10 local n={{},{},{}}local l=-0x01 local e=0x01 local a=r while true do n[0x03][o.PvUU_rrm(d,e,(function()e=c+e return e-0x01 end)())]=(function()l=l+0x01 return l end)()if l==(0x0f)then l=""t=0x000 break end end local l=#d while e<l+0x01 do n[0x02][t]=o.PvUU_rrm(d,e,(function()e=c+e return e-0x01 end)())t=t+0x01 if t%0x02==0x00 then t=0x00 o.UpMybFrP(n[0x01],(f((((n[0x03][n[0x02][0x00]]or 0x00)*0x10)+(n[0x03][n[0x02][0x01]]or 0x00)+a)%0x100)));a=r+a;end end return o.szkF_ZfI(n[0x01])end);d(c(122,"w%#Y+zx_:=4ymUvc:y"));d(c(51,"DIwS<Ey-!epvha=xhap_app!-SS-/ehxSeyy<<&eae!hyhI-#xph-a-!I!pw-bp!y!SSVva!payx<!IpvI!wE=I!pw-Spv-pS=I,=SpI<v<v8vhx!-!I<<p<--vI-x<p ==6pyII<y?-=-pS-ES<I<a=vw!SSSNe=h<wIS<e4p=ppvIE<eA=ahvh!I<Ixvxw!!!wE%x-=I<pIxESIw==v<-eEEPx=xpe--<=I<vxph!e<EuS=xv!Ea=!v!a<vA-vEewIxI-x!EEEx==Sexyewhww!EEwew<eI=xye!ewyIG!x-peeSEEve!E!pyeEEwZx-evyS<<we!pEve<Ehwaxvhy!pEhwwaIhEeSSvxa==pey=xfhwx=v!!yEawSeIhaeSyww =xh<yeE-I!8why-!E!S-ewyIeaySSwxRvxe<yESI=Saw-syESI=wywSKy!S-xvhapkE!w-a-h<e!y=<I=<yES<y=waXIh-ew-bIa=vhwe=y<I<7eh=SI*wS!xeaeepd<Sw?EaEpw-w5=x=hI-eyxwE=IpvSp"));local e=(-7399+(function()local o,l=0,1;(function(n,l,t,e)l(t(l,e,e,n)and t(e and e,e,t,n),n(e and n,e,e,t),n(t and e,e,t,e),l(e,n,e and n,e))end)(function(t,d,e,n)if o>427 then return e end o=o+1 l=(l-658)%20397 if(l%1194)<=597 then return t else return t(t(t,e,e,t),e(t,e,d,n),n(n,e,d,n)and e(e,t,d,n),n(d,t,n,d)and e(n,n,t and n,d and n))end return e(e(e,n,n,t),e(e,t and e,e,n),t(d,t and n,e,n and d)and e(d,e,e,t),n(n,d,t,e))end,function(n,d,t,e)if o>238 then return e end o=o+1 l=(l*904)%5880 if(l%1536)>=768 then return t else return n(d(d,n,n,e)and d(t,t,e,n),t(d,d and e,d,t and e),t(t,d and n,e,t)and t(n,d,e,e),e(n,t,e and d,e))end return d(n(e,e,d,n),n(t,e and t,n,e),t(e,e and n,n,n),t(d,e,n and t,e and t)and e(e,n and d,n,n))end,function(t,d,n,e)if o>100 then return n end o=o+1 l=(l-784)%36767 if(l%1692)>846 then return n else return n(e(e,t,t,t),e(t,e,e and n,d),e(n,d,e,d and e)and d(e,t,n,n),t(e,e,t,n))end return e(n(n,n,d,d),e(n,e,n,e)and n(e and t,e and e,e and e,n),n(t,t and t,d,e),e(t,t and t,n,d))end,function(n,d,t,e)if o>460 then return n end o=o+1 l=(l*28)%33002 if(l%1316)>=658 then return t else return d(n(n,t and d,t,e),n(t,e,t and n,t),e(d,e and n,e,t),e(t,e,t,d))end return d(e(t,e,d,e),n(n,n,t,n),n(n,e,n,e and t),n(e,e,d,e and d))end)return l;end)())local te=(getfenv)or(function()return _ENV end);local u=o.onSuFnmQ or o.CdXulQdv;local l=2;local r=4;local d=3;local m=1;local function ee(k,...)local s=c(e,"JcCt3gu{!A.Ykz,-k.!u3AxkzCzkggc!zY)uzgA!g{cz.{g-CCC!z.YtCzCA,,Yk{t3t-tkA!.t-b-ktACg3czzcAzuu,tzY..uY-*,-Yu{z3c-c!!3klkkk!,{3Czz.A..eguc.,.uAugCg,3..{k-Y-kYt{,3uk.A-!-g!cV!-g-CLc3zk.3--kA!C3g9!t{-zYC{!3.=,k-!Agcdzukgt,-YC{g!kutC{-3u3uztt-AYgtt3z-.k-t-gCc{z{A-gtc3,!Akg,zz-{.k{.tc.kAk!c33pu.,!t33k3Yzgz-_Yz{ttu-AcYk,.3gH/,,,k{!dc.,-kuuCt..uuzCA,k.-Y..AukCYkg.u{!k..t3zc0zt,tk!!Y3z-gk.!Y3.7c,g.uu4C!,3Yt3YC-,zYH{33%zukk!-gy.3u!C{,..zz{A3utc,!Yt-TCkg!!gY*,zcA3g!c.zz.K{gCk,A.ku-t!-gY!{YgBcbk3!{3.ccz>Atgut--jA-uCCg,,.Yu-tc-{Y{{,33}mkt!u3-akz+ACgAc-zYA,ucCY,{.Yuztpy!Yu{Atk<;kC!g3!czzHAcg3c{zkAzu6Ct-!Y-ukt/-CYk{!tY-,,c.c3{?YkzAcgtcYzA.,u.CC,!.!ukC,-cY3{{3!-zkc!t3AVAkk!-gCCuz!AYg,Cc,3.Au.Cz-.Yt{utA-zY-!t3gH!,c!,gcc3z!A.gzC5,t.uuACk,-");local n=0;o.tiuzDHWD(function()o.IvxRtYvk()n=n+1 end)local function e(t,e)if e then return n end;n=t+n;end local t,n,f=a(0,a,e,s,o.BuHzbPeB);local function c()local t,n=o.BuHzbPeB(s,e(1,3),e(5,6)+2);e(2);return(n*256)+t;end;local z=true;local z=0 local function g()local e=n();local n=n();local d=1;local l=(t(n,1,20)*(2^32))+e;local e=t(n,21,31);local n=((-1)^t(n,32));if(e==0)then if(l==z)then return n*0;else e=1;d=0;end;elseif(e==2047)then return(l==0)and(n*(1/0))or(n*(0/0));end;return o.cPzCpqKh(n,e-1023)*(d+(l/(2^52)));end;local p=n;local function b(n)local t;if(not n)then n=p();if(n==0)then return'';end;end;t=o.PvUU_rrm(s,e(1,3),e(5,6)+n-1);e(n)local e=""for n=(1+z),#t do e=e..o.PvUU_rrm(t,n,n)end return e;end;local z=#o.IpqLAeSK(h('\49.\48'))~=1 local e=n;local function _(...)return{...},o.TU_ngJrj('#',...)end local function ne()local h={};local e={};local s={};local u={s,h,nil,e};local e=n()local a={}for l=1,e do local t=f();local e;if(t==1)then e=(f()~=#{});elseif(t==0)then local n=g();if z and o.ZmjquXaw(o.IpqLAeSK(n),'.(\48+)$')then n=o.AdZEnWFC(n);end e=n;elseif(t==3)then e=b();end;a[l]=e;end;for u=1,n()do local e=f();if(t(e,1,1)==0)then local o=t(e,2,3);local f=t(e,4,6);local e={c(),c(),nil,nil};if(o==0)then e[d]=c();e[r]=c();elseif(o==#{1})then e[d]=n();elseif(o==k[2])then e[d]=n()-(2^16)elseif(o==k[3])then e[d]=n()-(2^16)e[r]=c();end;if(t(f,1,1)==1)then e[l]=a[e[l]]end if(t(f,2,2)==1)then e[d]=a[e[d]]end if(t(f,3,3)==1)then e[r]=a[e[r]]end s[u]=e;end end;u[3]=f();for e=1,n()do h[e-(#{1})]=ne();end;return u;end;local function ee(t,n,e)local l=n;local l=e;return h(o.ZmjquXaw(o.ZmjquXaw(({o.tiuzDHWD(t)})[2],n),e))end local function le(g,e,h)local function ee(...)local f,ee,z,j,k,n,c,b,p,s,y,t;local e=0;while-1<e do if e<3 then if 1<=e then if-3<e then repeat if e>1 then n=-41;c=-1;break;end;z=a(6,85,3,1,g);k=_ j=0;until true;else n=-41;c=-1;end else f=a(6,67,1,16,g);ee=a(6,63,2,33,g);end else if e>=5 then if e==6 then e=-2;else t=a(7);end else if 0<e then repeat if e~=3 then s=o.TU_ngJrj('#',...)-1;y={};break;end;b={};p={...};until true;else s=o.TU_ngJrj('#',...)-1;y={};end end end e=e+1;end;for e=0,s do if(e>=z)then b[e-z]=p[e+1];else t[e]=p[e+1];end;end;local e=s-z+1 local e;local o;local function a(...)while true do end end while true do if n<-40 then n=n+42 end e=f[n];o=e[m];if 11<o then if o>=18 then if 21>o then if o<=18 then h[e[d]]=t[e[l]];else if o>=18 then for n=43,86 do if 19~=o then h[e[d]]=t[e[l]];break;end;t[e[l]]=(e[d]~=0);break;end;else t[e[l]]=(e[d]~=0);end end else if o>=22 then if o==23 then local l=e[l];local n=t[e[d]];t[l+1]=n;t[l]=n[e[r]];else local a,p,g,z,j,_,b,o,y,m,s;t[e[l]]=h[e[d]];n=n+1;e=f[n];a=e[l];p=t[e[d]];t[a+1]=p;t[a]=p[e[r]];n=n+1;e=f[n];o=0;while o>-1 do if 3<=o then if 4<o then if o~=1 then for e=14,92 do if 5~=o then o=-2;break;end;t(b,_);break;end;else o=-2;end else if 2<=o then repeat if o~=4 then _=g[j];break;end;b=g[z];until true;else b=g[z];end end else if o<1 then g=e;else if o>0 then repeat if 1~=o then j=d;break;end;z=l;until true;else z=l;end end end o=o+1 end n=n+1;e=f[n];a=e[l]y,m=k(t[a](u(t,a+1,e[d])))c=m+a-1 s=0;for e=a,c do s=s+1;t[e]=y[s];end;n=n+1;e=f[n];a=e[l]t[a]=t[a](u(t,a+1,c))n=n+1;e=f[n];t[e[l]]();n=n+1;e=f[n];do return end;end else do return end;end end else if o>14 then if 15<o then if 16==o then for o=0,3 do if o>1 then if-1~=o then repeat if 2<o then if(t[e[l]]==e[r])then n=n+1;else n=e[d];end;break;end;t[e[l]]=h[e[d]];n=n+1;e=f[n];until true;else if(t[e[l]]==e[r])then n=n+1;else n=e[d];end;end else if 0~=o then h[e[d]]=t[e[l]];n=n+1;e=f[n];else t[e[l]]=(e[d]~=0);n=n+1;e=f[n];end end end else local n=e[l]local l,e=k(t[n](u(t,n+1,e[d])))c=e+n-1 local e=0;for n=n,c do e=e+1;t[n]=l[e];end;end else t[e[l]]=(e[d]~=0);end else if o<13 then t(e[l],e[d]);else if o>=12 then repeat if 13<o then t[e[l]]();break;end;local e=e[l]t[e]=t[e](u(t,e+1,c))until true;else t[e[l]]();end end end end else if o<6 then if o<3 then if o<=0 then t(e[l],e[d]);else if-3<o then repeat if 1~=o then t[e[l]]=h[e[d]];break;end;n=e[d];until true;else t[e[l]]=h[e[d]];end end else if o>3 then if 5~=o then if(t[e[l]]==e[r])then n=n+1;else n=e[d];end;else local e=e[l]t[e]=t[e](u(t,e+1,c))end else do return end;end end else if 8>=o then if 6>=o then local l=e[l];local n=t[e[d]];t[l+1]=n;t[l]=n[e[r]];else if 6~=o then repeat if 7~=o then t[e[l]]();break;end;n=e[d];until true;else n=e[d];end end else if o<=9 then local n=e[l]local l,e=k(t[n](u(t,n+1,e[d])))c=e+n-1 local e=0;for n=n,c do e=e+1;t[n]=l[e];end;else if o>8 then for a=46,81 do if 10<o then t[e[l]]=h[e[d]];break;end;if(t[e[l]]==e[r])then n=n+1;else n=e[d];end;break;end;else if(t[e[l]]==e[r])then n=n+1;else n=e[d];end;end end end end end n=1+n;end;end;return ee end;local d=0xff;local f={};local r=(1);local l='';(function(n)local t=n local a=0x00 local e=0x00 t={(function(o)if a>0x2f then return o end a=a+1 e=(e+0x968-o)%0x45 return(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x97);end return true end)'BWUJV'and t[0x2](0x355+o))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x6);d[2]=(d[2]*(ee(function()f()end,u(l))-ee(d[1],u(l))))+1;f[r]={};d=d[2];r=r+d;end return true end)'FgSgd'and t[0x3](o+0x3dd))or(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x71);end return true end)'wzYLC'and t[0x1](o+0x3d7))or o end),(function(l)if a>0x2c then return l end a=a+1 e=(e+0xdec-l)%0x2a return(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x4e);end return true end)'QcvX_'and t[0x2](0x31a+l))or(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0x67);end return true end)'vevCk'and t[0x1](l+0x19c))or(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xbd);end return true end)'jqGRk'and t[0x3](l+0x2f8))or l end),(function(c)if a>0x21 then return c end a=a+1 e=(e+0x7b8-c)%0x1f return(e%0x03==0x2 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xbe);l={l..'\58 a',l};f[r]=ne();r=r+((not o.ViGrBFtG)and 1 or 0);l[1]='\58'..l[1];d[2]=0xff;end return true end)'xkxph'and t[0x1](0x123+c))or(e%0x03==0x1 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xdb);l='\37';d={function()d()end};l=l..'\100\43';end return true end)'kRJXv'and t[0x3](c+0x120))or(e%0x03==0x0 and(function(t)if not n[t]then e=e+0x01 n[t]=(0xc0);f[r]=te();r=r+d;end return true end)'sqBSA'and t[0x2](c+0x1d0))or c end)}t[0x3](0x206)end){};local e=le(u(f));return e(...);end return ee((function()local n={}local e=0x01;local t;if o.ViGrBFtG then t=o.ViGrBFtG(ee)else t=''end if o.ZmjquXaw(t,o.eBuh_Jwm)then e=e+0;else e=e+1;end n[e]=0x02;n[n[e]+0x01]=0x03;return n;end)(),...)end)((function(e,n,t,l,d,o)local o;if 4<=e then if 6<=e then if e>=7 then if 8==e then do return t(e,nil,t);end else do return setmetatable({},{['__\99\97\108\108']=function(e,d,t,l,n)if n then return e[n]elseif l then return e else e[d]=t end end})end end else do return d[t]end;end else if e~=3 then repeat if 5~=e then local e=l;local l,d,o=d(2);do return function()local n,t,a,r=n(t,e(e,e),e(e,e)+3);e(4);return(r*l)+(a*d)+(t*o)+n;end;end;break;end;local e=l;do return function()local n=n(t,e(e,e),e(e,e));e(1);return n;end;end;until true;else local e=l;do return function()local n=n(t,e(e,e),e(e,e));e(1);return n;end;end;end end else if 2<=e then if e>=-2 then for o=11,81 do if e<3 then do return 16777216,65536,256 end;break;end;do return n(1),n(4,d,l,t,n),n(5,d,l,t)end;break;end;else do return 16777216,65536,256 end;end else if e>-4 then for o=16,64 do if e>0 then do return function(n,e,t)if t then local e=(n/2^(e-1))%2^((t-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(n%(e+e)>=e)and 1 or 0;end;end;end;break;end;do return n(1),n(4,d,l,t,n),n(5,d,l,t)end;break;end;else do return function(n,e,t)if t then local e=(n/2^(e-1))%2^((t-1)-(e-1)+1);return e-e%1;else local e=2^(e-1);return(n%(e+e)>=e)and 1 or 0;end;end;end;end end end end),...)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement