mirror of
https://github.com/lifestorm/wnsrc.git
synced 2025-12-18 14:13:46 +03:00
289 lines
8.0 KiB
Lua
289 lines
8.0 KiB
Lua
--[[
|
|
| This file was obtained through the combined efforts
|
|
| of Madbluntz & Plymouth Antiquarian Society.
|
|
|
|
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
|
|
| Maloy, DrPepper10 @ RIP, Atle!
|
|
|
|
|
| Visit for more: https://plymouth.thetwilightzone.ru/
|
|
--]]
|
|
|
|
|
|
ITEM.name = "Karta identyfikacyjna #00000"
|
|
ITEM.model = Model("models/n7/props/n7_cid_card.mdl")
|
|
ITEM.description = "Obywatelska karta identyfikacyjna przypisana do %s, CID #%s.\n\nNumer karty: %s\nOpis genetyczny:\n%s.\n\nTa karta jest własnością Administracji Miasta Kombinatu. Nielegalne posiadanie i fałszowanie tożsamości są karalne oraz będą skutkować wszczęciem postępowania przez Civil Protection. W przypadku znalezienia czyjejś karty należy niezwłocznie zwrócić ją do najbliższego oddziału Civil Protection."
|
|
ITEM.category = "Combine"
|
|
ITEM.iconCam = {
|
|
pos = Vector(0, 0, 10),
|
|
ang = Angle(90, 90, 0),
|
|
fov = 45,
|
|
}
|
|
|
|
if (CLIENT) then
|
|
function ITEM:PaintOver(item, w, h)
|
|
if (item:GetData("active")) then
|
|
surface.SetDrawColor(110, 255, 110, 100)
|
|
surface.DrawRect(w - 14, h - 14, 8, 8)
|
|
end
|
|
end
|
|
end
|
|
|
|
function ITEM:GetName()
|
|
return "Karta identyfikacyjna #" .. self:GetData("cid", "00000")
|
|
end
|
|
|
|
-- It's also possible to use ITEM.KeepOnDeath = true
|
|
function ITEM:KeepOnDeath(client)
|
|
return self:GetData("owner") == client:GetCharacter():GetID() and self:GetData("active")
|
|
end
|
|
|
|
function ITEM:GetDescription()
|
|
return string.format(self.description,
|
|
self:GetData("name", "Nobody"),
|
|
self:GetData("cid", "00000"),
|
|
self:GetData("cardNumber", "00-0000-0000-00"),
|
|
self:GetData("geneticDesc", "N/A | N/A | N/A OCZY | N/A WŁOSY"))
|
|
end
|
|
|
|
local prime = 9999999787 -- prime % 4 = 3! DO NOT CHANGE EVER
|
|
local offset = 100000 -- slightly larger than sqrt(prime) is ok. DO NOT CHANGE EVER
|
|
local block = 100000000
|
|
local function generateCardNumber(id)
|
|
id = (id + offset) % prime
|
|
|
|
local cardNum = 0
|
|
|
|
for _ = 1, math.floor(id/block) do
|
|
cardNum = (cardNum + (id * block) % prime) % prime
|
|
end
|
|
|
|
cardNum = (cardNum + (id * (id % block) % prime)) % prime
|
|
|
|
if (2 * id < prime) then
|
|
return cardNum
|
|
else
|
|
return prime - cardNum
|
|
end
|
|
end
|
|
|
|
function ITEM:GetCredits()
|
|
return self:GetData("credits", 0)
|
|
end
|
|
|
|
function ITEM:HasCredits(amount)
|
|
return amount <= self:GetData("credits", 0)
|
|
end
|
|
|
|
if (SERVER) then
|
|
function ITEM:SetCredits(amount)
|
|
self:SetData("credits", math.floor(amount))
|
|
|
|
return true
|
|
end
|
|
|
|
function ITEM:GiveCredits(amount, sender, reason)
|
|
if (amount < 0 and !self:HasCredits(math.abs(amount))) then
|
|
return false
|
|
end
|
|
|
|
if (amount == 0) then
|
|
return true
|
|
end
|
|
|
|
if (sender) then
|
|
local insert = mysql:Insert("ix_cid_transactions")
|
|
insert:Insert("datetime", os.time())
|
|
insert:Insert("sender_name", sender)
|
|
insert:Insert("sender_cid", "00000")
|
|
insert:Insert("sender_cardid", 0)
|
|
insert:Insert("receiver_name", self:GetData("name", "NIEZNANY"))
|
|
insert:Insert("receiver_cid", self:GetData("cid", "NIEPRAWIDŁOWY"))
|
|
insert:Insert("receiver_cardid", self:GetID())
|
|
insert:Insert("amount", amount)
|
|
if (reason and reason != "") then
|
|
insert:Insert("reason", string.len(reason) > 250 and string.sub(reason, 1, 250) or reason)
|
|
else
|
|
insert:Insert("reason", "no reason given")
|
|
end
|
|
|
|
insert:Insert("pos", 0)
|
|
insert:Insert("read", 1)
|
|
insert:Execute()
|
|
end
|
|
|
|
return self:SetCredits(amount + self:GetCredits())
|
|
end
|
|
|
|
function ITEM:TakeCredits(amount, receiver, reason)
|
|
if (amount > 0 and !self:HasCredits(amount)) then
|
|
return false
|
|
end
|
|
|
|
if (amount == 0) then
|
|
return true
|
|
end
|
|
|
|
if (receiver) then
|
|
local insert = mysql:Insert("ix_cid_transactions")
|
|
insert:Insert("datetime", os.time())
|
|
insert:Insert("sender_name", self:GetData("name", "NIEZNANY"))
|
|
insert:Insert("sender_cid", self:GetData("cid", "NIEPRAWIDŁOWY"))
|
|
insert:Insert("sender_cardid", self:GetID())
|
|
insert:Insert("receiver_name", receiver)
|
|
insert:Insert("receiver_cid", "00000")
|
|
insert:Insert("receiver_cardid", 0)
|
|
insert:Insert("amount", amount)
|
|
if (reason and reason != "") then
|
|
insert:Insert("reason", string.len(reason) > 250 and string.sub(reason, 1, 250) or reason)
|
|
else
|
|
insert:Insert("reason", "no reason given")
|
|
end
|
|
|
|
insert:Insert("pos", 0)
|
|
insert:Insert("read", 1)
|
|
insert:Execute()
|
|
end
|
|
|
|
return self:SetCredits(self:GetCredits() - amount)
|
|
end
|
|
|
|
function ITEM:OnInstanced()
|
|
local cardNum = Schema:ZeroNumber(generateCardNumber(self:GetID()), 10)
|
|
self:SetData("cardNumber", string.utf8sub(cardNum, 1, 2).."-"..string.utf8sub(cardNum, 3, 6).."-"..string.utf8sub(cardNum, 7, 10)..
|
|
"-"..Schema:ZeroNumber(cardNum % 97, 2))
|
|
end
|
|
|
|
function ITEM:TransferData(newCard, wipe)
|
|
newCard:SetData("credits", self:GetData("credits", 0))
|
|
newCard:SetData("nextRationTime", self:GetData("nextRationTime", 0))
|
|
|
|
if (wipe) then
|
|
self:SetData("active", false)
|
|
self:SetData("credits", 0)
|
|
self:SetData("nextRationTime", 0)
|
|
end
|
|
end
|
|
|
|
function ITEM:OnRemoved()
|
|
if (self:GetData("active") != false) then
|
|
local ownerId = self:GetData("owner")
|
|
local data = {credits = self:GetData("credits", 0), ration = self:GetData("nextRationTime", 0)}
|
|
if (ix.char.loaded[ownerId]) then
|
|
ix.char.loaded[ownerId]:SetIdCardBackup(data)
|
|
ix.char.loaded[ownerId]:SetIdCard(nil)
|
|
end
|
|
|
|
local updateQuery = mysql:Update("ix_characters_data")
|
|
updateQuery:Update("data", util.TableToJSON(data))
|
|
updateQuery:Where("id", ownerId)
|
|
updateQuery:Where("key", "idCardBackup")
|
|
updateQuery:Execute()
|
|
|
|
local idCardQuery = mysql:Update("ix_characters")
|
|
idCardQuery.updateList[#idCardQuery.updateList + 1] = {"`idcard`", "NULL"}
|
|
idCardQuery:Where("id", ownerId)
|
|
idCardQuery:Where("schema", Schema and Schema.folder or "helix")
|
|
idCardQuery:Execute()
|
|
|
|
self:SetData("active", false)
|
|
end
|
|
end
|
|
|
|
function ITEM:LoadOwnerGenericData(callback, error, ...)
|
|
if (!callback) then return end
|
|
|
|
local arg = {...}
|
|
local queryObj = mysql:Select("ix_characters_data")
|
|
queryObj:Where("id", self:GetData("owner", 0))
|
|
queryObj:Where("key", "genericdata")
|
|
queryObj:Select("data")
|
|
queryObj:Callback(function(result)
|
|
if (!istable(result) or !result[1]) then
|
|
if (error) then
|
|
error(self, unpack(arg))
|
|
end
|
|
else
|
|
callback(self, util.JSONToTable(result[1].data or ""), unpack(arg))
|
|
end
|
|
end)
|
|
queryObj:Execute()
|
|
end
|
|
|
|
netstream.Hook("ixSetIDCardCredits", function(client, itemID, amount)
|
|
ix.item.instances[itemID]:SetCredits(amount)
|
|
end)
|
|
end
|
|
|
|
ITEM.functions.SetCredits = {
|
|
name = "Ustaw Kredyty",
|
|
icon = "icon16/money_add.png",
|
|
OnClick = function(itemTable)
|
|
local client = itemTable.player
|
|
Derma_StringRequest("Ustaw Kredyty", "Na jaką wartość chcesz ustawić kredyty?", itemTable:GetData("credits", 0), function(text)
|
|
local amount = tonumber(text)
|
|
|
|
if (amount and amount >= 0) then
|
|
netstream.Start("ixSetIDCardCredits", itemTable:GetID(), math.floor(amount))
|
|
else
|
|
client:NotifyLocalized("numNotValid")
|
|
end
|
|
end)
|
|
end,
|
|
OnRun = function(itemTable)
|
|
return false
|
|
end,
|
|
OnCanRun = function(itemTable)
|
|
if (IsValid(itemTable.entity)) then
|
|
return false
|
|
end
|
|
|
|
if (!CAMI.PlayerHasAccess(itemTable.player, "Helix - Set Credits")) then
|
|
return false
|
|
end
|
|
|
|
if (!itemTable:GetData("active", false)) then
|
|
return false
|
|
end
|
|
|
|
return true
|
|
end
|
|
}
|
|
|
|
ITEM.functions.insert = {
|
|
name = "Włóż CID",
|
|
icon = "icon16/add.png",
|
|
OnRun = function(itemTable)
|
|
local client = itemTable.player
|
|
local ent = client:GetEyeTrace().Entity
|
|
if (!ent.CIDInsert) or client:EyePos():DistToSqr(ent:GetPos()) > 62500 then
|
|
return false
|
|
end
|
|
|
|
local bSuccess, error = itemTable:Transfer(nil, nil, nil, client)
|
|
if (!bSuccess and isstring(error)) then
|
|
client:NotifyLocalized(error)
|
|
return false
|
|
else
|
|
client:EmitSound("npc/zombie/foot_slide" .. math.random(1, 3) .. ".wav", 75, math.random(90, 120), 1)
|
|
end
|
|
|
|
if bSuccess and IsEntity(bSuccess) then
|
|
ent:CIDInsert(bSuccess)
|
|
end
|
|
|
|
return false
|
|
end,
|
|
OnCanRun = function(itemTable)
|
|
local client = itemTable.player
|
|
|
|
if (!client:GetEyeTrace().Entity.CIDInsert) then
|
|
return false
|
|
end
|
|
|
|
if (!itemTable:GetData("active", false)) then
|
|
return false
|
|
end
|
|
|
|
return true
|
|
end
|
|
} |