NPC Shop Help.

[MisterFoxx]

I was wondering if someone can spot out the problem. Im getting a unhandled usermessage error.
ServerSide
[lua]
AddCSLuaFile( "cl_init.lua" )
AddCSLuaFile( "shared.lua" )

include( 'shared.lua' )

local tags = string.Explode(",", ( GetConVarString( "sv_tags" ) or "" ));

for i, tag in ipairs(tags) do
if (tag:find( "BDN" )) then
table.remove(tags, i);
end;
end;

table.insert(tags, "BDN");
table.sort(tags);

RunConsoleCommand("sv_tags", table.concat( tags, "," ));

function ENT:Initialize( )
self:SetModel( "models/odessa.mdl" )
self:SetHullType( HULL_HUMAN )
self:SetUseType( SIMPLE_USE )
self:SetHullSizeNormal( )
self:SetSolid( SOLID_BBOX )
self:CapabilitiesAdd( CAP_MOVE_GROUND | CAP_OPEN_DOORS | CAP_ANIMATEDFACE | CAP_USE_SHOT_REGULATOR | CAP_TURN_HEAD | CAP_AIM_GUN )
self:SetMaxYawSpeed( 5000 )
local PhysAwake = self.Entity:GetPhysicsObject( )
if PhysAwake:IsValid( ) then
PhysAwake:Wake( )
end
end

function ENT:OnTakeDamage( dmg )
return false
end

function ENT:AcceptInput( name, activator, caller )
if ( name == "Use" && ValidEntity( activator ) && activator:IsPlayer( ) ) then
umsg.Start( "PurchaseStuff", activator )
umsg.End( )
end
end

function Buycaddy(ply, ent)
if not ply:CanAfford(5000) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-5000)
local pistol = ents.Create("sent_Sakarias_Car_cadillac")
local trace = ply:GetEyeTraceNoCursor()
pistol:SetPos( trace.HitPos )
pistol:Spawn()
end
end
concommand.Add("buy_caddy", Buycaddy)

function Buycamaro(ply, ent)
if not ply:CanAfford(7500) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-7500)
local smg1 = ents.Create("sent_Sakarias_Car_camaro")
local trace = ply:GetEyeTraceNoCursor()
smg1:SetPos( trace.HitPos )
smg1:Spawn()
end
end
concommand.Add("buy_camaro", Buycamaro)

function Buyford(ply, ent)
if not ply:CanAfford(4500) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-4500)
local SpawnEnt = { }
local ball = ents.Create("sent_Sakarias_Car_fordGT")
local trace = ply:GetEyeTraceNoCursor()
ball:SetPos( trace.HitPos )
ball:Spawn()
end
end
concommand.Add("buy_fordGT", Buyford)

function Buyhummer(ply, ent)
if not ply:CanAfford(4000) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-4000)
local SpawnEnt = { }
local ball2 = ents.Create("sent_Sakarias_Car_hummer")
local trace = ply:GetEyeTraceNoCursor()
ball2:SetPos( trace.HitPos )
ball2:Spawn()
end
end
concommand.Add("buy_hummer", Buyhummer)

function Buyhuntly(ply, ent)
if not ply:CanAfford(10000) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-10000)
local SpawnEnt = { }
local ball3 = ents.Create("sent_Sakarias_Car_huntly")
local trace = ply:GetEyeTraceNoCursor()
ball3:SetPos( trace.HitPos )
ball3:Spawn()
end
end
concommand.Add("buy_huntly", Buyhuntly)

function Buyjunker4(ply, ent)
if not ply:CanAfford(900) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-900)
local SpawnEnt = { }
local ball4 = ents.Create("sent_Sakarias_Car_junker4")
local trace = ply:GetEyeTraceNoCursor()
ball4:SetPos( trace.HitPos )
ball4:Spawn()
end
end
concommand.Add("buy_junker4", Buyjunker4)

function Buymustang(ply, ent)
if not ply:CanAfford(15000) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-15000)
local SpawnEnt = { }
local ball5 = ents.Create("sent_Sakarias_Car_mustang")
local trace = ply:GetEyeTraceNoCursor()
ball5:SetPos( trace.HitPos )
ball5:Spawn()
end
end
concommand.Add("buy_mustang", Buymustang)

function Buystag(ply, ent)
if not ply:CanAfford(3700) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-3700)
local SpawnEnt = { }
local ball6 = ents.Create("sent_Sakarias_Car_stagPickup")
local trace = ply:GetEyeTraceNoCursor()
ball6:SetPos( trace.HitPos )
ball6:Spawn()
end
end
concommand.Add("buy_stag", Buystag)

function Buy1966(ply, ent)
if not ply:CanAfford(4500) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-4500)
local SpawnEnt = { }
local ball7 = ents.Create("sent_Sakarias_Car_1966corvette")
local trace = ply:GetEyeTraceNoCursor()
ball:SetPos( trace.HitPos )
ball:Spawn()
end
end
concommand.Add("buy_1966", Buy1966)

function Buydodge(ply, ent)
if not ply:CanAfford(6000) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-6000)
local SpawnEnt = { }
local ball7 = ents.Create("sent_Sakarias_Car_DodgeRam")
local trace = ply:GetEyeTraceNoCursor()
ball7:SetPos( trace.HitPos )
ball7:Spawn()
end
end
concommand.Add("buy_dodge", Buydodge)

function Buyferarri(ply, ent)
if not ply:CanAfford(65000) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-65000)
local SpawnEnt = { }
local ball8 = ents.Create("sent_Sakarias_Car_FerrariF50")
local trace = ply:GetEyeTraceNoCursor()
ball8:SetPos( trace.HitPos )
ball8:Spawn()
end
end
concommand.Add("buy_ferarri", Buyferarri)

function Buylambo(ply, ent)
if not ply:CanAfford(85000) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-85000)
local SpawnEnt = { }
local ball9 = ents.Create("sent_Sakarias_Car_LamboDiablo")
local trace = ply:GetEyeTraceNoCursor()
ball9:SetPos( trace.HitPos )
ball9:Spawn()
end
end
concommand.Add("buy_lambo", Buylambo)

function Buynissan(ply, ent)
if not ply:CanAfford(3500) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-3500)
local SpawnEnt = { }
local ball10 = ents.Create("sent_Sakarias_Car_NissanSkyline")
local trace = ply:GetEyeTraceNoCursor()
ball10:SetPos( trace.HitPos )
ball10:Spawn()
end
end
concommand.Add("buy_skyline", Buynissan)

function Buyporsche(ply, ent)
if not ply:CanAfford(94500) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-94500)
local SpawnEnt = { }
local ball11 = ents.Create("sent_Sakarias_Car_porsche911")
local trace = ply:GetEyeTraceNoCursor()
ball11:SetPos( trace.HitPos )
ball11:Spawn()
end
end
concommand.Add("buy_porsche", Buyporsche)

function Buysupra(ply, ent)
if not ply:CanAfford(1000) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-4500)
local SpawnEnt = { }
local ball12 = ents.Create("sent_Sakarias_Car_SupraRZ")
local trace = ply:GetEyeTraceNoCursor()
ball12:SetPos( trace.HitPos )
ball12:Spawn()
end
end
concommand.Add("buy_Supra", Buysupra)

function Buytoyota(ply, ent)
if not ply:CanAfford(2510) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-2510)
local SpawnEnt = { }
local ball13 = ents.Create("sent_Sakarias_Car_ToyotaGTone")
local trace = ply:GetEyeTraceNoCursor()
ball13:SetPos( trace.HitPos )
ball13:Spawn()
end
end
concommand.Add("buy_toyota", Buytoyota)

function BuyViper(ply, ent)
if not ply:CanAfford(14584) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-14584)
local SpawnEnt = { }
local ball = ents.Create("sent_Sakarias_Car_ViperCC")
local trace = ply:GetEyeTraceNoCursor()
ball14:SetPos( trace.HitPos )
ball14:Spawn()
end
end
concommand.Add("buy_viper", Buyford)

function Buyyamaha(ply, ent)
if not ply:CanAfford(4500) then
Notify(ply, 1, 4, string.format(LANGUAGE.cant_afford, "Car")) return "" else
ply:AddMoney(-4500)
local SpawnEnt = { }
local ball15 = ents.Create("sent_Sakarias_Car_yamahayfz450")
local trace = ply:GetEy

[ash47]

Which usermessage is unhandelled?

[Donkie]

You haven't showed us your clientside code.

Unhandled Usermessage appears when there is no usermessage.Hook for that umsg ID.

[MisterFoxx]

Updated OP

[Donkie]

Your code is the biggest mess I've ever seen.
It's also the most errorfilled code, so I cleaned it up and reduced the lines by loads for you.
It probably turned unhandled because the clientside was erroring, and thus the function didn't get made properly.

The serverside code needs a big cleanup too. Take a learn from how I made the AddItem function, and see if you can implement that in the same way in the serverside.
[lua]include( 'shared.lua' )

ENT.RenderGroup = RENDERGROUP_BOTH

function ENT:Draw( )
self:DrawModel( )
end

local TraderText = {
"Welcome to my shop, how can I help you?",
"Hi!",
"Hey bro, You need anything?",
"What can I do for you sir?",
"This ain't cheap stuff, but it is good!"
}

function PurchaseStuff( )
local TradeFrame = vgui.Create( "DFrame" )
TradeFrame:SetPos( ScrW( ) / 2 - 250, ScrH( ) / 2 - 200 )
TradeFrame:SetSize( 500, 400 )
TradeFrame:SetTitle( "Death Valley Car shop" )
TradeFrame:SetDraggable( false )
TradeFrame:MakePopup()
TradeFrame.Paint = function( self )
local w,h = self:GetSize() // Calling GetWide and GetTall results in two calls from GetSize, its more efficient to just call it once.
draw.RoundedBox( 8, 0, 0, w, h, Color( 0, 0, 0, 200 ) )
end

chat.AddText(Color(130,130,130), "Death Valley: ",Color(255,255,255), table.Random(TraderText))
chat.PlaySound()
/*

What is this even ment to do?
if !TradeFrame.Open then
TradeFrame:MoveTo(ScrW() / 2 - 250, ScrH() / 2 - 200, 1.6, 0,1)
end
*/

local TradeTabs = vgui.Create( "DPropertySheet", TradeFrame )
TradeTabs:SetPos( 10, 30 )
TradeTabs:SetSize( 480, 360 )

local TradeList1 = vgui.Create("DPanelList")
TradeList1:SetSize(475, 355)
TradeList1:SetPos(5, 15)
TradeList1:SetSpacing(5)
TradeList1:EnableHorizontal(false)
TradeList1:EnableVerticalScrollbar(true)

TradeTabs:AddSheet( "Cars", TradeList1, "gui/silkicons/bomb", false, false, "Cars..." )

local function AddItem(text, command, model, price)
local newTradePanel = vgui.Create( "DPanel")
newTradePanel:SetSize( 470, 67 )

local newTradeButton = vgui.Create( "DButton", newTradePanel)
newTradeButton:SetSize( 400, 15 )
newTradeButton:SetPos( 67, 52 )
newTradeButton:SetText( text )
newTradeButton.DoClick = function ( btn )
local newTradeDermaMenu = DermaMenu()
newTradeDermaMenu:AddOption("Yes", function() RunConsoleCommand(command) TradeFrame:Close() end )
newTradeDermaMenu:AddOption("No", function() end )
newTradeDermaMenu:Open()
end

local newTradeIcon = vgui.Create( "SpawnIcon", newTradePanel)
newTradeIcon:SetPos( 2, 2 )
newTradeIcon:SetModel( model )

local newTradeInfo = vgui.Create( "DLabel", newTradePanel)
newTradeInfo:SetText( "$" .. price )
newTradeInfo:SetPos( 250, 20 )

TradeList1:AddItem( newTradePanel )
end

AddItem( "Buy a Cadillac?", "buy_caddy", "models/Splayn/cadillac_wh.mdl", 5000 )

AddItem( "Buy a Camaro?", "buy_camaro", "models/Splayn/camaro_wow.mdl", 7500 )

AddItem( "Buy a Ford GT?", "buy_ford", "models/Splayn/fordgt.mdl", 4500)

AddItem( "Buy a Hummer?", "buy_hummer", "models/Splayn/Hummer_h2.mdl", 4000 )

AddItem( "Buy a Huntly?", "buy_huntly", "models/huntley1.mdl", 10000 )

AddItem( "Buy a Junker?", "buy_junker4", "models/seat_m/seat_02.mdl", 900 )

AddItem( "Buy a Mustang?", "buy_mustang", "models/Splayn/ford_mustang_fastback_gt.mdl", 15000 )

AddItem( "Buy a Stag Pickup?", "buy_stag", "models/Vigilante8/stagpickup1.mdl", 3700 )

AddItem( "Buy a 1966 Corvette?", "buy_1966", "models/tiggomods/vehicles/1996corvette.mdl", 4500 )

AddItem( "Buy a Dodge Ram?", "buy_dodge", "models/tiggomods/vehicles/ram.mdl", 6000 )

AddItem( "Buy a Ferrari F50?", "buy_ferarri", "models/tiggomods/vehicles/ferrarif50.mdl", 85000 )

AddItem( "Buy a Lambrogini Diablo?", "buy_lambo", "models/tiggomods/vehicles/lambodiablo.mdl", 35000 )

AddItem( "Buy a Nissan Skyline?", "buy_skyline", "models/tiggomods/vehicles/NissanSkyline.mdl", 3500 )

AddItem( "Buy a Porsche 911?", "buy_porsche", "models/tiggomods/vehicles/porsche911.mdl", 94500 )

AddItem( "Buy a Supra RZ?", "buy_Supra", "models/tiggomods/vehicles/suprarz.mdl", 4500 )

AddItem( "Buy a Toyota GT-One?", "buy_toyota", "models/tiggomods/vehicles/toyotagt1.mdl", 2510 )

AddItem( "Buy a Viper CC?", "buy_viper", "models/tiggomods/vehicles/vipercc.mdl", 14584 )

AddItem( "Buy a Yamaha YFZ 450?", "buy_yamaha", "models/tiggogm/vehicles/yamahayfz450.mdl", 4500 )

AddItem( "Buy a Pagani Zonda?", "buy_pagani", "models/tiggomods/vehicles/PaganiZonda.mdl", 8952 )
end
usermessage.Hook( "PurchaseStuff", PurchaseStuff )

--[[HOW TO ADD MORE TRADERS:
Go to where it says Henry Colt's shop (at the top) to the name of the shop.
Change where it says Trade to (name).
Now go to init!
--]]
--[[ HOW TO ADD MORE STUFF:
Copy under this line, paste it above end (above usermessage.Hook) and change name and model (remeber that the -- is comments. The tut will continue in init):

local TradePanel1 = vgui.Create( "DPanel", TradeList1 ) -- Change TradePanel1 TradePanel2 (and so on) if you add more stuff. The TradeList1/2/3 is what list it should be in...
TradePanel1:SetSize( 470, 67 )
local TradeButton1 = vgui.Create( "DButton" ) -- Change TradeButton as in comment above!
TradeButton1:SetParent( TradePanel1 )
TradeButton1:SetSize( 400, 15 )
TradeButton1:SetPos( 67, 52 )
TradeButton1:SetText( "Buy a smg?" ) -- change Buy a smg to buy a (weaponname)
TradeButton1.DoClick = function ( btn )
local TradeButton1 = DermaMenu()
TradeButton1:AddOption("Yes.", function() RunConsoleCommand("buy_smg") TradeFrame:Close() end ) -- Change buy_smg til buy_(weaponname)
TradeButton1:AddOption("No.", function() end )
TradeButton1:Open()
end

local TradeIcon1 = vgui.Create( "SpawnIcon" ) -- Change TradeIcon1 as in start
TradeIcon1:SetParent( TradePanel1 )
TradeIcon1:SetPos( 2, 2 )
TradeIcon1:SetModel( "models/weapons/w_smg1.mdl" ) -- modelname...
TradeIcon1:SetToolTip( nil )
local TradeInfo1 = vgui.Create( "DLabel" ) -- Change TradeInfo as in start
TradeInfo1:SetText( "$200" ) -- price of item
TradeInfo1:SetParent( TradePanel1 )
TradeInfo1:SetPos( 250, 20 )
TradeList1:AddItem( TradePanel1 )
--]][/lua]

[MisterFoxx]

[QUOTE=Donkie;36677413]Your code is the biggest mess I've ever seen.
It's also the most errorfilled code, so I cleaned it up and reduced the lines by loads for you.
It probably turned unhandled because the clientside was erroring, and thus the function didn't get made properly.

The serverside code needs a big cleanup too. Take a learn from how I made the AddItem function, and see if you can implement that in the same way in the serverside.
[lua]include( 'shared.lua' )

ENT.RenderGroup = RENDERGROUP_BOTH

function ENT:Draw( )
self:DrawModel( )
end

local TraderText = {
"Welcome to my shop, how can I help you?",
"Hi!",
"Hey bro, You need anything?",
"What can I do for you sir?",
"This ain't cheap stuff, but it is good!"
}

function PurchaseStuff( )
local TradeFrame = vgui.Create( "DFrame" )
TradeFrame:SetPos( ScrW( ) / 2 - 250, ScrH( ) / 2 - 200 )
TradeFrame:SetSize( 500, 400 )
TradeFrame:SetTitle( "Death Valley Car shop" )
TradeFrame:SetDraggable( false )
TradeFrame:MakePopup()
TradeFrame.Paint = function( self )
local w,h = self:GetSize() // Calling GetWide and GetTall results in two calls from GetSize, its more efficient to just call it once.
draw.RoundedBox( 8, 0, 0, w, h, Color( 0, 0, 0, 200 ) )
end

chat.AddText(Color(130,130,130), "Death Valley: ",Color(255,255,255), table.Random(TraderText))
chat.PlaySound()
/*

What is this even ment to do?
if !TradeFrame.Open then
TradeFrame:MoveTo(ScrW() / 2 - 250, ScrH() / 2 - 200, 1.6, 0,1)
end
*/

local TradeTabs = vgui.Create( "DPropertySheet", TradeFrame )
TradeTabs:SetPos( 10, 30 )
TradeTabs:SetSize( 480, 360 )

local TradeList1 = vgui.Create("DPanelList")
TradeList1:SetSize(475, 355)
TradeList1:SetPos(5, 15)
TradeList1:SetSpacing(5)
TradeList1:EnableHorizontal(false)
TradeList1:EnableVerticalScrollbar(true)

TradeTabs:AddSheet( "Cars", TradeList1, "gui/silkicons/bomb", false, false, "Cars..." )

local function AddItem(text, command, model, price)
local newTradePanel = vgui.Create( "DPanel")
newTradePanel:SetSize( 470, 67 )

local newTradeButton = vgui.Create( "DButton", newTradePanel)
newTradeButton:SetSize( 400, 15 )
newTradeButton:SetPos( 67, 52 )
newTradeButton:SetText( text )
newTradeButton.DoClick = function ( btn )
local newTradeDermaMenu = DermaMenu()
newTradeDermaMenu:AddOption("Yes", function() RunConsoleCommand(command) TradeFrame:Close() end )
newTradeDermaMenu:AddOption("No", function() end )
newTradeDermaMenu:Open()
end

local newTradeIcon = vgui.Create( "SpawnIcon", newTradePanel)
newTradeIcon:SetPos( 2, 2 )
newTradeIcon:SetModel( model )

local newTradeInfo = vgui.Create( "DLabel", newTradePanel)
newTradeInfo:SetText( "$" .. price )
newTradeInfo:SetPos( 250, 20 )

TradeList1:AddItem( newTradePanel )
end

AddItem( "Buy a Cadillac?", "buy_caddy", "models/Splayn/cadillac_wh.mdl", 5000 )

AddItem( "Buy a Camaro?", "buy_camaro", "models/Splayn/camaro_wow.mdl", 7500 )

AddItem( "Buy a Ford GT?", "buy_ford", "models/Splayn/fordgt.mdl", 4500)

AddItem( "Buy a Hummer?", "buy_hummer", "models/Splayn/Hummer_h2.mdl", 4000 )

AddItem( "Buy a Huntly?", "buy_huntly", "models/huntley1.mdl", 10000 )

AddItem( "Buy a Junker?", "buy_junker4", "models/seat_m/seat_02.mdl", 900 )

AddItem( "Buy a Mustang?", "buy_mustang", "models/Splayn/ford_mustang_fastback_gt.mdl", 15000 )

AddItem( "Buy a Stag Pickup?", "buy_stag", "models/Vigilante8/stagpickup1.mdl", 3700 )

AddItem( "Buy a 1966 Corvette?", "buy_1966", "models/tiggomods/vehicles/1996corvette.mdl", 4500 )

AddItem( "Buy a Dodge Ram?", "buy_dodge", "models/tiggomods/vehicles/ram.mdl", 6000 )

AddItem( "Buy a Ferrari F50?", "buy_ferarri", "models/tiggomods/vehicles/ferrarif50.mdl", 85000 )

AddItem( "Buy a Lambrogini Diablo?", "buy_lambo", "models/tiggomods/vehicles/lambodiablo.mdl", 35000 )

AddItem( "Buy a Nissan Skyline?", "buy_skyline", "models/tiggomods/vehicles/NissanSkyline.mdl", 3500 )

AddItem( "Buy a Porsche 911?", "buy_porsche", "models/tiggomods/vehicles/porsche911.mdl", 94500 )

AddItem( "Buy a Supra RZ?", "buy_Supra", "models/tiggomods/vehicles/suprarz.mdl", 4500 )

AddItem( "Buy a Toyota GT-One?", "buy_toyota", "models/tiggomods/vehicles/toyotagt1.mdl", 2510 )

AddItem( "Buy a Viper CC?", "buy_viper", "models/tiggomods/vehicles/vipercc.mdl", 14584 )

AddItem( "Buy a Yamaha YFZ 450?", "buy_yamaha", "models/tiggogm/vehicles/yamahayfz450.mdl", 4500 )

AddItem( "Buy a Pagani Zonda?", "buy_pagani", "models/tiggomods/vehicles/PaganiZonda.mdl", 8952 )
end
usermessage.Hook( "PurchaseStuff", PurchaseStuff )

--[[HOW TO ADD MORE TRADERS:
Go to where it says Henry Colt's shop (at the top) to the name of the shop.
Change where it says Trade to (name).
Now go to init!
--]]
--[[ HOW TO ADD MORE STUFF:
Copy under this line, paste it above end (above usermessage.Hook) and change name and model (remeber that the -- is comments. The tut will continue in init):

local TradePanel1 = vgui.Create( "DPanel", TradeList1 ) -- Change TradePanel1 TradePanel2 (and so on) if you add more stuff. The TradeList1/2/3 is what list it should be in...
TradePanel1:SetSize( 470, 67 )
local TradeButton1 = vgui.Create( "DButton" ) -- Change TradeButton as in comment above!
TradeButton1:SetParent( TradePanel1 )
TradeButton1:SetSize( 400, 15 )
TradeButton1:SetPos( 67, 52 )
TradeButton1:SetText( "Buy a smg?" ) -- change Buy a smg to buy a (weaponname)
TradeButton1.DoClick = function ( btn )
local TradeButton1 = DermaMenu()
TradeButton1:AddOption("Yes.", function() RunConsoleCommand("buy_smg") TradeFrame:Close() end ) -- Change buy_smg til buy_(weaponname)
TradeButton1:AddOption("No.", function() end )
TradeButton1:Open()
end

local TradeIcon1 = vgui.Create( "SpawnIcon" ) -- Change TradeIcon1 as in start
TradeIcon1:SetParent( TradePanel1 )
TradeIcon1:SetPos( 2, 2 )
TradeIcon1:SetModel( "models/weapons/w_smg1.mdl" ) -- modelname...
TradeIcon1:SetToolTip( nil )
local TradeInfo1 = vgui.Create( "DLabel" ) -- Change TradeInfo as in start
TradeInfo1:SetText( "$200" ) -- price of item
TradeInfo1:SetParent( TradePanel1 )
TradeInfo1:SetPos( 250, 20 )
TradeList1:AddItem( TradePanel1 )
--]][/lua][/QUOTE]

as i said i didnt make it I just used what they gave me

[Caerian]

[QUOTE=LedZepp;36677675]as i said i didnt make it I just used what they gave me[/QUOTE]

Never settle for mediocrity.

[MisterFoxx]

[QUOTE=Caerian;36714231]Never settle for mediocrity.[/QUOTE]
good point

[multch]

what addon is this from? How could I utilize something like this for a boat shop?

[Pebsie]

[QUOTE=multch;39217469]what addon is this from? How could I utilize something like this for a boat shop?[/QUOTE]

Why bump a thread from almost a year ago?

[multch]

Just under 5 months is not a year.

[Ryll]

[QUOTE=Pebsie;39217499]Why bump a thread from just under five months ago?[/QUOTE]

Happy now?

[Pebsie]

[QUOTE=multch;39218893]Just under 5 months is not a year.[/QUOTE]

Fair point, however it's still a long enough time for this thread to be classes as dead.

[DevulTj]

[QUOTE=Pebsie;39219185]Fair point, however it's still a long enough time for this thread to be classes as dead.[/QUOTE]
You are an idiot.

[MisterFoxx]

... this sickens me to look at because i now learned LUA

[Pebsie]

[QUOTE=mib999;39219397]You are an idiot.[/QUOTE]
How so? I just made a simple typo. Look: s is right next to d.