This commit is contained in:
lifestorm
2024-08-04 23:54:45 +03:00
parent 8064ba84d8
commit 6a58f406b1
7522 changed files with 4011896 additions and 15 deletions

View File

@@ -0,0 +1,16 @@
--[[
| This file was obtained through the combined efforts
| of Madbluntz & Plymouth Antiquarian Society.
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
| Maloy, DrPepper10 @ RIP, Atle!
|
| Visit for more: https://plymouth.thetwilightzone.ru/
--]]
local function damagedbackfire( length )
local veh = net.ReadEntity()
if not IsValid( veh ) then return end
veh:Backfire( true )
end
net.Receive("simfphys_backfire", damagedbackfire)

View File

@@ -0,0 +1,136 @@
--[[
| This file was obtained through the combined efforts
| of Madbluntz & Plymouth Antiquarian Society.
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
| Maloy, DrPepper10 @ RIP, Atle!
|
| Visit for more: https://plymouth.thetwilightzone.ru/
--]]
surface.CreateFont( "simfphysworldtip", {font="coolvetica", size=24, weight=500, antialias=true, additive=false} )
surface.CreateFont( "simfphysfont", {
font = "Verdana",
extended = false,
size = ScrH() >= 900 and (ScrH() >= 1080 and 20 or 18) or 12,
weight = 600,
blursize = 0,
scanlines = 0,
antialias = true,
underline = false,
italic = false,
strikeout = false,
symbol = false,
rotary = false,
shadow = true,
additive = false,
outline = false,
} )
surface.CreateFont( "simfphysfont2", {font = "Verdana",
extended = false,
size = (ScrH() >= 900 and (ScrH() >= 1080 and 20 or 18) or 12) * 2.8,
weight = 500,
blursize = 0,
scanlines = 0,
antialias = true,
underline = false,
italic = true,
strikeout = false,
symbol = false,
rotary = false,
shadow = false,
additive = false,
outline = false,
} )
surface.CreateFont( "simfphysfont3", {
font = "Verdana",
extended = false,
size = (ScrH() >= 900 and (ScrH() >= 1080 and 20 or 18) or 12) * 1.3,
weight = 500,
blursize = 0,
scanlines = 0,
antialias = true,
underline = false,
italic = true,
strikeout = false,
symbol = false,
rotary = false,
shadow = false,
additive = false,
outline = false,
} )
surface.CreateFont( "simfphysfont4", {
font = "Verdana",
extended = false,
size = (ScrH() >= 900 and (ScrH() >= 1080 and 20 or 18) or 12) * 6,
weight = 500,
blursize = 0,
scanlines = 0,
antialias = true,
underline = false,
italic = true,
strikeout = false,
symbol = false,
rotary = false,
shadow = false,
additive = false,
outline = false,
} )
surface.CreateFont( "DSimfphysFont", {
font = "Arial",
extended = false,
size = 22,
weight = 500,
blursize = 0,
scanlines = 0,
antialias = true,
underline = false,
italic = false,
strikeout = false,
symbol = false,
rotary = false,
shadow = false,
additive = false,
outline = false,
} )
surface.CreateFont( "DSimfphysFont_hint", {
font = "Arial",
extended = false,
size = 21,
weight = 500,
blursize = 0,
scanlines = 0,
antialias = true,
underline = true,
italic = false,
strikeout = false,
symbol = false,
rotary = false,
shadow = false,
additive = false,
outline = false,
} )
surface.CreateFont( "SimfphysFont_seatswitcher", {
font = "Verdana",
extended = false,
size = 16,
weight = 2000,
blursize = 0,
scanlines = 0,
antialias = true,
underline = false,
italic = false,
strikeout = false,
symbol = false,
rotary = false,
shadow = true,
additive = false,
outline = false,
} )

556
lua/simfphys/client/hud.lua Normal file
View File

@@ -0,0 +1,556 @@
--[[
| This file was obtained through the combined efforts
| of Madbluntz & Plymouth Antiquarian Society.
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
| Maloy, DrPepper10 @ RIP, Atle!
|
| Visit for more: https://plymouth.thetwilightzone.ru/
--]]
if not file.Exists( "includes/circles/circles.lua", "LUA" ) then return end
local circles = include("includes/circles/circles.lua")
local CircleMain
local CircleMainRed
local CircleRedLine
local screenw = ScrW()
local screenh = ScrH()
local Widescreen = (screenw / screenh) > (4 / 3)
local sizex = screenw * (Widescreen and 1 or 1.32)
local sizey = screenh
local xpos = sizex * 0.02
local ypos = sizey * 0.8
local x = xpos * (Widescreen and 43.5 or 32)
local y = ypos * 1.015
local radius = 0.085 * sizex
local startang = 105
local lights_on = Material( "simfphys/hud/low_beam_on" )
local lights_on2 = Material( "simfphys/hud/high_beam_on" )
local lights_off = Material( "simfphys/hud/low_beam_off" )
local fog_on = Material( "simfphys/hud/fog_light_on" )
local fog_off = Material( "simfphys/hud/fog_light_off" )
local cruise_on = Material( "simfphys/hud/cc_on" )
local cruise_off = Material( "simfphys/hud/cc_off" )
local hbrake_on = Material( "simfphys/hud/handbrake_on" )
local hbrake_off = Material( "simfphys/hud/handbrake_off" )
local HUD_1 = Material( "simfphys/hud/hud" )
local HUD_2 = Material( "simfphys/hud/hud_center" )
local HUD_3 = Material( "simfphys/hud/hud_center_red" )
local ForceSimpleHud = not file.Exists( "materials/simfphys/hud/hud.vmt", "GAME" ) -- lets check if the background material exists, if not we will force the old hud to prevent fps drop
local smHider = 0
local ShowHud = false
local ShowHud_ms = false
local AltHud = false
local Hudmph = false
local Hudmpg = false
local Hudreal = false
local hasCounterSteerEnabled = false
local slushbox = false
local hudoffset_x = 0
local hudoffset_y = 0
local turnmenu = KEY_COMMA
cvars.AddChangeCallback( "cl_simfphys_hud", function( convar, oldValue, newValue ) ShowHud = tonumber( newValue )~=0 end)
cvars.AddChangeCallback( "cl_simfphys_hud_offset_x", function( convar, oldValue, newValue ) hudoffset_x = newValue end)
cvars.AddChangeCallback( "cl_simfphys_hud_offset_y", function( convar, oldValue, newValue ) hudoffset_y = newValue end)
cvars.AddChangeCallback( "cl_simfphys_althud", function( convar, oldValue, newValue ) AltHud = tonumber( newValue )~=0 end)
cvars.AddChangeCallback( "cl_simfphys_hudmph", function( convar, oldValue, newValue ) Hudmph = tonumber( newValue )~=0 end)
cvars.AddChangeCallback( "cl_simfphys_hudmpg", function( convar, oldValue, newValue ) Hudmpg = tonumber( newValue )~=0 end)
cvars.AddChangeCallback( "cl_simfphys_hudrealspeed", function( convar, oldValue, newValue ) Hudreal = tonumber( newValue )~=0 end)
cvars.AddChangeCallback( "cl_simfphys_ctenable", function( convar, oldValue, newValue ) hasCounterSteerEnabled = tonumber( newValue )~=0 end)
cvars.AddChangeCallback( "cl_simfphys_auto", function( convar, oldValue, newValue ) slushbox = tonumber( newValue )~=0 end)
cvars.AddChangeCallback( "cl_simfphys_key_turnmenu", function( convar, oldValue, newValue ) turnmenu = tonumber( newValue ) end)
ShowHud = GetConVar( "cl_simfphys_hud" ):GetBool()
hudoffset_x = GetConVar( "cl_simfphys_hud_offset_x" ):GetFloat()
hudoffset_y = GetConVar( "cl_simfphys_hud_offset_y" ):GetFloat()
AltHud = GetConVar( "cl_simfphys_althud" ):GetBool()
Hudmph = GetConVar( "cl_simfphys_hudmph" ):GetBool()
Hudmpg = GetConVar( "cl_simfphys_hudmpg" ):GetBool()
Hudreal = GetConVar( "cl_simfphys_hudrealspeed" ):GetBool()
hasCounterSteerEnabled = GetConVar( "cl_simfphys_ctenable" ):GetBool()
slushbox = GetConVar( "cl_simfphys_auto" ):GetBool()
turnmenu = GetConVar( "cl_simfphys_key_turnmenu" ):GetInt()
local function DrawCircle( X, Y, radius )
local segmentdist = 360 / ( 2 * math.pi * radius / 2 )
for a = 0, 360 - segmentdist, segmentdist do
surface.DrawLine( X + math.cos( math.rad( a ) ) * radius, Y - math.sin( math.rad( a ) ) * radius, X + math.cos( math.rad( a + segmentdist ) ) * radius, Y - math.sin( math.rad( a + segmentdist ) ) * radius )
end
end
local sm_throttle = 0
local s_smoothrpm = 0
local function drawsimfphysHUD(vehicle)
if not ShowHud then return end
if vehicle:GetNWBool( "simfphys_NoHud", false ) then return end
local maxrpm = vehicle:GetLimitRPM()
local rpm = vehicle:GetRPM()
local throttle = math.Round(vehicle:GetThrottle() * 100,0)
local revlimiter = vehicle:GetRevlimiter() and (maxrpm > 2500) and (throttle > 0)
local SimpleHudIsForced = vehicle:GetNWBool( "simfphys_NoRacingHud", false )
local powerbandend = math.min(vehicle:GetPowerBandEnd(), maxrpm - 1)
local redline = math.max(rpm - powerbandend,0) / (maxrpm - powerbandend)
local Active = vehicle:GetActive() and "" or "!"
local speed = vehicle:GetVelocity():Length()
local mph = math.Round(speed * 0.0568182,0)
local kmh = math.Round(speed * 0.09144,0)
local wiremph = math.Round(speed * 0.0568182 * 0.75,0)
local wirekmh = math.Round(speed * 0.09144 * 0.75,0)
local cruisecontrol = vehicle:GetIsCruiseModeOn()
local gear = vehicle:GetGear()
local DrawGear = not slushbox and (gear == 1 and "R" or gear == 2 and "N" or (gear - 2)) or (gear == 1 and "R" or gear == 2 and "N" or "(".. (gear - 2)..")")
local o_x = hudoffset_x * screenw
local o_y = hudoffset_y * screenh
local fuel = vehicle:GetFuel() / vehicle:GetMaxFuel()
local fueltype = vehicle:GetFuelType()
local fueltype_color = color_white
if fueltype == FUELTYPE_ELECTRIC then
fueltype_color = Color(0,127,255,150)
elseif fueltype == FUELTYPE_PETROL then
fueltype_color = Color(240,200,0,150)
elseif fueltype == FUELTYPE_DIESEL then
fueltype_color = Color(255,60,0,150)
end
if AltHud and not ForceSimpleHud and not SimpleHudIsForced then
local LightsOn = vehicle:GetLightsEnabled()
local LampsOn = vehicle:GetLampsEnabled()
local FogLightsOn = vehicle:GetFogLightsEnabled()
local HandBrakeOn = vehicle:GetHandBrakeEnabled()
s_smoothrpm = s_smoothrpm or 0
s_smoothrpm = math.Clamp(s_smoothrpm + (rpm - s_smoothrpm) * 0.3,0,maxrpm)
local endang = startang + math.Round( (s_smoothrpm/maxrpm) * 255, 0)
local c_ang = math.cos( math.rad(endang) )
local s_ang = math.sin( math.rad(endang) )
local ang_pend = startang + math.Round( (powerbandend / maxrpm) * 255, 0)
local r_rpm = math.floor(maxrpm / 1000) * 1000
local in_red = s_smoothrpm < powerbandend
surface.SetDrawColor( 255, 255, 255, 255 )
local mat = LightsOn and (LampsOn and lights_on2 or lights_on) or lights_off
surface.SetMaterial( mat )
surface.DrawTexturedRect( x + radius * 1.15 + o_x, y - radius * 0.1 + o_y, sizex * 0.014, sizex * 0.014 )
local mat = FogLightsOn and fog_on or fog_off
surface.SetMaterial( mat )
surface.DrawTexturedRect( x + radius * 1.12 + o_x, y - radius * 0.43 + o_y, sizex * 0.018, sizex * 0.018 )
local mat = cruisecontrol and cruise_on or cruise_off
surface.SetMaterial( mat )
surface.DrawTexturedRect( x + radius * 1.11 + o_x, y - radius * 0.75 + o_y, sizex * 0.02, sizex * 0.02 )
local mat = HandBrakeOn and hbrake_on or hbrake_off
surface.SetMaterial( mat )
surface.DrawTexturedRect( x + radius * 1.13 + o_x, y - radius * 1 + o_y, sizex * 0.018, sizex * 0.018 )
surface.SetMaterial( HUD_1 )
surface.DrawTexturedRect( x - radius + o_x, y - radius + 1 + o_y, radius * 2, radius * 2)
surface.SetMaterial( in_red and HUD_2 or HUD_3 )
surface.DrawTexturedRect( x - radius + o_x, y - radius + 1 + o_y, radius * 2, radius * 2)
draw.NoTexture()
if not CircleMain then
CircleMain = circles.New(CIRCLE_OUTLINED, radius, 0, 0, radius / 6.66)
CircleMain:SetColor( Color(255,255,255,150) )
end
CircleMain:SetX( x + o_x )
CircleMain:SetY( y + o_y )
CircleMain:SetStartAngle( startang )
CircleMain:SetEndAngle( math.min(endang,ang_pend) )
CircleMain()
if not CircleRedLine then
CircleRedLine = circles.New(CIRCLE_OUTLINED, radius, 0, 0, radius / 6.66)
CircleRedLine:SetColor( Color(120,0,0,230) )
end
CircleRedLine:SetX( x + o_x )
CircleRedLine:SetY( y + o_y )
CircleRedLine:SetStartAngle( ang_pend )
CircleRedLine:SetEndAngle( 360 )
CircleRedLine()
if not CircleMainRed then
CircleMainRed = circles.New(CIRCLE_OUTLINED, radius, 0, 0, radius / 6.66)
CircleMainRed:SetColor( Color(255,0,0,140) )
end
CircleMainRed:SetX( x + o_x )
CircleMainRed:SetY( y + o_y )
CircleMainRed:SetStartAngle( math.Round(ang_pend - 1,0) )
CircleMainRed:SetEndAngle( startang + (s_smoothrpm / maxrpm) * 255 )
CircleMainRed()
--draw.Arc(x + o_x,y + o_y,radius,radius / 6.66,startang,math.min(endang,ang_pend),1,Color(255,255,255,150),true)
--draw.Arc(x + o_x,y + o_y,radius,radius / 6.66,ang_pend,360,1,Color(120,0,0,230),true)
--draw.Arc(x + o_x,y + o_y,radius,radius / 6.66,math.Round(ang_pend - 1,0),startang + (s_smoothrpm / maxrpm) * 255,1,Color(255,0,0,140),true)
--draw.Arc(x + o_x,y + o_y,radius / 3.5,radius / 66,startang,360,15,Color(255,255,255,50),true)
--draw.Arc(x + o_x,y + o_y,radius,radius / 6.66,startang,ang_pend,1,Color(150,150,150,50),true)
--draw.Arc(x + o_x,y + o_y,radius / 5,radius / 70,0,360,15,center_ncol,true)
local step = 0
for i = 0,maxrpm,250 do
step = step + 1
local anglestep = (255 / maxrpm) * i
local n_col_on
local n_col_off
if (i < powerbandend) then
n_col_off = Color(150, 150, 150, 150)
n_col_on = Color(255, 255, 255, 255)
else
n_col_off = Color( 150, 0, 0, 150)
n_col_on = Color( 255, 0, 0, 255 )
end
local u_col = (s_smoothrpm > i) and n_col_on or n_col_off
surface.SetDrawColor( u_col )
local cos_a = math.cos( math.rad(startang + anglestep) )
local sin_a = math.sin( math.rad(startang + anglestep) )
if step > 4 then
step = 1
surface.DrawLine( x + cos_a * radius / 1.3 + o_x, y + sin_a * radius / 1.3 + o_y, x + cos_a * radius + o_x, y + sin_a * radius + o_y)
local printnumber = tostring(i / 1000)
draw.SimpleText(printnumber, "simfphysfont3", x + cos_a * radius / 1.5 + o_x, y + sin_a * radius / 1.5 + o_y,u_col, 1, 1 )
else
surface.DrawLine( x + cos_a * radius / 1.05 + o_x, y + sin_a * radius / 1.05 + o_y, x + cos_a * radius + o_x, y + sin_a * radius + o_y)
end
end
local center_ncol = in_red and Color(0,254,235,200) or Color( 255, 0, 0, 255 )
surface.SetDrawColor( in_red and Color(255,255,255,255) or Color( 255, 0, 0, 255 ) )
surface.DrawLine( x + c_ang * radius / 3.5 + o_x, y + s_ang * radius / 3.5 + o_y, x + c_ang * radius + o_x, y + s_ang * radius + o_y)
surface.SetDrawColor( 255, 255, 255, 255 )
draw.SimpleText( (gear == 1 and "R" or gear == 2 and "N" or (gear - 2)), "simfphysfont2", x * 0.999 + o_x, y * 0.996 + o_y, center_ncol, 1, 1 )
local print_text = Hudmph and "MPH" or "KM/H"
draw.SimpleText( print_text, "simfphysfont3", x + radius * 0.82 + o_x, y + radius * 0.16 + o_y, Color(255,255,255,50), 1, 1 )
local printspeed = Hudmph and (Hudreal and mph or wiremph) or (Hudreal and kmh or wirekmh)
local digit_1 = printspeed % 10
local digit_2 = (printspeed - digit_1) % 100
local digit_3 = (printspeed - digit_1 - digit_2) % 1000
local col_on = Color(150,150,150,50)
local col_off = Color(255,255,255,150)
local col1 = (printspeed > 0) and col_off or col_on
local col2 = (printspeed >= 10) and col_off or col_on
local col3 = (printspeed >= 100) and col_off or col_on
draw.SimpleText( digit_1, "simfphysfont4", x + radius * 0.84 + o_x, y + radius * 0.65 + o_y, col1, 1, 1 )
draw.SimpleText( digit_2/ 10, "simfphysfont4", x + radius * 0.48 + o_x, y + radius * 0.65 + o_y, col2, 1, 1 )
draw.SimpleText( digit_3 / 100, "simfphysfont4", x + radius * 0.12 + o_x, y + radius * 0.65 + o_y, col3, 1, 1 )
sm_throttle = sm_throttle + (throttle - sm_throttle) * 0.1
local t_size = (sizey * 0.1)
surface.SetDrawColor( Color(150,150,150,50) )
surface.DrawRect( x + radius * 1.22 + o_x, y + radius * 0.36 + o_y, radius * 0.08, sizey * 0.1 )
surface.SetDrawColor( Color(255,255,255,150) )
surface.DrawRect( x + radius * 1.22 + o_x, y + radius * 0.36 + t_size - t_size * math.min(sm_throttle / 100,1) + o_y, radius * 0.08, t_size * math.min(sm_throttle / 100,1) )
local fueluse = vehicle:GetFuelUse()
if fueluse == -1 then return end
local r = math.Round( radius, 0)
surface.SetDrawColor( Color(150,150,150,50) )
surface.DrawRect( x + o_x + r * fuel, y + o_y + r, r * (1 - fuel), r * 0.04 )
surface.DrawLine( x + o_x - r * 0.85, y + o_y + r * 1.04 - 2, x + o_x, y + o_y + r * 1.04 - 2)
surface.SetDrawColor( fueltype_color )
surface.DrawRect( x + o_x, y + o_y + r, r * fuel, r * 0.04 )
if fueltype ~= FUELTYPE_PETROL and fueltype ~= FUELTYPE_DIESEL then return end
local ecospeed = (Hudreal and kmh or wirekmh)
local calc_fueluse = (100 / ecospeed) * fueluse * 60
if Hudmpg then
calc_fueluse = 235.214 / calc_fueluse
end
local print_fueluse = (ecospeed > 0 and vehicle:GetFuel() > 0) and tostring( math.Round( calc_fueluse,0) ) or "N/A"
--draw.SimpleText( tostring( math.Round( fueluse,2) ).." L/min", "simfphysfont3", x + o_x + radius, y + o_y + radius * 1.04, Color(150,150,150,150), TEXT_ALIGN_RIGHT, TEXT_ALIGN_TOP )
draw.SimpleText( print_fueluse, "simfphysfont3", x + o_x - radius * 0.85, y + o_y + radius * 0.85, Color(150,150,150,150), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP )
draw.SimpleText( Hudmpg and "MPG" or "L/100KM", "simfphysfont3", x + o_x - radius * 0.85, y + o_y + radius * 1.02, Color(150,150,150,150), TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP )
return
end
local s_xpos = xpos
local s_ypos = ypos
local Col = color_white
if SimpleHudIsForced then
o_x = 0
o_y = 0
s_xpos = screenw * 0.5 - sizex * 0.115 - sizex * 0.032
s_ypos = screenh - sizey * 0.092 - sizey * 0.02
end
if cruisecontrol then
draw.SimpleText( "cruise", "simfphysfont", s_xpos + sizex * 0.115 + o_x, s_ypos + sizey * 0.035 + o_y, Color( 255, 127, 0, 255 ), 2, 1 )
end
draw.SimpleText( "Throttle: "..throttle.." %", "simfphysfont", s_xpos + o_x, s_ypos + sizey * 0.035 + o_y, Col, 0, 1)
local ColRPM = Color( 255, 255 * (1 - redline), 255 * (1 - redline), 255 )
draw.SimpleText( "RPM: "..math.Round(rpm,0)..Active, "simfphysfont", s_xpos + o_x, s_ypos + sizey * 0.012 + o_y, ColRPM, 0, 1 )
draw.SimpleText( "GEAR:", "simfphysfont", s_xpos + sizex * 0.062 + o_x, s_ypos + sizey * 0.012 + o_y, Col, 0, 1 )
draw.SimpleText( DrawGear, "simfphysfont", s_xpos + sizex * 0.11 + o_x, s_ypos + sizey * 0.012 + o_y, Col, 2, 1 )
draw.SimpleText( (Hudreal and mph or wiremph).." mph", "simfphysfont", s_xpos + o_x, s_ypos + sizey * 0.062 + o_y, Col, 0, 1 )
draw.SimpleText( (Hudreal and kmh or wirekmh).." kmh", "simfphysfont", s_xpos + sizex * 0.11 + o_x, s_ypos + sizey * 0.062 + o_y, Col, 2, 1 )
local fueluse = vehicle:GetFuelUse()
if fueluse == -1 then return end
local r = math.Round(sizey * 0.075,0)
surface.SetDrawColor( Color(0,0,0,80) )
surface.DrawRect( s_xpos + o_x - sizex * 0.007, s_ypos + o_y, sizex * 0.0025, r * (1 - fuel) )
surface.SetDrawColor( fueltype_color )
surface.DrawRect( s_xpos + o_x - sizex * 0.007, s_ypos + o_y + r * (1 - fuel), sizex * 0.0025, r * fuel )
end
local turnmode = 0
local turnmenu_wasopen = false
local function drawTurnMenu( vehicle )
if input.IsKeyDown( GetConVar( "cl_simfphys_keyforward" ):GetInt() ) or input.IsKeyDown( GetConVar( "cl_simfphys_key_air_forward" ):GetInt() ) then
turnmode = 0
end
if input.IsKeyDown( GetConVar( "cl_simfphys_keyleft" ):GetInt() ) or input.IsKeyDown( GetConVar( "cl_simfphys_key_air_left" ):GetInt() ) then
turnmode = 2
end
if input.IsKeyDown( GetConVar( "cl_simfphys_keyright" ):GetInt() ) or input.IsKeyDown( GetConVar( "cl_simfphys_key_air_right" ):GetInt() ) then
turnmode = 3
end
if input.IsKeyDown( GetConVar( "cl_simfphys_keyreverse" ):GetInt() ) or input.IsKeyDown( GetConVar( "cl_simfphys_key_air_reverse" ):GetInt() ) then
turnmode = 1
end
local cX = ScrW() / 2
local cY = ScrH() / 2
local sx = sizex * 0.065
local sy = sizex * 0.065
local selectorX = (turnmode == 2 and (-sx - 1) or 0) + (turnmode == 3 and (sx + 1) or 0)
local selectorY = (turnmode == 0 and (-sy - 1) or 0)
draw.RoundedBox( 8, cX - sx * 0.5 - 1 + selectorX, cY - sy * 0.5 - 1 + selectorY, sx + 2, sy + 2, Color( 240, 200, 0, 255 ) )
draw.RoundedBox( 8, cX - sx * 0.5 + selectorX, cY - sy * 0.5 + selectorY, sx, sy, Color( 50, 50, 50, 255 ) )
draw.RoundedBox( 8, cX - sx * 0.5, cY - sy * 0.5, sx, sy, Color( 0, 0, 0, 100 ) )
draw.RoundedBox( 8, cX - sx * 0.5, cY - sy * 1.5 - 1, sx, sy, Color( 0, 0, 0, 100 ) )
draw.RoundedBox( 8, cX - sx * 1.5 - 1, cY - sy * 0.5, sx, sy, Color( 0, 0, 0, 100 ) )
draw.RoundedBox( 8, cX + sx * 0.5 + 1, cY - sy * 0.5, sx, sy, Color( 0, 0, 0, 100 ) )
surface.SetDrawColor( 240, 200, 0, 100 )
--X
if turnmode == 0 then
surface.SetDrawColor( 240, 200, 0, 255 )
end
surface.DrawLine( cX - sx * 0.3, cY - sy - sy * 0.3, cX + sx * 0.3, cY - sy + sy * 0.3 )
surface.DrawLine( cX + sx * 0.3, cY - sy - sy * 0.3, cX - sx * 0.3, cY - sy + sy * 0.3 )
surface.SetDrawColor( 240, 200, 0, 100 )
-- <=
if turnmode == 2 then
surface.SetDrawColor( 240, 200, 0, 255 )
end
surface.DrawLine( cX - sx + sx * 0.3, cY - sy * 0.15, cX - sx + sx * 0.3, cY + sy * 0.15 )
surface.DrawLine( cX - sx + sx * 0.3, cY + sy * 0.15, cX - sx, cY + sy * 0.15 )
surface.DrawLine( cX - sx + sx * 0.3, cY - sy * 0.15, cX - sx, cY - sy * 0.15 )
surface.DrawLine( cX - sx, cY - sy * 0.3, cX - sx, cY - sy * 0.15 )
surface.DrawLine( cX - sx, cY + sy * 0.3, cX - sx, cY + sy * 0.15 )
surface.DrawLine( cX - sx, cY + sy * 0.3, cX - sx - sx * 0.3, cY )
surface.DrawLine( cX - sx, cY - sy * 0.3, cX - sx - sx * 0.3, cY )
surface.SetDrawColor( 240, 200, 0, 100 )
-- =>
if turnmode == 3 then
surface.SetDrawColor( 240, 200, 0, 255 )
end
surface.DrawLine( cX + sx - sx * 0.3, cY - sy * 0.15, cX + sx - sx * 0.3, cY + sy * 0.15 )
surface.DrawLine( cX + sx - sx * 0.3, cY + sy * 0.15, cX + sx, cY + sy * 0.15 )
surface.DrawLine( cX + sx - sx * 0.3, cY - sy * 0.15, cX + sx, cY - sy * 0.15 )
surface.DrawLine( cX + sx, cY - sy * 0.3, cX + sx, cY - sy * 0.15 )
surface.DrawLine( cX + sx, cY + sy * 0.3, cX + sx, cY + sy * 0.15 )
surface.DrawLine( cX + sx, cY + sy * 0.3, cX + sx + sx * 0.3, cY )
surface.DrawLine( cX + sx, cY - sy * 0.3, cX + sx + sx * 0.3, cY )
surface.SetDrawColor( 240, 200, 0, 100 )
-- ^
if turnmode == 1 then
surface.SetDrawColor( 240, 200, 0, 255 )
end
surface.DrawLine( cX, cY - sy * 0.4, cX + sx * 0.4, cY + sy * 0.3 )
surface.DrawLine( cX, cY - sy * 0.4, cX - sx * 0.4, cY + sy * 0.3 )
surface.DrawLine( cX + sx * 0.4, cY + sy * 0.3, cX - sx * 0.4, cY + sy * 0.3 )
surface.DrawLine( cX, cY - sy * 0.26, cX + sx * 0.3, cY + sy * 0.24 )
surface.DrawLine( cX, cY - sy * 0.26, cX - sx * 0.3, cY + sy * 0.24 )
surface.DrawLine( cX + sx * 0.3, cY + sy * 0.24, cX - sx * 0.3, cY + sy * 0.24 )
surface.SetDrawColor( 255, 255, 255, 255 )
end
hook.Add( "HUDPaint", "simfphys_HUD", function()
local ply = LocalPlayer()
local turnmenu_isopen = false
if not IsValid( ply ) or not ply:Alive() then turnmenu_wasopen = false return end
local vehicle = ply:GetVehicle()
local vehiclebase = ply:GetSimfphys()
if not IsValid( vehicle ) or not IsValid( vehiclebase ) then
ply.oldPassengersmf = {}
turnmenu_wasopen = false
smHider = 0
return
end
if not ply:IsDrivingSimfphys() then turnmenu_wasopen = false return end
drawsimfphysHUD( vehiclebase )
if vehiclebase.HasTurnSignals and input.IsKeyDown( turnmenu ) then
turnmenu_isopen = true
drawTurnMenu( vehiclebase )
end
if turnmenu_isopen ~= turnmenu_wasopen then
turnmenu_wasopen = turnmenu_isopen
if turnmenu_isopen then
turnmode = 0
else
net.Start( "simfphys_turnsignal" )
net.WriteEntity( vehiclebase )
net.WriteInt( turnmode, 32 )
net.SendToServer()
if turnmode == 1 or turnmode == 2 or turnmode == 3 then
vehiclebase:EmitSound( "simulated_vehicles/sfx/turnsignal_start.ogg" )
else
vehiclebase:EmitSound( "simulated_vehicles/sfx/turnsignal_end.ogg" )
end
end
end
end)
local bgcol = Color(120,120,120,255)
local framecol = Color(0,0,0,255)
local textcol = Color(210,210,210,255)
hook.Add("HUDPaint", "simfphys_vehicleditorinfo", function()
local ply = LocalPlayer()
if ply:InVehicle() then return end
local wep = ply:GetActiveWeapon()
if not IsValid( wep ) or wep:GetClass() ~= "gmod_tool" or ply:GetInfo("gmod_toolmode") ~= "simfphyseditor" then return end
local trace = ply:GetEyeTrace()
local Ent = trace.Entity
if not simfphys.IsCar( Ent ) then return end
local vInfo = Ent:GetVehicleInfo()
if not istable( vInfo ) or not vInfo["maxspeed"] or not vInfo["horsepower"] or not vInfo["weight"] or not vInfo["torque"] then return end
local SpeedMul = Hudmph and (Hudreal and 0.0568182 or 0.0568182 * 0.75) or (Hudreal and 0.09144 or 0.09144 * 0.75)
local SpeedSuffix = Hudmph and "mph" or "km/h"
local toSize = Hudreal and (1/0.75) or 1
local nameSize = Hudreal and "\n\nNote: values are based on playersize" or ""
local TopSpeed = math.Round( vInfo["maxspeed"] * SpeedMul )
local HP = math.Round( vInfo["horsepower"] * toSize )
local Weight = math.Round( vInfo["weight"] )
local PowerToWeight = math.Round(Weight / HP,1)
local PeakTorque = math.Round( vInfo["torque"] * toSize )
local text = "Peak Power: "..HP.." HP".."\nPeak Torque: "..PeakTorque.." Nm\nTop Speed: "..tostring( TopSpeed )..SpeedSuffix.." (theoretical max)".."\nWeight: "..Weight.." kg ("..PowerToWeight.." kg / HP)"..nameSize
local pos = Ent:LocalToWorld( Ent:OBBCenter() ):ToScreen()
local x = 0
local y = 0
local padding = 10
local offset = 50
surface.SetFont( "simfphysworldtip" )
local w, h = surface.GetTextSize( text )
x = pos.x - w
y = pos.y - h
x = x - offset
y = y - offset
draw.RoundedBox( 8, x-padding-2, y-padding-2, w+padding*2+4, h+padding*2+4, framecol )
local verts = {}
verts[1] = { x=x+w/1.5-2, y=y+h+2 }
verts[2] = { x=x+w+2, y=y+h/2-1 }
verts[3] = { x=pos.x-offset/2+2, y=pos.y-offset/2+2 }
draw.NoTexture()
surface.SetDrawColor( framecol )
surface.DrawPoly( verts )
draw.RoundedBox( 8, x-padding, y-padding, w+padding*2, h+padding*2, bgcol )
local verts = {}
verts[1] = { x=x+w/1.5, y=y+h }
verts[2] = { x=x+w, y=y+h/2 }
verts[3] = { x=pos.x-offset/2, y=pos.y-offset/2 }
draw.NoTexture()
surface.SetDrawColor( bgcol )
surface.DrawPoly( verts )
draw.DrawText( text, "simfphysworldtip", x + w/2, y, textcol, TEXT_ALIGN_CENTER )
end)

File diff suppressed because it is too large Load Diff

View File

@@ -0,0 +1,69 @@
--[[
| This file was obtained through the combined efforts
| of Madbluntz & Plymouth Antiquarian Society.
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
| Maloy, DrPepper10 @ RIP, Atle!
|
| Visit for more: https://plymouth.thetwilightzone.ru/
--]]
local function receiveppdata( length )
local ent = net.ReadEntity()
if IsValid( ent ) then
ent.CustomWheels = net.ReadBool()
if not ent.CustomWheels then
local wheelFL = net.ReadEntity()
local posFL = net.ReadFloat()
local travelFL = net.ReadFloat()
local wheelFR = net.ReadEntity()
local posFR = net.ReadFloat()
local travelFR = net.ReadFloat()
local wheelRL = net.ReadEntity()
local posRL = net.ReadFloat()
local travelRL = net.ReadFloat()
local wheelRR = net.ReadEntity()
local posRR = net.ReadFloat()
local travelRR = net.ReadFloat()
if not IsValid( wheelFL ) or not IsValid( wheelFR ) or not IsValid( wheelRL ) or not IsValid( wheelRR ) then return end
ent.pp_data = {
[1] = {
name = "vehicle_wheel_fl_height",
entity = wheelFL,
pos = posFL,
travel = travelFL,
dradius = (wheelFL:BoundingRadius() * 0.28),
},
[2] = {
name = "vehicle_wheel_fr_height",
entity = wheelFR,
pos = posFR,
travel = travelFR,
dradius = (wheelFR:BoundingRadius() * 0.28),
},
[3] = {
name = "vehicle_wheel_rl_height",
entity = wheelRL,
pos = posRL,
travel = travelRL,
dradius = (wheelRL:BoundingRadius() * 0.28),
},
[4] = {
name = "vehicle_wheel_rr_height",
entity = wheelRR,
pos = posRR,
travel = travelRR,
dradius = (wheelRR:BoundingRadius() * 0.28),
},
}
end
end
end
net.Receive("simfphys_send_ppdata", receiveppdata)

View File

@@ -0,0 +1,81 @@
--[[
| This file was obtained through the combined efforts
| of Madbluntz & Plymouth Antiquarian Society.
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
| Maloy, DrPepper10 @ RIP, Atle!
|
| Visit for more: https://plymouth.thetwilightzone.ru/
--]]
local function TableMerge( ent, class )
local vehiclelist = list.Get( "simfphys_vehicles" )[ class ]
if not vehiclelist then return end
local data = vehiclelist.Members
if not data then return end
ent.customview = data.FirstPersonViewPos or Vector(0,-9,5)
ent.EnginePos = data.EnginePos
ent.ExhaustPositions = data.ExhaustPositions
ent.snd_idle = data.snd_idle
ent.snd_low = data.snd_low
ent.snd_mid = data.snd_mid
ent.snd_low_revdown = data.snd_low_revdown
ent.snd_mid_gearup = data.snd_mid_gearup
ent.snd_mid_geardown = data.snd_mid_geardown
ent.snd_low_pitch = data.snd_low_pitch
ent.snd_mid_pitch = data.snd_mid_pitch
ent.snd_pitch = data.snd_pitch
ent.Sound_Idle = data.Sound_Idle
ent.Sound_IdlePitch = data.Sound_IdlePitch
ent.Sound_Mid = data.Sound_Mid
ent.Sound_MidPitch = data.Sound_MidPitch
ent.Sound_MidVolume = data.Sound_MidVolume
ent.Sound_MidFadeOutRPMpercent = data.Sound_MidFadeOutRPMpercent
ent.Sound_MidFadeOutRate = data.Sound_MidFadeOutRate
ent.Sound_High = data.Sound_High
ent.Sound_HighPitch = data.Sound_HighPitch
ent.Sound_HighVolume = data.Sound_HighVolume
ent.Sound_HighFadeInRPMpercent = data.Sound_HighFadeInRPMpercent
ent.Sound_HighFadeInRate = data.Sound_HighFadeInRate
ent.Sound_Throttle = data.Sound_Throttle
ent.Sound_ThrottlePitch = data.Sound_ThrottlePitch
ent.Sound_ThrottleVolume = data.Sound_ThrottleVolume
end
local function Loop( ent, delay )
delay = delay or 0
if not IsValid( ent ) then return end
timer.Simple( delay , function()
if not IsValid( ent ) then return end
if ent.GetSpawn_List then
TableMerge( ent, ent:GetSpawn_List() )
else
Loop( ent, 0.1 )
end
end)
end
hook.Add( "OnEntityCreated", "!!!!lvs_just_in_time_table_merge", function( ent )
if not IsValid( ent ) then return end
if ent:GetClass() ~= "gmod_sent_vehicle_fphysics_base" then return end
Loop( ent )
end )

616
lua/simfphys/client/tab.lua Normal file
View File

@@ -0,0 +1,616 @@
--[[
| This file was obtained through the combined efforts
| of Madbluntz & Plymouth Antiquarian Society.
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
| Maloy, DrPepper10 @ RIP, Atle!
|
| Visit for more: https://plymouth.thetwilightzone.ru/
--]]
local auto = CreateClientConVar( "cl_simfphys_auto", 1 , true, true )
local sport = CreateClientConVar( "cl_simfphys_sport", 0 , true, true )
local sanic = CreateClientConVar( "cl_simfphys_sanic", 0 , true, true )
local ctenable = CreateClientConVar( "cl_simfphys_ctenable", 1 , true, true )
local ctmul = CreateClientConVar( "cl_simfphys_ctmul", 0.7 , true, true )
local ctang = CreateClientConVar( "cl_simfphys_ctang", 15 , true, true )
local hud = CreateClientConVar( "cl_simfphys_hud", "1", true, false )
local alt_hud = CreateClientConVar( "cl_simfphys_althud", "1", true, false )
local hud_x = CreateClientConVar( "cl_simfphys_hud_offset_x", "0", true, false )
local hud_y = CreateClientConVar( "cl_simfphys_hud_offset_y", "0", true, false )
local hud_mph = CreateClientConVar( "cl_simfphys_hudmph", "0", true, false )
local hud_mpg = CreateClientConVar( "cl_simfphys_hudmpg", "0", true, false )
local hud_realspeed = CreateClientConVar( "cl_simfphys_hudrealspeed", "0", true, false )
local autostart = CreateClientConVar( "cl_simfphys_autostart", "1", true, true )
local overwrite = CreateClientConVar( "cl_simfphys_overwrite", 0, true, true )
local smoothsteer = CreateClientConVar( "cl_simfphys_smoothsteer", 0, true, true )
local steerspeed = CreateClientConVar( "cl_simfphys_steerspeed", 8, true, true )
local faststeerang = CreateClientConVar( "cl_simfphys_steerangfast", 10, true, true )
local fadespeed = CreateClientConVar( "cl_simfphys_fadespeed", 535, true, true )
CreateClientConVar( "cl_simfphys_hidesprites", "0", true, false )
CreateClientConVar( "cl_simfphys_frontlamps", "1", true, false )
CreateClientConVar( "cl_simfphys_rearlamps", "1", true, false )
CreateClientConVar( "cl_simfphys_shadows", "0", true, false )
local function simplebinder( x, y, tbl, num, parent)
local sizex = 500
local sizey = 40
local kentry = tbl[num]
local key = kentry[1]
local setdefault = key:GetInt()
local Shape = vgui.Create( "DShape", parent)
Shape:SetType( "Rect" )
Shape:SetPos( x, y )
Shape:SetSize( 175, sizey )
Shape:SetColor( Color( 0, 0, 0, 255 ) )
local Shape = vgui.Create( "DShape", parent)
Shape:SetType( "Rect" )
Shape:SetPos( x + 1, y + 1 )
Shape:SetSize( 173 - 2, sizey - 2 )
Shape:SetColor( Color( 241, 241, 241, 255 ) )
local binder = vgui.Create( "DBinder", parent)
binder:SetPos( 175 + x, y )
binder:SetSize( 500 - 175, sizey )
binder:SetValue( setdefault )
function binder:SetSelectedNumber( num )
self.m_iSelectedNumber = num
self:ConVarChanged( num )
self:UpdateText()
self:OnChange( num )
key:SetInt( num )
end
local TextLabel = vgui.Create( "DPanel", parent)
TextLabel:SetPos( x, y )
TextLabel:SetSize( 175, sizey )
TextLabel.Paint = function()
draw.SimpleText( kentry[3], "DSimfphysFont", 175 * 0.5, sizey * 0.5, Color( 100, 100, 100, 255 ), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER )
end
return binder
end
local function simplebinder_old( x, y, tbl, num, parent, sizex, sizey)
local kentry = tbl[num]
local key = kentry[1]
local setdefault = key:GetInt()
local sizex = sizex or 400
local sizey = sizey or 40
local Shape = vgui.Create( "DShape", parent)
Shape:SetType( "Rect" )
Shape:SetPos( x, y )
Shape:SetSize( sizex, sizey )
Shape:SetColor( Color( 0, 0, 0, 255 ) )
local Shape = vgui.Create( "DShape", parent)
Shape:SetType( "Rect" )
Shape:SetPos( x + 1, y + 1 )
Shape:SetSize( sizex - 2, sizey - 2 )
Shape:SetColor( Color( 241, 241, 241, 255 ) )
local binder = vgui.Create( "DBinder", parent)
binder:SetPos( sizex * 0.5 + x, y )
binder:SetSize( sizex * 0.5, sizey )
binder:SetValue( setdefault )
function binder:SetSelectedNumber( num )
self.m_iSelectedNumber = num
self:ConVarChanged( num )
self:UpdateText()
self:OnChange( num )
key:SetInt( num )
end
local TextLabel = vgui.Create( "DPanel", parent)
TextLabel:SetPos( x, y )
TextLabel:SetSize( sizex * 0.5, sizey )
TextLabel.Paint = function()
draw.SimpleText( kentry[3], "DSimfphysFont", sizex * 0.25, 20, Color( 100, 100, 100, 255 ), TEXT_ALIGN_CENTER, TEXT_ALIGN_CENTER )
end
return binder
end
local function createcheckbox(x, y, label, command, parent, default)
local boxy = vgui.Create( "DCheckBoxLabel", parent)
boxy:SetParent( parent )
boxy:SetPos( x, y )
boxy:SetText( label )
boxy:SetConVar( command )
boxy:SetValue( default )
boxy:SizeToContents()
return boxy
end
local function createslider(x, y, sizex, sizey, label, command, parent,min,max,default)
local slider = vgui.Create( "DNumSlider", parent)
slider:SetPos( x, y )
slider:SetSize( sizex, sizey )
slider:SetText( label )
slider:SetMin( min )
slider:SetMax( max )
slider:SetDecimals( 2 )
slider:SetConVar( command )
slider:SetValue( default )
return slider
end
local function buildclientsettingsmenu( self )
local Shape = vgui.Create( "DShape", self.PropPanel)
Shape:SetType( "Rect" )
Shape:SetPos( 20, 20 )
Shape:SetSize( 350, 180 )
Shape:SetColor( Color( 0, 0, 0, 200 ) )
createcheckbox(25,25,"Show Hud","cl_simfphys_hud",self.PropPanel,hud:GetInt())
createcheckbox(210,25,"Racing Hud","cl_simfphys_althud",self.PropPanel,alt_hud:GetInt())
createcheckbox(25,45,"MPH instead of KMH","cl_simfphys_hudmph",self.PropPanel,hud_mph:GetInt())
createcheckbox(25,65,"Speed relative to \nplayersize instead \nworldsize","cl_simfphys_hudrealspeed",self.PropPanel,hud_realspeed:GetInt())
createcheckbox(25,110,"Fuel consumption \nin MPG instead \nof L/100KM","cl_simfphys_hudmpg",self.PropPanel,hud_mpg:GetInt())
createslider(30,155,345,20,"Hud offset X","cl_simfphys_hud_offset_x",self.PropPanel,-1,1,hud_x:GetFloat())
createslider(30,175,345,20,"Hud offset Y","cl_simfphys_hud_offset_y",self.PropPanel,-1,1,hud_y:GetFloat())
local Shape = vgui.Create( "DShape", self.PropPanel)
Shape:SetType( "Rect" )
Shape:SetPos( 20, 210 )
Shape:SetSize( 350, 85 )
Shape:SetColor( Color( 0, 0, 0, 200 ) )
createcheckbox(25,215,"Hide Sprites","cl_simfphys_hidesprites",self.PropPanel,0)
createcheckbox(25,235,"Front Projected Textures","cl_simfphys_frontlamps",self.PropPanel,0)
createcheckbox(25,255,"Rear Projected Textures","cl_simfphys_rearlamps",self.PropPanel,0)
createcheckbox(25,275,"Enable Shadows","cl_simfphys_shadows",self.PropPanel,0)
local Shape = vgui.Create( "DShape", self.PropPanel)
Shape:SetType( "Rect" )
Shape:SetPos( 20, 305 )
Shape:SetSize( 350, 85 )
Shape:SetColor( Color( 0, 0, 0, 200 ) )
createcheckbox(25,310,"Always Fullthrottle","cl_simfphys_sanic",self.PropPanel,sanic:GetInt())
createcheckbox(25,330,"Engine Auto Start/Stop","cl_simfphys_autostart",self.PropPanel,autostart:GetInt())
createcheckbox(25,350,"Automatic Transmission","cl_simfphys_auto",self.PropPanel,auto:GetInt())
createcheckbox(25,370,"Automatic Sportmode (late up and downshifts)","cl_simfphys_sport",self.PropPanel,sport:GetInt())
local Shape = vgui.Create( "DShape", self.PropPanel)
Shape:SetType( "Rect" )
Shape:SetPos( 20, 400 )
Shape:SetSize( 350, 115 )
Shape:SetColor( Color( 0, 0, 0, 200 ) )
local ctitem_1 = createcheckbox(25,405,"Enable Countersteer","cl_simfphys_ctenable",self.PropPanel,ctenable:GetInt())
local ctitem_2 = createslider(30,425,345,40,"Countersteer Mul","cl_simfphys_ctmul",self.PropPanel,0.1,2,ctmul:GetFloat())
local ctitem_3 = createslider(30,445,345,40,"Countersteer MaxAng","cl_simfphys_ctang",self.PropPanel,1,90,ctang:GetFloat())
local Reset = vgui.Create( "DButton" )
Reset:SetParent( self.PropPanel )
Reset:SetText( "Reset" )
Reset:SetPos( 25, 485 )
Reset:SetSize( 340, 25 )
Reset.DoClick = function()
ctitem_1:SetValue( 1 )
ctitem_2:SetValue( 0.7 )
ctitem_3:SetValue( 15 )
ctenable:SetInt( 1 )
ctmul:SetFloat( 0.7 )
ctang:SetFloat( 15 )
end
local Shape = vgui.Create( "DShape", self.PropPanel)
Shape:SetType( "Rect" )
Shape:SetPos( 20, 525 )
Shape:SetSize( 350, 165 )
Shape:SetColor( Color( 0, 0, 0, 200 ) )
local st_item_1 = createcheckbox(25,530,"Use these settings\n(you need to re-enter the vehicle)","cl_simfphys_overwrite",self.PropPanel,overwrite:GetInt())
local st_item_2 = createslider(30,550,345,40,"steer speed","cl_simfphys_steerspeed",self.PropPanel,1,16,steerspeed:GetFloat())
local st_item_3 = createslider(30,570,345,40,"fast speed steer angle","cl_simfphys_steerangfast",self.PropPanel,0,90,faststeerang:GetFloat())
local st_item_4 = createslider(30,595,345,40,"fade speed(units/seconds)\nfor fast speed steer angle","cl_simfphys_fadespeed",self.PropPanel,1,5000,fadespeed:GetFloat())
local st_item_5 = createcheckbox(25,635,"extra smooth steering","cl_simfphys_smoothsteer",self.PropPanel,smoothsteer:GetInt())
local Reset = vgui.Create( "DButton" )
Reset:SetParent( self.PropPanel )
Reset:SetText( "Reset" )
Reset:SetPos( 25, 660 )
Reset:SetSize( 340, 25 )
Reset.DoClick = function()
st_item_1:SetValue( 0 )
st_item_2:SetValue( 8 )
st_item_3:SetValue( 10 )
st_item_4:SetValue( 535 )
st_item_5:SetValue( 0 )
overwrite:SetInt( 0 )
steerspeed:SetFloat( 8 )
faststeerang:SetFloat( 10 )
fadespeed:SetFloat( 535 )
smoothsteer:SetInt( 0 )
end
end
local function buildserversettingsmenu( self )
local Background = vgui.Create( "DShape", self.PropPanel)
Background:SetType( "Rect" )
Background:SetPos( 20, 20 )
Background:SetColor( Color( 0, 0, 0, 200 ) )
local y = 0
if LocalPlayer():IsSuperAdmin() then
y = y + 25
local CheckBoxDamage = vgui.Create( "DCheckBoxLabel", self.PropPanel)
CheckBoxDamage:SetPos( 25, y )
CheckBoxDamage:SetText( "Enable Damage" )
CheckBoxDamage:SetValue( GetConVar( "sv_simfphys_enabledamage" ) :GetInt() )
CheckBoxDamage:SizeToContents()
y = y + 18
local DamageMul = vgui.Create( "DNumSlider", self.PropPanel)
DamageMul:SetPos( 30, y )
DamageMul:SetSize( 345, 30 )
DamageMul:SetText( "Damage Multiplicator" )
DamageMul:SetMin( 0 )
DamageMul:SetMax( 10 )
DamageMul:SetDecimals( 3 )
DamageMul:SetValue( GetConVar( "sv_simfphys_damagemultiplicator" ):GetFloat() )
y = y + 32
local CheckBoxpDamage = vgui.Create( "DCheckBoxLabel", self.PropPanel)
CheckBoxpDamage:SetPos( 25, y )
CheckBoxpDamage:SetText( "Enable Player Damage (On Collision)" )
CheckBoxpDamage:SetValue( GetConVar( "sv_simfphys_playerdamage" ) :GetInt() )
CheckBoxpDamage:SizeToContents()
y = y + 25
local GibRemoveTimer = vgui.Create( "DNumSlider", self.PropPanel)
GibRemoveTimer:SetPos( 30, y )
GibRemoveTimer:SetSize( 345, 30 )
GibRemoveTimer:SetText( "Gib Lifetime\n(0 = never remove)" )
GibRemoveTimer:SetMin( 0 )
GibRemoveTimer:SetMax( 3600 )
GibRemoveTimer:SetDecimals( 0 )
GibRemoveTimer:SetValue( GetConVar( "sv_simfphys_gib_lifetime" ):GetInt() )
y = y + 45
local CheckBoxFuel = vgui.Create( "DCheckBoxLabel", self.PropPanel)
CheckBoxFuel:SetPos( 25, y )
CheckBoxFuel:SetText( "Enable Fuelsystem" )
CheckBoxFuel:SetValue( GetConVar( "sv_simfphys_fuel" ) :GetInt() )
CheckBoxFuel:SizeToContents()
y = y + 18
local ScaleFuel = vgui.Create( "DNumSlider", self.PropPanel)
ScaleFuel:SetPos( 30, y )
ScaleFuel:SetSize( 345, 30 )
ScaleFuel:SetText( "Fuel tank size multiplier" )
ScaleFuel:SetMin( 0 )
ScaleFuel:SetMax( 1 )
ScaleFuel:SetDecimals( 2 )
ScaleFuel:SetValue( GetConVar( "sv_simfphys_fuelscale" ):GetFloat() )
y = y + 45
local tractionLabel = vgui.Create( "DLabel", self.PropPanel )
tractionLabel:SetPos( 25, y )
tractionLabel:SetText( "Traction Multiplicator for:" )
tractionLabel:SizeToContents()
local NewTractionData = {}
local DemSliders = {}
y = y + 15
for k, v in pairs( simfphys.TractionData ) do
DemSliders[k] = vgui.Create( "DNumSlider", self.PropPanel)
DemSliders[k]:SetPos( 30, y )
DemSliders[k]:SetSize( 345, 30 )
DemSliders[k]:SetText( k )
DemSliders[k]:SetMin( 0 )
DemSliders[k]:SetMax( 2 )
DemSliders[k]:SetDecimals( 2 )
DemSliders[k]:SetValue( simfphys[k]:GetFloat() )
DemSliders[k].OnValueChanged = function( item, value )
NewTractionData[ k ] = value
end
y = y + 25
end
y = y + 30
local DermaButton = vgui.Create( "DButton" )
DermaButton:SetParent( self.PropPanel )
DermaButton:SetText( "Apply" )
DermaButton:SetPos( 25, y - 10 )
DermaButton:SetSize( 340, 25 )
DermaButton.DoClick = function()
net.Start("simfphys_settings")
net.WriteBool( CheckBoxDamage:GetChecked() )
net.WriteFloat( GibRemoveTimer:GetValue() )
net.WriteFloat( DamageMul:GetValue() )
net.WriteBool( CheckBoxpDamage:GetChecked() )
net.WriteBool( CheckBoxFuel:GetChecked() )
net.WriteFloat( ScaleFuel:GetValue() )
net.WriteTable( NewTractionData )
net.SendToServer()
end
y = y + 30
local DermaButton = vgui.Create( "DButton" )
DermaButton:SetParent( self.PropPanel )
DermaButton:SetText( "Reset" )
DermaButton:SetPos( 25, y - 10 )
DermaButton:SetSize( 340, 25 )
DermaButton.DoClick = function()
NewTractionData["ice"] = 0.35
NewTractionData["gmod_ice"] = 0.1
NewTractionData["slipperyslime"] = 0.2
NewTractionData["snow"] = 0.7
NewTractionData["grass"] = 1
NewTractionData["sand"] = 1
NewTractionData["dirt"] = 1
NewTractionData["concrete"] = 1
NewTractionData["metal"] = 1
NewTractionData["glass"] = 1
NewTractionData["gravel"] = 1
NewTractionData["rock"] = 1
NewTractionData["wood"] = 1
for k, v in pairs( NewTractionData ) do
DemSliders[k]:SetValue( v )
end
CheckBoxDamage:SetValue( 1 )
GibRemoveTimer:SetValue( 120 )
DamageMul:SetValue( 1 )
CheckBoxpDamage:SetValue( 1 )
CheckBoxFuel:SetValue( 1 )
ScaleFuel:SetValue( 0.1 )
net.Start("simfphys_settings")
net.WriteBool( true )
net.WriteFloat( 120 )
net.WriteFloat( 1 )
net.WriteBool( true )
net.WriteBool( true )
net.WriteFloat( 0.1 )
net.WriteTable( NewTractionData )
net.SendToServer()
end
else
y = y + 25
local Label = vgui.Create( "DLabel", self.PropPanel )
Label:SetPos( 30, y )
Label:SetText( "Damage is "..((GetConVar( "sv_simfphys_enabledamage" ):GetInt() > 0) and "enabled" or "disabled") )
Label:SizeToContents()
y = y + 25
local Label = vgui.Create( "DLabel", self.PropPanel )
Label:SetPos( 30, y )
Label:SetText( "Damage Multiplicator is: "..GetConVar( "sv_simfphys_damagemultiplicator" ):GetFloat() )
Label:SizeToContents()
y = y + 25
local yes = "Players can take damage from collisions"
local no = "Players can't take damage from collisions"
local Label = vgui.Create( "DLabel", self.PropPanel )
Label:SetPos( 30, y )
Label:SetText( GetConVar( "sv_simfphys_playerdamage" ):GetBool() and yes or no )
Label:SizeToContents()
y = y + 25
local Label = vgui.Create( "DLabel", self.PropPanel )
local lifetime = GetConVar( "sv_simfphys_gib_lifetime" ):GetInt()
Label:SetPos( 30, y )
Label:SetText( (lifetime > 0) and ("Gib Lifetime = "..lifetime.." seconds") or "Gibs never despawn" )
Label:SizeToContents()
y = y + 25
local Label = vgui.Create( "DLabel", self.PropPanel )
Label:SetPos( 30, y )
Label:SetText( "Vehicles "..(GetConVar( "sv_simfphys_fuel" ):GetBool() and "are running on fuel" or "don't use fuel") )
Label:SizeToContents()
y = y + 25
local Label = vgui.Create( "DLabel", self.PropPanel )
local fuelscale = math.Round( GetConVar( "sv_simfphys_fuelscale" ):GetFloat() , 3 )
Label:SetPos( 30, y )
Label:SetText( "Fuel tank size multiplier is: "..fuelscale )
Label:SizeToContents()
if GetConVar( "sv_simfphys_teampassenger" ):GetBool() then
y = y + 25
local Label = vgui.Create( "DLabel", self.PropPanel )
Label:SetPos( 30, y )
Label:SetText( "Only players of the same team can enter the same vehicle" )
Label:SizeToContents()
end
y = y + 40
local Label = vgui.Create( "DLabel", self.PropPanel )
Label:SetPos( 30, y )
Label:SetText( "Traction multiplier for..." )
Label:SizeToContents()
y = y + 15
for k, v in pairs( simfphys.TractionData ) do
local tractionLabel = vgui.Create( "DLabel", self.PropPanel )
tractionLabel:SetPos( 105, y )
tractionLabel:SetText( k )
tractionLabel:SizeToContents()
local tractionLabel = vgui.Create( "DLabel", self.PropPanel )
tractionLabel:SetPos( 170, y )
tractionLabel:SetText( "=" )
tractionLabel:SizeToContents()
local tractionLabel = vgui.Create( "DLabel", self.PropPanel )
tractionLabel:SetPos( 185, y )
tractionLabel:SetText( math.Round(v,2) )
tractionLabel:SizeToContents()
y = y + 25
end
y = y - 25
end
Background:SetSize( 350, y )
end
hook.Add( "LVS.PopulateVehicles", "!!!add_simfphys_vehicles", function( node, pnlContent, _ )
local tree = node:AddNode( "simfphys", "icon16/simfphys.png" )
local Categorised = {}
-- Add this list into the tormoil
local Vehicles = list.Get( "simfphys_vehicles" )
if Vehicles then
for k, v in pairs( Vehicles ) do
v.Category = v.Category or "Other"
Categorised[ v.Category ] = Categorised[ v.Category ] or {}
v.ClassName = k
v.PrintName = v.Name
table.insert( Categorised[ v.Category ], v )
end
end
--
-- Add a tree node for each category
--
local IconList = list.Get( "ContentCategoryIcons" )
for CategoryName, v in SortedPairs( Categorised ) do
local node
if CategoryName == "Base" then
node = tree
else
local Icon = "icon16/simfphys_noicon.png"
if IconList and IconList[ "[simfphys] - "..CategoryName ] then
Icon = IconList[ "[simfphys] - "..CategoryName ]
end
-- Add a node to the tree
node = tree:AddNode( CategoryName, Icon )
end
-- When we click on the node - populate it using this function
node.DoPopulate = function( self )
-- If we've already populated it - forget it.
if self.PropPanel then return end
-- Create the container panel
self.PropPanel = vgui.Create( "ContentContainer", pnlContent )
self.PropPanel:SetVisible( false )
self.PropPanel:SetTriggerSpawnlistChange( false )
for k, ent in SortedPairsByMemberValue( v, "PrintName" ) do
spawnmenu.CreateContentIcon( "simfphys_vehicles", self.PropPanel, {
nicename = ent.PrintName or ent.ClassName,
spawnname = ent.ClassName,
material = "entities/"..ent.ClassName..".png",
admin = ent.AdminOnly
} )
end
end
-- If we click on the node populate it and switch to it.
node.DoClick = function( self )
self:DoPopulate()
pnlContent:SwitchPanel( self.PropPanel )
end
end
-- JOYSTICK
if istable( jcon ) and file.Exists("lua/bin/gmcl_joystick_win32.dll", "GAME") then
local node = tree:AddNode( "Joystick Configuration", "icon16/joystick.png" )
node.DoClick = function( self )
RunConsoleCommand("joyconfig")
end
end
-- CLIENT SETTINGS
local node = tree:AddNode( "Preferences", "icon16/ruby.png" )
node.DoPopulate = function( self )
if self.PropPanel then return end
self.PropPanel = vgui.Create( "ContentContainer", pnlContent )
self.PropPanel:SetVisible( false )
self.PropPanel:SetTriggerSpawnlistChange( false )
buildclientsettingsmenu( self )
end
node.DoClick = function( self )
self:DoPopulate()
pnlContent:SwitchPanel( self.PropPanel )
end
-- SERVER SETTINGS
local node = tree:AddNode( "Settings", "icon16/shield.png" )
node.DoPopulate = function( self )
self.PropPanel = vgui.Create( "ContentContainer", pnlContent )
self.PropPanel:SetVisible( false )
self.PropPanel:SetTriggerSpawnlistChange( false )
buildserversettingsmenu( self )
end
node.DoClick = function( self )
self:DoPopulate()
pnlContent:SwitchPanel( self.PropPanel )
end
-- call original hook
hook.Run( "SimfphysPopulateVehicles", pnlContent, tree, node )
end )
spawnmenu.AddContentType( "simfphys_vehicles", function( container, obj )
if not obj.material then return end
if not obj.nicename then return end
if not obj.spawnname then return end
local icon = vgui.Create( "ContentIcon", container )
icon:SetContentType( "simfphys_vehicles" )
icon:SetSpawnName( obj.spawnname )
icon:SetName( obj.nicename )
icon:SetMaterial( obj.material )
icon:SetAdminOnly( obj.admin )
icon:SetColor( Color( 0, 0, 0, 255 ) )
icon.DoClick = function()
RunConsoleCommand( "simfphys_spawnvehicle", obj.spawnname )
surface.PlaySound( "ui/buttonclickrelease.wav" )
end
icon.OpenMenu = function( icon )
local menu = DermaMenu()
menu:AddOption( "Copy to Clipboard", function() SetClipboardText( obj.spawnname ) end )
--menu:AddSpacer()
--menu:AddOption( "Delete", function() icon:Remove() hook.Run( "SpawnlistContentChanged", icon ) end )
menu:Open()
end
if IsValid( container ) then
container:Add( icon )
end
return icon
end )
list.Set( "ContentCategoryIcons", "simfphys", "icon16/simfphys.png" )
list.Set( "ContentCategoryIcons", "[simfphys]", "icon16/simfphys.png" )
list.Set( "ContentCategoryIcons", "[simfphys] - Half Life 2 - Prewar", "icon16/simfphys_prewar.png" )
list.Set( "ContentCategoryIcons", "[simfphys] - Half Life 2 / Synergy", "icon16/simfphys_hl2.png" )
list.Set( "ContentCategoryIcons", "[simfphys] - Armed Vehicles", "icon16/simfphys_armed.png" )