143 lines
4.9 KiB
Lua
143 lines
4.9 KiB
Lua
// A sound browser for the sound emitter and the expression 2 editor.
|
|
// Made by Grocel.
|
|
|
|
local max_char_count = 200 //File length limit
|
|
|
|
local SoundBrowserPanel = nil
|
|
local TabFavourites2 = nil
|
|
|
|
--################################################################################
|
|
|
|
// Save the file path. It should be cross session.
|
|
// It's used when opening the browser in the e2 editor.
|
|
local function SaveFilePath(panel, file)
|
|
if (!IsValid(panel)) then return end
|
|
if (panel.Soundemitter) then return end
|
|
|
|
panel:SetCookie("wire_soundfile", file)
|
|
end
|
|
|
|
// Open the Sound Browser.
|
|
local function CreateSoundBrowser(path)
|
|
local soundemitter = false
|
|
if (isstring(path) and path ~= "") then
|
|
soundemitter = true
|
|
end
|
|
|
|
SoundBrowserPanel = vgui.Create("DFrame") // The main frame.
|
|
SoundBrowserPanel:SetPos(130,60)
|
|
SoundBrowserPanel:SetSize(480, 460)
|
|
|
|
SoundBrowserPanel:SetMinWidth(450)
|
|
SoundBrowserPanel:SetMinHeight(450)
|
|
|
|
SoundBrowserPanel:SetSizable(false)
|
|
SoundBrowserPanel:SetDeleteOnClose( false )
|
|
SoundBrowserPanel:SetTitle("Engine Menu V3.3 - SAVE MENU")
|
|
SoundBrowserPanel:SetVisible(false)
|
|
SoundBrowserPanel:SetCookieName( "wire_sound_browser" )
|
|
SoundBrowserPanel:GetParent():SetWorldClicker(true) // Allow the use of the toolgun while in menu.
|
|
|
|
TabFavourites2 = vgui.Create("acf_list2editor") // The favourites manager.
|
|
|
|
local BrowserTabs = SoundBrowserPanel:Add("DPropertySheet") // The tabs.
|
|
BrowserTabs:DockMargin(5, 5, 5, 5)
|
|
BrowserTabs:Dock(FILL)
|
|
BrowserTabs:AddSheet("Settings", TabFavourites2, "icon16/disk.png", false, false, "Current Settings.")
|
|
|
|
file.CreateDir("engineslists/created")
|
|
TabFavourites2:SetRootPath("engineslists/created")
|
|
|
|
--quick load
|
|
--TabFavourites2:Clear()
|
|
TabFavourites2:AddItem("0. Name : "..GetConVarString("acfmenu_data10"), "string")
|
|
TabFavourites2:AddItem("1. Model : "..GetConVarString("wire_soundemitter_model"), "file")
|
|
TabFavourites2:AddItem("2. Sound : "..GetConVarString("wire_soundemitter_sound"), "file")
|
|
TabFavourites2:AddItem("3. Torque : "..GetConVarString("acfmenu_data3"), "number")
|
|
TabFavourites2:AddItem("4. Idle : "..GetConVarString("acfmenu_data4"), "number")
|
|
TabFavourites2:AddItem("5. Peak Min : "..GetConVarString("acfmenu_data5"), "number")
|
|
TabFavourites2:AddItem("6. Peak Max : "..GetConVarString("acfmenu_data6"), "number")
|
|
TabFavourites2:AddItem("7. Limit : "..GetConVarString("acfmenu_data7"), "number")
|
|
TabFavourites2:AddItem("8. Flywheel : "..GetConVarString("acfmenu_data8"), "number")
|
|
TabFavourites2:AddItem("9. Weight : "..GetConVarString("acfmenu_data9"), "number")
|
|
|
|
--Button Panel
|
|
local ButtonsSidePanel = SoundBrowserPanel:Add("DPanel") // The buttons.
|
|
ButtonsSidePanel:DockMargin(5, 5, 5, 5)
|
|
ButtonsSidePanel:Dock(BOTTOM)
|
|
ButtonsSidePanel:SetTall(80)
|
|
ButtonsSidePanel:SetWide(SoundBrowserPanel:GetWide())
|
|
ButtonsSidePanel:SetDrawBackground(true)
|
|
--button
|
|
BackButton = ButtonsSidePanel:Add("DButton") // The play button.
|
|
BackButton:SetText("Back")
|
|
BackButton:SetTextColor(Color(0,0,155,255))
|
|
BackButton:SetPos(40,20)
|
|
BackButton:SetWide(60)
|
|
BackButton:SetTall(40)
|
|
BackButton.DoClick = function()
|
|
RunConsoleCommand("acf_engine3_browser_open")
|
|
SoundBrowserPanel:Close()
|
|
end
|
|
|
|
NextButton = ButtonsSidePanel:Add("DButton") // The play button.
|
|
NextButton:SetText("Done")
|
|
NextButton:SetTextColor(Color(0,0,255,255))
|
|
NextButton:SetPos(360,10)
|
|
NextButton:SetWide(80)
|
|
NextButton:SetTall(60)
|
|
NextButton.DoClick = function()
|
|
SoundBrowserPanel:Close()
|
|
end
|
|
|
|
--#### text ##
|
|
SaveText1 = ButtonsSidePanel:Add("DLabel")
|
|
SaveText1:SetText("Save Menu")
|
|
SaveText1:SetTextColor(Color(0,255,0,255))
|
|
SaveText1:SetPos(180,30)
|
|
SaveText1:SetFont( "DefaultBold" )
|
|
SaveText1:SizeToContents()
|
|
--####
|
|
|
|
SoundBrowserPanel:InvalidateLayout(true)
|
|
|
|
end
|
|
|
|
--###################################################################################################
|
|
|
|
// Open the Sound Browser.
|
|
local function OpenSoundBrowser(pl, cmd, args)
|
|
local path = args[1] // nil or "" will put the browser in e2 mode else the soundemitter mode is applied.
|
|
|
|
if (!IsValid(SoundBrowserPanel)) then
|
|
CreateSoundBrowser(path)
|
|
end
|
|
|
|
SoundBrowserPanel:SetVisible(true)
|
|
SoundBrowserPanel:MakePopup()
|
|
SoundBrowserPanel:InvalidateLayout(true)
|
|
|
|
if (!IsValid(TabFavourites2)) then return end
|
|
|
|
//Replaces the timer, doesn't get paused in singleplayer.
|
|
WireLib.Timedcall(function(SoundBrowserPanel, TabFavourites2, path)
|
|
if (!IsValid(SoundBrowserPanel)) then return end
|
|
if (!IsValid(TabFavourites2)) then return end
|
|
|
|
local soundemitter = false
|
|
if (isstring(path) and path ~= "") then
|
|
soundemitter = true
|
|
end
|
|
|
|
SoundBrowserPanel.Soundemitter = soundemitter
|
|
|
|
SoundBrowserPanel:InvalidateLayout(true)
|
|
|
|
if (!soundemitter) then
|
|
path = SoundBrowserPanel:GetCookie("wire_soundfile", "") // load last session
|
|
end
|
|
TabFavourites2:SetOpenFile(path)
|
|
end, SoundBrowserPanel, ModelBrowserPanel, TabFavourites2, path)
|
|
end
|
|
|
|
concommand.Add("acf_engine4_browser_open", OpenSoundBrowser) |