Benny/gamemodes/benny/gamemode/modules/tools/cl_deadeye.lua

296 lines
9.1 KiB
Lua

-- Deadeye Choreographer
local function QUICKDIRT( self, w, h, no_bg )
if !no_bg then
local r, g, b = schemes["benny"]["bg"]:Unpack()
surface.SetDrawColor( r, g, b, 200 )
surface.DrawRect( 0, 0, w, h )
end
surface.SetDrawColor( schemes["benny"]["fg"] )
surface.DrawOutlinedRect( 0, 0, w, h, 1 )
end
local function QUICKEARTH( self, w, h )
local r, g, b = schemes["benny"]["fg"]:Unpack()
surface.SetDrawColor( r, g, b, 200 )
surface.DrawRect( 0, 0, w, h )
end
local function QUICKNIL( self, w, h )
end
local SIDE = {
["left_cheek_puffer"] = 1,
["left_cheek_raiser"] = 1,
["left_corner_depressor"] = 1,
["left_corner_puller"] = 1,
["left_lid_closer"] = 1,
["left_lid_droop"] = 1,
["left_lid_raiser"] = 1,
["left_lid_tightener"] = 1,
["left_upper_raiser"] = 1,
["left_outer_raiser"] = 1,
["left_inner_raiser"] = 1,
["left_mouth_drop"] = 1,
["left_dimpler"] = 1,
["left_funneler"] = 1,
["left_part"] = 1,
["left_puckerer"] = 1,
["left_stretcher"] = 1,
["left_lowerer"] = 1,
["right_cheek_puffer"] = 2,
["right_cheek_raiser"] = 2,
["right_corner_depressor"] = 2,
["right_corner_puller"] = 2,
["right_lid_closer"] = 2,
["right_lid_droop"] = 2,
["right_lid_raiser"] = 2,
["right_lid_tightener"] = 2,
["right_upper_raiser"] = 2,
["right_outer_raiser"] = 2,
["right_inner_raiser"] = 2,
["right_mouth_drop"] = 2,
["right_dimpler"] = 2,
["right_funneler"] = 2,
["right_part"] = 2,
["right_puckerer"] = 2,
["right_stretcher"] = 2,
["right_lowerer"] = 2,
}
local PRETTY = {
["left_cheek_puffer"] = "Left Cheek Puffer",
["left_cheek_raiser"] = "Left Cheek Raiser",
["left_corner_depressor"] = "Left Corner Depressor",
["left_corner_puller"] = "Left Corner Puller",
["left_lid_closer"] = "Left Lid Closer",
["left_lid_droop"] = "Left Lid Droop",
["left_lid_raiser"] = "Left Lid Raiser",
["left_lid_tightener"] = "Left Lid Tightener",
["left_upper_raiser"] = "Left Upper Raiser",
["left_outer_raiser"] = "Left Outer Raiser",
["left_inner_raiser"] = "Left Inner Raiser",
["left_mouth_drop"] = "Left Mouth Drop",
["left_dimpler"] = "Left Dimpler",
["left_funneler"] = "Left Funneler",
["left_part"] = "Left Part",
["left_puckerer"] = "Left Puckerer",
["left_stretcher"] = "Left Stretcher",
["left_lowerer"] = "Left Lowerer",
["right_cheek_puffer"] = "Right Cheek Puffer",
["right_cheek_raiser"] = "Right Cheek Raiser",
["right_corner_depressor"] = "Right Corner Depressor",
["right_corner_puller"] = "Right Corner Puller",
["right_lid_closer"] = "Right Lid Closer",
["right_lid_droop"] = "Right Lid Droop",
["right_lid_raiser"] = "Right Lid Raiser",
["right_lid_tightener"] = "Right Lid Tightener",
["right_upper_raiser"] = "Right Upper Raiser",
["right_outer_raiser"] = "Right Outer Raiser",
["right_inner_raiser"] = "Right Inner Raiser",
["right_mouth_drop"] = "Right Mouth Drop",
["right_dimpler"] = "Right Dimpler",
["right_funneler"] = "Right Funneler",
["right_part"] = "Right Part",
["right_puckerer"] = "Right Puckerer",
["right_stretcher"] = "Right Stretcher",
["right_lowerer"] = "Right Lowerer",
["bite"] = "Bite",
["blink"] = "Blink",
["half_closed"] = "Half Closed",
["chin_raiser"] = "Chin Raiser",
["dilator"] = "Dilator",
["jaw_clencher"] = "Jaw Clencher",
["jaw_drop"] = "Jaw Drop",
["jaw_sideways"] = "Jaw Sideways",
["lip_bite"] = "Lip Bite",
["lower_lip"] = "Lower Lip",
["mouth_sideways"] = "Mouth Sideways",
["presser"] = "Presser",
["sneer_left"] = "Sneer Left",
["tightener"] = "Tightener",
["wrinkler"] = "Wrinkler",
["body_rightleft"] = "Body Rightleft",
["chest_rightleft"] = "Chest Rightleft",
["eyes_rightleft"] = "Eyes Rightleft",
["eyes_updown"] = "Eyes Updown",
["gesture_rightleft"] = "Gesture Rightleft",
["gesture_updown"] = "Gesture Updown",
["head_forwardback"] = "Head Forwardback",
["head_rightleft"] = "Head Rightleft",
["head_tilt"] = "Head Tilt",
["head_updown"] = "Head Updown",
}
DEADEYE_MEM = DEADEYE_MEM or {}
function OpenDeadeye()
if IsValid( GOD ) then GOD:Remove() end
GOD = vgui.Create( "DFrame" )
GOD:SetTitle( "Deadeye Choreographer" )
GOD:SetSize( ScrW()*0.9, ScrH()*0.9 )
GOD:Center()
GOD:MakePopup()
GOD:SetSizable( true )
GOD.Paint = QUICKDIRT
do -- Menubar
local MENUBAR = GOD:Add( "DMenuBar" )
MENUBAR:Dock( TOP )
MENUBAR:DockMargin( -5, -5, -5, 8 )
MENUBAR.Paint = QUICKDIRT
local MENU_FILE = MENUBAR:AddMenu( "File" )
MENU_FILE:AddOption( "New", function() table.Empty( DEADEYE_MEM ) OpenDeadeye() end )
MENU_FILE:AddOption( "Open", function() end )
local MENU_EDIT = MENUBAR:AddMenu( "Edit" )
local MENU_ABOUT = MENUBAR:AddMenu( "About" )
end
local NAME = {
"X",
"Y",
"Z",
"P",
"Y",
"R",
}
do -- Main
local MAIN = GOD:Add( "DPanel" )
MAIN:Dock( FILL )
MAIN.Paint = QUICKNIL
local SIDE_MODEL = MAIN:Add( "DPanel" )
SIDE_MODEL.Paint = QUICKNIL
local SIDE_CHOREO = MAIN:Add( "DPanel" )
SIDE_CHOREO.Paint = QUICKDIRT
local SIDEDIV = MAIN:Add( "DVerticalDivider" )
SIDEDIV:Dock( FILL )
SIDEDIV:SetTop( SIDE_MODEL )
SIDEDIV:SetBottom( SIDE_CHOREO )
SIDEDIV:SetDividerHeight( 8 )
SIDEDIV:SetTopMin( 20 )
SIDEDIV:SetBottomMin( 240 )
SIDEDIV:SetTopHeight( 500 )
do -- Model side (top)
local MODEL = SIDE_MODEL:Add( "DAdjustableModelPanel" )
MODEL:SetFOV( 30 )
MODEL:SetModel( "models/alyx.mdl" )
MODEL:SetLookAng( Angle( 0, 180, 0 ) )
MODEL:SetCamPos( Vector( 64, 0, 64 ) )
function MODEL:LayoutEntity( Entity )
if DEADEYE_MEM.Flex then
for i=0, Entity:GetFlexNum()-1 do
if !DEADEYE_MEM.Flex[ Entity:GetFlexName( i ) ] then continue end
Entity:SetFlexWeight( i, DEADEYE_MEM.Flex[ Entity:GetFlexName( i ) ] )
end
else
DEADEYE_MEM.Flex = {}
for i=0, Entity:GetFlexNum()-1 do
DEADEYE_MEM.Flex[ Entity:GetFlexName( i ) ] = 0--Entity:GetFlexWeight( i )
end
end
self.Entity:SetEyeTarget( self:GetCamPos() )
return
end
function MODEL:PaintOver( w, h )
QUICKDIRT( self, w, h, true )
local fuckp, fucka = MODEL:GetCamPos(), MODEL:GetLookAng()
local PX, PY, PZ, AP, AY, AR = fuckp.x, fuckp.y, fuckp.z, fucka.p, fucka.y, fucka.r
PX, PY, PZ, AP, AY, AR = math.Round( PX ), math.Round( PY ), math.Round( PZ ), math.Round( AP ), math.Round( AY ), math.Round( AR )
draw.SimpleText( "pos: " .. PX .. " " .. PY .. " " .. PZ, "Trebuchet24", 8, 4, color_white, TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP )
draw.SimpleText( "ang: " .. AP .. " " .. AY .. " " .. AR, "Trebuchet24", 8, 4+24, color_white, TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP )
draw.SimpleText( "fov: " .. math.Round( MODEL:GetFOV() ), "Trebuchet24", 8, 4+48, color_white, TEXT_ALIGN_LEFT, TEXT_ALIGN_TOP )
end
local MODELPSHEET = SIDE_MODEL:Add( "DPropertySheet" )
MODELPSHEET.Paint = QUICKDIRT
local MODELSETTINGS = SIDE_MODEL:Add( "DScrollPanel" )
MODELSETTINGS.Paint = QUICKDIRT
MODELPSHEET:AddSheet( "Actor Alyx", MODELSETTINGS )
local flexlist = {}
for i=0, MODEL.Entity:GetFlexNum()-1 do -- Model settings
flexlist[MODEL.Entity:GetFlexName( i )] = true
end
for i, v in SortedPairs( flexlist ) do
local id = MODEL.Entity:GetFlexIDByName( i )
SLIDER = MODELSETTINGS:Add( "DNumSlider" )
SLIDER:SetText( PRETTY[ MODEL.Entity:GetFlexName( id ) ] or MODEL.Entity:GetFlexName( id ) )
local min, max = MODEL.Entity:GetFlexBounds( id )
SLIDER:SetMin( min )
SLIDER:SetMax( max )
SLIDER:SetDecimals( 2 )
SLIDER:Dock( TOP )
SLIDER:DockMargin( 10, -5, 10, -5 )
function SLIDER:OnValueChanged( val )
if !DEADEYE_MEM.Flex then DEADEYE_MEM.Flex = {} end
DEADEYE_MEM.Flex[ MODEL.Entity:GetFlexName( id ) ] = val
end
function SLIDER:Think()
if DEADEYE_MEM.Flex then
self:SetValue( DEADEYE_MEM.Flex[ MODEL.Entity:GetFlexName( id ) ] )
end
end
end
local DIVIDER = SIDE_MODEL:Add( "DHorizontalDivider" )
DIVIDER:Dock( FILL )
DIVIDER:SetLeft( MODEL )
DIVIDER:SetRight( MODELPSHEET )
DIVIDER:SetDividerWidth( 8 )
DIVIDER:SetLeftMin( 20 )
DIVIDER:SetRightMin( 240 )
DIVIDER:SetLeftWidth( 800 )
end
do -- Choreo side (bottom)
local PLAY = SIDE_CHOREO:Add( "DButton" )
PLAY:SetPos( 4, 4 )
PLAY:SetSize( 80, 20 )
PLAY:SetText( "Play/Pause" )
PLAY.Paint = QUICKDIRT
local SPEED = SIDE_CHOREO:Add( "DNumSlider" )
SPEED:SetPos( 4+4+80, 4 )
SPEED:SetSize( 180, 20 )
SPEED:SetText( "Speed" )
SPEED.Label:SetWide( 0 )
function SPEED:PerformLayout()
return true
end
SPEED:SetMin( 0 )
SPEED:SetMax( 100 )
SPEED:SetValue( 100 )
SPEED:SetDecimals( 0 )
SPEED.Paint = QUICKDIRT
do
local BLINKY = SIDE_CHOREO:Add( "DPanel" )
BLINKY:SetPos( 4, 4+4+20 )
BLINKY.Paint = QUICKDIRT
function BLINKY:PerformLayout( w, h )
local par = BLINKY:GetParent()
BLINKY:SetSize( par:GetWide() - 8, par:GetTall() - 20 - 12 )
end
end
end
end
end
if IsValid( GOD ) then OpenDeadeye() end