Oct 3, 2017
|
#1
|
|
Administrator
|
[WIP] Clans
Started work on ingame clans interface several days ago, it will be included in next Toribash build after forum clans update is made public.
2 tabs available now, clan view and clan roster.
To launch the script, either run "/ls clans.lua" chat command (will open clanid = 1), alternatively you can run "/ls clans.lua [username]" command to open specific player's clan. Note that public Toribash builds don't support clans yet so you'll need to add "CLAN 0;clanid" line there. Also note that the attached data files only contain info for clanids 1 and 19, so if you try any other clanid you'll get an error.
Version 0.1.2 screenshots ►
v 0.2 source ►clans.lua ►Lua code:
-- clans view script
-- made by sir
CLANVIEWLASTPOS = CLANVIEWLASTPOS or nil
CLANLISTLASTPOS = { scroll = {}, list = {} }
FREEJOINENABLED = true
dofile("clans/clandatamanager.lua")
dofile("clans/uielement.lua")
allClans = Clan:getClanData()
local clan = Clan:create(ARG1)
Clan:getLevelData()
Clan:getAchievementData()
Clan:showMain()
if (clan.clanid) then
Clan:showClan(clan.clanid)
else
Clan:showClanList()
end
add_hook("mouse_button_down", "uiMouseHandler", function(s, x, y) UIElement:handleMouseDn(s, x, y) end)
add_hook("mouse_button_up", "uiMouseHandler", function(s, x, y) UIElement:handleMouseUp(s, x, y) end)
add_hook("mouse_move", "uiMouseHandler", function(x, y) UIElement:handleMouseHover(x, y) end)
add_hook("draw2d", "clanVisual", function() Clan:drawVisuals() end)
clans/clandatamanager.lua ►Lua code:
-- clan data manager class
dofile("clans/errors.lua")
do
Clan = {}
Clan.__index = Clan
ClanData = {}
LevelData = {}
AchievementData = {}
-- Creates clan class
function Clan:create(player)
local cln = {}
setmetatable(cln, Clan)
if (player == "" or nil) then
cln.clanid = nil
--player = get_master().master.nick
--end
else
cln.clanid = getClanId(player)
end
return cln
end
-- Populates clan data table
-- clans/clan.txt is fetched from server
function Clan:getClanData()
local entries = 0
local clans = {}
local data_types = { "clanname", "clantag", "isofficial", "rank", "clanlevel", "clanxp", "memberstotal", "isfreeforall", "clantopach", "isactive", "members", "leaders" }
local file = io.open("clans/clans.txt")
if (file == nil) then
err(ERR.clanDataEmpty)
file:close()
return false
end
for ln in file:lines() do
if string.match(ln, "^CLAN") then
local segments = 14
local data_stream = { ln:match(("([^\t]*)\t"):rep(segments)) }
if (data_stream[12] == "2") then
local clanid = tonumber(data_stream[2])
for i = 5, 12 do
data_stream[i] = tonumber(data_stream[i])
end
data_stream[3] = data_stream[3]:gsub('%W+%d+%W*', '')
data_stream[4] = data_stream[4]:gsub('%W+%d+%W*', '')
ClanData[clanid] = {}
for i, v in ipairs(data_types) do
ClanData[clanid][v] = data_stream[i + 2]
end
entries = entries + 1
clans[entries] = clanid
end
end
end
file:close()
return clans
end
function Clan:getLevelData()
local data_types = { "minxp", "maxmembers", "officialonly" }
local file = io.open("clans/clanlevels.txt")
if (file == nil) then
err(ERR.clanLevelDataEmpty)
file:close()
return false
end
for ln in file:lines() do
if string.match(ln, "^LEVEL") then
local segments = 5
local data_stream = { ln:match(("([^\t]*)\t"):rep(segments)) }
local level = tonumber(data_stream[2])
LevelData[level] = {}
for i, v in ipairs(data_types) do
LevelData[level][v] = tonumber(data_stream[i + 2])
end
end
end
file:close()
return entries
end
function Clan:getAchievementData()
local data_types = { "achname", "achdesc" }
local file = io.open("clans/clanachievements.txt")
if (file == nil) then
err(ERR.clanAchievementDataEmpty)
file:close()
return false
end
for ln in file:lines() do
if string.match(ln, "^ACHIEVEMENT") then
local segments = 4
local data_stream = { ln:match(("([^\t]*)\t"):rep(segments)) }
local level = tonumber(data_stream[2])
AchievementData[level] = {}
for i, v in ipairs(data_types) do
AchievementData[level][v] = data_stream[i + 2]
end
end
end
file:close()
return entries
end
function Clan:showMain()
clanViewBG = UIElement:new( { pos = CLANVIEWLASTPOS or {WIN_W/2 - 400, WIN_H/2 - 225},
size = {800, 450},
bgColor = {.1,.1,.1,0.9},
shapeType = ROUNDED,
rounded = 10 } )
clanView = UIElement:new( { parent = clanViewBG,
pos = {4,4},
bgColor = {1,1,1,0.6},
size = {clanViewBG.size.w - 8, clanViewBG.size.h - 8},
shapeType = clanViewBG.shapeType,
rounded = clanViewBG.rounded / 3 * 2 } )
clanTopBar = UIElement:new( { parent = clanView,
pos = {0,0},
bgColor = {0.2,0.2,0.2,1},
size = {clanView.size.w, 50},
interactive = true,
shapeType = clanView.shapeType,
rounded = clanView.rounded } )
clanTopBar:addCustomDisplay(false, function()
draw_quad(clanTopBar.pos.x, clanTopBar.pos.y + clanTopBar.size.h - 10, clanTopBar.size.w, 10)
end)
clanTopBar:addMouseHandlers(
function(s,x,y)
clanTopBar.pressedPos.x = clanTopBar.pos.x - x - 4
clanTopBar.pressedPos.y = clanTopBar.pos.y - y - 4
end, nil,
function(x,y)
if (clanTopBar.hoverState == BTN_DN) then
local posX = x + clanTopBar.pressedPos.x
local posY = y + clanTopBar.pressedPos.y
clanViewBG:moveTo(posX, posY)
CLANVIEWLASTPOS = { posX, posY }
end
end)
clanViewQuitButton = UIElement:new( { parent = clanTopBar,
pos = {-45, 5},
size = {35, 35},
bgColor = {0.5,0.5,0.5,1},
interactive = true,
hoverColor = {0.6,0.4,0.4,1},
pressedColor = {1,0.3,0.3,1},
shapeType = ROUNDED,
rounded = 10 } )
clanViewQuitButton:addMouseHandlers(function() end,
function()
remove_hooks("clanVisual")
remove_hooks("uiMouseHandler")
clanView:kill()
end, function() end)
clanViewQuitButton:addCustomDisplay(false, function()
local indent = 8
local weight = 10
-- Quit button
if (clanViewQuitButton.hoverState == BTN_DN) then
set_color(1,1,1,1)
else
set_color(0,0,0,1)
end
draw_line(clanViewQuitButton.pos.x + indent, clanViewQuitButton.pos.y + indent, clanViewQuitButton.pos.x + clanViewQuitButton.size.w - indent, clanViewQuitButton.pos.y + clanViewQuitButton.size.h - indent, weight)
draw_line(clanViewQuitButton.pos.x + clanViewQuitButton.size.w - indent, clanViewQuitButton.pos.y + indent, clanViewQuitButton.pos.x + indent, clanViewQuitButton.pos.y + clanViewQuitButton.size.h - indent, weight)
end)
clanViewBackButton = UIElement:new( { parent = clanTopBar,
pos = {10, 5},
size = {35, 35},
bgColor = {0.5,0.5,0.5,1},
interactive = true,
hoverColor = {0.7,0.7,0.7,1},
pressedColor = {0.3,0.3,0.3,1},
shapeType = ROUNDED,
rounded = 10 } )
clanViewBackButton:addCustomDisplay(false, function()
local indent = 4
local weight = 10
-- Back button
if (clanViewBackButton.hoverState == BTN_DN) then
set_color(1,1,1,1)
else
set_color(0,0,0,1)
end
draw_line(clanViewBackButton.pos.x + indent * 2, clanViewBackButton.pos.y + clanViewBackButton.size.h / 2, clanViewBackButton.pos.x + clanViewBackButton.size.w - indent, clanViewBackButton.pos.y + clanViewBackButton.size.h / 2, weight)
draw_disk(clanViewBackButton.pos.x + 14, clanViewBackButton.pos.y + 13.5 + indent, 0, 11, 3, 1, -90, 360, 0)
end)
tabName = UIElement:new( { parent = clanTopBar,
pos = {clanViewBackButton.size.w + 20,2},
size = {clanView.size.w - clanViewQuitButton.size.w - clanViewBackButton.size.w - 40, 45} } )
end
--Displays clan list
function Clan:showClanList()
local clanListView = UIElement:new( { parent = clanView,
pos = { 0, clanTopBar.size.h },
size = {clanView.size.w, clanView.size.h - clanTopBar.size.h - 40} } )
local clanListClan = {}
local clanListClanRank = {}
local clanListClanTag = {}
local clanListClanName = {}
local clanListClanMembers = {}
local clanListClanOfficial = {}
local clanListClanJoinMode = {}
local listEntryHeight = 40
local clanListClanArea = UIElement:new( { parent = clanListView,
pos = {0, -clanListView.size.h + listEntryHeight},
size = {clanListView.size.w - 25, clanListView.size.h},
color = {0,0,0,1} } )
local clanListScroll = UIElement:new( { parent = clanListView,
pos = {-25, listEntryHeight},
size = {25, clanListView.size.h - listEntryHeight},
bgColor = {0,0,0,0.5} } )
local scrollScale = (clanListClanArea.size.h) / (#allClans * listEntryHeight)
local scrollBarInteractive = true
if (scrollScale > 1) then
scrollScale = 1
scrollBarInteractive = false
elseif (scrollScale < 0.1) then
scrollScale = 0.1
end
local clanListScrollBar = UIElement:new( { parent = clanListScroll,
pos = {2.5, 5},
size = {20, (clanListScroll.size.h - 10) * scrollScale},
bgColor = {1,1,1,0.7},
interactive = scrollBarInteractive,
hoverColor = {1,1,1,1},
pressedColor = {1,1,1,0.5},
scrollEnabled = true } )
for i = 1, #allClans do
local isEven = 0
if (i / 2 == math.floor(i / 2)) then
isEven = 0.2
end
clanListClan[i] = UIElement:new( { parent = clanListClanArea,
pos = { 0, (i - 1) * listEntryHeight},
size = { clanListClanArea.size.w, listEntryHeight },
bgColor = {0 + isEven, 0 + isEven, 0 + isEven, 0.3},
interactive = true,
hoverColor = {0, 0, 0, 0.6},
pressedColor = {0, 0, 0, 0.15} } )
clanListClanRank[i] = UIElement:new( { parent = clanListClan[i],
pos = {10, 9},
size = {60, clanListClan[i].size.h} } )
clanListClanTag[i] = UIElement:new( { parent = clanListClan[i],
pos = {80, 9},
size = {115, clanListClan[i].size.h} } )
clanListClanName[i] = UIElement:new( { parent = clanListClan[i],
pos = {205, 0},
size = {175, clanListClan[i].size.h} } )
clanListClanMembers[i] = UIElement:new( { parent = clanListClan[i],
pos = {390, 9},
size = {100, clanListClan[i].size.h - 18} } )
clanListClanOfficial[i] = UIElement:new( { parent = clanListClan[i],
pos = {500, 9},
size = {100, clanListClan[i].size.h} } )
clanListClanJoinMode[i] = UIElement:new( { parent = clanListClan[i],
pos = {610, 9},
size = {150, clanListClan[i].size.h} } )
-- run replacement draw function to ensure proper scroll work
clanListClan[i]:addCustomDisplay(false, function()
-- Draw clan info
local textScaleMod = 0.82
local clanRank = ClanData[allClans[i]].rank
if (clanRank == 0) then
clanRank = "-"
end
set_color(1,1,1,1)
clanListClanRank[i]:uiText(clanRank, nil, nil, FONTS.MEDIUM, CENTER, textScaleMod)
local clanTag = "(" .. ClanData[allClans[i]].clantag .. ")"
if (ClanData[allClans[i]].isofficial == 1) then
clanTag = "[" .. ClanData[allClans[i]].clantag .. "]"
end
clanListClanTag[i]:uiText(clanTag, nil, nil, FONTS.MEDIUM, RIGHT, textScaleMod)
draw_quad(clanListClanName[i].pos.x - 5.5, clanListClanName[i].pos.y + 10, 1, 20)
local clanName = ClanData[allClans[i]].clanname
if (get_string_length(clanName, FONTS.MEDIUM) * textScaleMod > clanListClanName[i].size.w) then
clanListClanName[i]:uiText(clanName, clanListClanName[i].pos.x, clanListClanName[i].pos.y, FONTS.MEDIUM, LEFT, textScaleMod)
else
clanListClanName[i]:uiText(clanName, clanListClanName[i].pos.x, clanListClanName[i].pos.y + 9, FONTS.MEDIUM, LEFT, textScaleMod)
end
clanListClanMembers[i]:uiText(ClanData[allClans[i]].memberstotal .. "/" .. LevelData[ClanData[allClans[i]].clanlevel + 1].maxmembers, clanListClanMembers[i].pos.x, clanListClanMembers[i].pos.y, FONTS.MEDIUM, CENTER, textScaleMod)
if (ClanData[allClans[i]].isofficial == 1) then
clanListClanOfficial[i]:uiText("Official", clanListClanOfficial[i].pos.x, clanListClanOfficial[i].pos.y, FONTS.MEDIUM, CENTER, textScaleMod)
else
clanListClanOfficial[i]:uiText("Unofficial", clanListClanOfficial[i].pos.x, clanListClanOfficial[i].pos.y, FONTS.MEDIUM, CENTER, textScaleMod)
end
if (ClanData[allClans[i]].isfreeforall == 1) then
clanListClanJoinMode[i]:uiText("Free for all", clanListClanJoinMode[i].pos.x, clanListClanJoinMode[i].pos.y, FONTS.MEDIUM, CENTER, textScaleMod)
else
clanListClanJoinMode[i]:uiText("Invite Only", clanListClanJoinMode[i].pos.x, clanListClanJoinMode[i].pos.y, FONTS.MEDIUM, CENTER, textScaleMod)
end
if (i ~= #allClans) then
draw_line(clanListClan[i].pos.x, clanListClan[i].pos.y + clanListClan[i].size.h - 1, clanListClan[i].pos.x + clanListClan[i].size.w, clanListClan[i].pos.y + clanListClan[i].size.h - 1, 1)
end
end)
clanListClan[i]:addMouseHandlers(function() end,
function()
CLANLISTLASTPOS = { scroll = clanListScrollBar:getPos(), list = clanListClanArea:getPos() }
clanListView:kill()
Clan:showClan(allClans[i])
end, function() end)
end
clanListTopBar = UIElement:new( { parent = clanListView,
pos = {0,0},
bgColor = {0.2,0.2,0.2,1},
size = {clanView.size.w, listEntryHeight} } )
clanListBotBar = UIElement:new( { parent = clanListView,
pos = {0,clanListView.size.h},
bgColor = {0.2,0.2,0.2,1},
size = {clanView.size.w, listEntryHeight},
shapeType = clanView.shapeType,
rounded = clanView.rounded } )
clanListBotBar:addCustomDisplay(false, function()
set_color(0.2,0.2,0.2,1)
draw_quad(clanListBotBar.pos.x, clanListBotBar.pos.y, clanListBotBar.size.w, 10)
end)
clanListScrollBar.pressedPos = { x = 0, y = 0 }
clanListScrollBar:addScrollFor(clanListClanArea, clanListClan, clanListTopBar, clanListBotBar, CLANLISTLASTPOS.list[2], CLANLISTLASTPOS.scroll[2])
clanViewBackButton:addMouseHandlers(function() end, function() end, function() end)
clanViewBackButton:hide()
tabName:addCustomDisplay(false, function()
set_color(1,1,1,1)
tabName:uiText("Clan List", tabName.pos.x, tabName.pos.y, FONTS.BIG, CENTER, 0.7)
end)
end
-- Displays single clan data
function Clan:showClan(clanid)
local clanLevelValue = ClanData[clanid].clanlevel
local clanTopAch = ClanData[clanid].clantopach
local xpBarProgress = (ClanData[clanid].clanxp - LevelData[clanLevelValue].minxp) / (LevelData[clanLevelValue + 1].minxp - LevelData[clanLevelValue].minxp)
if (xpBarProgress > 1) then
xpBarProgress = 1
end
local clanInfoView = UIElement:new( { parent = clanView,
pos = { 10, clanTopBar.size.h + 10 },
size = { clanView.size.w - 275, clanView.size.h - clanTopBar.size.h - 20},
bgColor = {0,0,0,0.1},
shapeType = ROUNDED,
rounded = 10 } )
local clanInfoRightView = UIElement:new( { parent = clanView,
pos = { -260, clanTopBar.size.h + 10 },
size = { 250, clanView.size.h - clanTopBar.size.h - 20 } } )
local clanLevel = UIElement:new( { parent = clanInfoView,
pos = {0, 5},
size = {clanInfoView.size.w, 35} } )
clanLevel:addCustomDisplay(false, function()
set_color(1,1,1,1)
clanLevel:uiText("Clan Level " .. clanLevelValue, clanLevel.pos.x, clanLevel.pos.y, FONTS.BIG, CENTER, 0.6)
end)
local clanXpBarOutline = UIElement:new( { parent = clanInfoView,
pos = {10, 45},
size = {clanInfoView.size.w - 20, 50},
bgColor = {0.1,0.1,0.1,0.5},
shapeType = ROUNDED,
rounded = 10 } )
local clanXpBar = UIElement:new( { parent = clanXpBarOutline,
pos = {2, 2},
size = {clanXpBarOutline.size.w - 4, clanXpBarOutline.size.h - 4},
bgColor = {1,1,1,0.3},
shapeType = clanXpBarOutline.shapeType,
rounded = clanXpBarOutline.rounded / 5 * 4 } )
local clanXpBarProgress
if (xpBarProgress > 0) then
clanXpBarProgress = UIElement:new( { parent = clanXpBar,
pos = {0, 0},
size = {clanXpBar.size.w * xpBarProgress, clanXpBar.size.h},
bgColor = {0,0.8,0,0.7},
shapeType = clanXpBar.shapeType,
rounded = clanXpBar.rounded } )
end
local clanXp = UIElement:new( { parent = clanXpBar,
pos = {0, 8},
size = {clanInfoView.size.w, 25} } )
clanXp:addCustomDisplay(false, function()
set_color(1,1,1,1)
clanXp:uiText(ClanData[clanid].clanxp .. " / " .. LevelData[clanLevelValue + 1].minxp .. " XP", clanXp.pos.x, clanXp.pos.y, FONTS.BIG, CENTER, 0.5)
end)
local clanForumLinkOutline = UIElement:new( { parent = clanInfoView,
pos = {clanInfoView.size.w / 2 - 150, -60},
size = {300, 50},
bgColor = {0.1,0.1,0.1,0.5},
shapeType = ROUNDED,
rounded = 10 } )
local clanForumLink = UIElement:new( { parent = clanForumLinkOutline,
pos = {2, 2},
size = {clanForumLinkOutline.size.w - 4, clanForumLinkOutline.size.h - 4},
bgColor = {1,1,1,0.3},
interactive = true,
hoverColor = {1,1,1,0.5},
pressedColor = {1,1,1,0.1},
shapeType = clanForumLinkOutline.shapeType,
rounded = clanForumLinkOutline.rounded / 5 * 4 } )
clanForumLink:addMouseHandlers(nil,
function()
open_url("http://forum.toribash.com/clan.php?clanid="..clanid)
end, nil)
clanForumLink:addCustomDisplay(false, function()
set_color(1,1,1,1)
clanForumLink:uiText("Clan page on forum", clanForumLink.pos.x, clanForumLink.pos.y + 10, FONTS.MEDIUM, CENTER)
end)
--[[ local clanMembersOutline = UIElement:new( { parent = clanInfoView,
pos = {10, 105},
size = {clanInfoView.size.w / 2 - 15, 90},
bgColor = {0,0,0,0.5},
shapeType = ROUNDED,
rounded = 10 } )
local clanMembers = UIElement:new( { parent = clanMembersOutline,
pos = {2, 2},
size = {clanMembersOutline.size.w - 4, clanMembersOutline.size.h - 4},
bgColor = {1,1,1,0.5},
shapeType = clanMembersOutline.shapeType,
rounded = clanMembersOutline.rounded / 5 * 4 } )
clanMembers:addCustomDisplay(false, function()
set_color(1,1,1,1)
clanMembers:uiText("Total Members", clanMembers.pos.x, clanMembers.pos.y, FONTS.MEDIUM, CENTER)
clanMembers:uiText(ClanData[clanid].memberstotal, clanMembers.pos.x, clanMembers.pos.y + 35, FONTS.BIG, CENTER, 0.6)
end)
local clanLeadersOutline = UIElement:new( { parent = clanInfoView,
pos = {-clanInfoView.size.w / 2 + 5, 105},
size = {clanInfoView.size.w / 2 - 15, 90},
bgColor = {0,0,0,0.5},
shapeType = ROUNDED,
rounded = 10 } )
local clanLeaders = UIElement:new( { parent = clanLeadersOutline,
pos = {2, 2},
size = {clanLeadersOutline.size.w - 4, clanLeadersOutline.size.h - 4},
bgColor = {1,1,1,0.5},
shapeType = clanLeadersOutline.shapeType,
rounded = clanLeadersOutline.rounded / 5 * 4 } )
clanLeaders:addCustomDisplay(false, function()
set_color(1,1,1,1)
if (ClanData[clanid].leaders:match("%s")) then
clanLeaders:uiText("Leaders", clanLeaders.pos.x, clanLeaders.pos.y, FONTS.MEDIUM, CENTER)
else
clanLeaders:uiText("Leader", clanLeaders.pos.x, clanLeaders.pos.y, FONTS.MEDIUM, CENTER)
end
end)
local clanLeadersList = UIElement:new( { parent = clanLeaders,
pos = {5, 22},
size = {40, clanLeaders.size.h - 20} } )
clanLeadersList:addCustomDisplay(false, function()
set_color(1,1,1,1)
clanLeadersList:uiText(ClanData[clanid].leaders, clanLeadersList.pos.x, clanLeadersList.pos.y, 4, LEFT, 0.8)
end)
--]]
local clanMembersOutline = UIElement:new( { parent = clanInfoView,
pos = { 10, clanLevel.size.h + clanXpBarOutline.size.h + 20 },
size = {clanInfoView.size.w - 20, 90},
bgColor = {0,0,0,0.5},
shapeType = ROUNDED,
rounded = 10 } )
local clanMembers = UIElement:new( { parent = clanMembersOutline,
pos = {2,2},
size = {clanMembersOutline.size.w - 4, clanMembersOutline.size.h - 4},
bgColor = {1,1,1,0.5},
interactive = true,
hoverColor = {1,1,1,0.6},
pressedColor = {1,1,1,0.1},
shapeType = clanMembersOutline.shapeType,
rounded = clanMembersOutline.rounded / 5 * 4 } )
clanMembers:addCustomDisplay(false, function()
set_color(1,1,1,1)
clanMembers:uiText("Clan Roster", clanMembers.pos.x, clanMembers.pos.y + 5, FONTS.BIG, CENTER, 0.5)
clanMembers:uiText("Press to see all clan members", clanMembers.pos.x, clanMembers.pos.y + 45, FONTS.MEDIUM, CENTER, 0.9)
end)
clanMembers:addMouseHandlers(nil,
function()
clanInfoView:kill()
clanInfoRightView:kill()
Clan:showMembers(clanid)
end, nil)
local clanTopAchievementOutline = UIElement:new( { parent = clanInfoView,
pos = { 10, 205 },
size = {clanInfoView.size.w - 20, 100},
bgColor = {0,0,0,0.5},
shapeType = ROUNDED,
rounded = 10 } )
local clanTopAchievement = UIElement:new( { parent = clanTopAchievementOutline,
pos = {2,2},
size = {clanTopAchievementOutline.size.w - 4, clanTopAchievementOutline.size.h - 4},
bgColor = {1,1,1,0.5},
shapeType = clanTopAchievementOutline.shapeType,
rounded = clanTopAchievementOutline.rounded / 5 * 4 } )
local clanTopAchIcon
local clanTopAchName
local clanTopAchDesc
if (clanTopAch ~= 0) then
clanTopAchIcon = UIElement:new( { parent = clanTopAchievement,
pos = {10, 8},
size = {80,80},
bgImage = "/clans/aid"..clanTopAch..".tga" } )
clanTopAchName = UIElement:new( { parent = clanTopAchievement,
pos = {100, 5},
size = {clanTopAchievement.size.w - 110, 20} } )
clanTopAchName:addCustomDisplay(false, function()
set_color(1,1,1,1)
clanTopAchName:uiText(AchievementData[clanTopAch].achname, clanTopAchName.pos.x, clanTopAchName.pos.y, FONTS.MEDIUM, CENTER)
end)
clanTopAchDesc = UIElement:new( { parent = clanTopAchievement,
pos = {100, 30},
size = {clanTopAchievement.size.w - 110, 66} } )
clanTopAchDesc:addCustomDisplay(false, function()
set_color(1,1,1,1)
clanTopAchDesc:uiText(AchievementData[clanTopAch].achdesc, clanTopAchDesc.pos.x, clanTopAchDesc.pos.y, FONTS.SMALL, CENTER)
end)
else
clanTopAchDesc = UIElement:new( { parent = clanTopAchievement,
pos = {50, 25},
size = {clanTopAchievement.size.w - 100, 50} } )
clanTopAchDesc:addCustomDisplay(false,
function()
set_color(1,1,1,1)
clanTopAchDesc:uiText("This clan hasnt chosen an achievement to display", clanTopAchDesc.pos.x, clanTopAchDesc.pos.y, FONTS.MEDIUM, CENTER)
end)
end
local clanRank = UIElement:new( { parent = clanInfoRightView,
pos = { 0, 0 },
size = { clanInfoRightView.size.w, 50 },
bgColor = {0,0,0,0.1},
shapeType = ROUNDED,
rounded = 10 } )
clanRank:addCustomDisplay(false, function()
set_color(1,1,1,1)
clanRank:uiText("Rank "..ClanData[clanid].rank, clanRank.pos.x, clanRank.pos.y + 5, FONTS.BIG, CENTER, 0.6)
end)
local clanLogo = UIElement:new( { parent = clanInfoRightView,
pos = { 0, clanRank.size.h + 5 },
size = { 250, 250 },
bgColor = {0,0,0,0.1},
bgImage = "/clans/cid"..clanid.."logo.tga",
shapeType = ROUNDED,
rounded = 10 } )
local clanJoin = UIElement:new( { parent = clanInfoRightView,
pos = { 0, clanRank.size.h + clanLogo.size.h + 10 },
size = { 250, 60 },
bgColor = {0,0,0,0.1},
shapeType = ROUNDED,
rounded = 10 } )
local clanJoinButtonOutline = nil
local clanJoinButton = nil
if (ClanData[clanid].isfreeforall == 1 and FREEJOINENABLED) then
clanJoinButtonOutline = UIElement:new( { parent = clanJoin,
pos = { 10, 10 },
size = {clanJoin.size.w - 20, clanJoin.size.h - 20},
bgColor = {0.1,0.1,0.1,0.5},
shapeType = ROUNDED,
rounded = 10 } )
clanJoinButton = UIElement:new( { parent = clanJoinButtonOutline,
pos = { 2, 2 },
size = {clanJoinButtonOutline.size.w - 4, clanJoinButtonOutline.size.h - 4},
bgColor = {1,1,1,0.3},
interactive = true,
hoverColor = {1,1,1,0.5},
pressedColor = {1,1,1,0.1},
shapeType = clanJoinButtonOutline.shapeType,
rounded = clanJoinButtonOutline.rounded / 5 * 4 } )
clanJoinButton:addCustomDisplay(false, function()
set_color(1,1,1,1)
clanJoinButton:uiText("Join Clan", clanJoinButton.pos.x, clanJoinButton.pos.y + 5, FONTS.MEDIUM, CENTER)
end)
clanJoinButton:addMouseHandlers(nil,
function()
open_url("http://forum.toribash.com/clan.php?clanid="..clanid.."?join=true")
end, nil)
elseif (ClanData[clanid].isfreeforall == 1) then
clanJoin:addCustomDisplay(false, function()
set_color(1,1,1,1)
clanJoin:uiText("Free to join", clanJoin.pos.x, clanJoin.pos.y + 15, FONTS.MEDIUM, CENTER)
end)
else
clanJoin:addCustomDisplay(false, function()
set_color(1,1,1,1)
clanJoin:uiText("Invite Only", clanJoin.pos.x, clanJoin.pos.y + 15, FONTS.MEDIUM, CENTER)
end)
end
clanViewBackButton:show()
clanViewBackButton:addMouseHandlers(function() end, function()
clanInfoView:kill()
clanInfoRightView:kill()
Clan:showClanList()
end, function() end)
tabName:addCustomDisplay(false, function()
local clanNameStr = nil
if (ClanData[clanid].isofficial == 1) then
clanNameStr = "[" .. ClanData[clanid].clantag .. "] " .. ClanData[clanid].clanname
else
clanNameStr = "(" .. ClanData[clanid].clantag .. ") " .. ClanData[clanid].clanname
end
set_color(1,1,1,1)
tabName:uiText(clanNameStr, tabName.pos.x, tabName.pos.y, FONTS.BIG, CENTER, 0.7)
end)
end
-- Displays clan members and leaders
function Clan:showMembers(clanid)
local clanLeadersView = UIElement:new( { parent = clanView,
pos = { 10, clanTopBar.size.h + 10 },
size = { 200, clanView.size.h - clanTopBar.size.h - 20 },
bgColor = {0,0,0,0.1},
shapeType = ROUNDED,
rounded = 10 } )
local clanMembersView = UIElement:new( { parent = clanView,
pos = { clanLeadersView.size.w + 20, clanTopBar.size.h + 10 },
size = { clanView.size.w - clanLeadersView.size.w - 30, clanView.size.h - clanTopBar.size.h - 20 },
bgColor = {0,0,0,0.1},
shapeType = ROUNDED,
rounded = 10 } )
local clanLeadersCaption = UIElement:new( { parent = clanLeadersView,
pos = {0, 0},
size = {clanLeadersView.size.w, 25} } )
clanLeadersCaption:addCustomDisplay(false, function()
set_color(1,1,1,1)
if (ClanData[clanid].leaders:match("%s")) then
clanLeadersCaption:uiText("Leaders", clanLeadersCaption.pos.x, clanLeadersCaption.pos.y, FONTS.MEDIUM, CENTER)
else
clanLeadersCaption:uiText("Leader", clanLeadersCaption.pos.x, clanLeadersCaption.pos.y, FONTS.MEDIUM, CENTER)
end
end)
local clanMembersCaption = UIElement:new( { parent = clanMembersView,
pos = {0, 0},
size = {clanMembersView.size.w, 25} } )
clanMembersCaption:addCustomDisplay(false, function()
set_color(1,1,1,1)
clanMembersCaption:uiText("Members", clanMembersCaption.pos.x, clanMembersCaption.pos.y, FONTS.MEDIUM, CENTER)
end)
local clanLeaders = UIElement:new( { parent = clanLeadersView,
pos = {10, clanLeadersCaption.size.h + 10},
size = {clanLeadersView.size.w - 20, clanLeadersView.size.h - clanLeadersCaption.size.h - 20} } )
local clanLeadersAll = textAdapt(ClanData[clanid].leaders, FONTS.MEDIUM, 1, 20)
local clanLeadersList = {}
for i = 1, #clanLeadersAll do
if (i * 25 > clanLeaders.size.h) then
break
end
clanLeadersList[i] = UIElement:new( { parent = clanLeaders,
pos = {0, (i-1)*25},
size = {clanLeaders.size.w, 25},
bgColor = {1,1,1,1},
interactive = true,
hoverColor = {0.8,0.8,0.8,1},
pressedColor = {0.4,0.4,0.4,1} } )
clanLeadersList[i]:addCustomDisplay(true, function()
clanLeadersList[i]:setButtonColor()
clanLeadersList[i]:uiText(clanLeadersAll[i], clanLeadersList[i].pos.x, clanLeadersList[i].pos.y, FONTS.MEDIUM)
end)
clanLeadersList[i]:addMouseHandlers(nil, function()
open_url("http://forum.toribash.com/member.php?username="..clanLeadersAll[i])
end, nil)
end
local clanMembers = UIElement:new( { parent = clanMembersView,
pos = {10, clanMembersCaption.size.h + 10},
size = {clanMembersView.size.w - 20, clanMembersView.size.h - clanMembersCaption.size.h - 20} } )
local clanMembersAll = textAdapt(ClanData[clanid].members, FONTS.MEDIUM, 1, 20)
local clanMembersList = {}
local memberPos = { x = 0, y = -20 }
for i = 1, #clanMembersAll do
memberPos.y = memberPos.y + 20
if (memberPos.x + 270 > clanMembers.size.w and memberPos.y + 60 > clanMembers.size.h) then
clanMembersList[i] = UIElement:new ( { parent = clanMembers,
pos = {-135, -40},
size = {135, 40},
bgColor = {1,1,1,.5},
shapeType = ROUNDED,
rounded = 10,
interactive = true,
hoverColor = {0.8,0.8,0.8,.5},
pressedColor = {0.4,0.4,0.4,.5} } )
clanMembersList[i]:addCustomDisplay(false, function()
set_color(0.2,0.2,0.2,1)
clanMembersList[i]:uiText("View All", clanMembersList[i].pos.x, clanMembersList[i].pos.y + 8, FONTS.MEDIUM, CENTER)
end)
clanMembersList[i]:addMouseHandlers(nil, function()
open_url("http://forum.toribash.com/clan.php?clanid="..clanid)
end, nil)
break
end--]]
if (memberPos.y + 20 > clanMembers.size.h) then
memberPos.x = memberPos.x + 135
memberPos.y = 0
end
clanMembersList[i] = UIElement:new( { parent = clanMembers,
pos = {memberPos.x, memberPos.y},
size = {135, 20},
bgColor = {1,1,1,1},
interactive = true,
hoverColor = {0.8,0.8,0.8,1},
pressedColor = {0.4,0.4,0.4,1} } )
clanMembersList[i]:addCustomDisplay(true, function()
clanMembersList[i]:setButtonColor()
clanMembersList[i]:uiText(clanMembersAll[i], clanMembersList[i].pos.x, clanMembersList[i].pos.y, FONTS.MEDIUM, LEFT, 0.8)
end)
clanMembersList[i]:addMouseHandlers(nil, function()
open_url("http://forum.toribash.com/member.php?username="..clanMembersAll[i])
end, nil)
end
clanViewBackButton:addMouseHandlers(function() end,
function()
Clan:showClan(clanid)
clanLeadersView:kill()
clanMembersView:kill()
end, function() end)
tabName:addCustomDisplay(false, function()
local clanNameStr = nil
if (ClanData[clanid].isofficial == 1) then
clanNameStr = "[" .. ClanData[clanid].clantag .. "] Clan Roster"
else
clanNameStr = "(" .. ClanData[clanid].clantag .. ") Clan Roster"
end
set_color(1,1,1,1)
tabName:uiText(clanNameStr, tabName.pos.x, tabName.pos.y, FONTS.BIG, CENTER, 0.7)
end)
end
function getClanId(player)
local str = "[)\]]"
local strMatch = string.find(player, str)
if (strMatch) then
player = string.sub(player, strMatch + 1)
end
local file = io.open("custom/" .. player .. "/item.dat", 'r', 60)
if (file == nil) then
err(ERR.playerFolderPerms)
file:close()
return false
end
for ln in file:lines() do
if string.match(ln, "CLAN 0;") then
local clanid = string.gsub(ln, "CLAN 0;", "")
clanid = tonumber(clanid)
file:close()
return clanid
end
end
err(ERR.playerFolderClan)
file:close()
return false
end
function Clan:drawVisuals()
for i, v in pairs(UIElementManager) do
v:updatePos()
end
for i, v in pairs(UIVisualManager) do
v:display()
end
end
end
clans/uielement.lua ►Lua code:
-- UI class
WIN_W, WIN_H = get_window_size()
SQUARE = 1
ROUNDED = 2
LEFT = 0
CENTER = 1
RIGHT = 2
BTN_DN = 1
BTN_HVR = 2
DEFAULTITEXTURE = "torishop/icons/defaulticon.tga"
do
UIElementManager = {}
UIVisualManager = {}
UIMouseHandler = {}
UIElement = {}
UIElement.__index = UIElement
-- Spawns new UI Element
function UIElement:new(o)
local elem = { parent = nil,
child = {},
text = nil,
pos = { x = nil, y = nil },
shift = { x = nil, y = nil },
size = { w = nil, h = nil },
bgColor = { 1, 1, 1, 0 },
bgImage = nil,
shapeType = SQUARE,
customDisplayTrue = false,
customDisplay = function() end,
interactive = false,
}
setmetatable(elem, UIElement)
o = o or nil
if (o) then
if (o.parent) then
elem.parent = o.parent
table.insert(elem.parent.child, elem)
elem.shift.x = o.pos[1]
elem.shift.y = o.pos[2]
else
elem.pos.x = o.pos[1]
elem.pos.y = o.pos[2]
end
elem.size.w = o.size[1]
elem.size.h = o.size[2]
if (o.text) then elem.text = o.text end
if (o.bgColor) then
elem.bgColor = o.bgColor
end
if (o.bgImage) then
local tempicon = io.open(o.bgImage)
if (tempicon == nil) then
elem.bgImage = load_texture(DEFAULTITEXTURE)
else
elem.bgImage = load_texture(o.bgImage)
io.close(tempicon)
end
end
if (o.shapeType) then
elem.shapeType = o.shapeType
if (o.rounded * 2 > elem.size.w or o.rounded * 2 > elem.size.h) then
if (elem.size.w > elem.size.h) then
elem.rounded = elem.size.h / 2
else
elem.rounded = elem.size.w / 2
end
else
elem.rounded = o.rounded
end
end
if (o.interactive) then
elem.interactive = o.interactive
elem.scrollEnabled = o.scrollEnabled or nil
elem.hoverColor = o.hoverColor or nil
elem.pressedColor = o.pressedColor or nil
elem.hoverState = false
elem.pressedPos = { x = nil, y = nil }
elem.btnDown = function() end
elem.btnUp = function() end
elem.btnHover = function() end
table.insert(UIMouseHandler, elem)
end
end
table.insert(UIElementManager, elem)
table.insert(UIVisualManager, elem) -- Display is enabled by default, comment this line out to disable
return elem
end
function UIElement:addMouseHandlers(btnDown, btnUp, btnHover)
if (btnDown) then
self.btnDown = btnDown
end
if (btnUp) then
self.btnUp = btnUp
end
if (btnHover) then
self.btnHover = btnHover
end
end
function UIElement:addScrollFor(list, listElements, topBorder, botBorder, shiftPosList, shiftPosScroll, speed)
local shiftPosList = shiftPosList or 0
local shiftPosScroll = shiftPosScroll or 0
local speed = speed or 1
local elHeight = listElements[1].size.h
local scrollMin = self.shift.y
local scrollMax = self.parent.size.h - scrollMin - self.size.h
local minHeight = list.shift.y
local maxHeight = #listElements * elHeight
local enabled = nil
if (shiftPosList ~= 0) then
enabled = list:getEnabled(listElements, -shiftPosList + minHeight)
else
enabled = list:getEnabled(listElements, 0)
end
self:addMouseHandlers(
function(s, x, y)
if (s < 4) then
self.pressedPos = self:getLocalPos(x,y)
self.hoverState = BTN_DN
else
self:mouseScroll(list, elHeight, scrollMin, scrollMax, minHeight, maxHeight, y * speed)
enabled = self:scrollElements(listElements, topBorder, botBorder, enabled)
end
end, nil,
function(x, y)
if (self.hoverState == BTN_DN) then
local lPos = self:getLocalPos(x,y)
local posY = lPos.y - self.pressedPos.y + self.shift.y
self:barScroll(list, elHeight, scrollMin, scrollMax, minHeight, maxHeight, posY)
enabled = self:scrollElements(listElements, topBorder, botBorder, enabled)
end
end)
if (shiftPosScroll ~= 0 and shiftPosList ~= 0) then
self:moveTo(nil, shiftPosScroll)
list:moveTo(nil, shiftPosList)
end
end
function UIElement:getEnabled(elements, shiftPos)
local enabled = {}
local elHeight = elements[1].size.h
for i = 1, #elements do
if (i * elHeight - shiftPos > self.size.h or i * elHeight - shiftPos < 0) then
elements[i]:hide()
enabled[i] = false
else
enabled[i] = true
end
end
return enabled
end
function UIElement:mouseScroll(list, elHeight, scrollMin, scrollMax, minHeight, maxHeight, speed)
if (list.shift.y + speed * elHeight >= minHeight) then
self:moveTo(self.shift.x, scrollMin)
list:moveTo(list.shift.x, minHeight)
elseif (list.shift.y + speed * elHeight <= -maxHeight) then
self:moveTo(self.shift.x, scrollMax)
list:moveTo(list.shift.x, -maxHeight)
else
list:moveTo(list.shift.x, list.shift.y + speed * elHeight)
local scrollProgress = -(list.shift.y - minHeight) / (maxHeight + minHeight)
self:moveTo(self.shift.x, scrollMin + (self.parent.size.h - self.size.h - scrollMin * 2) * scrollProgress)
end
end
function UIElement:barScroll(list, elHeight, scrollMin, scrollMax, minHeight, maxHeight, posY)
local sizeH = math.floor(self.size.h / 4)
local scrollScale = (self.parent.size.h - (scrollMin * 2 + self.size.h)) / maxHeight
if (posY <= scrollMin) then
if (self.pressedPos.y < sizeH) then
self.pressedPos.y = sizeH
end
self:moveTo(self.shift.x, scrollMin)
list:moveTo(list.shift.x, minHeight)
elseif (posY >= scrollMax) then
if (self.pressedPos.y > self.parent.size.h - sizeH) then
self.pressedPos.y = self.parent.size.h - sizeH
end
self:moveTo(self.shift.x, scrollMax)
list:moveTo(list.shift.x, -maxHeight)
else
self:moveTo(self.shift.x, posY)
local scrollProgress = (self.shift.y - scrollMin) / (self.parent.size.h - scrollMin * 2 - self.size.h)
list:moveTo(list.shift.x, minHeight - (posY - scrollMin) * (1 / scrollScale) + ((list.size.h - elHeight) * scrollProgress))
end
end
function UIElement:scrollElements(list, topBorder, botBorder, enabled)
for i = 1, #list do
lPos = list[i]:getLocalPos(0,0)
if (-lPos.y <= topBorder.pos.y or -lPos.y >= botBorder.pos.y) then
if (enabled[i] == true) then
list[i]:hide()
enabled[i] = false
end
else
if (enabled[i] == false) then
list[i]:show()
enabled[i] = true
end
end
end
topBorder:hide()
botBorder:hide()
topBorder:show()
botBorder:show()
return enabled
end
function UIElement:addCustomDisplay(funcTrue, func)
self.customDisplayTrue = funcTrue
self.customDisplay = func
end
function UIElement:kill()
for i,v in pairs(self.child) do
v:kill()
end
self:hide()
self = { pos = { x = nil, y = nil },
size = { w = nil, h = nil },
bgColor = { 1, 1, 1, 0 }
}
if (self.bgImage) then unload_texture(self.bgImage) end
end
function UIElement:updatePos()
if (self.parent) then
self:updateChildPos()
end
end
function UIElement:display()
if (not self.customDisplayTrue) then
if (self.hoverState == BTN_HVR and self.hoverColor) then
set_color(unpack(self.hoverColor))
elseif (self.hoverState == BTN_DN and self.pressedColor) then
set_color(unpack(self.pressedColor))
else
set_color(unpack(self.bgColor))
end
if (self.shapeType == ROUNDED) then
draw_disk(self.pos.x + self.rounded, self.pos.y + self.rounded, 0, self.rounded, 500, 1, -180, 90, 0)
draw_disk(self.pos.x + self.rounded, self.pos.y + self.size.h - self.rounded, 0, self.rounded, 500, 1, -90, 90, 0)
draw_disk(self.pos.x + self.size.w - self.rounded, self.pos.y + self.rounded, 0, self.rounded, 500, 1, 90, 90, 0)
draw_disk(self.pos.x + self.size.w - self.rounded, self.pos.y + self.size.h - self.rounded, 0, self.rounded, 500, 1, 0, 90, 0)
draw_quad(self.pos.x + self.rounded, self.pos.y, self.size.w - self.rounded * 2, self.rounded)
draw_quad(self.pos.x, self.pos.y + self.rounded,self.size.w, self.size.h - self.rounded * 2)
draw_quad(self.pos.x + self.rounded, self.pos.y + self.size.h - self.rounded, self.size.w - self.rounded * 2, self.rounded)
else
draw_quad(self.pos.x, self.pos.y, self.size.w, self.size.h)
end
if (self.bgImage) then
draw_quad(self.pos.x, self.pos.y, self.size.w, self.size.h, self.bgImage)
end
end
self.customDisplay()
end
function UIElement:show()
local num = nil
for i,v in pairs(UIVisualManager) do
if (self == v) then
num = i
break
end
end
if (not num) then
table.insert(UIVisualManager, self)
if (self.interactive) then
table.insert(UIMouseHandler, self)
end
end
end
function UIElement:hide()
local num = nil
for i,v in pairs(self.child) do
v:hide()
end
if (self.interactive) then
for i,v in pairs(UIMouseHandler) do
if (self == v) then
num = i
break
end
end
if (num) then
table.remove(UIMouseHandler, num)
else
err(UIMouseHandlerEmpty)
end
end
for i,v in pairs(UIVisualManager) do
if (self == v) then
num = i
break
end
end
if (num) then
table.remove(UIVisualManager, num)
else
err(UIElementEmpty)
end
end
function UIElement:handleMouseDn(s, x, y)
for i, v in pairs(UIMouseHandler) do
if (x > v.pos.x and x < v.pos.x + v.size.w and y > v.pos.y and y < v.pos.y + v.size.h and s < 4) then
v.hoverState = BTN_DN
v.btnDown(s, x, y)
elseif (s >= 4 and v.scrollEnabled == true) then
v.btnDown(s, x, y)
end
end
end
function UIElement:handleMouseUp(s, x, y)
for i, v in pairs(UIMouseHandler) do
if (v.hoverState == BTN_DN) then
v.hoverState = nil
v.btnUp(s, x, y)
end
end
end
function UIElement:handleMouseHover(x, y)
for i, v in pairs(UIMouseHandler) do
if (x > v.pos.x and x < v.pos.x + v.size.w and y > v.pos.y and y < v.pos.y + v.size.h) then
if (v.hoverState ~= BTN_DN) then
v.hoverState = BTN_HVR
end
v.btnHover(x,y)
elseif (v.hoverState == BTN_DN) then
v.btnHover(x,y)
else
v.hoverState = false
end
end
end
function UIElement:moveTo(x, y)
if (self.parent) then
if (x) then self.shift.x = x end
if (y) then self.shift.y = y end
else
if (x) then self.pos.x = x end
if (y) then self.pos.y = y end
end
end
function UIElement:updateChildPos()
if (self.shift.x < 0) then
self.pos.x = self.parent.pos.x + self.parent.size.w + self.shift.x
else
self.pos.x = self.parent.pos.x + self.shift.x
end
if (self.shift.y < 0) then
self.pos.y = self.parent.pos.y + self.parent.size.h + self.shift.y
else
self.pos.y = self.parent.pos.y + self.shift.y
end
end
function UIElement:uiText(str, x, y, font, align, scale, angle)
local font = font or FONTS.SMALL
local x = x or self.pos.x
local y = y or self.pos.y
local font_mod = font
local scale = scale or 1
local angle = angle or 0
local pos = 0
local align = align or LEFT
if (font == FONTS.BIG) then
font_mod = 4.5
elseif (font == 4) then
font_mod = 2.4
elseif (font == FONTS.SMALL) then
font_mod = 1.5
end
str = textAdapt(str, font, scale, self.size.w)
for i = 1, #str do
if (align == CENTER) then
xPos = x + self.size.w / 2 - get_string_length(str[i], font) * scale / 2
elseif (align == RIGHT) then
xPos = x + self.size.w - get_string_length(str[i], font) * scale
else
xPos = x
end
if (self.size.h > (pos + 1) * font_mod * 10 * scale + font_mod * 10) then
draw_text_angle_scale(str[i], xPos, y + (pos * font_mod * 10 * scale), angle, scale, font)
if (font == FONTS.BIG or font == FONTS.MEDIUM) then
draw_text_angle_scale(str[i], xPos, y + (pos * font_mod * 10 * scale), angle, scale, font)
end
pos = pos + 1
elseif (i ~= #str) then
draw_text_angle_scale(str[i]:gsub(".$", "..."), xPos, y + (pos * font_mod * 10 * scale), angle, scale, font)
if (font == FONTS.BIG or font == FONTS.MEDIUM) then
draw_text_angle_scale(str[i]:gsub(".$", "..."), xPos, y + (pos * font_mod * 10 * scale), angle, scale, font)
end
break
else
draw_text_angle_scale(str[i], xPos, y + (pos * font_mod * 10 * scale), angle, scale, font)
if (font == FONTS.BIG or font == FONTS.MEDIUM) then
draw_text_angle_scale(str[i], xPos, y + (pos * font_mod * 10 * scale), angle, scale, font)
end
end
end
end
function UIElement:setButtonColor()
if (self.hoverState == BTN_DN) then
set_color(unpack(self.pressedColor))
elseif (self.hoverState == BTN_HVR) then
set_color(unpack(self.hoverColor))
else
set_color(unpack(self.bgColor))
end
end
function UIElement:getPos()
local pos = {self.shift.x, self.shift.y}
return pos
end
function UIElement:getLocalPos(xPos, yPos, pos)
local pos = pos or { x = xPos, y = yPos}
if (self.parent) then
pos = self.parent:getLocalPos(xPos, yPos, pos)
if (self.shift.x < 0) then
pos.x = pos.x - self.parent.size.w - self.shift.x
else
pos.x = pos.x - self.shift.x
end
if (self.shift.y < 0) then
pos.y = pos.y - self.parent.size.h - self.shift.y
else
pos.y = pos.y - self.shift.y
end
else
pos.x = xPos - self.pos.x
pos.y = yPos - self.pos.y
end
return pos
end
function textAdapt(str, font, scale, maxWidth)
local destStr = {}
while ((get_string_length(str, font) * scale) > maxWidth) do
local newStr = string.match(str, "[^%s]+[%s]*")
str = str:gsub(strEsc(newStr), "")
if (str == "") then
table.insert(destStr, newStr)
return destStr
end
str = addWord(destStr, str, newStr, font, scale, maxWidth)
end
table.insert(destStr, str)
return destStr
end
function addWord(destStr, str, newStr, font, scale, maxWidth)
local word = string.match(str, "%a+.")
if ((get_string_length(newStr .. word, font) * scale) < maxWidth) then
str = str:gsub(word, "")
newStr = newStr..word
str = addWord(destStr, str, newStr, font, scale, maxWidth)
return str
else
table.insert(destStr, newStr)
return str
end
end
function strEsc(str)
return (str:gsub('%(', '%%(')
:gsub('%)', '%%)')
:gsub('%[', '%%[')
:gsub('%]', '%%]'))
end
end
clans/errors.lua ►Lua code:
-- errors class
do
ERR = { playerFolderPerms = "^36Clans ^07:: Failed to load player's clan, please download player's customs first ^07and verify folder permissions",
playerFolderClan = "^36Clans ^07:: Failed to read player's clan, please verify you're using the latest ^07version of Toribash",
clanDataEmpty = "^36Clans ^07:: Failed to load clans' info, please verify cache integrity and folder permissions",
clanLevelDataEmpty = "^36Clans ^07:: Failed to load levels data, please verify cache integrity and folder permissions",
clanAchievementDataEmpty = "^36Clans ^07:: Failed to load clan achievements data, please verify cache integrity and folder permissions",
UIElementEmpty = "^36UIManager ^07:: Element not found",
UIMouseHandlerEmpty = "^36UIMouseHandler ^07:: Element not found",
}
function err(str)
local errors = false
echo(str)
--[[add_hook("console", "error", function(s, i)
if (s:match("^Error")) then
errors = true
return 1
elseif (errors) then
remove_hooks("errors")
end
end)--]]
end
end
GitHub page
Direct download (ZIP archive)
|
|
Last edited by sir; Oct 25, 2017 at 08:10 PM..
|
|
|
|
Oct 3, 2017
|
#2
|
|
Forumite
4th Dan Black Belt
Join Date: May 2016
Posts: 1,943
|
Great work, I think it could look nicer tho. See: matchmaking screen
|
|
|
|
|
|
|
Oct 24, 2017
|
#3
|
|
Administrator
|
Had some other stuff to work on lately, got back to this few days ago.
Updated with v 0.2, see changelog below:
Changelog ►clandatamanager.lua
- Added clan list view
- Press and drag topbar to move window
- getClanData() now returns a table with loaded clanids (active clans only)
- Some fixes for showClan()
- drawVisuals() now updates position for all visible elements
uielement.lua
- show() - check if already shown
- handleMouseUp() - hover state nil
- handleMouseHover() - fix to avoid losing hover while mouse down
- moveTo() - fix to work with child items
- Added addScrollFor() to create a scrollable list (requires a scrollbar, works with both mouse scroll and scrollbar dragging)
- Added misc methods used by addScrollFor() - getEnabled(), mouseScroll(), barScroll(), scrollElements()
- Added getPos() and getLocalPos()
- create() now checks whether bgImage exists first before loading
errors.lua
- removed console hook for now
Steam client should download clan/level/achievement info to data/script/clans but grezet messed memberinfo up so it's not accurate for now. Will fix in coming days.
Not updating source/attachments for now, you can download a new version from github.
|
|
|
|
|
|
|
Oct 25, 2017
|
#4
|
|
Senior Member
God Belt
Join Date: Jun 2015
Posts: 1,319
|
Originally Posted by sir
Had some other stuff to work on lately, got back to this few days ago.
Updated with v 0.2, see changelog below:
Changelog ►clandatamanager.lua
- Added clan list view
- Press and drag topbar to move window
- getClanData() now returns a table with loaded clanids (active clans only)
- Some fixes for showClan()
- drawVisuals() now updates position for all visible elements
uielement.lua
- show() - check if already shown
- handleMouseUp() - hover state nil
- handleMouseHover() - fix to avoid losing hover while mouse down
- moveTo() - fix to work with child items
- Added addScrollFor() to create a scrollable list (requires a scrollbar, works with both mouse scroll and scrollbar dragging)
- Added misc methods used by addScrollFor() - getEnabled(), mouseScroll(), barScroll(), scrollElements()
- Added getPos() and getLocalPos()
- create() now checks whether bgImage exists first before loading
errors.lua
- removed console hook for now
Steam client should download clan/level/achievement info to data/script/clans but grezet messed memberinfo up so it's not accurate for now. Will fix in coming days.
Not updating source/attachments for now, you can download a new version from github.
|
When trying to do /ls clans.lua in game it gives me an error do i need to do /ls clans.lua <username> or should it work as-is?
|
|
|
|
|
|
|
Oct 25, 2017
|
#5
|
|
Administrator
|
Originally Posted by Elite
When trying to do /ls clans.lua in game it gives me an error do i need to do /ls clans.lua <username> or should it work as-is?
|
Forgot we added more data to clan info file, updated it with what Steam client currently uses.
Same download link should work.
-----
Updated OP with latest version's source, replaced attachments with download link from github.
|
|
Last edited by sir; Oct 25, 2017 at 08:12 PM..
Reason: <24 hour edit/bump
|
|
|
|
Posting Rules
|
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts
HTML code is Off
|
|
|
All times are GMT +1. The time now is 10:13 AM.
|
Linear Mode
