Upload

gamemodes/darkrp/plugins/cid/items/sh_cmru_card.lua

@@ -0,0 +1,106 @@
+--[[
+| 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 = "CMRU Access Card"
+ITEM.model = Model("models/n7/props/n7_cid_card.mdl")
+ITEM.description = "A Civil Medical & Research Union Keycard."
+ITEM.category = "Combine"
+ITEM.skin = 2
+ITEM.iconCam = {
+	pos = Vector(-509.64, -427.61, 310.24),
+	ang = Angle(25, 400, 0),
+	fov = 0.59
+}
+
+function ITEM:GetName()
+	local accessLevel = self:GetData("accessLevel", 1)
+
+	return "CMRU Level " .. accessLevel .. " Access Keycard"
+end
+
+function ITEM:GetDescription()
+	local idCard = ix.item.instances[self:GetData("cardID")]
+	return idCard and string.format(self.description.."\n\nCurrently bound to identity card #%s.", idCard:GetData("cardNumber")) or
+		(self:GetData("cardID") and self.description.."\n\nCurrently bound." or self.description)
+end
+
+ITEM.functions.Bind = {
+	name = "Bind ID Card",
+	icon = "icon16/vcard_edit.png",
+	OnClick = function(itemTable)
+		local cards = {}
+
+		for _, v in pairs(LocalPlayer():GetCharacter():GetInventory():GetItemsByUniqueID("id_card")) do
+			table.insert(cards, {
+				text = v:GetName(),
+				value = v
+			})
+		end
+
+		local cardsCount = table.Count(cards)
+		if (cardsCount > 1) then
+			Derma_Select("Bind ID Card to CMRU Card", "Please select a ID card to bind to this CMRU Card:",
+				cards, "Select ID card",
+				"Confirm Operation", function(value, name)
+					netstream.Start("ixBindCMRUCard", itemTable:GetID(), value:GetID())
+				end, "Cancel")
+		elseif (cardsCount == 1) then
+			Derma_Query("Are you sure you wish to bind your ID to this CMRU Card?", "Bind ID Card to CMRU Card",
+			"Confirm Operation", function()
+				netstream.Start("ixBindCMRUCard", itemTable:GetID(), cards[1].value:GetID())
+			end, "Cancel")
+		else
+			LocalPlayer():NotifyLocalized("You do not have ID card to bind to this CMRU Card.")
+		end
+	end,
+	OnRun = function(itemTable)
+		return false
+	end,
+	OnCanRun = function(itemTable)
+		if (IsValid(itemTable.entity)) then
+			return false
+		end
+
+		if (!IsValid(itemTable.player)) then
+			return false
+		end
+
+		local inventory = itemTable.player:GetCharacter():GetInventory()
+
+		if (!inventory:HasItem("id_card")) then
+			return false
+		end
+
+		if (itemTable:GetData("cardID")) then
+			return false
+		end
+
+		return true
+	end
+}
+
+ITEM.functions.SetAccessLevel = {
+	name = "Toggle Card Access Level",
+	icon = "icon16/vcard_add.png",
+	OnRun = function(itemTable)
+		local client = itemTable.player
+		local accessLevel = itemTable:GetData("accessLevel", 1)
+
+		accessLevel = accessLevel != 5 and accessLevel + 1 or 1
+		itemTable:SetData("accessLevel", accessLevel)
+		client:NotifyLocalized("You have set this card's Access Level to Access Level " .. accessLevel .. ".")
+
+		return false
+	end,
+	OnCanRun = function(itemTable)
+		return (!IsValid(itemTable.entity) and IsValid(itemTable.player) and (itemTable.player:Team() == FACTION_ADMIN or itemTable.player:IsCombine() or itemTable.player:GetCharacter():HasFlags("M"))) == true
+	end
+}

gamemodes/darkrp/plugins/cid/items/sh_con_card.lua

@@ -0,0 +1,106 @@
+--[[
+| 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 = "Conscript Access Card"
+ITEM.model = Model("models/n7/props/n7_cid_card.mdl")
+ITEM.description = "A Conscript Access Keycard."
+ITEM.category = "Combine"
+ITEM.skin = 2
+ITEM.iconCam = {
+	pos = Vector(-509.64, -427.61, 310.24),
+	ang = Angle(25, 400, 0),
+	fov = 0.59
+}
+
+function ITEM:GetName()
+	local accessLevel = self:GetData("accessLevel", 1)
+
+	return "Conscript Level " .. accessLevel .. " Access Keycard"
+end
+
+function ITEM:GetDescription()
+	local idCard = ix.item.instances[self:GetData("cardID")]
+	return idCard and string.format(self.description.."\n\nCurrently bound to identity card #%s.", idCard:GetData("cardNumber")) or
+		(self:GetData("cardID") and self.description.."\n\nCurrently bound." or self.description)
+end
+
+ITEM.functions.Bind = {
+	name = "Bind ID Card",
+	icon = "icon16/vcard_edit.png",
+	OnClick = function(itemTable)
+		local cards = {}
+
+		for _, v in pairs(LocalPlayer():GetCharacter():GetInventory():GetItemsByUniqueID("id_card")) do
+			table.insert(cards, {
+				text = v:GetName(),
+				value = v
+			})
+		end
+
+		local cardsCount = table.Count(cards)
+		if (cardsCount > 1) then
+			Derma_Select("Bind ID Card to Conscript Card", "Please select a ID card to bind to this Conscript Card:",
+				cards, "Select ID card",
+				"Confirm Operation", function(value, name)
+					netstream.Start("ixBindConCard", itemTable:GetID(), value:GetID())
+				end, "Cancel")
+		elseif (cardsCount == 1) then
+			Derma_Query("Are you sure you wish to bind your ID to this Conscript Card?", "Bind ID Card to Conscript Card",
+			"Confirm Operation", function()
+				netstream.Start("ixBindConCard", itemTable:GetID(), cards[1].value:GetID())
+			end, "Cancel")
+		else
+			LocalPlayer():NotifyLocalized("You do not have ID card to bind to this Conscript Card.")
+		end
+	end,
+	OnRun = function(itemTable)
+		return false
+	end,
+	OnCanRun = function(itemTable)
+		if (IsValid(itemTable.entity)) then
+			return false
+		end
+
+		if (!IsValid(itemTable.player)) then
+			return false
+		end
+
+		local inventory = itemTable.player:GetCharacter():GetInventory()
+
+		if (!inventory:HasItem("id_card")) then
+			return false
+		end
+
+		if (itemTable:GetData("cardID")) then
+			return false
+		end
+
+		return true
+	end
+}
+
+ITEM.functions.SetAccessLevel = {
+	name = "Toggle Card Access Level",
+	icon = "icon16/vcard_add.png",
+	OnRun = function(itemTable)
+		local client = itemTable.player
+		local accessLevel = itemTable:GetData("accessLevel", 1)
+
+		accessLevel = accessLevel != 5 and accessLevel + 1 or 1
+		itemTable:SetData("accessLevel", accessLevel)
+		client:NotifyLocalized("You have set this card's Access Level to Access Level " .. accessLevel .. ".")
+
+		return false
+	end,
+	OnCanRun = function(itemTable)
+		return (!IsValid(itemTable.entity) and IsValid(itemTable.player) and (itemTable.player:Team() == FACTION_ADMIN or itemTable.player:IsCombine() or itemTable.player:GetCharacter():HasFlags("M"))) == true
+	end
+}

gamemodes/darkrp/plugins/cid/items/sh_cwu_card.lua

@@ -0,0 +1,181 @@
+--[[
+| 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 = "CWU Access Card"
+ITEM.model = Model("models/n7/props/n7_cid_card.mdl")
+ITEM.description = "A Civil Workers' Union Access Keycard."
+ITEM.category = "Combine"
+ITEM.skin = 2
+ITEM.iconCam = {
+	pos = Vector(-509.64, -427.61, 310.24),
+	ang = Angle(25, 400, 0),
+	fov = 0.59
+}
+
+function ITEM:GetName()
+	local accessLevel = self:GetData("accessLevel", "Member Access")
+
+	return "CWU " .. accessLevel .. " Keycard"
+end
+
+function ITEM:GetFactionInfo()
+	return self:GetData("faction", false) and ix.factionBudget.list[self:GetData("faction")] and "Binded to: " .. ix.factionBudget.list[self:GetData("faction")].name or "This card is not binded to any faction."
+end
+
+function ITEM:GetColorAppendix()
+    local info = {["green"] = self:GetFactionInfo()}
+
+    return info
+end
+
+function ITEM:GetDescription()
+	local idCard = ix.item.instances[self:GetData("cardID")]
+	return idCard and string.format(self.description.."\n\nCurrently bound to identity card #%s.", idCard:GetData("cardNumber")) or
+		(self:GetData("cardID") and self.description.."\n\nCurrently bound." or self.description)
+end
+
+ITEM.functions.Bind = {
+	name = "Bind ID Card",
+	icon = "icon16/vcard_edit.png",
+	OnClick = function(itemTable)
+		local cards = {}
+
+		for _, v in pairs(LocalPlayer():GetCharacter():GetInventory():GetItemsByUniqueID("id_card")) do
+			table.insert(cards, {
+				text = v:GetName(),
+				value = v
+			})
+		end
+
+		local cardsCount = table.Count(cards)
+		if (cardsCount > 1) then
+			Derma_Select("Bind ID Card to CWU Card", "Please select a ID card to bind to this CWU Card:",
+				cards, "Select ID card",
+				"Confirm Operation", function(value, name)
+					netstream.Start("ixBindCWUCard", itemTable:GetID(), value:GetID())
+				end, "Cancel")
+		elseif (cardsCount == 1) then
+			Derma_Query("Are you sure you wish to bind your ID to this CWU Card?", "Bind ID Card to CWU Card",
+			"Confirm Operation", function()
+				netstream.Start("ixBindCWUCard", itemTable:GetID(), cards[1].value:GetID())
+			end, "Cancel")
+		else
+			LocalPlayer():NotifyLocalized("You do not have ID card to bind to this CWU Card.")
+		end
+	end,
+	OnRun = function(itemTable)
+		return false
+	end,
+	OnCanRun = function(itemTable)
+		if (IsValid(itemTable.entity)) then
+			return false
+		end
+
+		if (!IsValid(itemTable.player)) then
+			return false
+		end
+
+		local inventory = itemTable.player:GetCharacter():GetInventory()
+
+		if (!inventory:HasItem("id_card")) then
+			return false
+		end
+
+		if (itemTable:GetData("cardID")) then
+			return false
+		end
+
+		return true
+	end
+}
+
+ITEM.functions.SetAccessLevel = {
+	name = "Toggle Card Access Level",
+	icon = "icon16/vcard_add.png",
+	isMulti = true,
+	multiOptions = function(item, player)
+		local keys = table.GetKeys(ix.city.cwuAccess)
+		local accessLevels = {}
+		for _, accessLevel in pairs(keys) do
+			accessLevels[#accessLevels + 1] = {name = accessLevel, data = {aLevel = accessLevel .. " Access"}}
+		end
+
+		return accessLevels
+	end,
+	OnRun = function(itemTable, accessLevel)
+		local client = itemTable.player
+
+		itemTable:SetData("accessLevel", accessLevel.aLevel)
+		client:NotifyLocalized("You have set this card's Access Level to " .. accessLevel.aLevel .. ".")
+
+		return false
+	end,
+	OnCanRun = function(itemTable)
+		return (!IsValid(itemTable.entity) and IsValid(itemTable.player) and (itemTable.player:Team() == FACTION_ADMIN or itemTable.player:IsCombine() or itemTable.player:GetCharacter():HasFlags("M"))) == true
+	end
+}
+
+ITEM.functions.SetFaction = {
+	name = "Set Card Faction",
+	icon = "icon16/vcard_add.png",
+	isMulti = true,
+	multiOptions = function(item, player)
+		local factions = {}
+		for id, faction in pairs(ix.factionBudget.list) do
+			factions[#factions + 1] = {name = faction.name, data = faction}
+		end
+
+		return factions
+	end,
+	OnRun = function(item, data)
+		item:SetData("faction", data.id)
+
+		return false
+	end,
+	OnCanRun = function(itemTable)
+		return (!IsValid(itemTable.entity) and IsValid(itemTable.player) and (itemTable.player:Team() == FACTION_ADMIN or itemTable.player:IsCombine() or itemTable.player:GetCharacter():HasFlags("M"))) == true
+	end
+}
+
+ITEM.functions.insert = {
+	name = "Insert card",
+	icon = "icon16/add.png",
+	OnRun = function(itemTable)
+		local client = itemTable.player
+		local ent = client:GetEyeTrace().Entity
+		if (!ent.CWUInsert) 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:CWUInsert(bSuccess)
+		end
+
+		return false
+	end,
+	OnCanRun = function(itemTable)
+		local client = itemTable.player
+
+		if (!client:GetEyeTrace().Entity.CWUInsert) then
+			return false
+		end
+
+		return true
+	end
+}

gamemodes/darkrp/plugins/cid/items/sh_dob_card.lua

@@ -0,0 +1,106 @@
+--[[
+| 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 = "DOB Access Card"
+ITEM.model = Model("models/n7/props/n7_cid_card.mdl")
+ITEM.description = "A Department of Business Access Keycard."
+ITEM.category = "Combine"
+ITEM.skin = 2
+ITEM.iconCam = {
+	pos = Vector(-509.64, -427.61, 310.24),
+	ang = Angle(25, 400, 0),
+	fov = 0.59
+}
+
+function ITEM:GetName()
+	local accessLevel = self:GetData("accessLevel", "Member Access")
+
+	return "DOB " .. accessLevel .. " Keycard"
+end
+
+function ITEM:GetDescription()
+	local idCard = ix.item.instances[self:GetData("cardID")]
+	return idCard and string.format(self.description.."\n\nCurrently bound to identity card #%s.", idCard:GetData("cardNumber")) or
+		(self:GetData("cardID") and self.description.."\n\nCurrently bound." or self.description)
+end
+
+ITEM.functions.Bind = {
+	name = "Bind ID Card",
+	icon = "icon16/vcard_edit.png",
+	OnClick = function(itemTable)
+		local cards = {}
+
+		for _, v in pairs(LocalPlayer():GetCharacter():GetInventory():GetItemsByUniqueID("id_card")) do
+			table.insert(cards, {
+				text = v:GetName(),
+				value = v
+			})
+		end
+
+		local cardsCount = table.Count(cards)
+		if (cardsCount > 1) then
+			Derma_Select("Bind ID Card to DOB Card", "Please select a ID card to bind to this DOB Card:",
+				cards, "Select ID card",
+				"Confirm Operation", function(value, name)
+					netstream.Start("ixBindDOBCard", itemTable:GetID(), value:GetID())
+				end, "Cancel")
+		elseif (cardsCount == 1) then
+			Derma_Query("Are you sure you wish to bind your ID to this DOB Card?", "Bind ID Card to DOB Card",
+			"Confirm Operation", function()
+				netstream.Start("ixBindDOBCard", itemTable:GetID(), cards[1].value:GetID())
+			end, "Cancel")
+		else
+			LocalPlayer():NotifyLocalized("You do not have ID card to bind to this DOB Card.")
+		end
+	end,
+	OnRun = function(itemTable)
+		return false
+	end,
+	OnCanRun = function(itemTable)
+		if (IsValid(itemTable.entity)) then
+			return false
+		end
+
+		if (!IsValid(itemTable.player)) then
+			return false
+		end
+
+		local inventory = itemTable.player:GetCharacter():GetInventory()
+
+		if (!inventory:HasItem("id_card")) then
+			return false
+		end
+
+		if (itemTable:GetData("cardID")) then
+			return false
+		end
+
+		return true
+	end
+}
+
+ITEM.functions.SetAccessLevel = {
+	name = "Toggle Card Access Level",
+	icon = "icon16/vcard_add.png",
+	OnRun = function(itemTable)
+		local client = itemTable.player
+		local accessLevel = itemTable:GetData("accessLevel", "Member Access")
+		local target = accessLevel == "Member Access" and "Management Access" or "Member Access"
+
+		itemTable:SetData("accessLevel", target)
+		client:NotifyLocalized("You have set this card's Access Level to " .. target .. ".")
+
+		return false
+	end,
+	OnCanRun = function(itemTable)
+		return (!IsValid(itemTable.entity) and IsValid(itemTable.player) and (itemTable.player:Team() == FACTION_ADMIN or itemTable.player:IsCombine() or itemTable.player:GetCharacter():HasFlags("M"))) == true
+	end
+}

gamemodes/darkrp/plugins/cid/items/sh_fake_id_card.lua

@@ -0,0 +1,66 @@
+--[[
+| 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 = "#00000 Kimlik Kartı"
+ITEM.model = Model("models/n7/props/n7_cid_card.mdl")
+ITEM.description = "Vatandaş kimlik kartı, %s kişisine atanmış, CID #%s.\n\nKart Numarası: %s\nGenetik açıklama:\n%s.\n\nBu kart Combine Sivil Yönetimi'nin mülkiyetindedir. Yasak sahiplik ve kimlik sahtekarlığı yasa tarafından cezalandırılır ve Sivil Koruma tarafından kovuşturulur. Bulunursa, lütfen bu kartı derhal en yakın Sivil Koruma ekibine iade edin."
+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)
+		surface.SetDrawColor(110, 255, 110, 100)
+		surface.DrawRect(w - 14, h - 14, 8, 8)
+	end
+end
+
+function ITEM:GetName()
+	return "#"  ..  self:GetData("cid", "00000")  ..  " Kimlik Kartı"
+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 EYES | N/A HAIR"))
+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: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

gamemodes/darkrp/plugins/cid/items/sh_fake_id_card_creator.lua

@@ -0,0 +1,52 @@
+--[[
+| 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 = "Sahte Kimlik Kartı Oluşturma Cihazı"
+ITEM.model = Model("models/props_lab/reciever01a.mdl")
+ITEM.description = "Boş Kimlik Kartlarını gerçek, işlevsel kartlar gibi görünecek şekilde değiştirmek için kullanılan bir cihaz."
+ITEM.category = "Tools"
+
+ITEM.functions.CreateID = {
+	name = "Sahte Kimlik Oluşturma",
+	icon = "icon16/vcard.png",
+	OnRun = function(itemTable)
+		local client = itemTable.player
+
+		client:RequestString("Name", "Bu sahte kimliğin verileceği kişinin adını girin", function(name)
+			client:RequestString("CID", "Bu sahte kimliğin ait olacağı kişinin CID'sini girin", function(cid)
+				client:RequestString("Generic Description", "Bu sahte kimliğin ait olacağı kişinin genel tanımını girin", function(desc)
+					local inventory = client:GetCharacter():GetInventory()
+					local card = inventory:HasItem("id_card_blank")
+
+					if (!card) then
+						client:Notify("Sahte bir kimlik kartına dönüştürmek için Boş Kimlik Kartına ihtiyacınız var!")
+						client:EmitSound("buttons/combine_button_locked.wav")
+
+						return false
+					end
+
+					card:Remove()
+
+					inventory:Add("fake_id_card", 1, {
+						name = name,
+						cid = cid,
+						geneticDesc = desc
+					})
+
+					client:Notify("Sahte Kimlik Kartı oluşturuldu.")
+					client:EmitSound("ambient/machines/combine_terminal_idle2.wav")
+				end, "YOUNG ADULT/ADULT/MIDDLE-AGED/ELDERLY | 0\'00\" | [COLOR] EYES | [COLOR] HAIR")
+			end, "00000")
+		end, "")
+
+		return false
+	end
+}

gamemodes/darkrp/plugins/cid/items/sh_id_card.lua

@@ -0,0 +1,289 @@
+--[[
+| 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 = "#00000 Kimlik Kartı"
+ITEM.model = Model("models/n7/props/n7_cid_card.mdl")
+ITEM.description = "Vatandaş kimlik kartı, %s kişisine atanmış, CID #%s.\n\nKart Numarası: %s\nGenetik açıklama:\n%s.\n\nBu kart Combine Sivil Yönetimi'nin mülkiyetindedir. Yasak sahiplik ve kimlik sahtekarlığı yasa tarafından cezalandırılır ve Sivil Koruma tarafından dava edilir. Bulunursa, lütfen bu kartı derhal en yakın Sivil Koruma ekibine teslim edin."
+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 "#" .. self:GetData("cid", "00000") .. " Kimlik Kartı"
+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 EYES | N/A HAIR"))
+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", "UNKNOWN"))
+				insert:Insert("receiver_cid", self:GetData("cid", "INVALID"))
+				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", "UNKNOWN"))
+				insert:Insert("sender_cid", self:GetData("cid", "INVALID"))
+				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 = "Set Credits",
+	icon = "icon16/money_add.png",
+	OnClick = function(itemTable)
+		local client = itemTable.player
+		Derma_StringRequest("Set Credits", "What do you want to set the credits to?", 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 = "Insert 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
+}

gamemodes/darkrp/plugins/cid/items/sh_id_card_blank.lua

@@ -0,0 +1,19 @@
+--[[
+| 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 = "Boş CID Kartı"
+ITEM.model = Model("models/n7/props/n7_cid_card.mdl")
+ITEM.description = "Herhangi bir veri olmadan boş bir vatandaş kimlik kartı."
+ITEM.category = "Combine"
+ITEM.iconCam = {
+	pos = Vector(-509.64, -427.61, 310.24),
+	ang = Angle(25, 400, 0),
+	fov = 0.59
+}

gamemodes/darkrp/plugins/cid/items/sh_id_card_creator.lua

@@ -0,0 +1,114 @@
+--[[
+| 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 = "Identity Card Creation Device"
+ITEM.model = Model("models/props_lab/reciever01d.mdl")
+ITEM.description = "A device used to bind blank Identity Cards to a specific person."
+ITEM.category = "Combine"
+ITEM.functions.CreateIDTarget = {
+	name = "Create Identity Card for target",
+	icon = "icon16/vcard_add.png",
+	OnRun = function(itemTable)
+		local client = itemTable.player
+
+		if (ix.config.Get("creditsNoConnection")) then
+			client:EmitSound("hl1/fvox/buzz.wav", 60, 100, 0.5)
+			return false
+		end
+
+		if (itemTable:CheckAccess(client, itemTable) == false) then
+			client:EmitSound("buttons/combine_button_locked.wav", 60, 100, 0.5)
+			return false
+		end
+
+		local data = {}
+			data.start = client:GetShootPos()
+			data.endpos = data.start + client:GetAimVector() * 96
+			data.filter = client
+		local target = util.TraceLine(data).Entity
+
+		if (IsValid(target) and target:IsPlayer() and target:GetCharacter()) then
+			client:SetAction("@scanning", 5)
+			client:EmitSound("buttons/button18.wav", 60, 100, 0.5)
+			client:DoStaredAction(target, function()
+				itemTable:CreateIDCard(client, target)
+			end, 5, function()
+				client:SetAction()
+				client:EmitSound("buttons/combine_button_locked.wav", 60, 100, 0.5)
+			end)
+		else
+			client:NotifyLocalized("plyNotValid")
+		end
+
+		return false
+	end,
+	OnCanRun = function(itemTable)
+		return !IsValid(itemTable.entity)
+	end
+}
+
+ITEM.functions.CreateIDSelf = {
+	name = "Create Identity Card for yourself",
+	icon = "icon16/vcard.png",
+	OnRun = function(itemTable)
+		local client = itemTable.player
+
+		if (ix.config.Get("creditsNoConnection")) then
+			client:EmitSound("hl1/fvox/buzz.wav", 60, 100, 0.5)
+			return false
+		end
+
+		if (itemTable:CheckAccess(client, itemTable) == false) then
+			client:EmitSound("buttons/combine_button_locked.wav", 60, 100, 0.5)
+			return false
+		end
+
+		client:SetAction("@scanning", 5, function()
+			itemTable:CreateIDCard(client, client)
+		end)
+		client:EmitSound("buttons/button18.wav", 60, 100, 0.5)
+		return false
+	end
+}
+
+function ITEM:CreateIDCard(client, target)
+	local character = target:GetCharacter()
+	local cid = character:GetCid()
+
+	if (!cid) then
+		client:NotifyLocalized("idNotFound")
+		client:EmitSound("buttons/combine_button_locked.wav", 60, 100, 0.5)
+		return
+	end
+
+	local inventory = client:GetCharacter():GetInventory()
+	local blankCard = inventory:HasItem("id_card_blank")
+
+	if (!blankCard) then
+		client:NotifyLocalized("idNoBlank")
+		client:EmitSound("buttons/combine_button_locked.wav", 60, 100, 0.5)
+		return
+	end
+
+	blankCard:Remove()
+	character:CreateIDCard()
+	client:EmitSound("buttons/button4.wav", 60, 100, 0.5)
+	client:NotifyLocalized("idCardAdded")
+
+	ix.combineNotify:AddNotification("NTC:// Identification Card #" .. character:GetCid() .. " created by " .. client:GetCombineTag())
+end
+
+function ITEM:CheckAccess(client, itemTable)
+	if (!client:HasActiveCombineSuit() and !ix.faction.Get(client:Team()).allowCIDCreator) then
+		client:NotifyLocalized("idNotAllowed")
+		return false
+	end
+end

gamemodes/darkrp/plugins/cid/items/sh_moe_card.lua

@@ -0,0 +1,106 @@
+--[[
+| 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 = "MOE Access Card"
+ITEM.model = Model("models/n7/props/n7_cid_card.mdl")
+ITEM.description = "A Ministry of Enlightenment Access Keycard."
+ITEM.category = "Combine"
+ITEM.skin = 2
+ITEM.iconCam = {
+	pos = Vector(-509.64, -427.61, 310.24),
+	ang = Angle(25, 400, 0),
+	fov = 0.59
+}
+
+function ITEM:GetName()
+	local accessLevel = self:GetData("accessLevel", "Member Access")
+
+	return "MOE " .. accessLevel .. " Keycard"
+end
+
+function ITEM:GetDescription()
+	local idCard = ix.item.instances[self:GetData("cardID")]
+	return idCard and string.format(self.description.."\n\nCurrently bound to identity card #%s.", idCard:GetData("cardNumber")) or
+		(self:GetData("cardID") and self.description.."\n\nCurrently bound." or self.description)
+end
+
+ITEM.functions.Bind = {
+	name = "Bind ID Card",
+	icon = "icon16/vcard_edit.png",
+	OnClick = function(itemTable)
+		local cards = {}
+
+		for _, v in pairs(LocalPlayer():GetCharacter():GetInventory():GetItemsByUniqueID("id_card")) do
+			table.insert(cards, {
+				text = v:GetName(),
+				value = v
+			})
+		end
+
+		local cardsCount = table.Count(cards)
+		if (cardsCount > 1) then
+			Derma_Select("Bind ID Card to MOE Card", "Please select a ID card to bind to this MOE Card:",
+				cards, "Select ID card",
+				"Confirm Operation", function(value, name)
+					netstream.Start("ixBindMOECard", itemTable:GetID(), value:GetID())
+				end, "Cancel")
+		elseif (cardsCount == 1) then
+			Derma_Query("Are you sure you wish to bind your ID to this MOE Card?", "Bind ID Card to MOE Card",
+			"Confirm Operation", function()
+				netstream.Start("ixBindMOECard", itemTable:GetID(), cards[1].value:GetID())
+			end, "Cancel")
+		else
+			LocalPlayer():NotifyLocalized("You do not have ID card to bind to this MOE Card.")
+		end
+	end,
+	OnRun = function(itemTable)
+		return false
+	end,
+	OnCanRun = function(itemTable)
+		if (IsValid(itemTable.entity)) then
+			return false
+		end
+
+		if (!IsValid(itemTable.player)) then
+			return false
+		end
+
+		local inventory = itemTable.player:GetCharacter():GetInventory()
+
+		if (!inventory:HasItem("id_card")) then
+			return false
+		end
+
+		if (itemTable:GetData("cardID")) then
+			return false
+		end
+
+		return true
+	end
+}
+
+ITEM.functions.SetAccessLevel = {
+	name = "Toggle Card Access Level",
+	icon = "icon16/vcard_add.png",
+	OnRun = function(itemTable)
+		local client = itemTable.player
+		local accessLevel = itemTable:GetData("accessLevel", "Member Access")
+		local target = accessLevel == "Member Access" and "Management Access" or "Member Access"
+
+		itemTable:SetData("accessLevel", target)
+		client:NotifyLocalized("You have set this card's Access Level to " .. target .. ".")
+
+		return false
+	end,
+	OnCanRun = function(itemTable)
+		return (!IsValid(itemTable.entity) and IsValid(itemTable.player) and (itemTable.player:Team() == FACTION_ADMIN or itemTable.player:IsCombine() or itemTable.player:GetCharacter():HasFlags("M"))) == true
+	end
+}

gamemodes/darkrp/plugins/cid/items/sh_pos_terminal.lua

@@ -0,0 +1,226 @@
+--[[
+| 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 PLUGIN = PLUGIN
+
+ITEM.name = "POS Cihazı"
+ITEM.model = Model("models/willardnetworks/props/posterminal.mdl")
+ITEM.description = "Birinin başka bir karta yatırılmak üzere başka bir kişiden para talep etmesini sağlayan bir cihaz."
+ITEM.category = "Combine"
+
+function ITEM:GetDescription()
+  local idCard = ix.item.instances[self:GetData("cardID")]
+  return idCard and string.format(self.description.."\n\nŞu anda #%s kimlik kartına bağlı.", idCard:GetData("cardNumber")) or self.description
+end
+
+if (SERVER) then
+	function ITEM:AddTransactionID(id)
+		local ids = self:GetData("transactionIDs", {})
+		ids[#ids + 1] = id
+		self:SetData("transactionIDs", ids, false, false, true)
+	end
+end
+
+ITEM.functions.RequestCredits = {
+	name = "Kredi talep et",
+	icon = "icon16/money.png",
+	OnClick = function(itemTable)
+		local client = itemTable.player
+
+		if (ix.config.Get("creditsNoConnection")) then
+			client:EmitSound("hl1/fvox/buzz.wav", 60, 100, 0.5)
+			client:NotifyLocalized("errorNoConnection")
+			return false
+		end
+
+		Derma_StringRequest("Kredi talep et", "Kaç kredi talep etmek istiyorsunuz?", itemTable:GetData("lastAmount", 0), function(text)
+			local amount = tonumber(text)
+
+			if (amount) then
+				Derma_StringRequest("Kredi talep et - YORUM", "Lütfen işlemin nedenini belirtin:", "", function(reason)
+					if (text == "") then
+						client:NotifyLocalized("reasonNotValid")
+
+						return
+					end
+
+					netstream.Start("ixRequestCredits", itemTable:GetID(), math.floor(amount), reason)
+				end)
+			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 (!itemTable:GetData("cardID", false)) then
+			return false
+		end
+
+		return true
+	end
+}
+
+ITEM.functions.Bind = {
+	name = "Kimlik Kartını Bağla",
+	icon = "icon16/vcard_edit.png",
+	OnClick = function(itemTable)
+		local client = itemTable.player
+
+		if (ix.config.Get("creditsNoConnection")) then
+			client:EmitSound("hl1/fvox/buzz.wav", 60, 100, 0.5)
+			client:NotifyLocalized("errorNoConnection")
+			return false
+		end
+
+		local cards = {}
+
+		for _, v in pairs(client:GetCharacter():GetInventory():GetItemsByUniqueID("id_card")) do
+			table.insert(cards, {
+				text = v:GetName(),
+				value = v
+			})
+		end
+
+		local cardsCount = table.Count(cards)
+		if (cardsCount > 1) then
+			Derma_Select("Kimlik Kartını POS'a Bağla", "Lütfen bu POS terminaline bağlanmak için bir kimlik kartı seçin:",
+				cards, "Kimlik kartı seç",
+				"İşlemi Onayla", function(value, name)
+					netstream.Start("ixBindTerminal", itemTable:GetID(), value:GetID())
+				end, "İptal")
+		elseif (cardsCount == 1) then
+			Derma_Query("Kimliğinizi bu POS terminaline bağlamak istediğinizden emin misiniz?", "Kimlik Kartını POS'a Bağla",
+			"İşlemi Onayla", function()
+				netstream.Start("ixBindTerminal", itemTable:GetID(), cards[1].value:GetID())
+			end, "İptal")
+		else
+			client:NotifyLocalized("Bu terminale bağlanmak için kimlik kartınız yok.")
+		end
+	end,
+	OnRun = function(itemTable)
+		return false
+	end,
+	OnCanRun = function(itemTable)
+		if (IsValid(itemTable.entity)) then return false end
+		if (!IsValid(itemTable.player)) then return false end
+
+		if (itemTable:GetData("cardIDLock", false)) then return false end
+
+		local inventory = itemTable.player:GetCharacter():GetInventory()
+		if (!inventory:HasItem("id_card")) then return false end
+		if (!itemTable:GetData("cardID", false)) then return true end
+
+		if (inventory:GetItemCount("id_card") == 1 and inventory:GetItemByID(itemTable:GetData("cardID"))) then
+			return false
+		end
+
+		return true
+	end
+}
+
+ITEM.functions.ShowLog = {
+	name = "İşlemleri Göster",
+	icon = "icon16/eye.png",
+	OnRun = function(itemTable, data)
+		local inventory = itemTable.player:GetCharacter():GetInventory()
+		PLUGIN:SelectTransactions(itemTable.player, "pos", itemTable:GetID(), data and data[1], itemTable:GetData("cardIDLock", false) and !inventory:GetItemByID(itemTable:GetData("cardID")))
+
+		return false
+	end,
+	isMulti = true,
+	multiOptions = function(item, player)
+		local options = {{name = "1 day", data = {1}}}
+
+        for i = 2, 6 do
+            options[#options + 1] = {name = i.." days", data = {i}}
+        end
+		options[#options + 1] = {name = "1 week", data = {7}}
+		options[#options + 1] = {name = "2 week", data = {14}}
+		options[#options + 1] = {name = "1 month", data = {30}}
+
+		options[#options + 1] = {name = "other", data = {-1}, OnClick = function(itemTable)
+			Derma_StringRequest("İşlem Günlüğü Günleri", "Kaç günlük işlem günlüklerini görmek istiyorsunuz?", "7", function(text)
+				local amount = tonumber(text)
+				if (!amount or amount <= 0) then return end
+
+				net.Start("ixInventoryAction")
+					net.WriteString("ShowLog")
+					net.WriteUInt(itemTable.id, 32)
+					net.WriteUInt(itemTable.invID, 32)
+					net.WriteTable({amount})
+				net.SendToServer()
+			end)
+
+			return false
+		end}
+
+        return options
+	end,
+	OnCanRun = function(itemTable)
+		if (IsValid(itemTable.entity)) then return false end
+		if (!IsValid(itemTable.player)) then return false end
+		if (!itemTable:GetData("cardID", false)) then return false end
+
+		return true
+	end
+}
+
+
+ITEM.functions.Lock = {
+	name = "Kimlik Kartını Kilitle",
+	icon = "icon16/lock.png",
+	OnRun = function(itemTable)
+		itemTable:SetData("cardIDLock", true)
+
+		return false
+	end,
+	OnCanRun = function(itemTable)
+		if (IsValid(itemTable.entity)) then return false end
+		if (!IsValid(itemTable.player)) then return false end
+
+		if (itemTable:GetData("cardIDLock", false)) then return false end
+
+		local inventory = itemTable.player:GetCharacter():GetInventory()
+		if (!itemTable:GetData("cardID", false)) then return false end
+		if (!inventory:GetItemByID(itemTable:GetData("cardID"))) then return false end
+
+		return true
+	end
+}
+
+ITEM.functions.LockUn = {
+	name = "Kimlik Kartının Kilidini Aç",
+	icon = "icon16/lock_open.png",
+	OnRun = function(itemTable)
+		itemTable:SetData("cardIDLock", false)
+
+		return false
+	end,
+	OnCanRun = function(itemTable)
+		if (IsValid(itemTable.entity)) then return false end
+		if (!IsValid(itemTable.player)) then return false end
+
+		if (!itemTable:GetData("cardIDLock", false)) then return false end
+
+		local inventory = itemTable.player:GetCharacter():GetInventory()
+		if (!itemTable:GetData("cardID", false)) then return false end
+		if (!inventory:GetItemByID(itemTable:GetData("cardID"))) then return false end
+
+		return true
+	end
+}

gamemodes/darkrp/plugins/cid/items/sh_request_device.lua

@@ -0,0 +1,157 @@
+--[[
+| 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 PLUGIN = PLUGIN
+
+REQUEST_CP = 0
+REQUEST_MED = 1
+REQUEST_WORK = 2
+
+ITEM.name = "Talep Cihazı"
+ITEM.model = Model("models/gibs/shield_scanner_gib1.mdl")
+ITEM.description = "Yuvarlatılmış köşelere sahip küçük bir cihaz, üzerinde bir düğme bulunuyor. Üzerinde küçük bir Combine logosu görünüyor.\n\nTalimatlar şu şekildedir: Lütfen önce bu cihazı kimlik kartınızı bu cihaza tutarak kaydederek kaydedin. Kayıt tamamlandıktan sonra düğmeye basarak ve talebinizi belirterek Sivil Koruma'dan yardım isteyebilirsiniz. Adınız ve CKD otomatik olarak taleple birlikte gönderilir.\nTalep cihazının yanlış kullanımı, Sivil Koruma'ya yanıltıcı beyanlarda bulunma ve kimlik sahtekarlığı yasayla cezalandırılır ve Sivil Koruma tarafından dava edilir."
+ITEM.price = 20
+ITEM.category = "Combine"
+function ITEM:GetDescription()
+    local idCard = ix.item.instances[self:GetData("cardID")]
+    return idCard and string.format(self.description.."\n\nCurrently bound to identity card #%s.", idCard:GetData("cardNumber")) or self.description
+end
+
+local function GetRequestTable(data)
+	return {
+		name = data.actionName,
+		icon = "icon16/help.png",
+		OnClick = function(itemTable)
+				if (ix.config.Get("creditsNoConnection")) then
+					itemTable.player:EmitSound("hl1/fvox/buzz.wav", 60, 100, 0.5)
+					return
+				end
+
+				Derma_StringRequest(data.requestTitle, data.requestMessage, PLUGIN.text,
+					function(text)
+						if (text and string.utf8len(text) > 0) then
+							netstream.Start("ixRequest", itemTable:GetID(), text, data.requestType)
+						end
+
+						PLUGIN.text = nil
+					end,
+					function(text)
+						if (text == PLUGIN.text) then
+							PLUGIN.text = text
+						elseif (text and string.utf8len(text) > 0)then
+							PLUGIN.text = text
+						else
+							PLUGIN.text = nil
+						end
+					end, "MAKE REQUEST", "CANCEL"
+				)
+			end,
+		OnRun = function(itemTable)
+			return false
+		end,
+		OnCanRun = function(itemTable)
+			if (IsValid(itemTable.entity)) then
+				return false
+			end
+
+			if (!itemTable:GetData("cardID", false)) then
+				return false
+			end
+
+			return true
+		end
+	}
+end
+
+ITEM.functions.RequestCp = GetRequestTable({
+	actionName = "Make CP Request",
+	requestTitle = "Request Civil Protection Assistance",
+	requestMessage = "Please enter your assistance request for Civil Protection. Your name and CID will automatically be included in the request.",
+	requestType = REQUEST_CP
+})
+
+ITEM.functions.RequestMed = GetRequestTable({
+	actionName = "Make CMRU Request",
+	requestTitle = "Request Civil Medical & Research Union Assistance",
+	requestMessage = "Please enter your assistance request for Civil Medical Research Union. Your name and CID will automatically be included in the request. Do not forget to tell your location!",
+	requestType = REQUEST_MED
+})
+
+ITEM.functions.RequestCwu = GetRequestTable({
+	actionName = "Make CWU Request",
+	requestTitle = "Request Civil Workers Union Assistance",
+	requestMessage = "Please enter your assistance request for Civil Workers Union. Your name and CID will automatically be included in the request.",
+	requestType = REQUEST_WORK
+})
+
+ITEM.functions.Bind = {
+	name = "Bind ID Card",
+	icon = "icon16/vcard_edit.png",
+	OnClick = function(itemTable)
+		local cards = {}
+
+		for _, v in pairs(LocalPlayer():GetCharacter():GetInventory():GetItemsByUniqueID("id_card")) do
+			table.insert(cards, {
+				text = v:GetName(),
+				value = v
+			})
+		end
+
+		local cardsCount = table.Count(cards)
+		if (cardsCount > 1) then
+			Derma_Select("Bind ID Card to RD", "Please select a ID card to bind to this Request Device:",
+				cards, "Select ID card",
+				"Confirm Operation", function(value, name)
+					netstream.Start("ixBindRequestDevice", itemTable:GetID(), value:GetID())
+				end, "Cancel")
+		elseif (cardsCount == 1) then
+			Derma_Query("Are you sure you wish to bind your ID to this Request Device?", "Bind ID Card to RD",
+			"Confirm Operation", function()
+				netstream.Start("ixBindRequestDevice", itemTable:GetID(), cards[1].value:GetID())
+			end, "Cancel")
+		else
+			LocalPlayer():NotifyLocalized("You do not have ID card to bind to this request device.")
+		end
+	end,
+	OnRun = function(itemTable)
+		return false
+	end,
+	OnCanRun = function(itemTable)
+		if (IsValid(itemTable.entity)) then
+			return false
+		end
+
+		if (!IsValid(itemTable.player)) then
+			return false
+		end
+
+		local inventory = itemTable.player:GetCharacter():GetInventory()
+		if (!inventory:HasItem("id_card")) then
+			return false
+		end
+
+		if (!itemTable:GetData("cardID", false)) then
+			return true
+		end
+
+		if (inventory:GetItemCount("id_card") == 1 and inventory:GetItemByID(itemTable:GetData("cardID"))) then
+			return false
+		end
+
+		return true
+	end
+}
+
+if (CLIENT) then
+	netstream.Hook("rdMoreThanOneText", function(text)
+		PLUGIN.rdText = text
+	end)
+end