Blue's Unboxing Exploit
Hello everyone! I'm somewhat new to posting on this community, but that aside, I'm looking for some help. I have a bit of an idea as to what I want, but I have no idea how to accomplish it. If anyone who is skilled in lua could assist me in the creation of a specific exploit, I would be very happy. I have a working source, but I want it to make me unbox specific weapons instead of money. I'm not sure if it matters, but the guns I wish to unbox are called the BINACHI AP and the K-Volt. Here is the source if anyone is willing to help.
credit to ShitFucks
Code:
NOMORE = nil
NONUM = nil
CMG = 0
net.Receive("InitSpin" , function()
local data = net.ReadTable()
REKT = data
if TYPE == 1 then
print("MONEY")
table.foreach(REKT, someFunctionMoney)
TYPE = 0
elseif TYPE == 2 then
print("PRINTER")
table.foreach(REKT, someFunctionPrinter)
TYPE = 0
elseif TYPE == 3 then
print("HEAL")
table.foreach(REKT, someFunctionHeal)
TYPE = 0
end
end)
-----------------------------------------
function someFunctionMoney(k,v)
local num = k
local money = v.moneyAmount
if money == nil then
print("NIL")
elseif money >= 150000 then
net.Start("FinishedUnbox")
net.WriteInt(num , 16)
net.SendToServer()
elseif money >= 10000 then
NOMORE = num
net.Start("FinishedUnbox")
net.WriteInt(NOMORE , 16)
net.SendToServer()
end
end
concommand.Add("CrateMeMoney", function()
TYPE = 1
net.Start("BuyCrate")
net.SendToServer()
net.Start("BuyKey")
net.SendToServer()
net.Start("OpenCrate")
net.SendToServer()
end)
concommand.Add("CrateOthersMoney", function()
TYPE = 1
net.Start("BuyCrate")
net.SendToServer()
net.Start("BuyKey")
net.SendToServer()
net.Start("OpenGiftCrate")
net.SendToServer()
end)
concommand.Add("CrateMeMoney_SPAM", function()
timer.Remove("CrateMeMoney_SPAM")
end)
concommand.Add("CrateOthersMoney_SPAM", function()
timer.Remove("CrateOthersMoney_SPAM")
end)
---------------------------------------
function someFunctionPrinter(k,v)
print("GOT IT")
local num = k
local printer = v.entityName
if printer == nil then
print("NIL")
elseif printer == "k_printer_t5" then
print("k5")
net.Start("FinishedUnbox")
net.WriteInt(num , 16)
net.SendToServer()
elseif printer == "k_printer_t4" then
print("k4")
NOPRINT = 4
NONUM = num
elseif printer == "k_printer_t3" then
print("k3")
if NOMORE == nil then
NOMORE = 3
elseif NOMORE == 4 then
print("GOT A T4")
end
NONUM = num
end
if num == 99 then
print("END")
if NOMORE == nil then
print("nil")
else
print(NOMORE)
print(NONUM)
net.Start("FinishedUnbox")
net.WriteInt(NONUM , 16)
net.SendToServer()
end
end
end
concommand.Add("CrateMePrinter", function()
TYPE = 2
net.Start("BuyCrate")
net.SendToServer()
net.Start("BuyKey")
net.SendToServer()
net.Start("OpenCrate")
net.SendToServer()
end)
concommand.Add("CrateOthersPrinter", function()
TYPE = 2
net.Start("BuyCrate")
net.SendToServer()
net.Start("BuyKey")
net.SendToServer()
net.Start("OpenGiftCrate")
net.SendToServer()
end)
concommand.Add("CrateMePrinter_SPAM", function()
if CMMS == nil or 0 then
CMMS = 1
timer.Create("CrateMePrinter_SPAM", 1, 0, function()
RunConsoleCommand("CrateMePrinter")
end)
elseif CMMS == 1 then
CMMS = 0
timer.Remove("CrateMePrinter_SPAM")
end
end)
concommand.Add("CrateOthersPrinter_SPAM", function()
if CMMO == nil or 0 then
CMMO = 1
timer.Create("CrateOthersPrinter_SPAM", 1, 0, function()
RunConsoleCommand("CrateOthersPrinter")
end)
elseif CMMO == 1 then
CMMO = 0
timer.Remove("CrateOthersPrinter_SPAM")
end
end)
---------------------------------------
function someFunctionHeal(k,v)
local num = k
local health = v.healAmount
if health == nil then
print("NIL")
elseif health == 100 then
print("100")
net.Start("FinishedUnbox")
net.WriteInt(k , 16)
net.SendToServer()
elseif health >= 50 then
print(">=50")
NOMOREHP = 50
NONUMHP = k
elseif health >= 25 then
if NOMORE > 50 then
print("GOT 50 HP")
else
NOMOREHP = 25
NONUMHP = k
end
end
if num == 99 then
print("END")
if NOMOREHP == nil then
print("nil")
else
print(NOMOREHP)
print(NONUMHP)
net.Start("FinishedUnbox")
net.WriteInt(NONUMHP , 16)
net.SendToServer()
end
end
end
concommand.Add("CrateMeHealth", function()
TYPE = 3
net.Start("BuyCrate")
net.SendToServer()
net.Start("BuyKey")
net.SendToServer()
net.Start("OpenCrate")
net.SendToServer()
end)
concommand.Add("CrateOthersHealth", function()
TYPE = 3
net.Start("BuyCrate")
net.SendToServer()
net.Start("BuyKey")
net.SendToServer()
net.Start("OpenGiftCrate")
net.SendToServer()
end)
concommand.Add("CrateMeHealth_SPAM", function()
if CMMS == nil or 0 then
CMMS = 1
timer.Create("CrateMeHealth_SPAM", 1, 0, function()
RunConsoleCommand("CrateMeHealth")
end)
elseif CMMS == 1 then
CMMS = 0
timer.Remove("CrateMeHealth_SPAM")
end
end)
concommand.Add("CrateOthersHealth_SPAM", function()
if CMMO == nil or 0 then
CMMO = 1
timer.Create("CrateOthersHealth_SPAM", 1, 0, function()
RunConsoleCommand("CrateOthersHealth")
end)
elseif CMMO == 1 then
CMMO = 0
timer.Remove("CrateOthersHealth_SPAM")
end
end)
concommand.Add("CrateMeGod", function()
print("YEAH")
print(CMG)
if CMG == 0 then
print("CMG = 0")
print(CMG)
CMG = 1
timer.Create("GodModeBitch", 1, 0, function()
if LocalPlayer():Health() <= 99 then
RunConsoleCommand("CrateMeHealth")
end
end)
else
print("CMG = 1")
timer.Remove("GodModeBitch")
CMG = 0
end
end)
