Add files via upload
commit
773394d47d
@ -0,0 +1,29 @@
|
||||
AddCSLuaFile()
|
||||
if SERVER then
|
||||
include("sv_init.lua")
|
||||
end
|
||||
DEFINE_BASECLASS( "base_anim" )
|
||||
ENT.Base = "base_anim"
|
||||
ENT.Type = "anim"
|
||||
|
||||
ENT.Spawnable = true
|
||||
ENT.AdminSpawnable = true
|
||||
ENT.PrintName = "Ferris Wheel"
|
||||
ENT.Category = "catSIXe"
|
||||
ENT.Author = ""
|
||||
|
||||
if CLIENT then
|
||||
function ENT:Initialize()
|
||||
|
||||
end
|
||||
function ENT:OnRemove()
|
||||
if self.CSoundLoop then self.CSoundLoop:Stop() end
|
||||
end
|
||||
function ENT:Think()
|
||||
if not self.CSoundLoop or self.CSoundLoop:IsPlaying() == false then
|
||||
self.CSoundLoop = CreateSound(self, "ambience/mechwhine.wav")
|
||||
self.CSoundLoop:Play()
|
||||
end
|
||||
self.CSoundLoop:ChangeVolume(0.2)
|
||||
end
|
||||
end
|
||||
@ -0,0 +1,190 @@
|
||||
function ENT:CreatePhysicsProp(mdl)
|
||||
local ent = ents.Create("prop_physics")
|
||||
ent:SetModel(mdl)
|
||||
ent:Spawn()
|
||||
--ent.PhysgunDisabled = true
|
||||
self:DeleteOnRemove(ent)
|
||||
return ent
|
||||
end
|
||||
function ENT:CreateParentedProp(mdl)
|
||||
local ent = self:CreatePhysicsProp(mdl)
|
||||
ent:SetParent(self)
|
||||
ent:SetAngles(self:GetAngles())
|
||||
ent:SetLocalPos(Vector(0))
|
||||
return ent
|
||||
end
|
||||
function ENT:Initialize()
|
||||
self:SetModel("models/props_fairground/ferriswheel/base.mdl")
|
||||
self:PhysicsInit(SOLID_VPHYSICS)
|
||||
self:SetSolid(SOLID_VPHYSICS)
|
||||
self:SetMoveType(MOVETYPE_VPHYSICS)
|
||||
local phys = self:GetPhysicsObject()
|
||||
if IsValid(phys) then phys:SetMass(50000) end
|
||||
end
|
||||
function ENT:Populate()
|
||||
local selfAng = self:GetAngles()
|
||||
self:CreateParentedProp("models/props_fairground/ferriswheel/bg_wall.mdl")
|
||||
self:CreateParentedProp("models/props_fairground/ferriswheel/label.mdl")
|
||||
|
||||
self.Holder = self:CreatePhysicsProp("models/props_fairground/ferriswheel/holder.mdl")
|
||||
self.Holder:SetPos(self:GetPos()-Vector(0,0,25))
|
||||
self.Holder:GetPhysicsObject():SetMass(25000)
|
||||
--self.Holder:SetMoveType(MOVETYPE_VPHYSICS)
|
||||
self.Holder:GetPhysicsObject():EnableMotion(false)
|
||||
|
||||
self.Gondels = {} -- should be named Carrige
|
||||
self.Wheel = self:CreatePhysicsProp("models/props_fairground/ferriswheel/wheel.mdl")
|
||||
self.Wheel:SetPos(self:GetPos()-Vector(0,0,25))
|
||||
self.Wheel:GetPhysicsObject():SetMass(25000)
|
||||
local wheelAxis = constraint.AdvBallsocket(
|
||||
self.Holder, self.Wheel,
|
||||
0, 0,
|
||||
Vector(0, 62,665.247742),
|
||||
Vector(0, 62,665.247742),
|
||||
0, 0,
|
||||
0, -180,90,
|
||||
0, 180, 90,
|
||||
0, 2, 0,
|
||||
0, 0
|
||||
)
|
||||
|
||||
for i,k in pairs(self.Wheel:GetAttachments()) do
|
||||
local newGondel = #self.Gondels + 1
|
||||
local gondelAttachment = self.Wheel:GetAttachment( i )
|
||||
self.Gondels[ newGondel ] = self:CreatePhysicsProp("models/props_fairground/ferriswheel/gondel.mdl")
|
||||
self.Gondels[ newGondel ]:GetPhysicsObject():EnableMotion(false)
|
||||
self.Gondels[ newGondel ]:SetColor(HSVToColor(i*30, 1, 1))
|
||||
self.Gondels[ newGondel ]:SetPos(gondelAttachment.Pos)
|
||||
-- ( Ent1, Ent2, Bone1, Bone2, LPos1, LPos2, forcelimit, torquelimit, xmin, ymin, zmin, xmax, ymax, zmax, xfric, yfric, zfric, onlyrotation, nocollide )
|
||||
local gondelAxis = constraint.AdvBallsocket(
|
||||
self.Wheel, self.Gondels[ newGondel ],
|
||||
0, 0,
|
||||
self.Wheel:WorldToLocal(gondelAttachment.Pos), Vector(0,0,0),
|
||||
0, 0,
|
||||
0, -180, 90,
|
||||
0, 180, 90,
|
||||
0,0,0,
|
||||
0, 1
|
||||
)
|
||||
MsgN("gondelAxis="..tostring(gondelAxis))
|
||||
self.Gondels[ newGondel ]:GetPhysicsObject():EnableMotion(true)
|
||||
self.Gondels[ newGondel ]:GetPhysicsObject():SetMass(500)
|
||||
end
|
||||
self.Holder:SetAngles(selfAng)
|
||||
self.Wheel:SetAngles(selfAng)
|
||||
for i,k in pairs(self.Gondels) do k:SetAngles(selfAng) end
|
||||
constraint.Weld(self.Holder, self, 0, 0, 0, 1)
|
||||
end
|
||||
local targetSpeed = 8
|
||||
function ENT:Think()
|
||||
if not self.FirstThink then
|
||||
self.FirstThink = true
|
||||
self:Populate()
|
||||
end
|
||||
local phys = self.Wheel:GetPhysicsObject()
|
||||
local wheelSpeed = phys:GetAngleVelocity():Length()
|
||||
--MsgN(wheelSpeed)
|
||||
if wheelSpeed > targetSpeed*1.2 then
|
||||
phys:EnableMotion(false)
|
||||
for i,k in pairs(self.Gondels) do k:SetAngles(self:GetAngles()) end
|
||||
end
|
||||
if wheelSpeed < targetSpeed then
|
||||
phys:EnableMotion(true)
|
||||
end
|
||||
if self.ReasonToMove then
|
||||
phys:AddAngleVelocity(Vector(0,wheelSpeed - targetSpeed,0)*10)
|
||||
end
|
||||
local playerCount = 0
|
||||
for i, k in pairs(self.Gondels) do
|
||||
for j,l in pairs(k:GetChildren()) do
|
||||
if l:IsVehicle() && IsValid(l:GetDriver()) then
|
||||
playerCount = playerCount + 1
|
||||
end
|
||||
end
|
||||
end
|
||||
self.ReasonToMove = playerCount > 0
|
||||
end
|
||||
function ENT:SpawnFunction(ply, trace)
|
||||
local ent = ents.Create("scripted_ferriswheel")
|
||||
local SpawnAng = ply:EyeAngles()
|
||||
SpawnAng.p = 0
|
||||
SpawnAng.y = SpawnAng.y + 90
|
||||
ent:SetAngles( SpawnAng )
|
||||
ent:SetPos( trace.HitPos )
|
||||
ent:Spawn()
|
||||
ent:Activate()
|
||||
return ent
|
||||
end
|
||||
-- Tries to find the lowest Gondel and if found, searches for a free seatLocation
|
||||
function ENT:FindLowestGondel()
|
||||
local lowestZ, lowestGondel = math.huge, nil
|
||||
for i, k in pairs(self.Gondels) do
|
||||
local gondelZ = k:GetPos().z
|
||||
if gondelZ < lowestZ then
|
||||
lowestZ = gondelZ
|
||||
lowestGondel = k
|
||||
end
|
||||
end
|
||||
return lowestGondel
|
||||
end
|
||||
function ENT:GetEntryGondel()
|
||||
local lowestGondel = self:FindLowestGondel()
|
||||
for i, k in pairs(lowestGondel:GetAttachments()) do
|
||||
local seatPos = lowestGondel:GetAttachment(i).Pos
|
||||
local seatAtPosCount = 0
|
||||
for i,k in pairs(ents.FindInSphere(seatPos, 5)) do
|
||||
if k:GetClass() == "prop_vehicle_prisoner_pod" then seatAtPosCount = seatAtPosCount + 1 end
|
||||
end
|
||||
if seatAtPosCount == 0 then
|
||||
return {
|
||||
status = true,
|
||||
gondelEntity = lowestGondel,
|
||||
gondelSeat = i
|
||||
}
|
||||
end
|
||||
end
|
||||
return {
|
||||
status = false
|
||||
}
|
||||
end
|
||||
function ENT:TeleportPlayerIntoFreeGondel(ply)
|
||||
local freeSeat = self:GetEntryGondel()
|
||||
if freeSeat.status == false then
|
||||
ply:PrintMessage(HUD_PRINTCENTER, "No seat")
|
||||
return
|
||||
end
|
||||
local gondel = freeSeat.gondelEntity
|
||||
local attachment = gondel:GetAttachment( freeSeat.gondelSeat )
|
||||
local vehicle = ents.Create("prop_vehicle_prisoner_pod")
|
||||
vehicle:SetPos(attachment.Pos)
|
||||
local ang = attachment.Ang
|
||||
ang:RotateAroundAxis(ang:Forward(), -90)
|
||||
vehicle:SetAngles(ang)
|
||||
vehicle:SetModel("models/nova/airboat_seat.mdl")
|
||||
vehicle:SetKeyValue("vehiclescript", "scripts/vehicles/prisoner_pod.txt")
|
||||
vehicle:SetKeyValue("limitview","0")
|
||||
vehicle:Spawn()
|
||||
vehicle:SetNoDraw(true)
|
||||
vehicle.PositionBeforeEnter = ply:GetPos()
|
||||
vehicle.IsGondelVehicle = true
|
||||
vehicle:SetParent(gondel, freeSeat.gondelSeat)
|
||||
vehicle:Activate()
|
||||
ply:EnterVehicle(vehicle)
|
||||
end
|
||||
function ENT:Use(ply)
|
||||
--MsgN(self:WorldToLocal(ply:EyePos()))
|
||||
if ply:KeyDown(IN_SPEED) then
|
||||
end
|
||||
if ply.FerrisWheelTimeout && ply.FerrisWheelTimeout > CurTime() then return end
|
||||
self:TeleportPlayerIntoFreeGondel(ply)
|
||||
end
|
||||
|
||||
|
||||
|
||||
hook.Add("PlayerLeaveVehicle", "ferrisWheelExit", function(ply, veh)
|
||||
if veh.IsGondelVehicle then
|
||||
SafeRemoveEntity(veh)
|
||||
ply:SetPos(veh.PositionBeforeEnter)
|
||||
ply.FerrisWheelTimeout = CurTime() + 2
|
||||
end
|
||||
end)
|
||||
Loading…
Reference in New Issue