dobrograd-13-06-2022/garrysmod/gamemodes/darkrp/entities/weapons/weapon_keypadchecker/shared.lua
Jonny_Bro (Nikita) e4d5311906 first commit
2023-11-16 15:01:19 +05:00

183 lines
6.2 KiB
Lua

AddCSLuaFile()
if SERVER then
AddCSLuaFile("cl_init.lua")
util.AddNetworkString("DarkRP_keypadData")
end
SWEP.Base = "weapon_base"
SWEP.PrintName = "Admin Keypad Checker"
SWEP.Author = "DarkRP Developers"
SWEP.Instructions = "Left click on a keypad or fading door to check it\nRight click to clear"
SWEP.Slot = 5
SWEP.SlotPos = 1
SWEP.DrawAmmo = false
SWEP.ViewModelFlip = false
SWEP.Primary.ClipSize = 0
SWEP.Primary.Ammo = ""
SWEP.Secondary.Ammo = ""
SWEP.Spawnable = true
SWEP.AdminOnly = true
SWEP.Category = "DarkRP (Utility)"
SWEP.HoldType = "normal"
SWEP.ViewModel = Model("models/weapons/c_pistol.mdl")
SWEP.WorldModel = "models/weapons/w_toolgun.mdl"
SWEP.IconLetter = ""
SWEP.ViewModel = "models/weapons/c_pistol.mdl"
SWEP.UseHands = true
/*
Gets which entities are controlled by which keyboard keys
*/
local function getTargets(keypad, keyPass, keyDenied, delayPass, delayDenied)
local targets = {}
local Owner = keypad:CPPIGetOwner()
for k,v in pairs(numpad.OnDownItems or {}) do
if v.key == keyPass and v.ply == Owner then
table.insert(targets, {type = L.keypad_checker_entering_right_pass, name = v.name, ent = v.ent, original = keypad})
end
if v.key == keyDenied and v.ply == Owner then
table.insert(targets, {type = L.keypad_checker_entering_wrong_pass, name = v.name, ent = v.ent, original = keypad})
end
end
for k,v in pairs(numpad.OnUpItems or {}) do
if v.key == keyPass and v.ply == Owner then
table.insert(targets, {type = L.keypad_checker_after_right_pass, name = v.name, delay = math.Round(delayPass, 2), ent = v.ent, original = keypad})
end
if v.key == keyDenied and v.ply == Owner then
table.insert(targets, {type = L.keypad_checker_after_wrong_pass, name = v.name, delay = math.Round(delayDenied, 2), ent = v.ent, original = keypad})
end
end
return targets
end
/*---------------------------------------------------------------------------
Get the entities that are affected by the keypad
---------------------------------------------------------------------------*/
local function get_sent_keypad_Info(keypad)
local keyPass = keypad:GetNetVar("keypad_keygroup1", 0)
local keyDenied = keypad:GetNetVar("keypad_keygroup2", 0)
local delayPass = keypad:GetNetVar("keypad_length1", 0)
local delayDenied = keypad:GetNetVar("keypad_length2", 0)
return getTargets(keypad, keyPass, keyDenied, delayPass, delayDenied)
end
/*---------------------------------------------------------------------------
Overload for a different keypad addon
---------------------------------------------------------------------------*/
local function get_keypad_Info(keypad)
local keyPass = tonumber(keypad.KeypadData.KeyGranted) or 0
local keyDenied = tonumber(keypad.KeypadData.KeyDenied) or 0
local delayPass = tonumber(keypad.KeypadData.LengthGranted) or 0
local delayDenied = tonumber(keypad.KeypadData.LengthDenied) or 0
return getTargets(keypad, keyPass, keyDenied, delayPass, delayDenied)
end
/*---------------------------------------------------------------------------
Get the keypads that trigger this entity
---------------------------------------------------------------------------*/
local function getEntityKeypad(ent)
local targets = {}
local doorKeys = {} -- The numpad keys that activate this entity
local entOwner = ent:CPPIGetOwner()
for k,v in pairs(numpad.OnDownItems or {}) do
if v.ent == ent then
table.insert(doorKeys, v.key)
end
end
for k,v in pairs(numpad.OnUpItems or {}) do
if v.ent == ent then
table.insert(doorKeys, v.key)
end
end
for k,v in pairs(ents.FindByClass("sent_keypad")) do
local vOwner = v:CPPIGetOwner()
if vOwner == entOwner and table.HasValue(doorKeys, v:GetNetVar("keypad_keygroup1", 0)) then
table.insert(targets, {type = L.keypad_checker_right_pass_entered, ent = v, original = ent})
end
if vOwner == entOwner and table.HasValue(doorKeys, v:GetNetVar("keypad_keygroup2", 0)) then
table.insert(targets, {type = L.keypad_checker_wrong_pass_entered, ent = v, original = ent})
end
end
for k,v in pairs(ents.FindByClass("keypad")) do
local vOwner = v:CPPIGetOwner()
if vOwner == entOwner and table.HasValue(doorKeys, tonumber(v.KeypadData.KeyGranted) or 0) then
table.insert(targets, {type = L.keypad_checker_right_pass_entered, ent = v, original = ent})
end
if vOwner == entOwner and table.HasValue(doorKeys, tonumber(v.KeypadData.KeyDenied) or 0) then
table.insert(targets, {type = L.keypad_checker_wrong_pass_entered, ent = v, original = ent})
end
end
return targets
end
/*---------------------------------------------------------------------------
Send the info to the client
---------------------------------------------------------------------------*/
function SWEP:PrimaryAttack()
self:SetNextPrimaryFire(CurTime() + 0.3)
if not SERVER then return end
local trace = self:GetOwner():GetEyeTrace()
if not IsValid(trace.Entity) then return end
local ent, class = trace.Entity, string.lower(trace.Entity:GetClass() or "")
local data
if class == "sent_keypad" then
data = get_sent_keypad_Info(ent)
self:GetOwner():Notify('ooc', L.keypad_checker_controls_x_entities:format(#data / 2))
elseif class == "keypad" then
data = get_keypad_Info(ent)
self:GetOwner():Notify('ooc', L.keypad_checker_controls_x_entities:format(#data / 2))
else
data = getEntityKeypad(ent)
self:GetOwner():Notify('ooc', L.keypad_checker_controlled_by_x_keypads:format(#data))
end
net.Start("DarkRP_keypadData")
net.WriteTable(data)
net.Send(self:GetOwner())
end
function SWEP:SecondaryAttack()
end
if not SERVER then return end
/*---------------------------------------------------------------------------
Registering numpad data
---------------------------------------------------------------------------*/
local oldNumpadUp = numpad.OnUp
local oldNumpadDown = numpad.OnDown
function numpad.OnUp(ply, key, name, ent, ...)
numpad.OnUpItems = numpad.OnUpItems or {}
table.insert(numpad.OnUpItems, {ply = ply, key = key, name = name, ent = ent, arg = {...}})
return oldNumpadUp(ply, key, name, ent, ...)
end
function numpad.OnDown(ply, key, name, ent, ...)
numpad.OnDownItems = numpad.OnDownItems or {}
table.insert(numpad.OnDownItems, {ply = ply, key = key, name = name, ent = ent, arg = {...}})
return oldNumpadDown(ply, key, name, ent, ...)
end