Upload

gamemodes/ixhl2rp/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 = "Request Device"
+ITEM.model = Model("models/gibs/shield_scanner_gib1.mdl")
+ITEM.description = "A small device with rounded corners, housing one button. A small combine logo is visible.\n\nThe instructions read: please first register this device by holding your ID card against this device. Once registration is completed, you can request assistance from Civil Protection by pressing the button and stating your request. Your name and CID is automatically included with the request.\nPlease be aware the misuse of the request device, making false statements to Civil Protection and identity fraud are punishable by law and will result in prosecution by Civil Protection."
+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