//Multiboard System by: Mckill2009
//Requested by: millzy
//===HOW TO USE:
//- Make a new trigger and convert to custom text via EDIT >>> CONVERT CUSTOM TEXT
//- The trigger name MUST be >>> MultiboardSystem (see the name below)
//- Copy ALL that is written here and overwrite the existing texts in the custom text
//Required Variables:
//- MultiBoard = Multiboard
//- Minutes = Minutes
//- Seconds = Integer
//=====Configurables
function MB_COLUMN takes nothing returns integer
return 9
endfunction
function MB_ROW takes nothing returns integer
return 15
endfunction
function MB_TITLE takes nothing returns string
return "Muiltboard and Hero Revive System"
endfunction
//=====End of Configurables
function MB takes nothing returns boolean
local multiboard m = CreateMultiboard()
local integer pnum1 = 1
local integer pnum2 = 8
local integer pnum3 = 7
local integer itemshow = 1
local multiboarditem team1
local multiboarditem team2
local integer RED = 255 //DO NOT TOUCH THIS!
local integer GREEN = 255 //DO NOT TOUCH THIS!
local integer BLUE = 255 //DO NOT TOUCH THIS!
call MultiboardSetTitleText(m, MB_TITLE())
call MultiboardDisplay(m, true)
call MultiboardSetColumnCount(m, MB_COLUMN())
call MultiboardSetRowCount(m, MB_ROW())
call MultiboardSetItemsWidth(m, 0.07)
call MultiboardSetItemsStyle(m, true, false)
call MultiboardSetItemValue(MultiboardGetItem(m, 0, 0), "Team One")
call MultiboardSetItemValue(MultiboardGetItem(m, 7, 0), "Team Two")
call MultiboardSetItemValue(MultiboardGetItem(m, 14, 0), "Game Time:")
call MultiboardSetItemValue(MultiboardGetItem(m, 0, 1), "Hero Icon")
call MultiboardSetItemValue(MultiboardGetItem(m, 0, 2), "Player Name")
call MultiboardSetItemValue(MultiboardGetItem(m, 0, 3), "Level")
call MultiboardSetItemValue(MultiboardGetItem(m, 0, 4), "Hero Kills")
call MultiboardSetItemValue(MultiboardGetItem(m, 0, 5), "Deaths")
call MultiboardSetItemValue(MultiboardGetItem(m, 0, 6), "Assists")
call MultiboardSetItemValue(MultiboardGetItem(m, 0, 7), "Revive Time")
call MultiboardSetItemValue(MultiboardGetItem(m, 0, 8), "Gold")
loop
set team1 = MultiboardGetItem(m, pnum1, 0)
call MultiboardSetItemValue(team1, "Player" + I2S(pnum1))
call MultiboardSetItemStyle(MultiboardGetItem(m, pnum1, 1), true, true)
set pnum1 = pnum1 + 1
exitwhen pnum1 >= 6
endloop
loop
set team2 = MultiboardGetItem(m, pnum2, 0)
call MultiboardSetItemValue(team2, "Player" + I2S(pnum3))
call MultiboardSetItemStyle(MultiboardGetItem(m, pnum2, 1), true, true)
set pnum2 = pnum2 + 1
set pnum3 = pnum3 + 1
exitwhen pnum2 >= 13
endloop
//Team One Color==Adjust manually
call MultiboardSetItemValueColor(MultiboardGetItem(m, 1, 0), RED, GREEN, BLUE, 100)
call MultiboardSetItemValueColor(MultiboardGetItem(m, 2, 0), RED, GREEN, BLUE, 100)
call MultiboardSetItemValueColor(MultiboardGetItem(m, 3, 0), RED, GREEN, BLUE, 100)
call MultiboardSetItemValueColor(MultiboardGetItem(m, 4, 0), RED, GREEN, BLUE, 100)
call MultiboardSetItemValueColor(MultiboardGetItem(m, 5, 0), RED, GREEN, BLUE, 100)
//Team Two Color==Adjust manually
call MultiboardSetItemValueColor(MultiboardGetItem(m, 8, 0), RED, GREEN, BLUE, 100)
call MultiboardSetItemValueColor(MultiboardGetItem(m, 9, 0), RED, GREEN, BLUE, 100)
call MultiboardSetItemValueColor(MultiboardGetItem(m, 10, 0), RED, GREEN, BLUE, 100)
call MultiboardSetItemValueColor(MultiboardGetItem(m, 11, 0), RED, GREEN, BLUE, 100)
call MultiboardSetItemValueColor(MultiboardGetItem(m, 12, 0), RED, GREEN, BLUE, 100)
//Team One Icons==Adjust manually
call MultiboardSetItemIcon(MultiboardGetItem(m, 1, 1), "ReplaceableTextures\\CommandButtons\\BTNHeroPaladin.blp")
call MultiboardSetItemIcon(MultiboardGetItem(m, 2, 1), "ReplaceableTextures\\CommandButtons\\BTNHeroPaladin.blp")
call MultiboardSetItemIcon(MultiboardGetItem(m, 3, 1), "ReplaceableTextures\\CommandButtons\\BTNHeroPaladin.blp")
call MultiboardSetItemIcon(MultiboardGetItem(m, 4, 1), "ReplaceableTextures\\CommandButtons\\BTNHeroPaladin.blp")
call MultiboardSetItemIcon(MultiboardGetItem(m, 5, 1), "ReplaceableTextures\\CommandButtons\\BTNHeroPaladin.blp")
//Team Two Icons==Adjust manually
call MultiboardSetItemIcon(MultiboardGetItem(m, 8, 1), "ReplaceableTextures\\CommandButtons\\BTNHeroPaladin.blp")
call MultiboardSetItemIcon(MultiboardGetItem(m, 9, 1), "ReplaceableTextures\\CommandButtons\\BTNHeroPaladin.blp")
call MultiboardSetItemIcon(MultiboardGetItem(m, 10, 1), "ReplaceableTextures\\CommandButtons\\BTNHeroPaladin.blp")
call MultiboardSetItemIcon(MultiboardGetItem(m, 11, 1), "ReplaceableTextures\\CommandButtons\\BTNHeroPaladin.blp")
call MultiboardSetItemIcon(MultiboardGetItem(m, 12, 1), "ReplaceableTextures\\CommandButtons\\BTNHeroPaladin.blp")
call MultiboardSetItemIcon(MultiboardGetItem(m, 13, 1), "ReplaceableTextures\\CommandButtons\\BTNHeroPaladin.blp")
set udg_MultiBoard = m
set m = null
return false
endfunction
function MB_TIME takes nothing returns boolean
set udg_Seconds = udg_Seconds + 1
if udg_Seconds < 10 then
call MultiboardSetItemValue(MultiboardGetItem(udg_MultiBoard, 14, 1), I2S(udg_Minutes)+":"+"0"+I2S(udg_Seconds))
else
call MultiboardSetItemValue(MultiboardGetItem(udg_MultiBoard, 14, 1), I2S(udg_Minutes)+":"+I2S(udg_Seconds))
endif
if udg_Seconds >= 60 then
set udg_Minutes = udg_Minutes + 1
set udg_Seconds = 0
endif
call MultiboardSetItemValue(MultiboardGetItem(udg_MultiBoard, 1, 8), I2S(GetPlayerState(Player(0), PLAYER_STATE_RESOURCE_GOLD)))
call MultiboardSetItemValue(MultiboardGetItem(udg_MultiBoard, 2, 8), I2S(GetPlayerState(Player(1), PLAYER_STATE_RESOURCE_GOLD)))
call MultiboardSetItemValue(MultiboardGetItem(udg_MultiBoard, 3, 8), I2S(GetPlayerState(Player(2), PLAYER_STATE_RESOURCE_GOLD)))
call MultiboardSetItemValue(MultiboardGetItem(udg_MultiBoard, 4, 8), I2S(GetPlayerState(Player(3), PLAYER_STATE_RESOURCE_GOLD)))
call MultiboardSetItemValue(MultiboardGetItem(udg_MultiBoard, 5, 8), I2S(GetPlayerState(Player(4), PLAYER_STATE_RESOURCE_GOLD)))
call MultiboardSetItemValue(MultiboardGetItem(udg_MultiBoard, 8, 8), I2S(GetPlayerState(Player(6), PLAYER_STATE_RESOURCE_GOLD)))
call MultiboardSetItemValue(MultiboardGetItem(udg_MultiBoard, 9, 8), I2S(GetPlayerState(Player(7), PLAYER_STATE_RESOURCE_GOLD)))
call MultiboardSetItemValue(MultiboardGetItem(udg_MultiBoard, 10, 8), I2S(GetPlayerState(Player(8), PLAYER_STATE_RESOURCE_GOLD)))
call MultiboardSetItemValue(MultiboardGetItem(udg_MultiBoard, 11, 8), I2S(GetPlayerState(Player(9), PLAYER_STATE_RESOURCE_GOLD)))
call MultiboardSetItemValue(MultiboardGetItem(udg_MultiBoard, 12, 8), I2S(GetPlayerState(Player(10), PLAYER_STATE_RESOURCE_GOLD)))
return false
endfunction
function InitTrig_MultiboardSystem takes nothing returns nothing
local trigger t1 = CreateTrigger()
local trigger t2 = CreateTrigger()
call TriggerRegisterTimerEvent(t1, 0.1, false)
call TriggerRegisterTimerEvent(t2, 1.0, true)
call TriggerAddCondition(t1, Condition(function MB))
call TriggerAddCondition(t2, Condition(function MB_TIME))
set t1 = null
set t2 = null
endfunction