Yeah I released this a while ago. If it doesn't work for the server you're on just update the net messages and then you'll be good to go. It's coded stupidly but it works.
Code:
net.Receive("Spin4Jesus" , function()
local data = net.ReadTable()
data = data
PrintTable(data)
if REKT == 1 then
table.foreach(data, someFunctionMoney)
elseif REKT == 2 then
table.foreach(data, ShowMeShit)
else
Spin(data)
end
end)
net.Start("WeDoneSon")
net.WriteInt(65 , 16)
net.SendToServer()
-----------------------------------------
function ShowMeShit(k,v)
print(k)
print(v.itemName)
print(v.itemChance)
print("--------------")
end
-----------------------------------------
function ChooseItem(argStr)
net.Start("WeDoneSon")
net.WriteInt(argStr[1] , 16)
net.SendToServer()
end
-----------------------------------------
function someFunctionMoney(k,v)
if v.moneyAmount == nil then
print("NIL")
elseif v.itemChance <= 100 then
net.Start("WeDoneSon")
net.WriteInt(k , 16)
net.SendToServer()
elseif v.moneyAmount >= 1000000 then
net.Start("WeDoneSon")
net.WriteInt(k , 16)
net.SendToServer()
elseif v.moneyAmount >= 100000 then
net.Start("WeDoneSon")
net.WriteInt(k , 16)
net.SendToServer()
elseif v.moneyAmount >= 50000 then
net.Start("WeDoneSon")
net.WriteInt(k , 16)
net.SendToServer()
elseif v.moneyAmount >= 25000 then
net.Start("WeDoneSon")
net.WriteInt(k , 16)
net.SendToServer()
elseif v.moneyAmount >= 7500 then
net.Start("WeDoneSon")
net.WriteInt(k , 16)
net.SendToServer()
elseif v.itemChance <= 300 and NOMORE != nil then
NOMORE = num
elseif k == 99 and NOMORE != nil then
net.Start("WeDoneSon")
net.WriteInt(num , 16)
net.SendToServer()
else
print("----------")
print("END")
print("NOMORE")
print(k)
print("----------")
end
end
concommand.Add("CCrateMeMoney", function()
REKT = 1
net.Start("OpenCrate")
net.SendToServer()
end)
concommand.Add("ChooseItem", function(cmd, args, argStr)
ChooseItem(argStr)
end)
concommand.Add("TellMeSpin", function()
REKT = 2
net.Start("OpenCrate")
net.SendToServer()
end)
concommand.Add("LCrateMeMoney", function()
REKT = 0
net.Start("OpenCrate")
net.SendToServer()
end)
concommand.Add("CCrateOthersMoney", function()
REKT = 1
net.Start("BuyKey")
net.SendToServer()
net.Start("BuyCrate")
net.SendToServer()
net.Start("OpenGiftCrate")
net.SendToServer()
end)
concommand.Add("CCrateOthersMoney_SPAM", function()
timer.Create("Rekto", 1, 0, function()
RunConsoleCommand("CCrateOthersMoney")
end)
end)
concommand.Add("CCrateMeMoney_SPAM", function()
timer.Create("RektoME", 1, 0, function()
RunConsoleCommand("CCrateMeMoney")
net.Start("BuyKey")
net.SendToServer()
net.Start("BuyCrate")
net.SendToServer()
end)
end)
concommand.Add("CCrateOthersMoney_STOP", function()
timer.Remove("Rekto")
end)
concommand.Add("CCrateMeMoney_STOP", function()
timer.Remove("RektoME")
end)
concommand.Add("LCrateOthersMoney", function()
REKT = 0
net.Start("BuyKey")
net.SendToServer()
net.Start("BuyCrate")
net.SendToServer()
net.Start("OpenGiftCrate")
net.SendToServer()
end)