mirror of
https://github.com/lifestorm/wnsrc.git
synced 2025-12-17 21:53:46 +03:00
127 lines
3.9 KiB
Lua
127 lines
3.9 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/
|
|
--]]
|
|
|
|
|
|
local netstream = netstream
|
|
local vgui = vgui
|
|
local hook = hook
|
|
local IsValid = IsValid
|
|
local pairs = pairs
|
|
local LocalPlayer = LocalPlayer
|
|
local Derma_Select = Derma_Select
|
|
local timer = timer
|
|
local Derma_Query = Derma_Query
|
|
|
|
local PLUGIN = PLUGIN
|
|
|
|
netstream.Hook("ixCreditTransactionLog", function(data, bShowReadButton)
|
|
local transactionUI = vgui.Create("ixCIDTransactionLog")
|
|
transactionUI:CreateContent(data, bShowReadButton)
|
|
end)
|
|
|
|
netstream.Hook("ixRequestCredits", function(client, amount, reason)
|
|
local clientName = hook.Run("GetCharacterName", client, "ic") or client:GetName()
|
|
if (IsValid(PLUGIN.posTransactionPanel)) then
|
|
client:NotifyLocalized("posTransOngoing")
|
|
netstream.Start("ixDenyCreditOperation")
|
|
return
|
|
end
|
|
|
|
local cards = {}
|
|
for _, v in pairs(LocalPlayer():GetCharacter():GetInventory():GetItemsByUniqueID("id_card")) do
|
|
cards[#cards + 1] = {
|
|
text = v:GetName(),
|
|
value = v
|
|
}
|
|
end
|
|
|
|
local amountPercent = amount / 100
|
|
local vat = math.Round(amountPercent * ix.config.Get("transactionVatPercent", 2))
|
|
|
|
local cardsCount = #cards
|
|
if (cardsCount > 1) then
|
|
PLUGIN.posTransactionPanel = Derma_Select("Credits Requested", clientName.." requests "..amount.." credit(s) from you for '"..reason.."'. Transaction vat: " .. vat .. " credit(s). What card will you choose to pay?",
|
|
cards, "Select ID Card",
|
|
"Confirm Operation", function(value, name)
|
|
netstream.Start("ixConfirmCreditOperation", value:GetID())
|
|
timer.Remove("ixPosTransactionQuery")
|
|
end, "Refuse Request", function()
|
|
netstream.Start("ixDenyCreditOperation")
|
|
timer.Remove("ixPosTransactionQuery")
|
|
end)
|
|
elseif (cardsCount == 1) then
|
|
PLUGIN.posTransactionPanel = Derma_Query(clientName.." requests "..amount.." credit(s) from you for '"..reason.."'. Transaction vat: " .. vat .. " credit(s). Are you confirming this transaction?", "Credits Requested",
|
|
"Confirm Operation", function()
|
|
netstream.Start("ixConfirmCreditOperation", cards[1].value:GetID())
|
|
timer.Remove("ixPosTransactionQuery")
|
|
end, "Refuse Request", function()
|
|
netstream.Start("ixDenyCreditOperation")
|
|
timer.Remove("ixPosTransactionQuery")
|
|
end)
|
|
else
|
|
LocalPlayer():NotifyLocalized("You have received a credits request, but you do not have an ID card to perform it.")
|
|
netstream.Start("ixDenyCreditOperation")
|
|
return
|
|
end
|
|
|
|
timer.Create("ixPosTransactionQuery", 14, 1, function()
|
|
client:NotifyLocalized("posTransExpired")
|
|
PLUGIN.posTransactionPanel:Remove()
|
|
netstream.Start("ixDenyCreditOperation")
|
|
end)
|
|
end)
|
|
|
|
netstream.Hook("ixSelectCID", function(hasFail)
|
|
local cidSelector = vgui.Create("CIDSelector")
|
|
|
|
if (hasFail) then
|
|
cidSelector.ExitCallback = function()
|
|
netstream.Start("ixSelectCIDFail")
|
|
end
|
|
end
|
|
|
|
cidSelector.SelectCallback = function(cardID)
|
|
netstream.Start("ixSelectCIDSuccess", cardID)
|
|
end
|
|
end)
|
|
|
|
net.Receive("changeLockAccess", function()
|
|
local entity = net.ReadEntity()
|
|
|
|
ix.menu.Open({["Set Member Access"] = true, ["Set Management Access"] = true}, entity)
|
|
end)
|
|
|
|
net.Receive("changeLockAccessCmru", function()
|
|
local entity = net.ReadEntity()
|
|
|
|
local accessLevels = {}
|
|
for i=1, 5 do
|
|
accessLevels["Set Level "..tostring(i).." Access"] = true
|
|
end
|
|
ix.menu.Open(accessLevels, entity)
|
|
end)
|
|
|
|
net.Receive("changeLockAccessCon", function()
|
|
local entity = net.ReadEntity()
|
|
|
|
local accessLevels = {}
|
|
for i=1, 5 do
|
|
accessLevels["Set Level "..tostring(i).." Access"] = true
|
|
end
|
|
ix.menu.Open(accessLevels, entity)
|
|
end)
|
|
|
|
function PLUGIN:CreateExtraCharacterTabInfo(character, informationSubframe, CreatePart)
|
|
local citizenID = LocalPlayer():GetCharacter():GetCid() or "N/A"
|
|
|
|
local cidPanel = informationSubframe:Add("Panel")
|
|
CreatePart(cidPanel, "Kimlik No:", citizenID, "cid")
|
|
end
|