DarkRP Help

In the file “showteamtabs.lua” I want to add another group to the entity’s tab. How would I do that?

[lua]function EntitiesTab()
local EntitiesPanel = vgui.Create(“DPanelList”)
EntitiesPanel:EnableVerticalScrollbar( true )
function EntitiesPanel:Update()
self:Clear(true)
local WepCat = vgui.Create(“DCollapsibleCategory”)
WepCat:SetLabel(“Weapons”)
local WepPanel = vgui.Create(“DPanelList”)
WepPanel:SetSize(470, 100)
WepPanel:SetAutoSize(true)
WepPanel:SetSpacing(1)
WepPanel:EnableHorizontal(true)
WepPanel:EnableVerticalScrollbar(true)
local function AddIcon(Model, description, command)
local icon = vgui.Create(“SpawnIcon”)
icon:InvalidateLayout( true )
icon:SetModel(Model)
icon:SetIconSize(64)
icon:SetToolTip(description)
icon.DoClick = function() LocalPlayer():ConCommand("say "…command) end
WepPanel:AddItem(icon)
end
AddIcon(“models/weapons/w_pist_glock18.mdl”, "Buy a glock: " … CUR … tostring(GetGlobalInt(“glockcost”)), “/buy glock”)
AddIcon(“models/weapons/w_pist_deagle.mdl”, "Buy a Desert eagle: " … CUR … tostring(GetGlobalInt(“deaglecost”)), “/buy deagle”)
AddIcon(“models/weapons/w_pist_fiveseven.mdl”, "Buy a fiveseven: " … CUR … tostring(GetGlobalInt(“fivesevencost”)), “/buy fiveseven”)
AddIcon(“models/weapons/w_pist_p228.mdl”, "Buy a P228: " … CUR … tostring(GetGlobalInt(“p228cost”)), “/buy p228”)

				for k,v in pairs(CustomShipments) do
					if v.seperate and (table.HasValue(v.allowed, LocalPlayer():Team()) or #v.allowed == 0) then
						AddIcon(v.model, "Buy a "..v.name..": "..CUR..v.pricesep, "/buy "..v.name)
					end
				end
				
				AddIcon("models/Items/BoxSRounds.mdl", "Buy pistol ammo: " .. CUR .. tostring(GetGlobalInt("ammopistolcost")), "/buyammo pistol")
				AddIcon("models/Items/BoxMRounds.mdl", "Buy rifle ammo: " .. CUR .. tostring(GetGlobalInt("ammoriflecost")), "/buyammo rifle")
				AddIcon("models/Items/BoxBuckshot.mdl", "Buy shotgun ammo: " .. CUR .. tostring(GetGlobalInt("ammoshotguncost")), "/buyammo shotgun")
		WepCat:SetContents(WepPanel)
		self:AddItem(WepCat)
		
		local EntCat = vgui.Create("DCollapsibleCategory")
		EntCat:SetLabel("Entities")
			local EntPanel = vgui.Create("DPanelList")
			EntPanel:SetSize(470, 200)
			EntPanel:SetAutoSize(true)
			EntPanel:SetSpacing(1)
			EntPanel:EnableHorizontal(true)
			EntPanel:EnableVerticalScrollbar(true)
				local function AddEntIcon(Model, description, command)
					local icon = vgui.Create("SpawnIcon")
					icon:InvalidateLayout( true ) 
					icon:SetModel(Model)
					icon:SetIconSize(64)
					icon:SetToolTip(description)
					icon.DoClick = function() LocalPlayer():ConCommand("say "..command) end
					EntPanel:AddItem(icon)
				end
				if LocalPlayer():Team() == TEAM_GANG or LocalPlayer():Team() == TEAM_MOB then
					AddEntIcon("models/props_lab/crematorcase.mdl", "Buy a druglab " .. CUR .. tostring(GetGlobalInt("druglabcost")), "/Buydruglab")
					AddEntIcon("models/buddy.mdl", "Buy a jeep " .. CUR .. tostring(GetGlobalInt("mac10cost")), "/buyshipment mac10")	
				end
				AddEntIcon("models/props_c17/consolebox01a.mdl", "Buy a Money printer " .. CUR .. tostring(GetGlobalInt("mprintercost")), "/Buymoneyprinter")
				if LocalPlayer():Team() == TEAM_GUN then
					AddEntIcon("models/props_c17/trappropeller_engine.mdl", "Buy a gunlab " .. CUR .. tostring(GetGlobalInt("gunlabcost")), "/Buygunlab")
					AddEntIcon("models/weapons/w_rif_m4a1.mdl", "Buy an M16 shipment " .. CUR .. tostring(GetGlobalInt("m16cost")), "/buyshipment m16")
					AddEntIcon("models/weapons/w_rif_ak47.mdl", "Buy an AK47 shipment " .. CUR .. tostring(GetGlobalInt("ak47cost")), "/buyshipment ak47")
					AddEntIcon("models/weapons/w_snip_g3sg1.mdl", "Buy a sniper shipment " .. CUR .. tostring(GetGlobalInt("snipercost")), "/buyshipment sniper")
					AddEntIcon("models/weapons/w_smg_mp5.mdl", "Buy an mp5 shipment " .. CUR .. tostring(GetGlobalInt("mp5cost")), "/buyshipment mp5")
					AddEntIcon("models/weapons/w_shot_m3super90.mdl", "Buy a shotgun shipment " .. CUR .. tostring(GetGlobalInt("shotguncost")), "/buyshipment shotgun")
					AddEntIcon("models/weapons/w_smg_mac10.mdl", "Buy a mac10 shipment " .. CUR .. tostring(GetGlobalInt("mac10cost")), "/buyshipment mac10")
				elseif LocalPlayer():Team() == TEAM_COOK then
					AddEntIcon("models/props/cs_office/microwave.mdl", "Buy a microwave " .. CUR .. tostring(GetGlobalInt("microwavecost")) , "/Buymicrowave")
				end
				if  FoodItems and (GetGlobalInt("foodspawn") ~= 0 or LocalPlayer():Team() == TEAM_COOK) and (GetGlobalInt("hungermod") == 1 or LocalPlayer():Team() == TEAM_COOK) then
					for k,v in pairs(FoodItems) do
						AddEntIcon(v.model, "Buy a(n) ".. k .. " for a few bucks", "/buyfood "..k)
					end
				end
				for k,v in pairs(CustomShipments) do
					if not v.noship and table.HasValue(v.allowed, LocalPlayer():Team()) then
						AddEntIcon(v.model, "Buy a "..v.name.." shipment " .. CUR .. tostring(v.price), "/buyshipment "..v.name)
					end
				end
		EntCat:SetContents(EntPanel)
		self:AddItem(EntCat)

                   // I want another one here

EntitiesPanel:Update()	
return EntitiesPanel

end
[/lua]

There are already to sections in this tab and I want to make another one for vehicles. Please help!