692 lines
25 KiB
Lua
692 lines
25 KiB
Lua
--[[
|
|
Copyright (c) 2025 Srlion (https://github.com/Srlion)
|
|
|
|
Permission is hereby granted, free of charge, to any person obtaining a copy of this software and associated documentation files (the "Software"), to deal in the Software without restriction, including without limitation the rights to use, copy, modify, merge, publish, distribute, sublicense, and/or sell copies of the Software, and to permit persons to whom the Software is furnished to do so, subject to the following conditions:
|
|
|
|
The above copyright notice and this permission notice shall be included in all copies or substantial portions of the Software.
|
|
|
|
THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
|
|
]]
|
|
|
|
if SERVER then
|
|
AddCSLuaFile()
|
|
return
|
|
end
|
|
|
|
local bit_band = bit.band
|
|
local surface_SetDrawColor = surface.SetDrawColor
|
|
local surface_SetMaterial = surface.SetMaterial
|
|
local surface_DrawTexturedRectUV = surface.DrawTexturedRectUV
|
|
local surface_DrawTexturedRect = surface.DrawTexturedRect
|
|
local render_CopyRenderTargetToTexture = render.CopyRenderTargetToTexture
|
|
local math_min = math.min
|
|
local math_max = math.max
|
|
local DisableClipping = DisableClipping
|
|
local type = type
|
|
|
|
local SHADERS_VERSION = "1757877956"
|
|
local SHADERS_GMA = [========[R01BRAOHS2tdVNwrAMQWx2gAAAAAAFJORFhfMTc1Nzg3Nzk1NgAAdW5rbm93bgABAAAAAQAAAHNoYWRlcnMvZnhjLzE3NTc4Nzc5NTZfcm5keF9yb3VuZGVkX2JsdXJfcHMzMC52Y3MAUAUAAAAAAAAAAAAAAgAAAHNoYWRlcnMvZnhjLzE3NTc4Nzc5NTZfcm5keF9yb3VuZGVkX3BzMzAudmNzADQEAAAAAAAAAAAAAAMAAABzaGFkZXJzL2Z4Yy8xNzU3ODc3OTU2X3JuZHhfc2hhZG93c19ibHVyX3BzMzAudmNzADYFAAAAAAAAAAAAAAQAAABzaGFkZXJzL2Z4Yy8xNzU3ODc3OTU2X3JuZHhfc2hhZG93c19wczMwLnZjcwDeAwAAAAAAAAAAAAAFAAAAc2hhZGVycy9meGMvMTc1Nzg3Nzk1Nl9ybmR4X3ZlcnRleF92czMwLnZjcwAeAQAAAAAAAAAAAAAAAAAABgAAAAEAAAABAAAAAAAAAAAAAAACAAAAHUcBbAAAAAAwAAAA/////1AFAAAAAAAAGAUAQExaTUG0DgAABwUAAF0AAAABAABoqV8kgL/sqj/+eCjfxRdm72ukxxrZJOmY5BiSff6UK8jKnQg0wmy60gGA6OIVrm+AZ/lvb8Ywy3K8LU+BJPZn395onULJrRD4M/GDQNqeVSGshmtApEeReU+ZTtlBcM3KgMP5kNHFcYeMjOP18v1rXRkhTnsRXCivQkjpG0AzOenhnTzSeUk0VRjyYUnN3TMr2QcLKyqCwWb6m/Fs7nXcrvFthAwSs0ciBXYmrkwlQ310qhdU+A7QyOJg9+a4osRtdsSFsU0kDnqfMCg3LJ/xPGbKLgrBp9Gp9WHeJZlAkxwGefkRNGJxCIQHLe/mMKU3/zoj0lpzNB+tDMSouHs1pc4Tao0Vnw7+gilRptrVd106Cc9HdUId8tlzu3EUSh75xRLQ/LkyqbgLeHg6VjD9cWcx8Fdq1e3Icg6ut5v0rg30grbcJQU4teRPS4Wf5+1qeYTID52pLXIKqTBQGZtYOuSjbA8roO5AKZw7hBirqZ8H4WC7dSmHudrAvjtPeVPjOpABK3Q+N+KPu97KER7zTZMx9Uwmtb5yXpTSpKsuRX03kZxlL1bi4l8GF/2zPP1barOH4ZWuC4c+l/N+/naMPMfTau5LXAMg0FTc23AFYG1D0/BRWSIueZ8BeyFkoOL12W2I9Kvoga0GYSKR9rSnQdG9RkIFf0UXv8PYoESenIWvFLY7dFuzqNeJUXT4U0KKswIb5OLisV5vjTS/KZCkvZxgj6YVYOev8K2SUAd7wC2lrE6hJxdRxFSfnnlebSIjW7dIP3JJATeZBVJGQdPY7YTxKYISudydzgEjEeBGo8XP+7zuiF/53LicBsZu2m/gaEQ6RBGWkv5kMZTWRe1TS1xzLlxZCMSHRniAHZBA6+Xu7b5C5+vVYxG1/Uo7AXzUYRkaX076jIFYdhH5jiUl3kDFW80VAbJya5jVQPX6H0osnxcyY9Tqya7iENMj19Nf8NIXXsq31uSew+ev7LIyrqiGgDQc50KDmu7VTELYGEfVZmFjuPoOpNxzd3sGvn+tULFd8pEOTjzZNJIxmcVUGS8OTkRZa/0ntBj80P6HZzT3XJkv5Trc1zmAf0ee+mRuMXLO4o4wkkwvt2/JmeMRdGptSXBh015K/iwDqknZvuNbCwI7ILoeHP0S78lC3o6nQpe/96CeVmEPwXvbqbMly76i4z7ELTbbMHxCG4S0UjKUtB1R41Z4uDEEds624Zy8LnwjnJ6nJqEiEZy68bDShzBg8VoGqnl5/NFMBrTNpHdZ73euE2Fxm4tMBxDBOexUPSP5D2qcg73zMVTuCIE4i4blFWIwDdoPNG3SHQNLgZ+DLkLmgAlf3syt2myk5t2rTrqoYiw6Ow1EDNENSACJK+bu4IqiEFz7FEhJkq2G9tM+RZ4OHIqSikUymqgNIC5k+Se/4sk3gjKnqdW8UjO1f5CQNk8Z1kAAeIdFM67xRTGafWAbjIpA7f2bvMMPDtkHEAGXcC2RLd4ZcWRV79g8txCT8HjMBlzJA1S+2Kwsbws1SX+aIa/rm55ONmwVmaVcPWp6yf4xQ+hvBn2rZry1XVH+cCiXSN+DjgUpc9nL+QcwRixWTt1SHTTmbEkY2sZwfYT889oXKgTEpx8/qhVFQQYiS2FbhkeBXnxSXArAfnR6Pm4RmKhxw3Lvgjf4Eo4aSb2f4CEUlJVDjIeDeumTv/9OzAfoRZXEIDuXWcEZ4VoTdAAA/////wYAAAABAAAAAQAAAAAAAAAAAAAAAgAAAC+rzZYAAAAAMAAAAP////80BAAAAAAAAPwDAEBMWk1BgAoAAOsDAABdAAAAAQAAaJxe2IK/7KknxcSXK86dhEFS5n0YZtr4ZBTKG6WPr92ZGhquZzTIAKwwliLKh/wHyv7F/aVS8kpvJo5JPXNZPgXTFX/r2QzKEbGTOLiSpZb0yRzahJKiusbwU71tIeclNnMc/99W3WWjJetsaZ+WtSVKSPK1gik1voA3BrTI/PRBgTM4UIhTe2kkA8iMqPHiXR2hcqYwuuWgpVPHQXAVTuZnx9Zxn7bIpbv064K2rh42q3/XhlqkGkdjxR91QiiLMG9Chi6pQUshsjfAtQOYMGq/uDdmEXd3u6d7fVl4c4khoVbbs2840Tl3f+HX6kaJop667+ZhIxCIkHfBTkrJVyGuzpHDwvLTlI5u9FFg5v5w3m6nvQDpubo8iNPkx7pjnYOAApaD8p7PB42hx7Z/zDRIokdXY5O20wkNlzug1BHGm3HZuO0jXQsDIlSsiFurNm3N8maWhjLOKVcjm6y0TUPSQwTk/XUHjT/sj0X7Rq1sTXMCPdkV17lw+p6UozRKJJpxjouFdqyLH9BgT+fPSp2sWHjdy0kfhm8Sz94+HMWo5RtnOIfBws69zzbIFHJu70Jt32rZA6N5YM3No0C65Mi+FMX6HIqCu/DXXoGuKzxyBcnxURaE7ICSKx+A5aLOTWg+60yTxguXcqAx/RGYRJzv/6UDfEMoTjfRPz6a8TdPpNg2OxDLbzsu3SzLEwbPJMLSHS+ZuZ3QGew39UBbHHnxsyv3o3ft+zZ4/D8l/IIc0Ra0JFwgPkQQNl7gxpW0LFsfPjW7IobAXwqtczEM5HdClLhNE6YcRzQmtugRzHHrYnSOKpcf3mwr2AxTwpqtEw198bpfhpM1PQxKmSCJtzhuZz9atBHdInc/GhB2PlaDBm71z4I4T0EaDqgfp4WCmoolhi4Z4kJ9sWZ505wJxIOczgalRbgnERpjYFhSVUxmSs4yhEXijcptcncWvN87f0peWcxvWRFtiLdbxi33jFb8qklA7UnSp6cN0jz8Prs7QDJxAIUMN7WWnUSrJsHC1JEr+Z8WVMJGMYfLOVeRSCgu1BMHgvd7r9keQBsbMpUjIKBY9qeOqyZxyEu3HIWurvGd5r5mw8VE6J3kDUTxc4PRETqcyCIj52ys7wexeU3c/MSu6/UG0zFwJpJRzbTAhFWD9CamRx9SA8BrD7TtdErPhcc/L5diqGfBvN3WZv4Bp7rQHr4lfO2KUkxqq/8tVe7z+EpHN4WGYPS2k4Imc7PqUk5mNzk4jJ4YnWENas9Qz5JkNOZCJxSilqhDy4KqjHkiBCNmUJvWLy5XGu6TnwK4XJ9kCuA7EAOiM+H6uB8uxDTWt5CzuQD/////BgAAAAEAAAABAAAAAAAAAAAAAAACAAAA5CvzcQAAAAAwAAAA/////zYFAAAAAAAA/gQAQExaTUEgDgAA7QQAAF0AAAABAABohF/3ANos8ikRxPcBjHHEdepXp59WPT3vqirl6vheC7siJXviLHTHGaBqsjjm8uLG5Ve4w16rPpO+g1UZp520DHb0HpjYXJSk0M5IFR3Z3LJ6CXR6tPtNlqpMD8ZAKDdvjwcIwfPX2C0FiL5+eD32kebgYrV8PQnqCCxXZiN+/fwfAX0dF/AhVpUarBAj7DQRYywlck3WHyM09yjgwHsv5JdVZ+yabdwWo7K9bIQZkzVC4wJbWodKY9XjuDKoe7X6nat7dsjajdvnb8b5dWXoFBIwIuv4w+98OvjAM8uZqF4CbCoEBV/r7nqxx2RYsv+CYtPIPYAu6d7gK4BsVxy6kZRrI54N0cWF63nYa93Ce6GrkCPKg0p1QJMfe4/roFMA2GOp/7wkY2j3b+KwvFJh4vX2vsMdDL0oZ3MOhA5P+7nGrJECft7fEI7H9ykxU3jwbCyKfbBtPK6WSqWKiunXV2cHqBe9tNysHz0zGyIftTRZK8DXWdxswDEgAKhjqD+DIYey23RiC1HQX4oUMtadmoZ7QN9YcyhPnJQOPxMmKmtk7+DW6lBK92Ikyyr/lrZv+CR6c/Dhxr52JvtZLwWYv4bja08Ks6ZhHk9j9laSsMrN/q1XMbMtiAYleup8IXxgJgVYorVQBn/zcaRx0HTm7txKdNgWe4DyzrkqT7uYWTNNwLFmwKhiLd2RCGR4vwZ+nQsSS443H/TgPROTccB4WxTSBuSIRQVotQAUpJGTEmro0vsCEqoDkQxCuuHz7kWdWzXp5HQlwb2qlWYbd27nObHO1uUKJ9FpOkTInUPdWZ7I6Y3kcnGC5X2KabIzOPOh0GirJYmNpybhJrpLBRzQHvxV3AD0w3qP0Od67MrhZnv1wn3LDy8iroHOR58ab1jZ0xCGH9Qwo1EXtTuMUhyCi4riP5SiHFGRXXaOl32lW+rCoUi3QFm3wpoJ6N0kjQwAeUqHneaOjD3uyihFQrG6RC4VeVQLRwhW5kJIx9qXQBguOS4u1/hUlW+HfD3BwpdrvOBaICxBGNkAuju8+ah3vPyvESXbQZaDAhg7dfxnNOB951z/ftzEt489RsAZXz646GLTJGyLD25rLOhFRrn3LsVHgkQyD9YADf+fvwDYg9QHWCmhkgEluRTsiYcO87vMuma3+3++u3NmsSEPdDpYON6/EY4OE6WktRPDS19FflOA/aHh/GnrsQ7bJ7jYmV+d1R+3oXBMq+GIAkD3D/O22HroGKkoYC6tUQf1wMCmZ/mj+ihc6mtoV1KdVDLYWatmlR4U8avkG5RFI4vAs/7z0c34UDoutvoIwWrRG+rYQ1ALHp4+Nlquu3rhltrYk6n2gzSpnEjozJoJ+TGs4bttDCqggliwUCnHsDeRM8+wiGLEoo/ib+otxzTiRue28334DMQw3ec2PfzbLMnB5AYB8cw78oaIzkbRob5H+tsE0QFOwumh3nnyjOq1QuIIwJRCTs/wz+dhUJU7yKiMBfdYqJIa+tomn+Biaexl/d98Onnn+Aoguen1I29+DRkG7fvom2rHpXAOXH41W/cvczU0jwYabtKkdvA43c97oDu2rcegTlxpza4C4v/HquZa3nJ27UlYI89jM73vOSWcOfaRSoeEGXuwxgWGnGMaC1OKGrcp7+HsAUTec3yFir5DQWGN3ImkF17dOoXXAP////8GAAAAAQAAAAEAAAAAAAAAAAAAAAIAAABJTIjdAAAAADAAAAD/////3gMAAAAAAACmAwBATFpNQUAJAACVAwAAXQAAAAEAAGiMXviDP+ypJ8XER2Obf/Gub4RtwST2I5aFElPLRnYyBGKzzWHS3j92PM7OOrjSszB3wZMwdm0ahxEzeRRdNzXWcyklmZpnZnyTRC1yzISeAfbjOOXNofxCuF8x+RimSjb0+CE9pgV8Fgs6Nza/MSog2twkgUxmn0aoky4CECmnsEJJcQ66Ump+4tkbY284nKlxFxhT5k59LWkOwjOaFUysSXLX5R+gwJC82uA54PE1GidvXhqA/AkjGjcz0crb5k/rsqQ77T/wZsFhxana52fesSgZCV6fvqoGjkzqZnmsJVRGQcSPS2LBaJLIc+OOk8ZbDiGqBn5Xsxb9J31v/qjpov8yGxRyHi4yXRCCjE2QeaMeDtDSLxCXdTCYhjFtCJZytirhuAigToCAO1qMzZy4fREQYWlH0l8lEp13GryblNQkYNdwjgxZlwnavBf/O9G5hNH10VgiONbDa++CPCMStyDovKk1rOP6F3++I9wOyI5nnzYDxWd1Zo9j549iEsN8JbdhcD1JQUI/mt0N21t/FFJ5IWnChz3s/CmajA6AhG7xEXPc9SdqDDRegPwDBdktJSHOEpSmZOkeizeev4Emz0y76UP6oREqOSa8w9o2cgcxiPlbWqcQzIYb3D/WbwiYYexKjJM2Wszl2l401eHQLrduaUc5oYBufGT+do+LUUbxPvl1XwMIH6KyrwKFwHv2KsWRtCjNWB75xugj5FJcE1L1g2J2YUXkqFNuZveahmgjJ4KjyETVWv7DBlj6/GD5vJzEeIICH+mrkgKArOgHcEeMbNzGIUhAwY4wwMjxdMrUpwUwwKkmfx6L1eNjiqWrrholmk8qUGFN5IJMIvCAKUHujMSaqnCMO/7jvlWeWy5nsejSnWBNii/+YQJAxMBcUKmeSC54PzInKQxWTPygv1hxoD60xjr7B403/1ym7C0JKZEMrkLpB2dQ/9MrXqWH5jnpQuNd7GZ/wFYNMBQHQlODNaeWwPRJ8qbUlcgkeqWRC5/zhJ1H03Lb9hhGPTew9EHrKcDpUJvRQcJD2S5QMJ8wqbS6fODbJJxWCK6TU30bHf25JKqxv/S6sCAtPh7L/LypsErbO2f8sril+ZYtOWOdYJldzYzK79DNl453VbFjBfqlla+E74sKEC29OoaGAzIb+dFd8Ozl2fi1iB5tzXwwbauu9M0uKGvtZgQu2Zsx53qVwM7rC4TFKYfxEf7cAP////8GAAAAAQAAAAEAAAAAAAAAAAAAAAIAAAB3Q0KZAAAAADAAAAD/////HgEAAAAAAADmAABATFpNQWQBAADVAAAAXQAAAAEAAGiVXdSHP+xjGaphZkpGU+Usm+MtQUH83EbXXMjgea+yS5+C8AjZsriU7FrSa/C3QwfnfNO2E25hgUTRGIDQmsxKx7Q+ggw5O2Hyu6lPnEYPfqt3jvm3cjj6Z1X02PoibeZEF4V28Or5mSkKcqgZk6cbnqeeVgnqfAvD/O3uLu+nT7VAOydRrNBSD1yQVTBZUZtIJLmvDuIE27Eo7GuwHoYCUrVUwgW6q0SbikkxwEeOthaz5bMITbOd2JgjhkHkQV22VJTNinlRW2ADS1E/dJnyAAD/////AAAAAA==]========]
|
|
do
|
|
local DECODED_SHADERS_GMA = util.Base64Decode(SHADERS_GMA)
|
|
if not DECODED_SHADERS_GMA or #DECODED_SHADERS_GMA == 0 then
|
|
print("Failed to load shaders!") -- this shouldn't happen
|
|
return
|
|
end
|
|
|
|
file.Write("rndx_shaders_" .. SHADERS_VERSION .. ".gma", DECODED_SHADERS_GMA)
|
|
game.MountGMA("data/rndx_shaders_" .. SHADERS_VERSION .. ".gma")
|
|
end
|
|
|
|
local function GET_SHADER(name)
|
|
return SHADERS_VERSION:gsub("%.", "_") .. "_" .. name
|
|
end
|
|
|
|
local BLUR_RT = GetRenderTargetEx("RNDX" .. SHADERS_VERSION .. SysTime(),
|
|
1024, 1024,
|
|
RT_SIZE_LITERAL,
|
|
MATERIAL_RT_DEPTH_SEPARATE,
|
|
bit.bor(2, 256, 4, 8 --[[4, 8 is clamp_s + clamp-t]]),
|
|
0,
|
|
IMAGE_FORMAT_BGRA8888
|
|
)
|
|
|
|
local NEW_FLAG; do
|
|
local flags_n = -1
|
|
function NEW_FLAG()
|
|
flags_n = flags_n + 1
|
|
return 2 ^ flags_n
|
|
end
|
|
end
|
|
|
|
local NO_TL, NO_TR, NO_BL, NO_BR = NEW_FLAG(), NEW_FLAG(), NEW_FLAG(), NEW_FLAG()
|
|
|
|
-- Svetov/Jaffies's great idea!
|
|
local SHAPE_CIRCLE, SHAPE_FIGMA, SHAPE_IOS = NEW_FLAG(), NEW_FLAG(), NEW_FLAG()
|
|
|
|
local BLUR = NEW_FLAG()
|
|
|
|
local RNDX = {}
|
|
|
|
local shader_mat = [==[
|
|
screenspace_general
|
|
{
|
|
$pixshader ""
|
|
$vertexshader ""
|
|
|
|
$basetexture ""
|
|
$texture1 ""
|
|
$texture2 ""
|
|
$texture3 ""
|
|
|
|
// Mandatory, don't touch
|
|
$ignorez 1
|
|
$vertexcolor 1
|
|
$vertextransform 1
|
|
"<dx90"
|
|
{
|
|
$no_draw 1
|
|
}
|
|
|
|
$copyalpha 0
|
|
$alpha_blend_color_overlay 0
|
|
$alpha_blend 1 // for AA
|
|
$linearwrite 1 // to disable broken gamma correction for colors
|
|
$linearread_basetexture 1 // to disable broken gamma correction for textures
|
|
$linearread_texture1 1 // to disable broken gamma correction for textures
|
|
$linearread_texture2 1 // to disable broken gamma correction for textures
|
|
$linearread_texture3 1 // to disable broken gamma correction for textures
|
|
}
|
|
]==]
|
|
|
|
local MATRIXES = {}
|
|
|
|
local function create_shader_mat(name, opts)
|
|
assert(name and isstring(name), "create_shader_mat: tex must be a string")
|
|
|
|
local key_values = util.KeyValuesToTable(shader_mat, false, true)
|
|
|
|
if opts then
|
|
for k, v in pairs(opts) do
|
|
key_values[k] = v
|
|
end
|
|
end
|
|
|
|
local mat = CreateMaterial(
|
|
"rndx_shaders1" .. name .. SysTime(),
|
|
"screenspace_general",
|
|
key_values
|
|
)
|
|
|
|
MATRIXES[mat] = Matrix()
|
|
|
|
return mat
|
|
end
|
|
|
|
local ROUNDED_MAT = create_shader_mat("rounded", {
|
|
["$pixshader"] = GET_SHADER("rndx_rounded_ps30"),
|
|
["$vertexshader"] = GET_SHADER("rndx_vertex_vs30"),
|
|
})
|
|
local ROUNDED_TEXTURE_MAT = create_shader_mat("rounded_texture", {
|
|
["$pixshader"] = GET_SHADER("rndx_rounded_ps30"),
|
|
["$vertexshader"] = GET_SHADER("rndx_vertex_vs30"),
|
|
["$basetexture"] = "loveyoumom", -- if there is no base texture, you can't change it later
|
|
})
|
|
|
|
local BLUR_VERTICAL = "$c0_x"
|
|
local ROUNDED_BLUR_MAT = create_shader_mat("blur_horizontal", {
|
|
["$pixshader"] = GET_SHADER("rndx_rounded_blur_ps30"),
|
|
["$vertexshader"] = GET_SHADER("rndx_vertex_vs30"),
|
|
["$basetexture"] = BLUR_RT:GetName(),
|
|
["$texture1"] = "_rt_FullFrameFB",
|
|
})
|
|
|
|
local SHADOWS_MAT = create_shader_mat("rounded_shadows", {
|
|
["$pixshader"] = GET_SHADER("rndx_shadows_ps30"),
|
|
["$vertexshader"] = GET_SHADER("rndx_vertex_vs30"),
|
|
})
|
|
|
|
local SHADOWS_BLUR_MAT = create_shader_mat("shadows_blur_horizontal", {
|
|
["$pixshader"] = GET_SHADER("rndx_shadows_blur_ps30"),
|
|
["$vertexshader"] = GET_SHADER("rndx_vertex_vs30"),
|
|
["$basetexture"] = BLUR_RT:GetName(),
|
|
["$texture1"] = "_rt_FullFrameFB",
|
|
})
|
|
|
|
local SHAPES = {
|
|
[SHAPE_CIRCLE] = 2,
|
|
[SHAPE_FIGMA] = 2.2,
|
|
[SHAPE_IOS] = 4,
|
|
}
|
|
local DEFAULT_SHAPE = SHAPE_FIGMA
|
|
|
|
local MATERIAL_SetTexture = ROUNDED_MAT.SetTexture
|
|
local MATERIAL_SetMatrix = ROUNDED_MAT.SetMatrix
|
|
local MATERIAL_SetFloat = ROUNDED_MAT.SetFloat
|
|
local MATRIX_SetUnpacked = Matrix().SetUnpacked
|
|
|
|
local MAT
|
|
local X, Y, W, H
|
|
local TL, TR, BL, BR
|
|
local TEXTURE
|
|
local USING_BLUR, BLUR_INTENSITY
|
|
local COL_R, COL_G, COL_B, COL_A
|
|
local SHAPE, OUTLINE_THICKNESS
|
|
local START_ANGLE, END_ANGLE, ROTATION
|
|
local CLIP_PANEL
|
|
local SHADOW_ENABLED, SHADOW_SPREAD, SHADOW_INTENSITY
|
|
local function RESET_PARAMS()
|
|
MAT = nil
|
|
X, Y, W, H = 0, 0, 0, 0
|
|
TL, TR, BL, BR = 0, 0, 0, 0
|
|
TEXTURE = nil
|
|
USING_BLUR, BLUR_INTENSITY = false, 1.0
|
|
COL_R, COL_G, COL_B, COL_A = 255, 255, 255, 255
|
|
SHAPE, OUTLINE_THICKNESS = SHAPES[DEFAULT_SHAPE], -1
|
|
START_ANGLE, END_ANGLE, ROTATION = 0, 360, 0
|
|
CLIP_PANEL = nil
|
|
SHADOW_ENABLED, SHADOW_SPREAD, SHADOW_INTENSITY = false, 0, 0
|
|
end
|
|
|
|
local normalize_corner_radii; do
|
|
local HUGE = math.huge
|
|
|
|
local function nzr(x)
|
|
if x ~= x or x < 0 then return 0 end
|
|
local lim = math_min(W, H)
|
|
if x == HUGE then return lim end
|
|
return x
|
|
end
|
|
|
|
local function clamp0(x) return x < 0 and 0 or x end
|
|
|
|
function normalize_corner_radii()
|
|
local TL, TR, BL, BR = nzr(TL), nzr(TR), nzr(BL), nzr(BR)
|
|
|
|
local k = math_max(
|
|
1,
|
|
(TL + TR) / W,
|
|
(BL + BR) / W,
|
|
(TL + BL) / H,
|
|
(TR + BR) / H
|
|
)
|
|
|
|
if k > 1 then
|
|
local inv = 1 / k
|
|
TL, TR, BL, BR = TL * inv, TR * inv, BL * inv, BR * inv
|
|
end
|
|
|
|
return clamp0(TL), clamp0(TR), clamp0(BL), clamp0(BR)
|
|
end
|
|
end
|
|
|
|
local function SetupDraw()
|
|
local TL, TR, BL, BR = normalize_corner_radii()
|
|
|
|
local matrix = MATRIXES[MAT]
|
|
MATRIX_SetUnpacked(
|
|
matrix,
|
|
|
|
BL, W, OUTLINE_THICKNESS or -1, END_ANGLE,
|
|
BR, H, SHADOW_INTENSITY, ROTATION,
|
|
TR, SHAPE, BLUR_INTENSITY or 1.0, 0,
|
|
TL, TEXTURE and 1 or 0, START_ANGLE, 0
|
|
)
|
|
MATERIAL_SetMatrix(MAT, "$viewprojmat", matrix)
|
|
|
|
if COL_R then
|
|
surface_SetDrawColor(COL_R, COL_G, COL_B, COL_A)
|
|
end
|
|
|
|
surface_SetMaterial(MAT)
|
|
end
|
|
|
|
local MANUAL_COLOR = NEW_FLAG()
|
|
local DEFAULT_DRAW_FLAGS = DEFAULT_SHAPE
|
|
|
|
local function draw_rounded(x, y, w, h, col, flags, tl, tr, bl, br, texture, thickness)
|
|
if col and col.a == 0 then
|
|
return
|
|
end
|
|
|
|
RESET_PARAMS()
|
|
|
|
if not flags then
|
|
flags = DEFAULT_DRAW_FLAGS
|
|
end
|
|
|
|
local using_blur = bit_band(flags, BLUR) ~= 0
|
|
if using_blur then
|
|
return RNDX.DrawBlur(x, y, w, h, flags, tl, tr, bl, br, thickness)
|
|
end
|
|
|
|
MAT = ROUNDED_MAT; if texture then
|
|
MAT = ROUNDED_TEXTURE_MAT
|
|
MATERIAL_SetTexture(MAT, "$basetexture", texture)
|
|
TEXTURE = texture
|
|
end
|
|
|
|
W, H = w, h
|
|
TL, TR, BL, BR = bit_band(flags, NO_TL) == 0 and tl or 0,
|
|
bit_band(flags, NO_TR) == 0 and tr or 0,
|
|
bit_band(flags, NO_BL) == 0 and bl or 0,
|
|
bit_band(flags, NO_BR) == 0 and br or 0
|
|
SHAPE = SHAPES[bit_band(flags, SHAPE_CIRCLE + SHAPE_FIGMA + SHAPE_IOS)] or SHAPES[DEFAULT_SHAPE]
|
|
OUTLINE_THICKNESS = thickness
|
|
|
|
if bit_band(flags, MANUAL_COLOR) ~= 0 then
|
|
COL_R = nil
|
|
elseif col then
|
|
COL_R, COL_G, COL_B, COL_A = col.r, col.g, col.b, col.a
|
|
else
|
|
COL_R, COL_G, COL_B, COL_A = 255, 255, 255, 255
|
|
end
|
|
|
|
SetupDraw()
|
|
|
|
-- https://github.com/Jaffies/rboxes/blob/main/rboxes.lua
|
|
-- fixes setting $basetexture to ""(none) not working correctly
|
|
return surface_DrawTexturedRectUV(x, y, w, h, -0.015625, -0.015625, 1.015625, 1.015625)
|
|
end
|
|
|
|
function RNDX.Draw(r, x, y, w, h, col, flags)
|
|
return draw_rounded(x, y, w, h, col, flags, r, r, r, r)
|
|
end
|
|
|
|
function RNDX.DrawOutlined(r, x, y, w, h, col, thickness, flags)
|
|
return draw_rounded(x, y, w, h, col, flags, r, r, r, r, nil, thickness or 1)
|
|
end
|
|
|
|
function RNDX.DrawTexture(r, x, y, w, h, col, texture, flags)
|
|
return draw_rounded(x, y, w, h, col, flags, r, r, r, r, texture)
|
|
end
|
|
|
|
function RNDX.DrawMaterial(r, x, y, w, h, col, mat, flags)
|
|
local tex = mat:GetTexture("$basetexture")
|
|
if tex then
|
|
return RNDX.DrawTexture(r, x, y, w, h, col, tex, flags)
|
|
end
|
|
end
|
|
|
|
function RNDX.DrawCircle(x, y, r, col, flags)
|
|
return RNDX.Draw(r / 2, x - r / 2, y - r / 2, r, r, col, (flags or 0) + SHAPE_CIRCLE)
|
|
end
|
|
|
|
function RNDX.DrawCircleOutlined(x, y, r, col, thickness, flags)
|
|
return RNDX.DrawOutlined(r / 2, x - r / 2, y - r / 2, r, r, col, thickness, (flags or 0) + SHAPE_CIRCLE)
|
|
end
|
|
|
|
function RNDX.DrawCircleTexture(x, y, r, col, texture, flags)
|
|
return RNDX.DrawTexture(r / 2, x - r / 2, y - r / 2, r, r, col, texture, (flags or 0) + SHAPE_CIRCLE)
|
|
end
|
|
|
|
function RNDX.DrawCircleMaterial(x, y, r, col, mat, flags)
|
|
return RNDX.DrawMaterial(r / 2, x - r / 2, y - r / 2, r, r, col, mat, (flags or 0) + SHAPE_CIRCLE)
|
|
end
|
|
|
|
local USE_SHADOWS_BLUR = false
|
|
|
|
local function draw_blur()
|
|
if USE_SHADOWS_BLUR then
|
|
MAT = SHADOWS_BLUR_MAT
|
|
else
|
|
MAT = ROUNDED_BLUR_MAT
|
|
end
|
|
|
|
COL_R, COL_G, COL_B, COL_A = 255, 255, 255, 255
|
|
SetupDraw()
|
|
|
|
render_CopyRenderTargetToTexture(BLUR_RT)
|
|
MATERIAL_SetFloat(MAT, BLUR_VERTICAL, 0)
|
|
surface_DrawTexturedRect(X, Y, W, H)
|
|
|
|
render_CopyRenderTargetToTexture(BLUR_RT)
|
|
MATERIAL_SetFloat(MAT, BLUR_VERTICAL, 1)
|
|
surface_DrawTexturedRect(X, Y, W, H)
|
|
end
|
|
|
|
function RNDX.DrawBlur(x, y, w, h, flags, tl, tr, bl, br, thickness)
|
|
RESET_PARAMS()
|
|
|
|
if not flags then
|
|
flags = DEFAULT_DRAW_FLAGS
|
|
end
|
|
|
|
X, Y = x, y
|
|
W, H = w, h
|
|
TL, TR, BL, BR = bit_band(flags, NO_TL) == 0 and tl or 0,
|
|
bit_band(flags, NO_TR) == 0 and tr or 0,
|
|
bit_band(flags, NO_BL) == 0 and bl or 0,
|
|
bit_band(flags, NO_BR) == 0 and br or 0
|
|
SHAPE = SHAPES[bit_band(flags, SHAPE_CIRCLE + SHAPE_FIGMA + SHAPE_IOS)] or SHAPES[DEFAULT_SHAPE]
|
|
OUTLINE_THICKNESS = thickness
|
|
|
|
draw_blur()
|
|
end
|
|
|
|
local function setup_shadows()
|
|
X = X - SHADOW_SPREAD
|
|
Y = Y - SHADOW_SPREAD
|
|
W = W + (SHADOW_SPREAD * 2)
|
|
H = H + (SHADOW_SPREAD * 2)
|
|
|
|
TL = TL + (SHADOW_SPREAD * 2)
|
|
TR = TR + (SHADOW_SPREAD * 2)
|
|
BL = BL + (SHADOW_SPREAD * 2)
|
|
BR = BR + (SHADOW_SPREAD * 2)
|
|
end
|
|
|
|
local function draw_shadows(r, g, b, a)
|
|
if USING_BLUR then
|
|
USE_SHADOWS_BLUR = true
|
|
draw_blur()
|
|
USE_SHADOWS_BLUR = false
|
|
end
|
|
|
|
MAT = SHADOWS_MAT
|
|
|
|
if r == false then
|
|
COL_R = nil
|
|
else
|
|
COL_R, COL_G, COL_B, COL_A = r, g, b, a
|
|
end
|
|
|
|
SetupDraw()
|
|
-- https://github.com/Jaffies/rboxes/blob/main/rboxes.lua
|
|
-- fixes having no $basetexture causing uv to be broken
|
|
surface_DrawTexturedRectUV(X, Y, W, H, -0.015625, -0.015625, 1.015625, 1.015625)
|
|
end
|
|
|
|
function RNDX.DrawShadowsEx(x, y, w, h, col, flags, tl, tr, bl, br, spread, intensity, thickness)
|
|
if col and col.a == 0 then
|
|
return
|
|
end
|
|
|
|
local OLD_CLIPPING_STATE = DisableClipping(true)
|
|
|
|
RESET_PARAMS()
|
|
|
|
if not flags then
|
|
flags = DEFAULT_DRAW_FLAGS
|
|
end
|
|
|
|
X, Y = x, y
|
|
W, H = w, h
|
|
SHADOW_SPREAD = spread or 30
|
|
SHADOW_INTENSITY = intensity or SHADOW_SPREAD * 1.2
|
|
|
|
TL, TR, BL, BR = bit_band(flags, NO_TL) == 0 and tl or 0,
|
|
bit_band(flags, NO_TR) == 0 and tr or 0,
|
|
bit_band(flags, NO_BL) == 0 and bl or 0,
|
|
bit_band(flags, NO_BR) == 0 and br or 0
|
|
|
|
SHAPE = SHAPES[bit_band(flags, SHAPE_CIRCLE + SHAPE_FIGMA + SHAPE_IOS)] or SHAPES[DEFAULT_SHAPE]
|
|
|
|
OUTLINE_THICKNESS = thickness
|
|
|
|
setup_shadows()
|
|
|
|
USING_BLUR = bit_band(flags, BLUR) ~= 0
|
|
|
|
if bit_band(flags, MANUAL_COLOR) ~= 0 then
|
|
draw_shadows(false, nil, nil, nil)
|
|
elseif col then
|
|
draw_shadows(col.r, col.g, col.b, col.a)
|
|
else
|
|
draw_shadows(0, 0, 0, 255)
|
|
end
|
|
|
|
DisableClipping(OLD_CLIPPING_STATE)
|
|
end
|
|
|
|
function RNDX.DrawShadows(r, x, y, w, h, col, spread, intensity, flags)
|
|
return RNDX.DrawShadowsEx(x, y, w, h, col, flags, r, r, r, r, spread, intensity)
|
|
end
|
|
|
|
function RNDX.DrawShadowsOutlined(r, x, y, w, h, col, thickness, spread, intensity, flags)
|
|
return RNDX.DrawShadowsEx(x, y, w, h, col, flags, r, r, r, r, spread, intensity, thickness or 1)
|
|
end
|
|
|
|
local BASE_FUNCS; BASE_FUNCS = {
|
|
Rad = function(self, rad)
|
|
TL, TR, BL, BR = rad, rad, rad, rad
|
|
return self
|
|
end,
|
|
Radii = function(self, tl, tr, bl, br)
|
|
TL, TR, BL, BR = tl or 0, tr or 0, bl or 0, br or 0
|
|
return self
|
|
end,
|
|
Texture = function(self, texture)
|
|
TEXTURE = texture
|
|
return self
|
|
end,
|
|
Material = function(self, mat)
|
|
local tex = mat:GetTexture("$basetexture")
|
|
if tex then
|
|
TEXTURE = tex
|
|
end
|
|
return self
|
|
end,
|
|
Outline = function(self, thickness)
|
|
OUTLINE_THICKNESS = thickness
|
|
return self
|
|
end,
|
|
Shape = function(self, shape)
|
|
SHAPE = SHAPES[shape] or 2.2
|
|
return self
|
|
end,
|
|
Color = function(self, col_or_r, g, b, a)
|
|
if type(col_or_r) == "number" then
|
|
COL_R, COL_G, COL_B, COL_A = col_or_r, g or 255, b or 255, a or 255
|
|
else
|
|
COL_R, COL_G, COL_B, COL_A = col_or_r.r, col_or_r.g, col_or_r.b, col_or_r.a
|
|
end
|
|
return self
|
|
end,
|
|
Blur = function(self, intensity)
|
|
if not intensity then
|
|
intensity = 1.0
|
|
end
|
|
intensity = math_max(intensity, 0)
|
|
USING_BLUR, BLUR_INTENSITY = true, intensity
|
|
return self
|
|
end,
|
|
Rotation = function(self, angle)
|
|
ROTATION = math.rad(angle or 0)
|
|
return self
|
|
end,
|
|
StartAngle = function(self, angle)
|
|
START_ANGLE = angle or 0
|
|
return self
|
|
end,
|
|
EndAngle = function(self, angle)
|
|
END_ANGLE = angle or 360
|
|
return self
|
|
end,
|
|
Shadow = function(self, spread, intensity)
|
|
SHADOW_ENABLED, SHADOW_SPREAD, SHADOW_INTENSITY = true, spread or 30, intensity or (spread or 30) * 1.2
|
|
return self
|
|
end,
|
|
Clip = function(self, pnl)
|
|
CLIP_PANEL = pnl
|
|
return self
|
|
end,
|
|
Flags = function(self, flags)
|
|
flags = flags or 0
|
|
|
|
-- Corner flags
|
|
if bit_band(flags, NO_TL) ~= 0 then
|
|
TL = 0
|
|
end
|
|
if bit_band(flags, NO_TR) ~= 0 then
|
|
TR = 0
|
|
end
|
|
if bit_band(flags, NO_BL) ~= 0 then
|
|
BL = 0
|
|
end
|
|
if bit_band(flags, NO_BR) ~= 0 then
|
|
BR = 0
|
|
end
|
|
|
|
-- Shape flags
|
|
local shape_flag = bit_band(flags, SHAPE_CIRCLE + SHAPE_FIGMA + SHAPE_IOS)
|
|
if shape_flag ~= 0 then
|
|
SHAPE = SHAPES[shape_flag] or SHAPES[DEFAULT_SHAPE]
|
|
end
|
|
|
|
-- Blur flag
|
|
if bit_band(flags, BLUR) ~= 0 then
|
|
BASE_FUNCS.Blur(self)
|
|
end
|
|
|
|
-- Manual color flag
|
|
if bit_band(flags, MANUAL_COLOR) ~= 0 then
|
|
COL_R = nil
|
|
end
|
|
|
|
return self
|
|
end,
|
|
|
|
}
|
|
|
|
local RECT = {
|
|
Rad = BASE_FUNCS.Rad,
|
|
Radii = BASE_FUNCS.Radii,
|
|
Texture = BASE_FUNCS.Texture,
|
|
Material = BASE_FUNCS.Material,
|
|
Outline = BASE_FUNCS.Outline,
|
|
Shape = BASE_FUNCS.Shape,
|
|
Color = BASE_FUNCS.Color,
|
|
Blur = BASE_FUNCS.Blur,
|
|
Rotation = BASE_FUNCS.Rotation,
|
|
StartAngle = BASE_FUNCS.StartAngle,
|
|
EndAngle = BASE_FUNCS.EndAngle,
|
|
Clip = BASE_FUNCS.Clip,
|
|
Shadow = BASE_FUNCS.Shadow,
|
|
Flags = BASE_FUNCS.Flags,
|
|
|
|
Draw = function(self)
|
|
if START_ANGLE == END_ANGLE then
|
|
return -- nothing to draw
|
|
end
|
|
|
|
local OLD_CLIPPING_STATE
|
|
if SHADOW_ENABLED or CLIP_PANEL then
|
|
-- if we are inside a panel, we need to draw outside of it
|
|
OLD_CLIPPING_STATE = DisableClipping(true)
|
|
end
|
|
|
|
if CLIP_PANEL then
|
|
local sx, sy = CLIP_PANEL:LocalToScreen(0, 0)
|
|
local sw, sh = CLIP_PANEL:GetSize()
|
|
render.SetScissorRect(sx, sy, sx + sw, sy + sh, true)
|
|
end
|
|
|
|
if SHADOW_ENABLED then
|
|
setup_shadows()
|
|
draw_shadows(COL_R, COL_G, COL_B, COL_A)
|
|
elseif USING_BLUR then
|
|
draw_blur()
|
|
else
|
|
if TEXTURE then
|
|
MAT = ROUNDED_TEXTURE_MAT
|
|
MATERIAL_SetTexture(MAT, "$basetexture", TEXTURE)
|
|
end
|
|
|
|
SetupDraw()
|
|
surface_DrawTexturedRectUV(X, Y, W, H, -0.015625, -0.015625, 1.015625, 1.015625)
|
|
end
|
|
|
|
if CLIP_PANEL then
|
|
render.SetScissorRect(0, 0, 0, 0, false)
|
|
end
|
|
|
|
if SHADOW_ENABLED or CLIP_PANEL then
|
|
DisableClipping(OLD_CLIPPING_STATE)
|
|
end
|
|
end,
|
|
|
|
GetMaterial = function(self)
|
|
if SHADOW_ENABLED or USING_BLUR then
|
|
error("You can't get the material of a shadowed or blurred rectangle!")
|
|
end
|
|
|
|
if TEXTURE then
|
|
MAT = ROUNDED_TEXTURE_MAT
|
|
MATERIAL_SetTexture(MAT, "$basetexture", TEXTURE)
|
|
end
|
|
SetupDraw()
|
|
|
|
return MAT
|
|
end,
|
|
}
|
|
|
|
local CIRCLE = {
|
|
Texture = BASE_FUNCS.Texture,
|
|
Material = BASE_FUNCS.Material,
|
|
Outline = BASE_FUNCS.Outline,
|
|
Color = BASE_FUNCS.Color,
|
|
Blur = BASE_FUNCS.Blur,
|
|
Rotation = BASE_FUNCS.Rotation,
|
|
StartAngle = BASE_FUNCS.StartAngle,
|
|
EndAngle = BASE_FUNCS.EndAngle,
|
|
Clip = BASE_FUNCS.Clip,
|
|
Shadow = BASE_FUNCS.Shadow,
|
|
Flags = BASE_FUNCS.Flags,
|
|
|
|
Draw = RECT.Draw,
|
|
GetMaterial = RECT.GetMaterial,
|
|
}
|
|
|
|
local TYPES = {
|
|
Rect = function(x, y, w, h)
|
|
RESET_PARAMS()
|
|
MAT = ROUNDED_MAT
|
|
X, Y, W, H = x, y, w, h
|
|
return RECT
|
|
end,
|
|
Circle = function(x, y, r)
|
|
RESET_PARAMS()
|
|
MAT = ROUNDED_MAT
|
|
SHAPE = SHAPES[SHAPE_CIRCLE]
|
|
X, Y, W, H = x - r / 2, y - r / 2, r, r
|
|
r = r / 2
|
|
TL, TR, BL, BR = r, r, r, r
|
|
return CIRCLE
|
|
end
|
|
}
|
|
|
|
setmetatable(RNDX, {
|
|
__call = function()
|
|
return TYPES
|
|
end
|
|
})
|
|
|
|
-- Flags
|
|
RNDX.NO_TL = NO_TL
|
|
RNDX.NO_TR = NO_TR
|
|
RNDX.NO_BL = NO_BL
|
|
RNDX.NO_BR = NO_BR
|
|
|
|
RNDX.SHAPE_CIRCLE = SHAPE_CIRCLE
|
|
RNDX.SHAPE_FIGMA = SHAPE_FIGMA
|
|
RNDX.SHAPE_IOS = SHAPE_IOS
|
|
|
|
RNDX.BLUR = BLUR
|
|
RNDX.MANUAL_COLOR = MANUAL_COLOR
|
|
|
|
function RNDX.SetFlag(flags, flag, bool)
|
|
flag = RNDX[flag] or flag
|
|
if tobool(bool) then
|
|
return bit.bor(flags, flag)
|
|
else
|
|
return bit.band(flags, bit.bnot(flag))
|
|
end
|
|
end
|
|
|
|
function RNDX.SetDefaultShape(shape)
|
|
DEFAULT_SHAPE = shape or SHAPE_FIGMA
|
|
DEFAULT_DRAW_FLAGS = DEFAULT_SHAPE
|
|
end
|
|
|
|
return RNDX
|