[New] Buyable Kuno's Cars, DarkRP

[Inkie]

I have a DarkRP, Evocity server with Kuno's vehicles installed. I am fed up of people getting cars for free of the 'Q' menu and I personally think it isn't good for RP.
If someone could edit the addentities.lua file and make it so they are buyable I would be really grateful.
Thanks,
inKie.

Note: yes I did make a sickness vehicle thread but I later found out all the download are broken.

If you dont wish to code for all the vehicles just give me one example and I shall do it.

[Busymonkey]

It clearly states how the hell you add vehicles! Do people never read anymore?

[sintwins]

I don't think that it works though, at least whenever I have tried it hasn't.

[Inkie]

I have got it working :), but Sintwin's working on something awesome :)

[Nitronik]

if you still need help and if the pack isn't too big ( fuckcrap DL speed these days ) i can give you some help

[ZomgNoWai]

If you cannot get them added to the f4 menu, try using this code, it is for a cardealer job. Just replace the obvious with what u need, and u should be set to go.

[lua]
function BuyJeep(ply)
if args == "" then return "" end

local trace = { }
trace.start = ply:EyePos()
trace.endpos = trace.start + ply:GetAimVector() * 85
trace.filter = ply

if RPArrestedPlayers[ply:SteamID()] then return "" end
local tr = util.TraceLine(trace)

local cost = 230 //Price

if not ply:CanAfford(cost) then
Notify(ply, 1, 4, "Can not afford this!")
return ""
end

if ply:GetNWInt("maxvehicles") == CfgVars["maxvehicles"] then // This might not work. I added it to admincc.lua but it still might not work
Notify(ply, 1, 3, "Max Vehicles reached!")
return ""
end

if ply:Team() == TEAM_CAR then
ply:AddMoney(-230)
Notify(ply, 1, 3, "You bought a Jeep for $230")
local car = ents.Create("prop_vehicle_jeep_old")
car:SetModel("models/buggy.mdl")//set the car model
car:SetKeyValue("vehiclescript","scripts/vehicles/jeep_test.txt")
car:SetNWEntity("owning_ent", ply)
car:SetNWString("Owner", "Shared")
car:SetPos(tr.HitPos)
car.nodupe = true
car:Spawn()
car.SID = ply.SID
return ""
else
Notify(ply, 1, 3, "You must be a Car Dealer to buy this.")
end
return ""
end
AddChatCommand("/buyjeep", BuyJeep)
[/lua]