Advertisement
EpicXploiter

Power Sim Script

Aug 7th, 2019
254
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 12.27 KB | None | 0 0
  1.  
  2. --[[
  3. Subscribe to the Hackademic Captain On Youtube
  4. ]]
  5.  
  6. --Settings
  7. _G.List = {
  8. [1] = "Ice Factory", --Endurance
  9. [2] = "I not hi enough psyhich so i not adding to this for now", --Psychic Force
  10. [3] = "Rock", --Punch Power
  11. }
  12.  
  13. local t=string.byte;local i=string.char;local c=string.sub;local r=table.concat;local s=math.ldexp;local D=getfenv or function()return _ENV end;local l=setmetatable;local Q=select;local f=unpack;local h=tonumber;local function E(t)local e,o,n="","",{}local a=256;local d={}for l=0,a-1 do d[l]=i(l)end;local l=1;local function f()local e=h(c(t,l,l),36)l=l+1;local o=h(c(t,l,l+e-1),36)l=l+e;return o end;e=i(f())n[1]=e;while l<#t do local l=f()if d[l]then o=d[l]else o=e..c(e,1,1)end;d[a]=e..c(o,1,1)n[#n+1],e,a=o,o,a+1 end;return table.concat(n)end;local d=E('26E22Q27525W22Y24224D24W22Y27525X22Q21U22Q23K27522Q26423E27923K23E27D23E27G27O27D22Q1Y27H27J25S27824D23K27C22Q25T22Y27S28326022227N22227525T27R27H27P28422Y1227H28326428024928326523627G24H23627525G22I27N22I27526528F27T22Q28R26A27H28V22Q26122Y26Q28L28W28028227525H21U27S27G22Q25O21E27N21E29I29328H29J25U27H29M25O1227924D28K22Q25L22Q22A22Q24A27J25L1A23M27H1A27525L1Q22Q22R23K2AI2A426I21U2AK26I29I21U28V23K29M25G26Y27924926Y29I28622Q23V28325I21U22P22Q23U2B826A25Z23E24124D23X23E22P26A25G25E2AZ25E27525C25M2AZ25M27525D2221222R24P28C22Q25H23627W23W29925Z2562402BH25622O26A25M25U1I22R24529W2BD2BS2BH2BU26A26P22Q26A2BZ27J26P21626Q22R24Q21627526X27W22Q24G2D326P28F23W28H26Q2972BA2972BD1Q27923X2AI2CP23E2CS24P28H2CV25E22R24E2D022Q27122Y25U2AK28327121E24I2AK29R22Q26X2CR2AK27J26X21M29723K21M2D121M23M2AK2EE2E521M24Y2EI27527123U29W23K23U2752702AY24D2B02EO22Y28V23O2DZ2DL2BZ28H2E02DQ24P2E426Q24Y25P22Q23T24Y24D1T25Z24Q24D2BH2FK2FI23E2CA2BI2CD25M24Y2422CI24Y2CR2FJ2DH24Q2CR2CQ22Q22O24P2CU2CW2CY2DT2D22752D52752D727G2D927526Q2BP2BA2BP2BD2EW23X2B12DK2G42DN2GE2162DQ2DS2EZ2DX29H2DU2E12E32D127522O27I2EF2EC2EJ2EA2EH2ED2EF2EM2HD2DU2EQ27H2ET22Q2EV2AZ2B122Q26W22Y24324D24422Y22R2DU2362AU29927128S2H629926C22Q2HS27I2HW27123E2AU2F627P2H62F621E2DQ23K2FA25U2FD23K25U2FH25Z25M2FL23X2IR2FI22I2HS23X22I22R2CE22A22B22O24522A2J025Z2222IX2222J02CQ1Y2G52G72CX2CZ2D12D32GD22Q2GF22Q2GH22Q29D2HW2ET2J724A2DH2A92CP2DW2BZ2832CV21E2G52DT2DP2BZ2DT26Q1Y2JE24627W2BD28Y2BH29026A26O28O2K121627G24J2DT26W2KF23K2902JM29T2GU122H62K52KM2KY27526W21U2I72AP2KU2IC2GE23E2JE2GT2JM2GV2DR2DT2DV2GZ2DZ2H22IJ2H42JE2H72EK2H92EF1I2H62HA2EL2EN2HH2ER2HK2HM2EX2HO2HQ2HS2HU2I92HY2982EO2I223K2I42L42812L62IA2L82DU2LA2IF2EO2IH2H32JQ2IL27H2IO2FI2IR2CN2FH25H27F22Q24127J25Z22Y24F2BH2N22FI26224E2BH2N71T25X28324728327J27521X2NG22U27J15131F1722Q22W27J211171M21D171G1K1B112NP22Z27J21H1D1G191H1I132O122Q23027J21I1G131B1C2OJ1521U1Z1G17131H22Q22T27J21E1E131R2NX2OS22X27J21A1D11131E2OW2OY2NX22Q23727J21C171I1E2O0131M171621D1M2O613152NP2PD2752171C112OP2OR171Z101B2PI1M1B172OS2NK2752122PK132NQ27J2PO131G2PL1G2111N1B2OT2QG2NU1X2O62NP29922Q2NW1C162181D2Q6142PJ2Q61D1C22Q22V2OF1B1M1E2QU27J2121B1H112O61622G21U22I21421C1Z1R21B22J22Q2QA22Q21I171Q1M22Q23527J21B13161721U101R21U21B17151N1F1N21T22I22A22A2902NF2121N2OH2R51C2B92NG22Q21827W2RW1L2OI2S12R92752OA1B1G2OS22O27J21P2112RV2P32RH1M2SU2NG24222L22Q2O32752132QY2SQ132PX2NP2OE2752102OJ162TW2T71M1X1A2Q4162R827J21G2P71N2O227J2U22QI2OB2QK22Q2QV2162SG2TR1D1B1621C1D2R121E2QI2S122S2UC2102OH2NO22Q2NF2QH1M2US2QJ2TH2NG27W2322OV1H1R112U3112102O62O12V627524Y2TK2NR2TV2T6172NW2NY2NX2VJ2V027W2VN22Q21E1N2PX1A21E1D1L2PB2OU2752Q22Q42RB1R22Q2V92TN1J2QN1I2W92Q52WC2TM22Q21121J2172161D1E2S71G');local n=bit and bit.bxor or function(l,o)local e,n=1,0 while l>0 and o>0 do local c,a=l%2,o%2 if c~=a then n=n+e end l,o,e=(l-c)/2,(o-a)/2,e*2 end if l<o then l=o end while l>0 do local o=l%2 if o>0 then n=n+e end l,e=(l-o)/2,e*2 end return n end local function l(o,l,e)if e then local l=(o/2^(l-1))%2^((e-1)-(l-1)+1);return l-l%1;else local l=2^(l-1);return(o%(l+l)>=l)and 1 or 0;end;end;local e=1;local function o()local a,c,o,l=t(d,e,e+3);a=n(a,98)c=n(c,98)o=n(o,98)l=n(l,98)e=e+4;return(l*16777216)+(o*65536)+(c*256)+a;end;local function a()local l=n(t(d,e,e),98);e=e+1;return l;end;local function h()local e=o();local n=o();local c=1;local o=(l(n,1,20)*(2^32))+e;local e=l(n,21,31);local l=((-1)^l(n,32));if(e==0)then if(o==0)then return l*0;else e=1;c=0;end;elseif(e==2047)then return(o==0)and(l*(1/0))or(l*(0/0));end;return s(l,e-1023)*(c+(o/(2^52)));end;local E=o;local function s(l)local o;if(not l)then l=E();if(l==0)then return'';end;end;o=c(d,e,e+l-1);e=e+l;local e={}for l=1,#o do e[l]=i(n(t(c(o,l,l)),98))end return r(e);end;local e=o;local function i(...)return{...},Q('#',...)end local function E()local f={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};local t={};local e={};local d={f,nil,t,nil,e};for a=1,o()do local c=n(o(),183);local o=n(o(),226);local n=l(c,1,2);local e=l(o,1,11);local e={e,l(c,3,11),nil,nil,o};if(n==0)then e[3]=l(c,12,20);e[5]=l(c,21,29);elseif(n==1)then e[3]=l(o,12,33);elseif(n==2)then e[3]=l(o,12,32)-1048575;elseif(n==3)then e[3]=l(o,12,32)-1048575;e[5]=l(c,21,29);end;f[a]=e;end;for l=1,o()do t[l-1]=E();end;d[4]=a();local l=o()local o={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0};for n=1,l do local e=a();local l;if(e==1)then l=(a()~=0);elseif(e==3)then l=h();elseif(e==0)then l=s();end;o[n]=l;end;d[2]=o return d;end;local function H(l,e,r)local n=l[1];local e=l[2];local o=l[3];local l=l[4];return function(...)local c=n;local n=e;local e=o;local a=l;local l=i local e=1;local d=-1;local h={};local t={...};local i=Q('#',...)-1;local l={};local o={};for l=0,i do if(l>=a)then h[l-a]=t[l+1];else o[l]=t[l+1];end;end;local l=i-a+1 local l;local a;while true do l=c[e];a=l[1];if a<=23 then if a<=11 then if a<=5 then if a<=2 then if a<=0 then o[l[2]]={};elseif a==1 then local h;local i;local t;local Q;local a;o[l[2]]=n[l[3]];e=e+1;l=c[e];a=l[2];Q={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;Q[t]=o[l];end;o[a](f(Q,1,i-a));d=a;e=e+1;l=c[e];a=l[2];h=o[l[3]];o[a+1]=h;o[a]=h[n[l[5]]];e=e+1;l=c[e];o[l[2]]=n[l[3]];e=e+1;l=c[e];a=l[2];Q={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;Q[t]=o[l];end;o[a](f(Q,1,i-a));d=a;e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];if(o[l[2]]<o[l[5]])then e=e+1;else e=e+l[3];end;else local e=l[2];local c=o[l[3]];o[e+1]=c;o[e]=c[n[l[5]]];end;elseif a<=3 then if(o[l[2]]~=n[l[5]])then e=e+1;else e=e+l[3];end;elseif a==4 then o[l[2]]();d=A;else o[l[2]]=n[l[3]];end;elseif a<=8 then if a<=6 then local n=l[2];local c={};local e=0;local a=n+l[3]-1;for l=n+1,a do e=e+1;c[e]=o[l];end;local c={o[n](f(c,1,a-n))};local l=n+l[5]-2;e=0;for l=n,l do e=e+1;o[l]=c[e];end;d=l;elseif a==7 then do return end;else if(o[l[2]]==n[l[5]])then e=e+1;else e=e+l[3];end;end;elseif a<=9 then if(o[l[2]]<o[l[5]])then e=e+1;else e=e+l[3];end;elseif a==10 then if o[l[2]]then e=e+1;else e=e+l[3];end;else local e=l[2];local c,n={o[e]()};local n=e+l[5]-2;local l=0;for e=e,n do l=l+1;o[e]=c[l];end;d=n;end;elseif a<=17 then if a<=14 then if a<=12 then local n=l[2];local a={};local e=0;local c=n+l[3]-1;for l=n+1,c do e=e+1;a[e]=o[l];end;local c={o[n](f(a,1,c-n))};local l=n+l[5]-2;e=0;for l=n,l do e=e+1;o[l]=c[e];end;d=l;elseif a>13 then o[l[2]]=o[l[3]];else e=e+l[3];end;elseif a<=15 then local e=l[2];local c={};local n=0;local l=e+l[3]-1;for l=e+1,l do n=n+1;c[n]=o[l];end;o[e](f(c,1,l-e));d=e;elseif a>16 then local n=l[2];local c=l[5];local l=n+2;local a={o[n](o[n+1],o[l])};for e=1,c do o[l+e]=a[e];end;local n=o[n+3];if n then o[l]=n else e=e+1;end;else o[l[2]]=o[l[3]][o[l[5]]];end;elseif a<=20 then if a<=18 then o[l[2]][n[l[3]]]=o[l[5]];elseif a==19 then o[l[2]]();d=A;else local h;local i;local t;local Q;local a;o[l[2]]=n[l[3]];e=e+1;l=c[e];a=l[2];Q={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;Q[t]=o[l];end;o[a](f(Q,1,i-a));d=a;e=e+1;l=c[e];a=l[2];h=o[l[3]];o[a+1]=h;o[a]=h[n[l[5]]];e=e+1;l=c[e];o[l[2]]=n[l[3]];e=e+1;l=c[e];a=l[2];Q={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;Q[t]=o[l];end;o[a](f(Q,1,i-a));d=a;e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];if(o[l[2]]<o[l[5]])then e=e+1;else e=e+l[3];end;end;elseif a<=21 then if(o[l[2]]==n[l[5]])then e=e+1;else e=e+l[3];end;elseif a==22 then if(o[l[2]]~=n[l[5]])then e=e+1;else e=e+l[3];end;else do return end;end;elseif a<=35 then if a<=29 then if a<=26 then if a<=24 then e=e+l[3];elseif a>25 then local i;local t;local Q;local a;o[l[2]]={};e=e+1;l=c[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=n[l[5]];e=e+1;l=c[e];a=l[2];Q={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;Q[t]=o[l];end;o[a](f(Q,1,i-a));d=a;else o[l[2]]=r[n[l[3]]];end;elseif a<=27 then local e=l[2];local c={};local n=0;local l=e+l[3]-1;for l=e+1,l do n=n+1;c[n]=o[l];end;o[e](f(c,1,l-e));d=e;elseif a==28 then o[l[2]]=o[l[3]][n[l[5]]];else o[l[2]]=n[l[3]];end;elseif a<=32 then if a<=30 then o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][o[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=o[l[5]];elseif a>31 then o[l[2]]=o[l[3]];else local n=l[2];local c=l[5];local l=n+2;local a={o[n](o[n+1],o[l])};for e=1,c do o[l+e]=a[e];end;local n=o[n+3];if n then o[l]=n else e=e+1;end;end;elseif a<=33 then local s;local i;local t;local h;local Q;local a;a=l[2];Q=o[l[3]];o[a+1]=Q;o[a]=Q[n[l[5]]];e=e+1;l=c[e];o[l[2]]=n[l[3]];e=e+1;l=c[e];a=l[2];h={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;h[t]=o[l];end;s={o[a](f(h,1,i-a))};i=a+l[5]-2;t=0;for l=a,i do t=t+1;o[l]=s[t];end;d=i;e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=r[n[l[3]]];e=e+1;l=c[e];a=l[2];Q=o[l[3]];o[a+1]=Q;o[a]=Q[n[l[5]]];e=e+1;l=c[e];o[l[2]]=n[l[3]];e=e+1;l=c[e];a=l[2];h={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;h[t]=o[l];end;s={o[a](f(h,1,i-a))};i=a+l[5]-2;t=0;for l=a,i do t=t+1;o[l]=s[t];end;d=i;e=e+1;l=c[e];a=l[2];Q=o[l[3]];o[a+1]=Q;o[a]=Q[n[l[5]]];elseif a==34 then if(o[l[2]]<o[l[5]])then e=e+1;else e=e+l[3];end;else local r;local i;local t;local Q;local h;local a;a=l[2];h=o[l[3]];o[a+1]=h;o[a]=h[n[l[5]]];e=e+1;l=c[e];o[l[2]]=n[l[3]];e=e+1;l=c[e];a=l[2];Q={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;Q[t]=o[l];end;r={o[a](f(Q,1,i-a))};i=a+l[5]-2;t=0;for l=a,i do t=t+1;o[l]=r[t];end;d=i;e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];a=l[2];h=o[l[3]];o[a+1]=h;o[a]=h[n[l[5]]];e=e+1;l=c[e];o[l[2]]=n[l[3]];e=e+1;l=c[e];a=l[2];Q={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;Q[t]=o[l];end;o[a](f(Q,1,i-a));d=a;end;elseif a<=41 then if a<=38 then if a<=36 then o[l[2]]=r[n[l[3]]];elseif a>37 then if o[l[2]]then e=e+1;else e=e+l[3];end;else o[l[2]][n[l[3]]]=n[l[5]];end;elseif a<=39 then o[l[2]]=o[l[3]][o[l[5]]];elseif a>40 then o[l[2]]=o[l[3]][n[l[5]]];else o[l[2]][n[l[3]]]=n[l[5]];end;elseif a<=44 then if a<=42 then local c=l[2];local e=o[l[3]];o[c+1]=e;o[c]=e[n[l[5]]];elseif a==43 then o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][o[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=o[l[5]];else o[l[2]][n[l[3]]]=o[l[5]];end;elseif a<=46 then if a>45 then o[l[2]]={};else o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][o[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]][n[l[3]]]=o[l[5]];end;elseif a==47 then local e=l[2];local c,n={o[e]()};local n=e+l[5]-2;local l=0;for e=e,n do l=l+1;o[e]=c[l];end;d=n;else local s;local i;local t;local Q;local h;local a;o[l[2]]=r[n[l[3]]];e=e+1;l=c[e];a=l[2];h=o[l[3]];o[a+1]=h;o[a]=h[n[l[5]]];e=e+1;l=c[e];o[l[2]]=n[l[3]];e=e+1;l=c[e];a=l[2];Q={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;Q[t]=o[l];end;s={o[a](f(Q,1,i-a))};i=a+l[5]-2;t=0;for l=a,i do t=t+1;o[l]=s[t];end;d=i;e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];e=e+1;l=c[e];o[l[2]]=r[n[l[3]]];e=e+1;l=c[e];a=l[2];h=o[l[3]];o[a+1]=h;o[a]=h[n[l[5]]];e=e+1;l=c[e];o[l[2]]=n[l[3]];e=e+1;l=c[e];a=l[2];Q={};t=0;i=a+l[3]-1;for l=a+1,i do t=t+1;Q[t]=o[l];end;s={o[a](f(Q,1,i-a))};i=a+l[5]-2;t=0;for l=a,i do t=t+1;o[l]=s[t];end;d=i;e=e+1;l=c[e];o[l[2]]=o[l[3]][n[l[5]]];end;e=e+1;end;end;end;return H(E(),{},D())();
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement