Quantum is a Garry's Mod RPG framework.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
quantum/gamemode/engine/lib/server/sv_property.lua

94 lines
2.7 KiB

-- __ _ _______ _ __
-- / / /\ | | |__ __| | | \ \
-- / / / \ | |_ __ ___ | | ___ ___| |__ \ \
-- < < / /\ \ | | '_ ` _ \| |/ _ \/ __| '_ \ > >
-- \ \ / ____ \| | | | | | | | __/ (__| | | | / /
-- \_\ /_/ \_\_|_| |_| |_|_|\___|\___|_| |_| /_/
Quantum.Server.Property = {}
Quantum.Server.Property.Properties = {}
function Quantum.Server.Property.Register( propid, tbl )
if( Quantum.Server.Property.Properties[propid] == nil ) then
local prop = {
name = tbl.name || "Private Property",
id = propid,
owner = nil,
vec1 = tbl.vec1,
vec2 = tbl.vec2,
price = tbl.price || Quantum.Server.DefualtPropertyPrice
}
prop.zone = Quantum.Server.Zone.Register( propid .. "_property", { -- register the zone for the property
name = prop.name,
vec1 = prop.vec1,
vec2 = prop.vec2,
property = propid
} )
Quantum.Server.Property.Properties[propid] = prop
return prop
else
Quantum.Error( "Property id '" .. propid .. "' already exists! Aborting..." )
end
end
function Quantum.Server.Property.Get( propid ) return Quantum.Server.Property.Properties[propid] end
-- Player functions --
function Quantum.Server.Property.SetOwner( propid, charid )
Quantum.Server.Property.Properties[propid].owner = charid
end
hook.Add( "Move", "Quantum_Move_Property_CheckInZone", function( ply, mv )
if( ply.isloaded ) then
if( mv:GetVelocity() != Vector( 0, 0, 0 ) ) then
local zone = Quantum.Server.Zone.GetCurrentZone( ply:GetPos() )
if( zone != nil ) then
ply:ChatPrint( zone.name )
end
end
end
end)
-- Door functions --
function Quantum.Server.Property.LockDoor( ent )
if( Quantum.Server.DoorClasses[ent:GetClass()] && IsValid( ent ) ) then --
ent:Fire( "lock", "", 0 )
ent:EmitSound( Quantum.DoorSounds.Lock )
ent.islocked = true
end
end
function Quantum.Server.Property.UnlockDoor( ent )
if( Quantum.Server.DoorClasses[ent:GetClass()] && IsValid( ent ) ) then --
ent:Fire( "unlock", "", 0 )
ent:EmitSound( Quantum.DoorSounds.Unlock )
ent.islocked = false
end
end
function Quantum.Server.Property.SwitchLockDoor( ent )
if( Quantum.Server.DoorClasses[ent:GetClass()] && IsValid( ent ) ) then --
if( ent.islocked ) then
Quantum.Server.Property.UnlockDoor( ent )
else
Quantum.Server.Property.LockDoor( ent )
end
end
end
function Quantum.Server.Property.PlayerSwitchLock( pl, doorent )
local zone = Quantum.Server.Zone.GetCurrentZone( pl:GetPos() )
if( Quantum.Server.Zone.DoorIsInZone(doorent, zone.id) ) then
local prop = Quantum.Server.Property.Get( zone.property )
if( prop.owner == pl || pl:IsSuperAdmin() ) then
Quantum.Server.Property.SwitchLockDoor( doorent )
else
return
end
end
end