--------------------- -- Your Name is Benny --------------------- ITEMS = {} local itemmeta = {} function itemmeta:__tostring() return "ItemDef [" .. self.ClassName .. "]" end local ITEMHELPER = { Get = function( self, key ) return self.key end, GetRaw = function( self, key ) return rawget( self, key ) end, } function itemmeta.__index( self, key ) if ITEMHELPER[key] then return ITEMHELPER[key] end if rawget(self, "BaseClass") then return rawget(self, "BaseClass")[key] end end function AddItem( itemname, item ) if item then ITEMS[itemname] = item item.ClassName = itemname item.BaseClass = ITEMS[item.Base] setmetatable( item, itemmeta ) else return ITEMS[itemname] end end AddItem( "base", { PrintName = "Base Item", Description = "Beginning item base.", Category = "base", Vars = { ["Float"] = { "Acquisition", }, }, HoldType = "slam", ["Initialize"] = function( class, ent, handler ) print( class, "Initialized base initialization" ) end, ["Deploy"] = function( class, ent, handler ) end, ["Holster"] = function( class, ent, handler ) end, ["Attack"] = function( class, ent, handler ) end, ["Think"] = function( class, ent, handler ) end, ["Reload"] = function( class, ent, handler ) end, }) AddItem( "base_firearm", { PrintName = "Base Firearm", Description = "Item base for firearms.", Category = "base", Base = "base", Vars = { ["Int"] = { "Clip", "BurstCount", }, ["Float"] = { "Delay", "DelayBurst", "RefillTime", "Accuracy_Reset", "Accuracy_Amount", "DelayReload", }, }, HoldType = "rpg", Delay = 0.1, Pellets = 1, ClipSize = 15, BurstCount = math.huge, BurstRunaway = false, BurstAuto = false, BurstDelay = 0, ["Initialize"] = function( class, ent, handler ) ITEMS["base"].Initialize( class, ent, handler ) ent:SetClip( class.ClipSize ) print( class, "Initialized a firearm" ) end, ["Think"] = function( class, ent, handler ) local InProcess = ent:GetBurstCount() > 0 local Topped = ent:GetBurstCount() == class.BurstCount local Runaway = class.BurstRunaway local BAuto = class.BurstAuto local Firedown = handler:GetOwner():KeyDown( IN_ATTACK ) if Runaway and InProcess and !Topped then class["Attack"]( class, ent, handler ) else if !Firedown then if !Topped and InProcess then ent:SetDelayBurst( CurTime() + class.BurstDelay ) end ent:SetBurstCount( 0 ) end if Topped and BAuto then ent:SetBurstCount( 0 ) ent:SetDelayBurst( CurTime() + class.BurstDelay ) end end end, ["Attack"] = function( class, ent, handler ) if ent:GetClip() <= 0 then return end if ent:GetDelay() > CurTime() then return end if ent:GetBurstCount() >= class.BurstCount then return end ent:SetBurstCount( ent:GetBurstCount() + 1 ) ent:SetClip( ent:GetClip() - 1 ) ent:SetDelay( CurTime() + class.Delay ) handler:EmitSound( class.FireSound, 140, 100, 0.4, CHAN_STATIC ) local acc = 0 local p = handler:GetOwner() handler:FireBullets( { Attacker = p, Damage = 1, Force = 1, Num = class.Pellets, Dir = p:GetAimVector(), Src = p:GetShootPos(), Spread = Vector( acc, acc, 0 ), } ) end, ["Reload"] = function( class, ent, handler ) if ent:GetClip() >= class.ClipSize then return end if ent:GetDelay() > CurTime() then return end handler:EmitSound( "weapons/m4a1/m4a1_boltpull.wav", 70, 125, 0.4, CHAN_STATIC ) ent:SetDelay( CurTime() + 0.5 ) ent:SetClip( class.ClipSize ) end, ["Deploy"] = function( class, ent, handler ) handler:EmitSound( "weapons/usp/usp_slideback.wav", 70, 125, 0.4, CHAN_STATIC ) ent:SetDelay( CurTime() + 0.5 ) end, ["Holster"] = function( class, ent, handler ) handler:EmitSound( "weapons/m4a1/m4a1_deploy.wav", 70, 125, 0.4, CHAN_STATIC ) ent:SetDelay( CurTime() + 0.5 ) end, }) AddItem( "mk23", { PrintName = "#Item.mk23.Name", Description = "#Item.mk23.Description", Category = "pistol", Base = "base_firearm", Model = "models/weapons/w_pist_usp.mdl", HoldType = "revolver", ClipSize = 12, Delay = (60/350), FireSound = "weapons/usp/usp_unsil-1.wav", Accuracy = 5/60, BurstCount = 1, Accuracy_Add = 0.5, Accuracy_Reset = 0.4, Accuracy_Decay = 5, }) AddItem( "fnc", { PrintName = "#Item.fnc.Name", Description = "#Item.fnc.Description", Base = "base_firearm", Model = "models/weapons/w_rif_ar556.mdl", HoldType = "rpg", ClipSize = 30, Delay = (60/750), FireSound = "weapons/m4a1/m4a1_unsil-1.wav", Accuracy = 1, Accuracy_Add = 0.4, Accuracy_Reset = 0.4, Accuracy_Decay = 12, }) for ID, Data in pairs(ITEMS) do local tent = {} tent.Base = "b-itembase" tent.PrintName = Data.PrintName or ID tent.ID = ID tent.Class = ITEMS[ID] tent.Spawnable = true tent.AdminOnly = false tent.Category = "Other" -- print("aei_" .. ID) scripted_ents.Register( tent, "b-item_" .. ID ) end